[Home] [Help]
491: , x_transaction_header_id IN OUT NOCOPY NUMBER
492: ) IS
493: l_api_name CONSTANT VARCHAR2(30) := 'create_txn_update_bal_in_odm' ;
494: l_api_version CONSTANT NUMBER := 1.0 ;
495: l_mmtt_row mtl_material_transactions_temp%ROWTYPE;
496: TYPE mtlt_row_tbl IS TABLE OF mtl_transaction_lots_temp%ROWTYPE INDEX BY BINARY_INTEGER;
497: l_mtlt_row_tbl mtlt_row_tbl;
498: l_count pls_integer;
499:
522:
523: x_return_status :=FND_API.G_RET_STS_SUCCESS;
524:
525: --we need to construct the record for inserting transactions in ODM.
526: --then we need to insert into mtl_material_transactions_temp table.
527: --this is done for each line.
528:
529: --this procedure is called line by line.
530:
601: l_mmtt_row.source_code := 'OPM-DXFR-MIGRATION';
602: l_mmtt_row.source_line_id := p_line_row.line_id;
603: l_mmtt_row.transaction_source_id := p_hdr_row.transfer_id;
604:
605: -- insert data into mtl_material_transactions_temp table
606: INSERT INTO mtl_material_transactions_temp
607: (
608: TRANSACTION_HEADER_ID,
609: TRANSACTION_TEMP_ID,
602: l_mmtt_row.source_line_id := p_line_row.line_id;
603: l_mmtt_row.transaction_source_id := p_hdr_row.transfer_id;
604:
605: -- insert data into mtl_material_transactions_temp table
606: INSERT INTO mtl_material_transactions_temp
607: (
608: TRANSACTION_HEADER_ID,
609: TRANSACTION_TEMP_ID,
610: TRANSACTION_MODE,
681: l_mmtt_row.last_updated_by,
682: l_mmtt_row.last_update_login
683: );
684: IF FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW >= G_Debug_Level THEN
685: log_msg('Inserted 1 record in mtl_material_transactions_temp');
686: END IF;
687:
688: --lets see if we have records to be inserted in mtl_transaction_lots_temp
689: --line could have multiple lots