账户别名杂出事务处理



账户别名杂出事务处理

SELECT  mtl_material_transactions_s.nextval

           INTO  l_mtl_txn_itf_rec.transaction_interface_id

           FROM  dual;

        l_mtl_txn_itf_rec.transaction_header_id := l_mtl_txn_itf_rec.transaction_interface_id;

        l_mtl_txn_itf_rec.transaction_mode      :=  3 ;

        l_mtl_txn_itf_rec.process_flag          :=  1 ;

        l_mtl_txn_itf_rec.transaction_type_id   :=  31 ;

        l_mtl_txn_itf_rec.organization_id       := i.organization_id;

        l_mtl_txn_itf_rec.inventory_item_id     := i.inventory_item_id;  --l_mtl_txn_int_rec.inventory_item_id;

        l_mtl_txn_itf_rec.subinventory_code     := i.subinventory_code;  --l_mtl_txn_int_rec.subinventory_code;

        l_mtl_txn_itf_rec.locator_id            := i.locator_id;  --l_mtl_txn_int_rec.locator_id;

        l_mtl_txn_itf_rec.transaction_quantity  := i.onhand_quantity * - 1 ;  --l_mtl_txn_int_rec.transaction_quantity;

        l_mtl_txn_itf_rec.transaction_uom       := i.uom_code;  --l_mtl_txn_int_rec.uom_code;

        l_mtl_txn_itf_rec.transaction_date      := nvl(i.t