declare
l_interface_header_id number;
l_interface_line_id number;
l_po_req_line_id number := 276384; --PR单行号
l_po_req_line_num number := 1;
l_process_code varchar2(20) := 'NEW'; -- NEW in case of creation of new PO, ADD incase of adding line to PO
l_action varchar2(20) := 'NEW'; -- NEW in case of creation of new PO, ADD incase of adding line to PO
l_document_id number := NULL; -- assign PO number in case of adding lines to existing PO...
l_document_num number := NULL; -- assign PO number in case of adding lines to existing PO...
l_agent_id number := 236; --采购员id,不能为空
l_vendor_id number;
l_vendor_site_id number;
---
l_return_status VARCHAR2(1);
l_msg_count NUMBER;
l_msg_data VARCHAR2(5000);
l_num_lines_processed NUMBER;
l_document_number PO_HEADERS_ALL.segment1%TYPE;
begin
apps.fnd_global.apps_initialize(user_id => 3752,
resp_id => 56583,
&nbs
l_interface_header_id number;
l_interface_line_id number;
l_po_req_line_id number := 276384; --PR单行号
l_po_req_line_num number := 1;
l_process_code varchar2(20) := 'NEW'; -- NEW in case of creation of new PO, ADD incase of adding line to PO
l_action varchar2(20) := 'NEW'; -- NEW in case of creation of new PO, ADD incase of adding line to PO
l_document_id number := NULL; -- assign PO number in case of adding lines to existing PO...
l_document_num number := NULL; -- assign PO number in case of adding lines to existing PO...
l_agent_id number := 236; --采购员id,不能为空
l_vendor_id number;
l_vendor_site_id number;
---
l_return_status VARCHAR2(1);
l_msg_count NUMBER;
l_msg_data VARCHAR2(5000);
l_num_lines_processed NUMBER;
l_document_number PO_HEADERS_ALL.segment1%TYPE;
begin
apps.fnd_global.apps_initialize(user_id => 3752,
resp_id => 56583,
&nbs