[Home] [Help]
1681: l_batch_size NUMBER;
1682: l_max_line_number NUMBER;
1683: l_commit_flag BOOLEAN;
1684:
1685: /* Selects the data from Sourcing that will populate PO_HEADERS_INTERFACE */
1686:
1687: CURSOR headerLevelInfo IS
1688: SELECT pah.auction_header_id,
1689: pah.document_number,
1827: BEGIN
1828: x_progress := '10: CREATE_PO_STRUCTURE: ' || 'auction_header_id: ' || p_auction_header_id || ', ' || 'bid_number: ' || p_bid_number;
1829: log_message(x_progress);
1830:
1831: SELECT po_headers_interface_s.nextval
1832: INTO x_interface_header_id
1833: FROM dual;
1834:
1835: OPEN headerLevelInfo;
1852: END LOOP;
1853: CLOSE sumOfReqAllocQuantities;
1854:
1855: /*
1856: Insert into PO_HEADERS_INTERFACE the purchase order header information based on the negotiation and the award bid.
1857: */
1858:
1859: INSERT into PO_HEADERS_INTERFACE (
1860: interface_header_id,
1855: /*
1856: Insert into PO_HEADERS_INTERFACE the purchase order header information based on the negotiation and the award bid.
1857: */
1858:
1859: INSERT into PO_HEADERS_INTERFACE (
1860: interface_header_id,
1861: interface_source_code,
1862: batch_id,
1863: action,
1930: p_user_id, -- last_update_by
1931: sysdate); -- last_update_date
1932:
1933:
1934: x_progress := '15: CREATE_PO_STRUCTURE: INSERTING the following data into po_headers_interface: ' ||
1935: 'interface_header_id: ' || to_char(x_interface_header_id) || ', ' ||
1936: 'interface_source_code: ' || 'SOURCING' || ', ' ||
1937: 'batch_id: ' || to_char(x_interface_header_id) || ', ' ||
1938: 'action: ' || 'NEW' || ', ' ||
3880: x_fax_number varchar2(100) := null;
3881: x_po_api_return_status varchar2 (3) := null;
3882: x_msg_count number := NULL;
3883: x_msg_data varchar2(2000):= NULL;
3884: x_document_num po_headers.segment1%type := null;
3885:
3886: BEGIN
3887: x_progress := '10: launch_po_approval: Start of Procedure';
3888: