Inventory Material transactions Interface

 

Below given script will insert Data for Account Alias Receipt for lot number 'Test1234'
---------------------------------------------------------------------------------------

declare
     l_trx_interface_id number;

begin
     select mtl_material_transactions_s.nextval into l_trx_interface_id from dual;

     insert into mtl_transactions_interface
          (source_code,       
           source_line_id,   
           source_header_id,
           process_flag,       
           transaction_mode, 
           lock_flag,
           last_update_date,   
           last_updated_by,   
           creation_date,
           created_by,         
           inventory_item_id, 
           organization_id,
           transaction_quantity,
           transaction_uom,   
           transaction_date,
           subinventory_code,   
           transaction_type_id,
           transaction_reference,
           transaction_interface_id,                 
          distribution_account_id,
           transaction_header_id)
     values ('Test Code',         
                  1,                 
                  1,
                  1,                   
                  2,                 
                  2,
                  sysdate,             
                  -1,                 
                  sysdate,
                 -1,                 
                 456789,             
                113,
                1,                   
                'Ea',               
                 sysdate,
                 'Stores',           
                41,                 
                'Test Reference',
                l_trx_interface_id ,       
                78907,
               123456);

     insert into mtl_transaction_lots_interface
          (transaction_interface_id, 

            last_update_date, 

            last_updated_by,
           creation_date,            

            created_by,       

            lot_number,
           transaction_quantity,     

            lot_expiration_date)
     values (l_trx_interface_id ,             

                sysdate,          

                -1,
                 sysdate,                  

                -1,               

                'Test1234',
                 1,                       

                 sysdate+100);

     commit;

end;

/



The following script will call the transaction manager pub
----------------------------------------------------------

declare
     v_ret_status Varchar2(100);
     v_msg_cnt Number;
     v_msg_data Varchar2(2000);
     v_ret_value Number;
     v_trans_count Number;

begin
     v_ret_value := INV_TXN_MANAGER_PUB.process_Transactions(
          p_api_version      => 1.0,
          p_init_msg_list    => 'T',
          p_commit           => 'T',
          p_validation_level => 100,
          x_return_status    => v_ret_status,
          x_msg_count        => v_msg_cnt,
          x_msg_data         => v_msg_data,
          x_trans_count      => v_trans_count,
          p_table            => 1,
          p_header_id        => 123456);
       
     dbms_output.put_line('API return status is: '||v_ret_status);     
     dbms_output.put_line('API msg count is: '||v_msg_cnt);
     dbms_output.put_line('API msg data is: '||v_msg_data);
     dbms_output.put_line('API Trans count is: '||v_trans_count);
end;


/