The following lines contain the word 'select', 'insert', 'update' or 'delete':
select mtl_material_transactions_s.nextval
into l_transaction_header_id
from dual;
select mtl_transactions_enabled_flag
into l_transaction_flag
from mtl_system_items
where inventory_item_id = p_inventory_item_id
and organization_id = p_organization_id;
x_errCode := inv_trx_util_pub.insert_line_trx(
p_trx_hdr_id => l_transaction_header_id,
p_item_id => p_inventory_item_id,
p_revision => l_revision,
p_org_id => p_organization_id,
-- p_transaction_mode => 1,
p_trx_action_id => p_transaction_action_id,
p_subinv_code => p_subinventory,
p_locator_id => p_locator_id,
p_trx_type_id => p_transaction_type_id,
p_trx_src_type_id => p_transaction_source_type_id,
p_dist_id => p_dist_acct_id,
p_trx_qty => p_transaction_quantity,
p_pri_qty => l_primary_quantity,
p_uom => item.primaryUOMCode,
p_date => sysdate,
p_user_id => p_user_id,
x_trx_tmp_id => l_transaction_temp_id,
x_proc_msg => x_msg_data);
x_errCode := inv_trx_util_pub.insert_lot_trx(
p_trx_tmp_id => l_transaction_temp_id,
p_user_id => p_user_id,
p_lot_number => p_lot_number,
p_trx_qty => p_transaction_quantity,
p_pri_qty => l_primary_quantity,
x_ser_trx_id => l_serial_transaction_temp_id,
x_proc_msg => x_msg_data);
x_errCode := inv_trx_util_pub.insert_ser_trx(
p_trx_tmp_id => l_transaction_temp_id_s,
p_user_id => p_user_id,
p_fm_ser_num => p_serial_number,
p_to_ser_num => p_serial_number,
x_proc_msg => x_msg_data);
UPDATE MTL_MATERIAL_TRANSACTIONS_TEMP
SET TRANSACTION_MODE = 1
WHERE TRANSACTION_HEADER_ID = l_transaction_temp_id;