The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE price_update_insert
( p_transaction_id IN NUMBER
, p_consumption_po_header_id IN NUMBER
, p_consumption_release_id IN NUMBER
, p_transaction_quantity IN NUMBER
, p_po_distribution_id IN NUMBER
, x_msg_count OUT NOCOPY NUMBER
, x_msg_data OUT NOCOPY VARCHAR2
, x_return_status OUT NOCOPY VARCHAR2
)
IS
l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
( '>> Update Consumption','INV_CONSUMPTION_TXN_PVT'
, 9
);
INSERT INTO mtl_consumption_transactions mct
( mct.transaction_id
, mct.consumption_po_header_id
, mct.consumption_release_id
, mct.net_qty
, mct.created_by
, mct.creation_date
, mct.last_updated_by
, mct.last_update_date
, mct.last_update_login
, mct.consumption_processed_flag
, mct.po_distribution_id
)
VALUES
( p_transaction_id
, p_consumption_po_header_id
, p_consumption_release_id
, p_transaction_quantity
, FND_GLOBAL.user_id
, sysdate
, FND_GLOBAL.user_id
, sysdate
, FND_GLOBAL.login_id
, 'Y'
, p_po_distribution_id
);
SELECT DISTINCT mmt.transaction_source_id
INTO l_blanket
FROM mtl_material_transactions mmt
WHERE mmt.transaction_id = p_transaction_id;
SELECT DISTINCT poh.vendor_site_id
INTO l_owning_org_id
FROM po_headers_all poh
WHERE poh.po_header_id = l_blanket;
UPDATE mtl_material_transactions mmt
SET mmt.owning_organization_id = l_owning_org_id
,mmt.owning_tp_type = 1
WHERE mmt.transaction_id = p_transaction_id;
( '<< Update Consumption','INV_CONSUMPTION_TXN_PVT'
, 9
);
END price_update_insert;