SAP B1-Satınalma siparişli mal girişi satınalma siparişi olarak girilemesin kontrolü

IF :object_type = '20' AND :transaction_type IN ('U', 'A') THEN

SELECT COUNT(*) INTO cnt

FROM OPDN T0 INNER JOIN PDN1 T1 ON T0."DocEntry" = T1."DocEntry"
INNER JOIN OITM T2 ON T1."ItemCode" = T2."ItemCode"

WHERE T1."BaseType" ='-1'
AND T0."DocEntry" =:list_of_cols_val_tab_del

;

IF :cnt > 0 THEN
error := -111;
error_message := N'[HATA 21-01] İrsaliye Siparişe bağlantı olarak girilmelidir.';

END IF;

END IF;