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
214: l_postingFlag,
215: l_flowSchedule,
216: l_opSeq,
217: l_supplyType
218: from mtl_material_transactions_temp
219: where transaction_temp_id = p_txnTmpID
220: and transaction_source_type_id = 5;
221:
222: -- delete the record if it is for phantom
221:
222: -- delete the record if it is for phantom
223: if ( l_opSeq < 0 and l_supplyType = 6 ) then
224:
225: delete mtl_material_transactions_temp
226: where transaction_temp_id = p_txnTmpID;
227:
228: if(l_logLevel <= wip_constants.trace_logging) then
229: wip_logger.exitPoint(p_procName => g_pkgName || '.' || l_procName,
466: where transaction_header_id = p_txnHdrID;
467:
468: select count(*)
469: into l_numTempRows
470: from mtl_material_transactions_temp
471: where transaction_header_id = p_txnHdrID;
472:
473: --after inv supports x_trans_count, change if below
474: -- if(l_numTempRows = l_numIntRows) then