[Home] [Help]
1826: ORDER BY interface_line_id;
1827:
1828: /* Bug 9883780 - End */
1829:
1830: /* Selects the data from Sourcing that will populate PO_HEADERS_INTERFACE */
1831:
1832: /* Bug 9891996 - Added External IDV field to headerLevelInfo cursor */
1833:
1834: CURSOR headerLevelInfo IS
2071: l_is_fed := 'N';
2072: END;
2073:
2074:
2075: SELECT po_headers_interface_s.nextval
2076: INTO x_interface_header_id
2077: FROM dual;
2078:
2079: OPEN headerLevelInfo;
2111: CLOSE sumOfReqAllocQuantities;
2112: END IF;
2113:
2114: /*
2115: Insert into PO_HEADERS_INTERFACE the purchase order header information based on the negotiation and the award bid.
2116: */
2117:
2118: /* Bug 9891996 - Populate External IDV also in PO_HEADERS_INTERFACE table */
2119:
2114: /*
2115: Insert into PO_HEADERS_INTERFACE the purchase order header information based on the negotiation and the award bid.
2116: */
2117:
2118: /* Bug 9891996 - Populate External IDV also in PO_HEADERS_INTERFACE table */
2119:
2120: INSERT into PO_HEADERS_INTERFACE (
2121: interface_header_id,
2122: interface_source_code,
2116: */
2117:
2118: /* Bug 9891996 - Populate External IDV also in PO_HEADERS_INTERFACE table */
2119:
2120: INSERT into PO_HEADERS_INTERFACE (
2121: interface_header_id,
2122: interface_source_code,
2123: batch_id,
2124: action,
2199: decode(x_pdoi_header.contract_type, 'STANDARD',NULL,x_pdoi_header.umbrella_program_id),
2200: decode(Nvl(x_pdoi_header.fair_opp_notice_flag,'N'), 'Y',x_pdoi_header.auction_header_id,NULL)); -- last_update_date
2201:
2202:
2203: x_progress := '15: CREATE_PO_STRUCTURE: INSERTING the following data into po_headers_interface: ' ||
2204: 'interface_header_id: ' || to_char(x_interface_header_id) || ', ' ||
2205: 'interface_source_code: ' || 'SOURCING' || ', ' ||
2206: 'batch_id: ' || to_char(x_interface_header_id) || ', ' ||
2207: 'action: ' || 'NEW' || ', ' ||
4566: x_error_code := PO_SUCCESS;
4567: -- In case of federal : Populate clm_document_number column to order_number
4568: IF PON_CLM_UTIL_PKG.IS_DOCUMENT_FEDERAL(x_doctype_id) = 1 THEN
4569: select clm_document_number into x_order_number
4570: from po_headers_all
4571: where
4572: po_header_id = x_po_header_id;
4573: END IF;
4574: ELSIF (x_return_status = FND_API.g_ret_sts_error
4661: x_error_code := PO_SUCCESS;
4662: -- In case of federal : Populate clm_document_number column to order_number
4663: IF PON_CLM_UTIL_PKG.IS_DOCUMENT_FEDERAL(x_doctype_id) = 1 THEN
4664: select clm_document_number into x_order_number
4665: from po_headers_all
4666: where
4667: po_header_id = x_po_header_id;
4668: END IF;
4669: ELSIF (x_return_status = PO_INTERFACE_S.G_RET_STS_DUP_DOC_NUM) THEN
4768: sysdate,
4769: fnd_global.user_id,
4770: sysdate,
4771: fnd_global.login_id
4772: FROM pon_orca_cert_details pocd, po_headers_all pha, pon_auction_headers_all paha
4773: WHERE pocd.document_number = paha.document_number
4774: AND paha.auction_header_id = p_auction_header_id
4775: AND pha.po_header_id = x_po_header_id
4776: AND pha.vendor_id = pocd.vendor_id
4862: x_fax_number varchar2(100) := null;
4863: x_po_api_return_status varchar2 (3) := null;
4864: x_msg_count number := NULL;
4865: x_msg_data varchar2(2000):= NULL;
4866: x_document_num po_headers.segment1%type := null;
4867:
4868: BEGIN
4869: x_progress := '10: launch_po_approval: Start of Procedure';
4870: