[Home] [Help]
36: 1. Check for holds on the record
37: 2. If not on holds, check for valid location
38: 3. If location is valid, check for valid user
39: 4. If user is valid, insert into PO_REQUISITION_INTERFACE and
40: OE_DROP_SHIP_SOURCES tables
41: This program will be called as a concurrent program or from the
42: workflow.
43: -----------------------------------------------------------------*/
44:
544:
545: begin
546: select 'Y' -- added begin block for bug 7433481
547: into l_exists
548: from oe_drop_ship_sources
549: where line_id=l_drop_ship_line_rec.line_id;
550: exception
551: when no_data_found then
552: l_exists:='N';
588: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
589: END IF;
590: END IF;
591:
592: /* insert into oe_drop_ship_sources table */
593:
594: IF l_debug_level > 0 THEN
595: oe_debug_pub.add('Inserting Dropship Source Record',1);
596: END IF;
968: oe_debug_pub.add( 'START OF INSERT_DROP_SHIP_SOURCE' , 1 ) ;
969: END IF;
970:
971:
972: INSERT INTO oe_drop_ship_sources
973: (drop_ship_source_id,
974: header_id,
975: line_id,
976: destination_organization_id,
1311: line_location_id,po_release_id,drop_ship_source_id
1312: INTO l_requisition_header_id,l_pur_header_id,
1313: l_requisition_line_id,l_pur_line_id,
1314: l_line_loc_id,l_pur_release_id,l_drop_ship_id
1315: FROM oe_drop_ship_sources
1316: WHERE line_id = p_request_tbl(I).entity_id;
1317:
1318: IF l_requisition_header_id IS NOT NULL THEN
1319: l_req_created := 'Y';