27: ,RRP_TRANSACTION_ID IN NUMBER) RETURN BOOLEAN IS
28: L_USER_ENTERED_FLAG RCV_TRANSACTIONS.USER_ENTERED_FLAG%TYPE;
29: L_PARENT_TRANSACTION_ID RCV_TRANSACTIONS.PARENT_TRANSACTION_ID%TYPE;
30: L_TRANSACTION_ID RCV_TRANSACTIONS.TRANSACTION_ID%TYPE;
31: L_AUTO_TRANSACT_CODE RCV_TRANSACTIONS_INTERFACE.AUTO_TRANSACT_CODE%TYPE;
32: L_TRANSACTION_TYPE RCV_TRANSACTIONS_INTERFACE.TRANSACTION_TYPE%TYPE;
33: BEGIN
34: IF (RRP_FROM_INTERFACE = 'N') THEN
35: BEGIN
28: L_USER_ENTERED_FLAG RCV_TRANSACTIONS.USER_ENTERED_FLAG%TYPE;
29: L_PARENT_TRANSACTION_ID RCV_TRANSACTIONS.PARENT_TRANSACTION_ID%TYPE;
30: L_TRANSACTION_ID RCV_TRANSACTIONS.TRANSACTION_ID%TYPE;
31: L_AUTO_TRANSACT_CODE RCV_TRANSACTIONS_INTERFACE.AUTO_TRANSACT_CODE%TYPE;
32: L_TRANSACTION_TYPE RCV_TRANSACTIONS_INTERFACE.TRANSACTION_TYPE%TYPE;
33: BEGIN
34: IF (RRP_FROM_INTERFACE = 'N') THEN
35: BEGIN
36: SELECT
58: AUTO_TRANSACT_CODE,
59: TRANSACTION_TYPE
60: INTO L_AUTO_TRANSACT_CODE,L_TRANSACTION_TYPE
61: FROM
62: RCV_TRANSACTIONS_INTERFACE
63: WHERE INTERFACE_TRANSACTION_ID = RRP_TRANSACTION_ID;
64: BEGIN
65: IF (L_AUTO_TRANSACT_CODE = 'DELIVER') THEN
66: RETURN FALSE;
210: FUNCTION DELIVERY_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
211: ,RRP_TRANSACTION_ID IN NUMBER) RETURN BOOLEAN IS
212: L_TRANSACTION_TYPE RCV_TRANSACTIONS.TRANSACTION_TYPE%TYPE;
213: L_TRANSACTION_ID RCV_TRANSACTIONS.TRANSACTION_ID%TYPE;
214: L_AUTO_TRANSACT_CODE RCV_TRANSACTIONS_INTERFACE.AUTO_TRANSACT_CODE%TYPE;
215: BEGIN
216: IF (RRP_FROM_INTERFACE = 'N') THEN
217: BEGIN
218: SELECT
234: SELECT
235: AUTO_TRANSACT_CODE
236: INTO L_AUTO_TRANSACT_CODE
237: FROM
238: RCV_TRANSACTIONS_INTERFACE
239: WHERE INTERFACE_TRANSACTION_ID = RRP_TRANSACTION_ID;
240: BEGIN
241: IF (L_AUTO_TRANSACT_CODE = 'DELIVER') THEN
242: RETURN FALSE;
261: ,RRP_TRANSACTION_ID IN NUMBER) RETURN BOOLEAN IS
262: L_USER_ENTERED_FLAG RCV_TRANSACTIONS.USER_ENTERED_FLAG%TYPE;
263: L_PARENT_TRANSACTION_ID RCV_TRANSACTIONS.PARENT_TRANSACTION_ID%TYPE;
264: L_TRANSACTION_TYPE RCV_TRANSACTIONS.TRANSACTION_TYPE%TYPE;
265: L_AUTO_TRANSACT_CODE RCV_TRANSACTIONS_INTERFACE.AUTO_TRANSACT_CODE%TYPE;
266: BEGIN
267: IF (RRP_FROM_INTERFACE = 'N') THEN
268: BEGIN
269: SELECT
556: SELECT
557: TRANSACTION_TYPE
558: INTO L_TRANSACTION_TYPE
559: FROM
560: RCV_TRANSACTIONS_INTERFACE
561: WHERE INTERFACE_TRANSACTION_ID = RRP_TRANSACTION_ID;
562: END IF;
563: IF L_TRANSACTION_TYPE <> 'DELIVER' THEN
564: QTY := PARENT_PRIMARY_QUANTITY + NVL(C_SUM_CORRECTED_QTY