131: AND PRH.RECV_ID = PRD.RECV_ID
132: AND PRD.LINE_ID = REC_DOCDTL.LINE_ID
133: AND PRD.PO_ID = poh.po_id (+)
134: AND PVM.VENDOR_ID = PRD.SHIPVEND_ID;
135: CURSOR RCV_TRANSACTIONS_INFO IS
136: SELECT
137: SHIPMENT_HEADER_ID,
138: PO_HEADER_ID,
139: VENDOR_ID,
138: PO_HEADER_ID,
139: VENDOR_ID,
140: VENDOR_SITE_ID
141: FROM
142: RCV_TRANSACTIONS
143: WHERE SHIPMENT_HEADER_ID = REC_DOCDTL.DOC_ID
144: AND TRANSACTION_ID = REC_DOCDTL.LINE_ID;
145: REC_RCV_TRANSACTIONS RCV_TRANSACTIONS_INFO%ROWTYPE;
146: CURSOR VENDOR_INFO IS
141: FROM
142: RCV_TRANSACTIONS
143: WHERE SHIPMENT_HEADER_ID = REC_DOCDTL.DOC_ID
144: AND TRANSACTION_ID = REC_DOCDTL.LINE_ID;
145: REC_RCV_TRANSACTIONS RCV_TRANSACTIONS_INFO%ROWTYPE;
146: CURSOR VENDOR_INFO IS
147: SELECT
148: VEND.SEGMENT1,
149: VEND.VENDOR_NAME,
150: SITE.VENDOR_SITE_CODE
151: FROM
152: PO_VENDORS VEND,
153: PO_VENDOR_SITES_ALL SITE
154: WHERE VEND.VENDOR_ID = REC_RCV_TRANSACTIONS.VENDOR_ID
155: AND VEND.VENDOR_ID = SITE.VENDOR_ID
156: AND SITE.VENDOR_SITE_ID = REC_RCV_TRANSACTIONS.VENDOR_SITE_ID;
157: REC_VENDOR_INFO VENDOR_INFO%ROWTYPE;
158: CURSOR RECV_INFO IS
152: PO_VENDORS VEND,
153: PO_VENDOR_SITES_ALL SITE
154: WHERE VEND.VENDOR_ID = REC_RCV_TRANSACTIONS.VENDOR_ID
155: AND VEND.VENDOR_ID = SITE.VENDOR_ID
156: AND SITE.VENDOR_SITE_ID = REC_RCV_TRANSACTIONS.VENDOR_SITE_ID;
157: REC_VENDOR_INFO VENDOR_INFO%ROWTYPE;
158: CURSOR RECV_INFO IS
159: SELECT
160: RECEIPT_NUM
159: SELECT
160: RECEIPT_NUM
161: FROM
162: RCV_SHIPMENT_HEADERS
163: WHERE SHIPMENT_HEADER_ID = REC_RCV_TRANSACTIONS.SHIPMENT_HEADER_ID;
164: CURSOR PO_INFO IS
165: SELECT
166: SEGMENT1,
167: ATTRIBUTE15
166: SEGMENT1,
167: ATTRIBUTE15
168: FROM
169: PO_HEADERS_ALL
170: WHERE PO_HEADER_ID = REC_RCV_TRANSACTIONS.PO_HEADER_ID;
171: CURSOR CUR_VEND_NAME IS
172: SELECT
173: VENDOR_NO,
174: VENDOR_NAME
232: INTO RECV_ORGN_CODE,VEND_NO,VEND_NAME,RECV_NO,PO_NO,PO_ORGN_CODE;
233: CLOSE CUR_PURCHDTL;
234: ELSIF REC_DOCDTL.DOC_TYPE = 'PORC' THEN
235: RECV_ORGN_CODE := REC_DOCDTL.ORGN_CODE;
236: OPEN RCV_TRANSACTIONS_INFO;
237: FETCH RCV_TRANSACTIONS_INFO
238: INTO REC_RCV_TRANSACTIONS;
239: CLOSE RCV_TRANSACTIONS_INFO;
240: OPEN VENDOR_INFO;
233: CLOSE CUR_PURCHDTL;
234: ELSIF REC_DOCDTL.DOC_TYPE = 'PORC' THEN
235: RECV_ORGN_CODE := REC_DOCDTL.ORGN_CODE;
236: OPEN RCV_TRANSACTIONS_INFO;
237: FETCH RCV_TRANSACTIONS_INFO
238: INTO REC_RCV_TRANSACTIONS;
239: CLOSE RCV_TRANSACTIONS_INFO;
240: OPEN VENDOR_INFO;
241: FETCH VENDOR_INFO
234: ELSIF REC_DOCDTL.DOC_TYPE = 'PORC' THEN
235: RECV_ORGN_CODE := REC_DOCDTL.ORGN_CODE;
236: OPEN RCV_TRANSACTIONS_INFO;
237: FETCH RCV_TRANSACTIONS_INFO
238: INTO REC_RCV_TRANSACTIONS;
239: CLOSE RCV_TRANSACTIONS_INFO;
240: OPEN VENDOR_INFO;
241: FETCH VENDOR_INFO
242: INTO REC_VENDOR_INFO;
235: RECV_ORGN_CODE := REC_DOCDTL.ORGN_CODE;
236: OPEN RCV_TRANSACTIONS_INFO;
237: FETCH RCV_TRANSACTIONS_INFO
238: INTO REC_RCV_TRANSACTIONS;
239: CLOSE RCV_TRANSACTIONS_INFO;
240: OPEN VENDOR_INFO;
241: FETCH VENDOR_INFO
242: INTO REC_VENDOR_INFO;
243: CLOSE VENDOR_INFO;