24: END BUYER_PREPARERFORMULA;
25:
26: FUNCTION DIRECT_RECEIVING_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
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;
25:
26: FUNCTION DIRECT_RECEIVING_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
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
26: FUNCTION DIRECT_RECEIVING_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
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
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
36: SELECT
37: TRANSACTION_TYPE
38: INTO L_TRANSACTION_TYPE
39: FROM
40: RCV_TRANSACTIONS
41: WHERE TRANSACTION_ID = RRP_TRANSACTION_ID;
42: IF (L_TRANSACTION_TYPE = 'DELIVER') THEN
43: RETURN FALSE;
44: ELSE
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;
208: END DOC_NUM_BOILER_PLATEFORMULA;
209:
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
209:
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
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
218: SELECT
219: TRANSACTION_TYPE
220: INTO L_TRANSACTION_TYPE
221: FROM
222: RCV_TRANSACTIONS
223: WHERE TRANSACTION_ID = RRP_TRANSACTION_ID;
224: IF (L_TRANSACTION_TYPE = 'DELIVER') THEN
225: RETURN FALSE;
226: END IF;
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;
258: END DELIVERY_CHECK;
259:
260: FUNCTION CHILD_DIRECT_RECEIVING_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
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
259:
260: FUNCTION CHILD_DIRECT_RECEIVING_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
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
260: FUNCTION CHILD_DIRECT_RECEIVING_CHECK(RRP_FROM_INTERFACE IN VARCHAR2
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
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
270: USER_ENTERED_FLAG,
271: TRANSACTION_TYPE
272: INTO L_USER_ENTERED_FLAG,L_TRANSACTION_TYPE
273: FROM
274: RCV_TRANSACTIONS
275: WHERE PARENT_TRANSACTION_ID = RRP_TRANSACTION_ID;
276: IF (L_TRANSACTION_TYPE <> 'DELIVER') THEN
277: RETURN TRUE;
278: ELSIF (L_USER_ENTERED_FLAG = 'Y') THEN
541: ,RECEIPT_UNIT_OF_MEASURE IN VARCHAR2
542: ,ITEM_ID IN NUMBER) RETURN NUMBER IS
543: QTY NUMBER;
544: QTY_IN_RCT_UOM NUMBER;
545: L_TRANSACTION_TYPE RCV_TRANSACTIONS.TRANSACTION_TYPE%TYPE;
546: L_UOM RCV_SHIPMENT_LINES.UNIT_OF_MEASURE%TYPE;
547: BEGIN
548: IF (RRP_FROM_INTERFACE = 'N') THEN
549: SELECT
549: SELECT
550: TRANSACTION_TYPE
551: INTO L_TRANSACTION_TYPE
552: FROM
553: RCV_TRANSACTIONS
554: WHERE TRANSACTION_ID = RRP_TRANSACTION_ID;
555: ELSE
556: SELECT
557: TRANSACTION_TYPE
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