The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT OSA_ITEM_ID
INTO l_osa_item_id
FROM JMF_SUBCONTRACT_ORDERS
WHERE SUBCONTRACT_PO_SHIPMENT_ID = p_subcontract_po_shipment_id
AND ROWNUM = 1;
SELECT OSA_ITEM_ID
INTO l_osa_item_id
FROM JMF_SUBCONTRACT_ORDERS
WHERE SUBCONTRACT_PO_SHIPMENT_ID = p_subcontract_po_shipment_id
AND ROWNUM = 1;
SELECT OSA_ITEM_ID
INTO l_osa_item_id
FROM JMF_SUBCONTRACT_ORDERS
WHERE SUBCONTRACT_PO_SHIPMENT_ID = p_subcontract_po_shipment_id
AND ROWNUM = 1;
SELECT OSA_ITEM_ID
INTO l_osa_item_id
FROM JMF_SUBCONTRACT_ORDERS
WHERE SUBCONTRACT_PO_SHIPMENT_ID = p_subcontract_po_shipment_id
AND ROWNUM = 1;
, insert_flag VARCHAR2(1)
);
l_wip_entity_id NUMBER; -- will be inserted into mtl_transactions_interface as transaction_source_id
SELECT tp_organization_id
INTO l_organization_id
FROM jmf_subcontract_orders
WHERE subcontract_po_shipment_id = p_subcontract_po_shipment_id;
SELECT wro.supply_subinventory,
wro.supply_locator_id
INTO l_subinventory_code,
l_locator_id
FROM wip_requirement_operations wro,
jmf_subcontract_orders jso
WHERE wro.wip_entity_id = jso.wip_entity_id
AND wro.inventory_item_id = p_item_id
AND wro.organization_id = jso.tp_organization_id
AND jso.subcontract_po_shipment_id = p_subcontract_po_shipment_id;
SELECT DEFAULT_PULL_SUPPLY_SUBINV
INTO l_subinventory_code
FROM WIP_PARAMETERS
WHERE ORGANIZATION_ID = l_organization_id;
SELECT wro.supply_locator_id
INTO l_locator_id
FROM WIP_REQUIREMENT_OPERATIONS wro,
jmf_subcontract_orders jso
WHERE wro.wip_entity_id = jso.wip_entity_id
AND wro.organization_id = jso.tp_organization_id
AND wro.ORGANIZATION_ID = l_organization_id
AND jso.subcontract_po_shipment_id = p_subcontract_po_shipment_id
AND rownum = 1;
/* vmutyala added the following code to fetch distribution account and insert
into mtl_Transactions_interface Bug 4670527 */
IF p_transaction_type_id IN (42, 32)
THEN
JMF_SHIKYU_UTIL.Get_Shikyu_Offset_Account(p_subcontract_po_shipment_id,l_distribution_account_id);
/* vmutyala added the following code to fetch wip entity id and insert as
transaction_source_id into mtl_Transactions_interface for Bug 4670527 */
-- Bug 4964675
-- Added transaction types 35 and 43 for WIP Component Issue or Return
l_wip_entity_id := NULL;
SELECT wdj.wip_entity_id
INTO l_wip_entity_id
FROM wip_discrete_jobs wdj
, jmf_subcontract_orders jso
WHERE jso.wip_entity_id = wdj.wip_entity_id
AND jso.tp_organization_id = wdj.organization_id
AND wdj.organization_id = l_organization_id
AND jso.subcontract_po_shipment_id = p_subcontract_po_shipment_id;
SELECT mtl_material_transactions_s.nextval
INTO l_header_id
FROM sys.dual;
l_source_header_id before insert for Bug 4670527 */
l_source_line_id := 1;
/* vmutyala changed the following insert statement to add FINAL_COMPLETION_FLAG,
DISTRIBUTION_ACCOUNT_ID, transaction_source_id for insertion Bug 4670527 */
INSERT INTO mtl_Transactions_interface
( source_code
, source_line_id
, source_header_id
, process_flag
, transaction_mode
, inventory_item_id
, organization_id
, subinventory_code
, transaction_quantity
, transaction_uom
, transaction_date
, transaction_source_name
, transaction_type_id
, wip_entity_type
, operation_seq_num
, primary_quantity
, last_update_date
, last_updated_by
, creation_date
, created_by
, transaction_header_id
, validation_required
, FINAL_COMPLETION_FLAG
, DISTRIBUTION_ACCOUNT_ID
, transaction_source_id
, locator_id
)
VALUES
( p_subcontract_po_shipment_id
, l_source_line_id
, l_source_header_id
, 1
, 2 -- concurrent processing
, p_item_id
, l_organization_id
, l_subinventory_code
, l_transaction_quantity
, p_uom
, sysdate
, l_transaction_source_name
, p_Transaction_type_id
, l_wip_entity_type
, 1
, l_primary_quantity
, sysdate
, FND_GLOBAL.user_id
, sysdate
, FND_GLOBAL.user_id
, l_header_id
, 2
, 'N'
, l_distribution_account_id
, l_wip_entity_id
, l_locator_id
);