171: x_error_message IN OUT NOCOPY VARCHAR2) is --File.Sql.39 bug 4440895
172: c INTEGER;
173: row_processed INTEGER;
174: proc_stmt VARCHAR2(1000);
175: l_project_type pa_projects_all.project_type%type;
176: l_distribution_rule pa_projects_all.distribution_rule%type;
177: cursor get_procedure is
178: select be.procedure_name proc_name, bea.billing_assignment_id bea_id,
179: bea.billing_extension_id be_id, bea.top_task_id task_id,
172: c INTEGER;
173: row_processed INTEGER;
174: proc_stmt VARCHAR2(1000);
175: l_project_type pa_projects_all.project_type%type;
176: l_distribution_rule pa_projects_all.distribution_rule%type;
177: cursor get_procedure is
178: select be.procedure_name proc_name, bea.billing_assignment_id bea_id,
179: bea.billing_extension_id be_id, bea.top_task_id task_id,
180: decode(be.amount_reqd_flag, 'Y', nvl(bea.amount, 0), 0) amt,
289:
290: /* Added below select statement for bug 3643409 */
291: SELECT project_type,distribution_rule
292: INTO l_project_type,l_distribution_rule
293: FROM pa_projects_all
294: WHERE project_id = x_project_id;
295:
296: FOR get_rec IN get_procedure LOOP
297: -- Loop for each assigned Billing Extension
461:
462: ccrev_error EXCEPTION;
463:
464: /* MCB related changes */
465: l_multi_currency_billing_flag pa_projects_all.MULTI_CURRENCY_BILLING_FLAG%TYPE;
466: l_baseline_funding_flag pa_projects_all.BASELINE_FUNDING_FLAG%TYPE;
467: l_revproc_currency_code pa_projects_all.revproc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
462: ccrev_error EXCEPTION;
463:
464: /* MCB related changes */
465: l_multi_currency_billing_flag pa_projects_all.MULTI_CURRENCY_BILLING_FLAG%TYPE;
466: l_baseline_funding_flag pa_projects_all.BASELINE_FUNDING_FLAG%TYPE;
467: l_revproc_currency_code pa_projects_all.revproc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
463:
464: /* MCB related changes */
465: l_multi_currency_billing_flag pa_projects_all.MULTI_CURRENCY_BILLING_FLAG%TYPE;
466: l_baseline_funding_flag pa_projects_all.BASELINE_FUNDING_FLAG%TYPE;
467: l_revproc_currency_code pa_projects_all.revproc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
465: l_multi_currency_billing_flag pa_projects_all.MULTI_CURRENCY_BILLING_FLAG%TYPE;
466: l_baseline_funding_flag pa_projects_all.BASELINE_FUNDING_FLAG%TYPE;
467: l_revproc_currency_code pa_projects_all.revproc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
466: l_baseline_funding_flag pa_projects_all.BASELINE_FUNDING_FLAG%TYPE;
467: l_revproc_currency_code pa_projects_all.revproc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
467: l_revproc_currency_code pa_projects_all.revproc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
468: l_invproc_currency_code VARCHAR2(30);
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
469: l_invproc_currency_type pa_projects_all.invproc_currency_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
470: l_project_currency_code pa_projects_all.project_currency_code%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
471: l_project_bil_rate_date_code pa_projects_all.project_bil_rate_date_code%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
472: l_project_bil_rate_type pa_projects_all.project_bil_rate_type%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
473: l_project_bil_rate_date pa_projects_all.project_bil_rate_date%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
474: l_project_bil_exchange_rate pa_projects_all.project_bil_exchange_rate%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
482: l_funding_rate_date pa_projects_all.funding_rate_date%TYPE;
475: l_projfunc_currency_code pa_projects_all.projfunc_currency_code%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
482: l_funding_rate_date pa_projects_all.funding_rate_date%TYPE;
483: l_funding_exchange_rate pa_projects_all.funding_exchange_rate%TYPE;
476: l_projfunc_bil_rate_date_code pa_projects_all.projfunc_bil_rate_date_code%TYPE;
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
482: l_funding_rate_date pa_projects_all.funding_rate_date%TYPE;
483: l_funding_exchange_rate pa_projects_all.funding_exchange_rate%TYPE;
484: l_return_status VARCHAR2(30);
477: l_projfunc_bil_rate_type pa_projects_all.projfunc_bil_rate_type%TYPE;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
482: l_funding_rate_date pa_projects_all.funding_rate_date%TYPE;
483: l_funding_exchange_rate pa_projects_all.funding_exchange_rate%TYPE;
484: l_return_status VARCHAR2(30);
485: l_msg_count NUMBER;
478: l_projfunc_bil_rate_date pa_projects_all.projfunc_bil_rate_date%TYPE;
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
482: l_funding_rate_date pa_projects_all.funding_rate_date%TYPE;
483: l_funding_exchange_rate pa_projects_all.funding_exchange_rate%TYPE;
484: l_return_status VARCHAR2(30);
485: l_msg_count NUMBER;
486: l_msg_data VARCHAR2(30);
479: l_projfunc_bil_exchange_rate pa_projects_all.projfunc_bil_exchange_rate%TYPE;
480: l_funding_rate_date_code pa_projects_all.funding_rate_date_code%TYPE;
481: l_funding_rate_type pa_projects_all.funding_rate_type%TYPE;
482: l_funding_rate_date pa_projects_all.funding_rate_date%TYPE;
483: l_funding_exchange_rate pa_projects_all.funding_exchange_rate%TYPE;
484: l_return_status VARCHAR2(30);
485: l_msg_count NUMBER;
486: l_msg_data VARCHAR2(30);
487: /* Till Here */
1871: /* Commenting the following line for bug 2638840
1872: rev_amount( j ) := to_char(l_ind_cost_denm); */
1873:
1874: /* Changes for bug 2638840 */
1875: /* Bug 2638840 : Get the BTC_COST_BASE_REV_CODE from pa_projects_all table */
1876: BEGIN
1877:
1878: /* Added the following nvl so that code doesn't break even if upgrade script fails - For bug 2724185 */
1879:
1878: /* Added the following nvl so that code doesn't break even if upgrade script fails - For bug 2724185 */
1879:
1880: select nvl(BTC_COST_BASE_REV_CODE,'EXP_TRANS_CURR')
1881: into l_mcb_cost_flag
1882: from pa_projects_all
1883: where project_id =(select project_id from pa_expenditure_items_all where expenditure_item_id=ei_id(j));
1884:
1885: EXCEPTION
1886: WHEN NO_DATA_FOUND THEN
2190: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
2191:
2192: CURSOR c_sel_proj is
2193: SELECT project_id, project_level_funding_flag
2194: FROM pa_projects_all
2195: WHERE project_id = p_proj_id
2196: FOR UPDATE OF project_id;
2197:
2198: CURSOR c_sel_proj_list is
2196: FOR UPDATE OF project_id;
2197:
2198: CURSOR c_sel_proj_list is
2199: SELECT project_id,project_level_funding_flag
2200: FROM pa_projects_all
2201: WHERE segment1 between p_start_proj_num And p_end_proj_num
2202: FOR UPDATE OF project_id;
2203:
2204: Cursor c_proj_level is