Цитата:
Сообщение от dumax750
бля, юрро, ты там работаешь вообще?
|
Да, смотри, какую шляпу накатал
CLEAR lt_selectedbatches.
READ TABLE lt_selectedbatches WITH TABLE KEY PLANT = ls_inpackage-PLANT
VENDOR = ls_inpackage-VENDOR
MATERIAL = ls_inpackage-MATERIAL.
IF SY-SUBRC = 0.
ELSE.
SELECT * FROM ZBI_BATCHES
WHERE PLANT = ls_inpackage-PLANT
AND VENDOR = ls_inpackage-VENDOR
AND MATERIAL = ls_inpackage-MATERIAL.
READ TABLE lt_batches WITH TABLE KEY BATCHID = ZBI_BATCHES-BATCHID BINARY SEARCH.
IF SY-SUBRC NE 0.
APPEND ZBI_BATCHES TO lt_batches.
ENDIF.
ENDSELECT.
lt_selectedbatches-PLANT = ls_inpackage-PLANT.
lt_selectedbatches-VENDOR = ls_inpackage-VENDOR.
lt_selectedbatches-MATERIAL = ls_inpackage-MATERIAL.
APPEND lt_selectedbatches.
ENDIF.