DATA : LT_LINES LIKE BAPI_MRP_IND_LINES OCCURS 0 WITH HEADER LINE,
LV_REQTY TYPE MENGE_D.
REFRESH LT_LINES.
CALL FUNCTION 'BAPI_MATERIAL_STOCK_REQ_LIST'
EXPORTING
MATERIAL = LV_MATNR
PLANT = LV_WERKS
MRP_AREA = LV_BERID
TABLES
MRP_IND_LINES = LT_LINES.
CLEAR LV_QTY.
LOOP AT LT_LINES WHERE FINISH_DATE IN S_BDTER
AND FINISH_DATE IS NOT INITIAL
AND PLNGSEGNO IS INITIAL.
LV_QTY = LV_QTY + LT_LINES-REC_REQD_QTY.
ENDLOOP.
댓글 없음:
댓글 쓰기