23: l_invStatus NUMBER;
24: l_count NUMBER;
25: cursor c_rows is
26: select transaction_temp_id
27: from mtl_material_transactions_temp
28: where transaction_header_id = p_txnHdrID;
29:
30: begin
31: -------------------------------------------------------------
121: p_separator => ' ');
122: fnd_message.set_name('WIP', 'MTL_PROC_FAIL');
123: l_errCode := fnd_message.get;
124:
125: update mtl_material_transactions_temp
126: set process_flag = 'E',
127: error_code = substr(l_errCode,1,240),
128: error_explanation = substr(x_errorMsg,1,240)
129: where transaction_header_id = p_txnHdrID
224: l_opSeq,
225: l_supplyType,
226: l_inv_id,
227: l_comp_txn_id
228: from mtl_material_transactions_temp
229: where transaction_temp_id = p_txnTmpID
230: and transaction_source_type_id = 5;
231:
232: -- delete the record if it is for phantom
237: /* Fix for Bug#5949023 */
238: -- Get Inventory item id of parent
239: select inventory_item_id
240: into l_parent_inv_id
241: from mtl_material_transactions_temp
242: where transaction_action_id in (30, 31, 32)
243: and transaction_source_type_id = 5
244: and transaction_source_id = l_wipEntityID
245: and completion_transaction_id = l_comp_txn_id
254: -- Bug 13986251
255: -- delete only if inv_id of phantom is less than Assembly
256: -- or if parent record is processed. (Added as part of fix for bug 7009282*/
257: if (l_parent_inv_id < l_inv_id OR l_assy_processed = 1) then
258: delete mtl_material_transactions_temp
259: where transaction_temp_id = p_txnTmpID;
260:
261: if(l_logLevel <= wip_constants.trace_logging) then
262: wip_logger.exitPoint(p_procName => g_pkgName || '.' || l_procName,
505: where transaction_header_id = p_txnHdrID;
506:
507: select count(*)
508: into l_numTempRows
509: from mtl_material_transactions_temp
510: where transaction_header_id = p_txnHdrID;
511:
512: --after inv supports x_trans_count, change if below
513: -- if(l_numTempRows = l_numIntRows) then