[Home] [Help]
167: -- po_headers_interface table
168: -- interface_header_id - Interface header unique identifier
169: -- document_type_code - Document type to be created. In our case Standard PO
170: -- document_num - number used to uniquely identify the PO in forms and reports
171: -- po_header_id - primary key in po_headers_all table
172: -- agent_id - buyer id
173: -------------------------------------------------------------------------
174:
175: TYPE po_header_rec_type IS RECORD(
1264: p_chr_id IN NUMBER
1265: ,p_batch_id IN NUMBER
1266: ,p_po_header_rec IN po_header_rec_type
1267: ,x_return_status OUT NOCOPY VARCHAR2
1268: ,x_po_header_id OUT NOCOPY po_headers_all.po_header_id%TYPE) IS
1269:
1270:
1271: l_po_null_rec po_header_rec_type; -- initialize to null
1272:
1848: l_batch_id number;
1849: l_request_id number;
1850:
1851: -- Temporarily required...see notes elsewhere
1852: l_po_header_id po_headers_all.po_header_id%TYPE;
1853:
1854: BEGIN
1855:
1856: G_USER_ID := FND_GLOBAL.USER_ID;
2052: ,x_msg_data OUT NOCOPY VARCHAR2
2053: ) IS
2054:
2055: l_msg_data VARCHAR2(200);
2056: l_po_number po_headers_all.segment1%TYPE;
2057:
2058: -- Keep track of number of rows affected. It is essential to store the
2059: -- SQL*ROWCOUNT value locally after each SQL operation as if we use
2060: -- the variable SQL%ROWCOUNT, there is a chance that it might get
2087: AND rel.jtot_object1_code = g_crj_chr_jtot_object_code -- correct jtot object
2088: -- for contract header
2089: AND NOT EXISTS (
2090: SELECT null
2091: FROM po_headers_all poh
2092: WHERE rel.object1_id1 = poh.po_header_id
2093: );
2094:
2095: l_sql_rowcount := SQL%ROWCOUNT;
2135: -- user can easily identify the PO
2136:
2137: SELECT po.segment1
2138: INTO l_po_number
2139: FROM po_headers_all po
2140: WHERE po.po_header_id =
2141: ( SELECT object1_id1
2142: FROM okc_k_rel_objs rel
2143: WHERE rel.chr_id = p_chr_id -- for the current contract