The following lines contain the word 'select', 'insert', 'update' or 'delete':
UPDATE PA_EXPENDITURE_ITEMS
SET CC_IC_PROCESSED_CODE ='X'
WHERE EXPENDITURE_ITEM_ID = local_expenditure_item_id;
PROCEDURE Insert_rows
( P_inv_rec_tab IN OUT NOCOPY inv_rec_tab)
IS
temp_G_Ins_count NUMBER :=0; /* Added for bug 2739218 */
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In Insert...');
PA_IC_INV_UTILS.log_message('Insert_rows: G_Ins_count '|| to_char(G_Ins_count));
PA_IC_INV_UTILS.log_message('Insert_rows: Before calling download G_Ins_count' || to_char(G_Ins_count));
PA_IC_INV_UTILS.log_message('Insert_rows: After calling download G_Ins_count '|| to_char(G_Ins_count));
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'In Insert...'|| to_char(G_Ins_count));
INSERT INTO PA_DRAFT_INVOICE_DETAILS
( DRAFT_INVOICE_DETAIL_ID,
EXPENDITURE_ITEM_ID,
LINE_NUM,
PROJECT_ID,
INVOICED_FLAG,
DENOM_CURRENCY_CODE,
DENOM_BILL_AMOUNT,
ACCT_CURRENCY_CODE,
BILL_AMOUNT,
REQUEST_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
ACCT_RATE_TYPE,
ACCT_RATE_DATE,
ACCT_EXCHANGE_RATE,
CC_PROJECT_ID,
CC_TAX_TASK_ID,
ORG_ID,
REV_CODE_COMBINATION_ID,
DRAFT_INVOICE_NUM,
DRAFT_INVOICE_LINE_NUM,
OUTPUT_VAT_TAX_ID,
OUTPUT_TAX_CLASSIFICATION_CODE,
OUTPUT_TAX_EXEMPT_FLAG,
OUTPUT_TAX_EXEMPT_REASON_CODE,
OUTPUT_TAX_EXEMPT_NUMBER,
LINE_NUM_REVERSED,
DETAIL_ID_REVERSED,
REVERSED_FLAG,
MARKUP_CALC_BASE_CODE,
IND_COMPILED_SET_ID,
RULE_PERCENTAGE,
BILL_RATE,
BILL_MARKUP_PERCENTAGE,
BASE_AMOUNT,
SCHEDULE_LINE_PERCENTAGE,
ORIG_DRAFT_INVOICE_NUM,
ORIG_DRAFT_INVOICE_LINE_NUM,
PROGRAM_APPLICATION_ID,
PROGRAM_ID,
PROGRAM_UPDATE_DATE,
TP_JOB_ID,
PROV_PROJ_BILL_JOB_ID,
/* Added for cross proj*/
TP_AMT_TYPE_CODE,
PROJECT_TP_RATE_TYPE,
PROJECT_TP_RATE_DATE,
PROJECT_TP_EXCHANGE_RATE,
PROJECT_TRANSFER_PRICE,
PROJFUNC_TP_RATE_TYPE,
PROJFUNC_TP_RATE_DATE,
PROJFUNC_TP_EXCHANGE_RATE,
PROJFUNC_TRANSFER_PRICE,
PROJECT_TP_CURRENCY_CODE,
PROJFUNC_TP_CURRENCY_CODE
/* End for cross proj*/
)
VALUES
( L_DETAIL_ID(I),
L_EXPENDITURE_ITEM_ID(I),
L_LINE_NUM(I),
L_PROJECT_ID(I),
L_INVOICED_FLAG(I),
L_DENOM_CURRENCY_CODE(I),
L_DENOM_BILL_AMOUNT(I),
L_ACCT_CURRENCY_CODE(I),
L_BILL_AMOUNT(I),
PA_IC_INV_UTILS.G_REQUEST_ID,
SYSDATE,
PA_IC_INV_UTILS.G_LAST_UPDATED_BY,
SYSDATE,
PA_IC_INV_UTILS.G_CREATED_BY,
PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN,
L_ACCT_RATE_TYPE(I),
to_date(L_ACCT_RATE_DATE(I),'DD-MM-YYYY'),
L_ACCT_EXCHANGE_RATE(I),
L_CC_PROJECT_ID(I),
L_CC_TAX_TASK_ID(I),
L_ORG_ID(I),
L_REV_CODE_COMBINATION_ID(I),
L_DRAFT_INVOICE_NUM(I),
L_DRAFT_INVOICE_LINE_NUM(I),
L_OUTPUT_VAT_TAX_ID(I),
L_OUTPUT_TAX_CODE(I),
L_OUTPUT_TAX_EXEMPT_FLAG(I),
L_OUTPUT_EXEMPT_REASON_CODE(I),
L_OUTPUT_TAX_EXEMPT_NUMBER(I),
L_LINE_NUM_REVERSED(I),
L_DETAIL_ID_REVERSED(I),
L_REVERSED_FLAG(I),
L_MARKUP_CALC_BASE_CODE(I),
L_IND_COMPILED_SET_ID(I),
L_RULE_PERCENTAGE(I),
L_BILL_RATE(I),
L_BILL_MARKUP_PERCENTAGE(I),
L_BASE_AMOUNT(I),
L_SCHEDULE_LINE_PERCENTAGE(I),
L_ORIG_INV_NUM(I),
L_ORIG_INV_LINE_NUM(I),
PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID,
PA_IC_INV_UTILS.G_PROGRAM_ID,
SYSDATE,
L_TP_JOB_ID(I),
L_PROV_PROJ_BILL_JOB_ID(I),
/* Added for cross proj*/
L_TP_AMT_TYPE_CODE(i),
L_PROJECT_TP_RATE_TYPE(i),
L_PROJECT_TP_RATE_DATE(i),
L_PROJECT_TP_EXCHANGE_RATE(i),
L_PROJECT_TRANSFER_PRICE(i),
L_PROJFUNC_TP_RATE_TYPE(i),
L_PROJFUNC_TP_RATE_DATE(i),
L_PROJFUNC_TP_EXCHANGE_RATE(i),
L_PROJFUNC_TRANSFER_PRICE(i),
L_PROJECT_TP_CURRENCY_CODE(i),
L_PROJFUNC_TP_CURRENCY_CODE(i)
/* End for cross proj*/
);
PA_IC_INV_UTILS.log_message('Insert_rows: ' || 'Error In Insert...');
END Insert_rows;
PROCEDURE Update_rows
( P_inv_rec_tab IN OUT NOCOPY inv_rec_tab,
P_mrc_reqd_flag IN PA_PLSQL_DATATYPES.Char1TabTyp)
IS
BEGIN
IF g1_debug_mode = 'Y' THEN
PA_IC_INV_UTILS.log_message('Update_rows: ' || 'In Update...');
Update PA_DRAFT_INVOICE_DETAILS
Set
DENOM_CURRENCY_CODE = L_DENOM_CURRENCY_CODE(I),
DENOM_BILL_AMOUNT = L_DENOM_BILL_AMOUNT(I),
ACCT_CURRENCY_CODE = L_ACCT_CURRENCY_CODE(I),
BILL_AMOUNT = L_BILL_AMOUNT(I),
REQUEST_ID = PA_IC_INV_UTILS.G_REQUEST_ID,
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATED_BY = PA_IC_INV_UTILS.G_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN,
ACCT_RATE_TYPE = L_ACCT_RATE_TYPE(I),
ACCT_RATE_DATE = to_date(L_ACCT_RATE_DATE(I),'DD-MM-YYYY'),
ACCT_EXCHANGE_RATE = L_ACCT_EXCHANGE_RATE(I),
REV_CODE_COMBINATION_ID = L_REV_CODE_COMBINATION_ID(I),
OUTPUT_VAT_TAX_ID = L_OUTPUT_VAT_TAX_ID(I),
OUTPUT_TAX_CLASSIFICATION_CODE = L_OUTPUT_TAX_CODE(I),
OUTPUT_TAX_EXEMPT_FLAG = L_OUTPUT_TAX_EXEMPT_FLAG(I),
OUTPUT_TAX_EXEMPT_REASON_CODE
= L_OUTPUT_EXEMPT_REASON_CODE(I),
OUTPUT_TAX_EXEMPT_NUMBER
= L_OUTPUT_TAX_EXEMPT_NUMBER(I),
LINE_NUM_REVERSED = L_LINE_NUM_REVERSED(I),
DETAIL_ID_REVERSED = L_DETAIL_ID_REVERSED(I),
REVERSED_FLAG = L_REVERSED_FLAG(I),
MARKUP_CALC_BASE_CODE = L_MARKUP_CALC_BASE_CODE(I),
IND_COMPILED_SET_ID = L_IND_COMPILED_SET_ID(I),
RULE_PERCENTAGE = L_RULE_PERCENTAGE(I),
BILL_RATE = L_BILL_RATE(I),
BILL_MARKUP_PERCENTAGE= L_BILL_MARKUP_PERCENTAGE(I),
BASE_AMOUNT = L_BASE_AMOUNT(I),
SCHEDULE_LINE_PERCENTAGE = L_SCHEDULE_LINE_PERCENTAGE(I),
PROGRAM_APPLICATION_ID = PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID,
PROGRAM_ID = PA_IC_INV_UTILS.G_PROGRAM_ID,
PROGRAM_UPDATE_DATE = SYSDATE,
TP_JOB_ID = L_TP_JOB_ID(I),
PROV_PROJ_BILL_JOB_ID = L_PROV_PROJ_BILL_JOB_ID(I),
/*Cross proj*/
TP_AMT_TYPE_CODE = L_TP_AMT_TYPE_CODE(I),
PROJECT_TP_RATE_TYPE = L_PROJECT_TP_RATE_TYPE(I),
PROJECT_TP_RATE_DATE = L_PROJECT_TP_RATE_DATE(I),
PROJECT_TP_EXCHANGE_RATE= L_PROJECT_TP_EXCHANGE_RATE(I),
PROJECT_TRANSFER_PRICE = L_PROJECT_TRANSFER_PRICE(I),
PROJFUNC_TP_RATE_TYPE = L_PROJFUNC_TP_RATE_TYPE(I),
PROJFUNC_TP_RATE_DATE = L_PROJFUNC_TP_RATE_DATE(I),
PROJFUNC_TP_EXCHANGE_RATE= L_PROJFUNC_TP_EXCHANGE_RATE(I),
PROJFUNC_TRANSFER_PRICE = L_PROJFUNC_TRANSFER_PRICE(I),
PROJECT_TP_CURRENCY_CODE = L_PROJECT_TP_CURRENCY_CODE(I),
PROJFUNC_TP_CURRENCY_CODE= L_PROJFUNC_TP_CURRENCY_CODE(I)
/*Cross proj*/
Where EXPENDITURE_ITEM_ID = L_EXPENDITURE_ITEM_ID(I)
AND LINE_NUM = L_LINE_NUM(I);
Update
PA_DRAFT_INVOICE_DETAILS
Set
REQUEST_ID = PA_IC_INV_UTILS.G_REQUEST_ID
where
EXPENDITURE_ITEM_ID = L_EXPENDITURE_ITEM_ID(I) and
DETAIL_ID_REVERSED is NOT NULL and
INVOICED_FLAG = 'N';
END Update_rows;
PROCEDURE Delete_rows
( P_inv_rec_tab IN OUT NOCOPY inv_rec_tab)
IS
BEGIN
IF g1_debug_mode = 'Y' THEN
PA_IC_INV_UTILS.log_message('Delete_rows: ' || 'In Delete...');
Delete
From PA_DRAFT_INVOICE_DETAILS
Where EXPENDITURE_ITEM_ID = L_EXPENDITURE_ITEM_ID(I)
AND LINE_NUM = L_LINE_NUM(I);
UPDATE PA_EXPENDITURE_ITEMS
SET DENOM_TP_CURRENCY_CODE = NULL,
DENOM_TRANSFER_PRICE = NULL,
ACCT_TP_RATE_TYPE = NULL,
ACCT_TP_RATE_DATE = NULL,
ACCT_TP_EXCHANGE_RATE = NULL,
ACCT_TRANSFER_PRICE = NULL,
PROJACCT_TRANSFER_PRICE = NULL,
CC_MARKUP_BASE_CODE = NULL,
TP_BASE_AMOUNT = NULL,
TP_IND_COMPILED_SET_ID = NULL,
TP_BILL_RATE = NULL,
TP_BILL_MARKUP_PERCENTAGE = NULL,
TP_SCHEDULE_LINE_PERCENTAGE = NULL,
TP_RULE_PERCENTAGE = NULL,
TP_JOB_ID = NULL,
/*Cross proj*/
PROJECT_TRANSFER_PRICE = NULL,
PROJFUNC_TRANSFER_PRICE = NULL,
/*Cross proj*/
PROV_PROJ_BILL_JOB_ID = NULL
WHERE EXPENDITURE_ITEM_ID = L_EXPENDITURE_ITEM_ID(I);
END Delete_rows;