Code: Alles auswählen.
MOVE r_best-menge TO w_atpmenge. " Nimm Lagerbestand bei Fehler in ATP-Prüfung
IF r_best-menge > 0. " ATP-Prüfung nur machen, wenn Ware am Lager ist
GET_ATPQTY(
EXPORTING
iw_matnr = r_best-matnr
iw_charg = r_best-charg
iw_werk = iw_werk
iw_lgort = iw_lgort
iw_meins = r_best-meins
IMPORTING
ew_menge = w_atpmenge
).
ENDIF.Code: Alles auswählen.
IF r_best-menge > 0. " ATP-Prüfung nur machen, wenn Ware am Lager ist
GET_ATPQTY(
EXPORTING
iw_matnr = r_best-matnr
iw_charg = r_best-charg
iw_werk = iw_werk
iw_lgort = iw_lgort
iw_meins = r_best-meins
IMPORTING
ew_menge = w_atpmenge
).
ELSE.
MOVE r_best-menge TO w_atpmenge. " Nimm Lagerbestand bei Fehler in ATP-Prüfung
ENDIF." Nimm Lagerbestand bei Fehler in ATP-Prüfung