The following lines contain the word 'select', 'insert', 'update' or 'delete':
L_PROG_UPDATE_DATE PA_PLSQL_DATATYPES.Char30TabTyp;
PA_IC_INV_UTILS.log_message('compute_mrc: ' || 'Before Insert...');
L_PROG_UPDATE_DATE(K)
:= to_char(P_inv_rec_tab(I).PROGRAM_UPDATE_DATE,'YYYY/MM/DD');
PROCEDURE Insert_rows
( P_inv_rec_tab IN PA_INVOICE_DETAIL_PKG.inv_rec_tab)
IS
l_tot_count NUMBER;
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In MRC Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In MRC Insert..'||to_char(l_tot_count));
/* If MRC records are created, insert in PA_MC_DRAFT_INV_DETAILS */
if (l_tot_count > 0)
Then
IF g1_debug_mode = 'Y' THEN
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Before Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Details Id'||to_char(L_DRAFT_INV_DET_ID(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Project Id'||to_char(L_PROJECT_ID(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Invoiced Flag'||L_INVOICED_FLAG(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Set of Books Id'||to_char(L_SETS_OF_BOOKS_ID(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Account Currency'||L_ACCT_CURRENCY_CODE(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Bill Amount'||to_char(L_BILL_AMOUNT(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Request Id'||to_char(PA_IC_INV_UTILS.G_REQUEST_ID));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Acct Rate Type'||L_ACCT_RATE_TYPE(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Acct Rate Date'||L_ACCT_RATE_DATE(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Acct Exchg Rate '||L_ACCT_EXCHANGE_RATE(I));
/* Array Insert of MRC records */
FOR I IN 1..l_tot_count
LOOP
/* Added the following if condition to stop inserting into pa_mc_draft_inv_details_all
table when bill_amount is zero, as we don't insert into pa_draft_invoice_details_all when bill_amount is zero- Bug 2739218 */
IF L_BILL_AMOUNT(I) <> 0
THEN
NULL;
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'End Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In MRC Insert Error..'|| to_char(c));
END Insert_rows;
PROCEDURE Insert_rows
( P_inv_rec_tab IN PA_INVOICE_DETAIL_PKG.inv_rec_tab,
P_trx_date IN PA_PLSQL_DATATYPES.DateTabTyp)
IS
l_tot_count NUMBER;
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In MRC Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In MRC Insert..'||to_char(l_tot_count));
/* If MRC records are created, insert in PA_MC_DRAFT_INV_DETAILS */
if (l_tot_count > 0)
Then
IF g1_debug_mode = 'Y' THEN
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Before Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Details Id'||to_char(L_DRAFT_INV_DET_ID(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Project Id'||to_char(L_PROJECT_ID(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Invoiced Flag'||L_INVOICED_FLAG(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Set of Books Id'||to_char(L_SETS_OF_BOOKS_ID(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Account Currency'||L_ACCT_CURRENCY_CODE(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Bill Amount'||to_char(L_BILL_AMOUNT(I)));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Request Id'||to_char(PA_IC_INV_UTILS.G_REQUEST_ID));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Acct Rate Type'||L_ACCT_RATE_TYPE(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Acct Rate Date'||L_ACCT_RATE_DATE(I));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Acct Exchg Rate '||L_ACCT_EXCHANGE_RATE(I));
/* Array Insert of MRC records */
IF g1_debug_mode = 'Y' THEN
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'End Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In MRC Insert Error..'|| to_char(c));
END Insert_rows;
PROCEDURE Update_rows
( P_inv_rec_tab IN PA_INVOICE_DETAIL_PKG.inv_rec_tab,
P_mrc_reqd_flag IN PA_PLSQL_DATATYPES.Char1TabTyp)
IS
l_tot_count NUMBER;
PA_IC_INV_UTILS.log_message('Update_rows: ' || 'In MRC Update...');
END Update_rows;
PROCEDURE Delete_rows
( P_inv_rec_tab IN PA_INVOICE_DETAIL_PKG.inv_rec_tab)
IS
l_draft_line_id PA_PLSQL_DATATYPES.numtabtyp;
PA_IC_INV_UTILS.log_message('Delete_rows: ' || 'In MRC Delete...');
END Delete_rows;