DBA Data[Home] [Help]

APPS.PA_RATE_PVT_PKG dependencies on PA_DEBUG

Line 51: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

47: -- x_cost_rejct_reason VARCHAR2 YES Rejection reason for cost
48: -- x_burdened_rejct_reason VARCHAR2 YES Rejection reason for burden
49: -- x_others_rejct_reason VARCHAR2 YES Rejection reason for other error like pl/sql etc.
50:
51: g1_debug_mode varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
52:
53: PROCEDURE get_item_amount(
54: p_calling_mode IN VARCHAR2 ,
55: p_rate_calc_date IN DATE ,

Line 273: PA_DEBUG.Set_Curr_Function( p_function => 'Get_Item_Amount');

269: /*Till here for LCE.*/
270:
271: BEGIN
272: IF g1_debug_mode = 'Y' THEN
273: PA_DEBUG.Set_Curr_Function( p_function => 'Get_Item_Amount');
274: PA_DEBUG.g_err_stage := 'RT10 : Before Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
275: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
276: END IF;
277:

Line 274: PA_DEBUG.g_err_stage := 'RT10 : Before Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';

270:
271: BEGIN
272: IF g1_debug_mode = 'Y' THEN
273: PA_DEBUG.Set_Curr_Function( p_function => 'Get_Item_Amount');
274: PA_DEBUG.g_err_stage := 'RT10 : Before Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
275: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
276: END IF;
277:
278: /* Validating that the required parameters should not be null */

Line 275: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

271: BEGIN
272: IF g1_debug_mode = 'Y' THEN
273: PA_DEBUG.Set_Curr_Function( p_function => 'Get_Item_Amount');
274: PA_DEBUG.g_err_stage := 'RT10 : Before Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
275: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
276: END IF;
277:
278: /* Validating that the required parameters should not be null */
279: IF ( p_calling_mode IS NULL) OR (p_rate_calc_date IS NULL ) OR

Line 292: PA_DEBUG.g_err_stage := 'RTS10 : After sufficient parameter';

288: END IF;
289: END IF;
290:
291: IF g1_debug_mode = 'Y' THEN
292: PA_DEBUG.g_err_stage := 'RTS10 : After sufficient parameter';
293: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
294: END IF;
295: /* Selecting distribution_rule from project all table only if the passed value is null
296: otherwise storing passed values */

Line 293: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

289: END IF;
290:
291: IF g1_debug_mode = 'Y' THEN
292: PA_DEBUG.g_err_stage := 'RTS10 : After sufficient parameter';
293: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
294: END IF;
295: /* Selecting distribution_rule from project all table only if the passed value is null
296: otherwise storing passed values */
297: /*

Line 325: PA_DEBUG.g_err_stage := 'RTS11 : After Rule parameter'||to_char(p_rate_calc_date,'dd-mon-yyyy');

321: NULL;
322: END;
323:
324: IF g1_debug_mode = 'Y' THEN
325: PA_DEBUG.g_err_stage := 'RTS11 : After Rule parameter'||to_char(p_rate_calc_date,'dd-mon-yyyy');
326: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
327:
328: PA_DEBUG.g_err_stage := 'RTS11.1 : checking para Quantity '||p_quantity||' calling mode '||p_calling_mode;
329: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

Line 326: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

322: END;
323:
324: IF g1_debug_mode = 'Y' THEN
325: PA_DEBUG.g_err_stage := 'RTS11 : After Rule parameter'||to_char(p_rate_calc_date,'dd-mon-yyyy');
326: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
327:
328: PA_DEBUG.g_err_stage := 'RTS11.1 : checking para Quantity '||p_quantity||' calling mode '||p_calling_mode;
329: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
330: -- dbms_output.put_line('distribution_rule '||l_distribution_rule||'calling mode '||p_calling_mode||'item id' ||p_item_id||' proj id '||p_project_id||' p_person_id '||p_person_id||' date '||to_char(p_rate_calc_date,'dd-mon-yyyy'));

Line 328: PA_DEBUG.g_err_stage := 'RTS11.1 : checking para Quantity '||p_quantity||' calling mode '||p_calling_mode;

324: IF g1_debug_mode = 'Y' THEN
325: PA_DEBUG.g_err_stage := 'RTS11 : After Rule parameter'||to_char(p_rate_calc_date,'dd-mon-yyyy');
326: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
327:
328: PA_DEBUG.g_err_stage := 'RTS11.1 : checking para Quantity '||p_quantity||' calling mode '||p_calling_mode;
329: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
330: -- dbms_output.put_line('distribution_rule '||l_distribution_rule||'calling mode '||p_calling_mode||'item id' ||p_item_id||' proj id '||p_project_id||' p_person_id '||p_person_id||' date '||to_char(p_rate_calc_date,'dd-mon-yyyy'));
331: END IF;
332:

Line 329: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

325: PA_DEBUG.g_err_stage := 'RTS11 : After Rule parameter'||to_char(p_rate_calc_date,'dd-mon-yyyy');
326: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
327:
328: PA_DEBUG.g_err_stage := 'RTS11.1 : checking para Quantity '||p_quantity||' calling mode '||p_calling_mode;
329: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
330: -- dbms_output.put_line('distribution_rule '||l_distribution_rule||'calling mode '||p_calling_mode||'item id' ||p_item_id||' proj id '||p_project_id||' p_person_id '||p_person_id||' date '||to_char(p_rate_calc_date,'dd-mon-yyyy'));
331: END IF;
332:
333: /* Selecting expenditure org id , type ,organization id , forecast job id and forecast job group

Line 350: PA_DEBUG.g_err_stage := 'RTS12 : After Role expenditure org id/orgnz id , job,job grp id par';

346: WHERE project_id = p_project_id
347: AND assignment_id = p_item_id;
348:
349: IF g1_debug_mode = 'Y' THEN
350: PA_DEBUG.g_err_stage := 'RTS12 : After Role expenditure org id/orgnz id , job,job grp id par';
351: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
352: END IF;
353:
354: ELSIF ( p_calling_mode = 'ASSIGNMENT') THEN

Line 351: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

347: AND assignment_id = p_item_id;
348:
349: IF g1_debug_mode = 'Y' THEN
350: PA_DEBUG.g_err_stage := 'RTS12 : After Role expenditure org id/orgnz id , job,job grp id par';
351: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
352: END IF;
353:
354: ELSIF ( p_calling_mode = 'ASSIGNMENT') THEN
355: BEGIN -- Added for Bug 3877942

Line 367: PA_DEBUG.g_err_stage := 'RTS12 : No Record in PA_RESOURCES_DENORM for this period start date' || p_rate_calc_date;

363: NVL(TRUNC(Resource_effective_end_date),p_rate_calc_date));
364: EXCEPTION -- Added Exception block for Bug 3877942
365: WHEN NO_DATA_FOUND THEN
366: IF g1_debug_mode = 'Y' THEN
367: PA_DEBUG.g_err_stage := 'RTS12 : No Record in PA_RESOURCES_DENORM for this period start date' || p_rate_calc_date;
368: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
369: END IF;
370: PA_DEBUG.Reset_Curr_Function;
371: RETURN;

Line 368: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

364: EXCEPTION -- Added Exception block for Bug 3877942
365: WHEN NO_DATA_FOUND THEN
366: IF g1_debug_mode = 'Y' THEN
367: PA_DEBUG.g_err_stage := 'RTS12 : No Record in PA_RESOURCES_DENORM for this period start date' || p_rate_calc_date;
368: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
369: END IF;
370: PA_DEBUG.Reset_Curr_Function;
371: RETURN;
372: END;

Line 370: PA_DEBUG.Reset_Curr_Function;

366: IF g1_debug_mode = 'Y' THEN
367: PA_DEBUG.g_err_stage := 'RTS12 : No Record in PA_RESOURCES_DENORM for this period start date' || p_rate_calc_date;
368: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
369: END IF;
370: PA_DEBUG.Reset_Curr_Function;
371: RETURN;
372: END;
373:
374: IF g1_debug_mode = 'Y' THEN

Line 375: PA_DEBUG.g_err_stage := 'RTS12 : After Asgn resource org id/orgnz id , job id par';

371: RETURN;
372: END;
373:
374: IF g1_debug_mode = 'Y' THEN
375: PA_DEBUG.g_err_stage := 'RTS12 : After Asgn resource org id/orgnz id , job id par';
376: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
377: END IF;
378:
379: SELECT job_group_id

Line 376: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

372: END;
373:
374: IF g1_debug_mode = 'Y' THEN
375: PA_DEBUG.g_err_stage := 'RTS12 : After Asgn resource org id/orgnz id , job id par';
376: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
377: END IF;
378:
379: SELECT job_group_id
380: INTO l_forecast_job_group_id

Line 385: PA_DEBUG.g_err_stage := 'RTS13 : After Asgn job grp id par';

381: FROM per_jobs
382: WHERE job_id = l_forecast_job_id;
383:
384: IF g1_debug_mode = 'Y' THEN
385: PA_DEBUG.g_err_stage := 'RTS13 : After Asgn job grp id par';
386: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
387: END IF;
388:
389: SELECT expenditure_type

Line 386: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

382: WHERE job_id = l_forecast_job_id;
383:
384: IF g1_debug_mode = 'Y' THEN
385: PA_DEBUG.g_err_stage := 'RTS13 : After Asgn job grp id par';
386: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
387: END IF;
388:
389: SELECT expenditure_type
390: INTO l_expenditure_type

Line 400: PA_DEBUG.g_err_stage := 'RTS13.1 : Selecting override organization if any .';

396: ELSE /*for p_calling_mode <> 'ROLE' /'ASSIGNMENT'*/
397: /*LCE Changes : Selecting override organization if any. */
398:
399: IF g1_debug_mode = 'Y' THEN
400: PA_DEBUG.g_err_stage := 'RTS13.1 : Selecting override organization if any .';
401: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
402: END IF;
403:
404: PA_COST.override_exp_organization(P_item_date => p_rate_calc_date ,

Line 401: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

397: /*LCE Changes : Selecting override organization if any. */
398:
399: IF g1_debug_mode = 'Y' THEN
400: PA_DEBUG.g_err_stage := 'RTS13.1 : Selecting override organization if any .';
401: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
402: END IF;
403:
404: PA_COST.override_exp_organization(P_item_date => p_rate_calc_date ,
405: P_person_id => p_person_id ,

Line 416: PA_DEBUG.g_err_stage := 'RTS13.2 : No override ...selecting expenditure organization id ';

412: x_msg_data => l_msg_data
413: );
414:
415: IF g1_debug_mode = 'Y' THEN
416: PA_DEBUG.g_err_stage := 'RTS13.2 : No override ...selecting expenditure organization id ';
417: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
418: END IF;
419:
420: IF l_overr_to_organization_id is NULL THEN

Line 417: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

413: );
414:
415: IF g1_debug_mode = 'Y' THEN
416: PA_DEBUG.g_err_stage := 'RTS13.2 : No override ...selecting expenditure organization id ';
417: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
418: END IF;
419:
420: IF l_overr_to_organization_id is NULL THEN
421: BEGIN

Line 436: PA_DEBUG.g_err_stage :='RTS13.3 :No Expenditure organization id assigned to the person id :'||

432:
433: EXCEPTION
434: WHEN NO_DATA_FOUND THEN
435: IF g1_debug_mode = 'Y' THEN
436: PA_DEBUG.g_err_stage :='RTS13.3 :No Expenditure organization id assigned to the person id :'||
437: P_person_id;
438: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
439: END IF;
440: x_cost_rejct_reason :='NO_ASSIGN';

Line 438: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

434: WHEN NO_DATA_FOUND THEN
435: IF g1_debug_mode = 'Y' THEN
436: PA_DEBUG.g_err_stage :='RTS13.3 :No Expenditure organization id assigned to the person id :'||
437: P_person_id;
438: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
439: END IF;
440: x_cost_rejct_reason :='NO_ASSIGN';
441: END;
442: ELSE

Line 452: PA_DEBUG.g_err_stage := 'RTS14 : After Asgn expenditure_type par';

448:
449: END IF;
450:
451: IF g1_debug_mode = 'Y' THEN
452: PA_DEBUG.g_err_stage := 'RTS14 : After Asgn expenditure_type par';
453: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
454: END IF;
455:
456: IF p_expenditure_org_id IS NOT NULL THEN

Line 453: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

449: END IF;
450:
451: IF g1_debug_mode = 'Y' THEN
452: PA_DEBUG.g_err_stage := 'RTS14 : After Asgn expenditure_type par';
453: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
454: END IF;
455:
456: IF p_expenditure_org_id IS NOT NULL THEN
457: l_expenditure_org_id := p_expenditure_org_id ;

Line 503: PA_DEBUG.g_err_stage := 'RTS15 : After currency code par';

499:
500: l_expenditure_curr_code_burdn := l_expenditure_currency_code; /* Made for Org Forecasting */
501:
502: IF g1_debug_mode = 'Y' THEN
503: PA_DEBUG.g_err_stage := 'RTS15 : After currency code par';
504: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
505: END IF;
506: -- dbms_output.put_line('l_expenditure_currency_code '||l_expenditure_currency_code);
507:

Line 504: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

500: l_expenditure_curr_code_burdn := l_expenditure_currency_code; /* Made for Org Forecasting */
501:
502: IF g1_debug_mode = 'Y' THEN
503: PA_DEBUG.g_err_stage := 'RTS15 : After currency code par';
504: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
505: END IF;
506: -- dbms_output.put_line('l_expenditure_currency_code '||l_expenditure_currency_code);
507:
508:

Line 523: PA_DEBUG.g_err_stage := 'RTS16 : After task level cost multi name par';

519: END IF;
520: END IF;
521:
522: IF g1_debug_mode = 'Y' THEN
523: PA_DEBUG.g_err_stage := 'RTS16 : After task level cost multi name par';
524: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
525: END IF;
526: -- dbms_output.put_line('1');
527:

Line 524: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

520: END IF;
521:
522: IF g1_debug_mode = 'Y' THEN
523: PA_DEBUG.g_err_stage := 'RTS16 : After task level cost multi name par';
524: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
525: END IF;
526: -- dbms_output.put_line('1');
527:
528: /* Selecting project type from project types table only if the

Line 544: PA_DEBUG.g_err_stage := 'RTS17 : After Project type par';

540: l_project_type := p_project_type;
541: END IF;
542:
543: IF g1_debug_mode = 'Y' THEN
544: PA_DEBUG.g_err_stage := 'RTS17 : After Project type par';
545: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
546: -- dbms_output.put_line('l_project_type '||l_project_type);
547: END IF;
548:

Line 545: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

541: END IF;
542:
543: IF g1_debug_mode = 'Y' THEN
544: PA_DEBUG.g_err_stage := 'RTS17 : After Project type par';
545: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
546: -- dbms_output.put_line('l_project_type '||l_project_type);
547: END IF;
548:
549: /* Selecting project org id, project currency code, project bill job

Line 606: PA_DEBUG.g_err_stage := 'RTS18 : After emp,job rate schedule , currency code and org id par';

602: WHERE project_id = p_project_id;
603:
604: IF g1_debug_mode = 'Y' THEN
605: -- dbms_output.put_line('projfunc currency '||l_projfunc_currency_code);
606: PA_DEBUG.g_err_stage := 'RTS18 : After emp,job rate schedule , currency code and org id par';
607: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
608: END IF;
609:
610: ELSE

Line 607: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

603:
604: IF g1_debug_mode = 'Y' THEN
605: -- dbms_output.put_line('projfunc currency '||l_projfunc_currency_code);
606: PA_DEBUG.g_err_stage := 'RTS18 : After emp,job rate schedule , currency code and org id par';
607: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
608: END IF;
609:
610: ELSE
611: IF p_projfunc_currency_code IS NOT NULL THEN

Line 723: PA_DEBUG.g_err_stage := 'RTS19 : After cost job group id and cost rate schedule id par';

719: l_job_cost_rate_schedule_id := p_job_cost_rate_schedule_id;
720: END IF;
721:
722: IF g1_debug_mode = 'Y' THEN
723: PA_DEBUG.g_err_stage := 'RTS19 : After cost job group id and cost rate schedule id par';
724: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
725: END IF;
726: -- dbms_output.put_line('l_proj_cost_job_grp_id '||to_char(l_proj_cost_job_grp_id));
727: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));

Line 724: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

720: END IF;
721:
722: IF g1_debug_mode = 'Y' THEN
723: PA_DEBUG.g_err_stage := 'RTS19 : After cost job group id and cost rate schedule id par';
724: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
725: END IF;
726: -- dbms_output.put_line('l_proj_cost_job_grp_id '||to_char(l_proj_cost_job_grp_id));
727: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));
728:

Line 753: PA_DEBUG.g_err_stage := 'RTS20 : After fixed date par';

749:
750: */
751:
752: IF g1_debug_mode = 'Y' THEN
753: PA_DEBUG.g_err_stage := 'RTS20 : After fixed date par';
754: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
755:
756: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));
757:

Line 754: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

750: */
751:
752: IF g1_debug_mode = 'Y' THEN
753: PA_DEBUG.g_err_stage := 'RTS20 : After fixed date par';
754: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
755:
756: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));
757:
758:

Line 759: PA_DEBUG.g_err_stage := 'RT11 : After Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';

755:
756: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));
757:
758:
759: PA_DEBUG.g_err_stage := 'RT11 : After Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
760: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
761:
762: -- dbms_output.put_line('l_labor_schedule_fixed_date '||to_char(l_labor_schedule_fixed_date,'dd-mon-yyyy'));
763:

Line 760: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

756: -- dbms_output.put_line('l_job_cost_rate_schedule_id '||to_char(l_job_cost_rate_schedule_id));
757:
758:
759: PA_DEBUG.g_err_stage := 'RT11 : After Validation Entering PA_RATE_PVT_PKG.Get_Item_Amount';
760: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
761:
762: -- dbms_output.put_line('l_labor_schedule_fixed_date '||to_char(l_labor_schedule_fixed_date,'dd-mon-yyyy'));
763:
764: END IF;

Line 798: PA_DEBUG.g_err_stage := 'RT12 : Entering PA_COST.get_raw_cost';

794:
795: IF ( (p_calling_mode = 'ASSIGNMENT') OR (p_calling_mode = 'UNASSIGNED') ) THEN
796:
797: IF g1_debug_mode = 'Y' THEN
798: PA_DEBUG.g_err_stage := 'RT12 : Entering PA_COST.get_raw_cost';
799: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
800: END IF;
801:
802: -- dbms_output.put_line('pp_person_id '||p_person_id);

Line 799: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

795: IF ( (p_calling_mode = 'ASSIGNMENT') OR (p_calling_mode = 'UNASSIGNED') ) THEN
796:
797: IF g1_debug_mode = 'Y' THEN
798: PA_DEBUG.g_err_stage := 'RT12 : Entering PA_COST.get_raw_cost';
799: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
800: END IF;
801:
802: -- dbms_output.put_line('pp_person_id '||p_person_id);
803: PA_COST.get_raw_cost (

Line 823: PA_DEBUG.g_err_stage := 'RT13 : Leaving PA_COST.get_raw_cost';

819: x_exp_func_raw_cost := l_exp_func_raw_cost; /* Added for Org Forecasting */
820: x_exp_func_curr_code := l_expenditure_curr_code_burdn; /* Added for Org Forecasting */
821:
822: IF g1_debug_mode = 'Y' THEN
823: PA_DEBUG.g_err_stage := 'RT13 : Leaving PA_COST.get_raw_cost';
824: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
825: END IF;
826:
827: -- dbms_output.put_line('end of get raw cost '||l_x_return_status||' rate '||x_exp_func_raw_cost_rate||' raw cost '||x_exp_func_raw_cost||' Currency '||l_expenditure_currency_code);

Line 824: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

820: x_exp_func_curr_code := l_expenditure_curr_code_burdn; /* Added for Org Forecasting */
821:
822: IF g1_debug_mode = 'Y' THEN
823: PA_DEBUG.g_err_stage := 'RT13 : Leaving PA_COST.get_raw_cost';
824: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
825: END IF;
826:
827: -- dbms_output.put_line('end of get raw cost '||l_x_return_status||' rate '||x_exp_func_raw_cost_rate||' raw cost '||x_exp_func_raw_cost||' Currency '||l_expenditure_currency_code);
828:

Line 836: PA_DEBUG.g_err_stage := 'RT12 : Entering PA_COST.requirement_raw_cost';

832: -- dbms_output.put_line('start of req raw cost '||l_x_return_status);
833:
834:
835: IF g1_debug_mode = 'Y' THEN
836: PA_DEBUG.g_err_stage := 'RT12 : Entering PA_COST.requirement_raw_cost';
837: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
838: END IF;
839:
840: PA_COST.requirement_raw_cost(

Line 837: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

833:
834:
835: IF g1_debug_mode = 'Y' THEN
836: PA_DEBUG.g_err_stage := 'RT12 : Entering PA_COST.requirement_raw_cost';
837: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
838: END IF;
839:
840: PA_COST.requirement_raw_cost(
841: p_forecast_cost_job_group_id => l_forecast_job_group_id ,

Line 866: PA_DEBUG.g_err_stage := 'RT13 : Leaving PA_COST.requirement_raw_cost';

862: x_exp_func_raw_cost := l_exp_func_raw_cost; /* Added for Org Forecasting */
863: x_exp_func_curr_code := l_expenditure_curr_code_burdn; /* Added for Org Forecasting */
864:
865: IF g1_debug_mode = 'Y' THEN
866: PA_DEBUG.g_err_stage := 'RT13 : Leaving PA_COST.requirement_raw_cost';
867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869: -- dbms_output.put_line('end of req raw cost '||l_x_return_status||' : rate '||x_exp_func_raw_cost_rate||' cost '||x_exp_func_raw_cost||' Currency '||l_expenditure_currency_code);
870:

Line 867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

863: x_exp_func_curr_code := l_expenditure_curr_code_burdn; /* Added for Org Forecasting */
864:
865: IF g1_debug_mode = 'Y' THEN
866: PA_DEBUG.g_err_stage := 'RT13 : Leaving PA_COST.requirement_raw_cost';
867: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
868: END IF;
869: -- dbms_output.put_line('end of req raw cost '||l_x_return_status||' : rate '||x_exp_func_raw_cost_rate||' cost '||x_exp_func_raw_cost||' Currency '||l_expenditure_currency_code);
870:
871: END IF;

Line 903: PA_DEBUG.g_err_stage := 'RT14 : Entering PA_COST.override_exp_organization';

899: IF (p_calling_mode = 'ASSIGNMENT') THEN
900:
901: -- dbms_output.put_line('start of override '||l_x_return_status);
902: IF g1_debug_mode = 'Y' THEN
903: PA_DEBUG.g_err_stage := 'RT14 : Entering PA_COST.override_exp_organization';
904: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
905: END IF;
906:
907: PA_COST.override_exp_organization(P_item_date => p_rate_calc_date ,

Line 904: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

900:
901: -- dbms_output.put_line('start of override '||l_x_return_status);
902: IF g1_debug_mode = 'Y' THEN
903: PA_DEBUG.g_err_stage := 'RT14 : Entering PA_COST.override_exp_organization';
904: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
905: END IF;
906:
907: PA_COST.override_exp_organization(P_item_date => p_rate_calc_date ,
908: P_person_id => p_person_id ,

Line 919: PA_DEBUG.g_err_stage := 'RT15 : Leaving PA_COST.override_exp_organization';

915: x_msg_data => l_msg_data
916: );
917:
918: IF g1_debug_mode = 'Y' THEN
919: PA_DEBUG.g_err_stage := 'RT15 : Leaving PA_COST.override_exp_organization';
920: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
921: END IF;
922:
923: -- dbms_output.put_line('end of override '||l_x_return_status ||' over id '||l_overr_to_organization_id);

Line 920: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

916: );
917:
918: IF g1_debug_mode = 'Y' THEN
919: PA_DEBUG.g_err_stage := 'RT15 : Leaving PA_COST.override_exp_organization';
920: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
921: END IF;
922:
923: -- dbms_output.put_line('end of override '||l_x_return_status ||' over id '||l_overr_to_organization_id);
924:

Line 937: PA_DEBUG.g_err_stage := 'RT16 : Entering PA_COST.get_burdened_cost';

933: IF (NVL(l_exp_func_raw_cost,0) <> 0) THEN
934:
935: /* Added for Org forecasting */
936: IF g1_debug_mode = 'Y' THEN
937: PA_DEBUG.g_err_stage := 'RT16 : Entering PA_COST.get_burdened_cost';
938: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
939: END IF;
940:
941: PA_COST.get_burdened_cost(

Line 938: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

934:
935: /* Added for Org forecasting */
936: IF g1_debug_mode = 'Y' THEN
937: PA_DEBUG.g_err_stage := 'RT16 : Entering PA_COST.get_burdened_cost';
938: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
939: END IF;
940:
941: PA_COST.get_burdened_cost(
942: p_project_type => l_project_type ,

Line 967: PA_DEBUG.g_err_stage := 'RT17 : Leaving PA_COST.get_burdened_cost';

963: x_exp_func_burdened_cost := l_exp_func_burdened_cost; /* Added for Org Forecasting */
964: x_exp_func_curr_code := l_expenditure_currency_code; /* Added for Org Forecasting */
965:
966: IF g1_debug_mode = 'Y' THEN
967: PA_DEBUG.g_err_stage := 'RT17 : Leaving PA_COST.get_burdened_cost';
968: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
969: END IF;
970:
971: -- dbms_output.put_line('end of get burden cost '||l_x_return_status||' burden cost '||x_exp_func_burdened_cost||' rate '||x_exp_func_burdened_cost_rate);

Line 968: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

964: x_exp_func_curr_code := l_expenditure_currency_code; /* Added for Org Forecasting */
965:
966: IF g1_debug_mode = 'Y' THEN
967: PA_DEBUG.g_err_stage := 'RT17 : Leaving PA_COST.get_burdened_cost';
968: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
969: END IF;
970:
971: -- dbms_output.put_line('end of get burden cost '||l_x_return_status||' burden cost '||x_exp_func_burdened_cost||' rate '||x_exp_func_burdened_cost_rate);
972:

Line 998: PA_DEBUG.g_err_stage := 'RT18 : Entering PA_COST.get_proj_raw_burdened_cost';

994:
995: -- dbms_output.put_line('start of Get_Converted_Cost_Amounts '||l_x_return_status);
996:
997: IF g1_debug_mode = 'Y' THEN
998: PA_DEBUG.g_err_stage := 'RT18 : Entering PA_COST.get_proj_raw_burdened_cost';
999: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1000: END IF;
1001:
1002: -- dbms_output.put_line(' error in multi cost 2 '||x_cost_rejct_reason||' amount '||l_exp_func_raw_cost);

Line 999: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

995: -- dbms_output.put_line('start of Get_Converted_Cost_Amounts '||l_x_return_status);
996:
997: IF g1_debug_mode = 'Y' THEN
998: PA_DEBUG.g_err_stage := 'RT18 : Entering PA_COST.get_proj_raw_burdened_cost';
999: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1000: END IF;
1001:
1002: -- dbms_output.put_line(' error in multi cost 2 '||x_cost_rejct_reason||' amount '||l_exp_func_raw_cost);
1003:

Line 1084: PA_DEBUG.g_err_stage := 'RT19 : Leaving PA_COST.get_proj_raw_burdened_cost';

1080: -- dbms_output.put_line(' Inside error in multi cost 3 '||x_cost_rejct_reason);
1081: /* Deleted this proc PA_COST.get_projfunc_raw_burdened_cost() for Org Forecasting */
1082:
1083: IF g1_debug_mode = 'Y' THEN
1084: PA_DEBUG.g_err_stage := 'RT19 : Leaving PA_COST.get_proj_raw_burdened_cost';
1085: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1086: END IF;
1087:
1088: -- dbms_output.put_line('end of Get_Converted_Cost_Amounts '||l_x_return_status||' proj cost '||x_projfunc_raw_cost||' proj rate '||x_projfunc_raw_cost_rate

Line 1085: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

1081: /* Deleted this proc PA_COST.get_projfunc_raw_burdened_cost() for Org Forecasting */
1082:
1083: IF g1_debug_mode = 'Y' THEN
1084: PA_DEBUG.g_err_stage := 'RT19 : Leaving PA_COST.get_proj_raw_burdened_cost';
1085: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1086: END IF;
1087:
1088: -- dbms_output.put_line('end of Get_Converted_Cost_Amounts '||l_x_return_status||' proj cost '||x_projfunc_raw_cost||' proj rate '||x_projfunc_raw_cost_rate
1089: -- ||' proj bur co '||x_projfunc_burdened_cost||' proj bur rate '||x_projfunc_burdened_cost_rate||' PROJECT BURDEN COST '||x_project_burdned_cst);

Line 1175: PA_DEBUG.g_err_stage := 'RT20 : Entering PA_REVENUE.get_rev_amt';

1171:
1172: -- dbms_output.put_line('start of get rev amt '||l_x_return_status);
1173:
1174: IF g1_debug_mode = 'Y' THEN
1175: PA_DEBUG.g_err_stage := 'RT20 : Entering PA_REVENUE.get_rev_amt';
1176: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1177: END IF;
1178:
1179: PA_REVENUE.Assignment_Rev_Amt(

Line 1176: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

1172: -- dbms_output.put_line('start of get rev amt '||l_x_return_status);
1173:
1174: IF g1_debug_mode = 'Y' THEN
1175: PA_DEBUG.g_err_stage := 'RT20 : Entering PA_REVENUE.get_rev_amt';
1176: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1177: END IF;
1178:
1179: PA_REVENUE.Assignment_Rev_Amt(
1180: p_project_id => p_project_id ,

Line 1229: PA_DEBUG.g_err_stage := 'RT21 : Leaving PA_REVENUE.get_rev_amt';

1225: x_txn_rev_raw_revenue := l_txn_rev_raw_revenue;
1226: x_rev_txn_curr_code := l_rev_txn_curr_code;
1227:
1228: IF g1_debug_mode = 'Y' THEN
1229: PA_DEBUG.g_err_stage := 'RT21 : Leaving PA_REVENUE.get_rev_amt';
1230: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1231: END IF;
1232: -- dbms_output.put_line('end of get rev amt '||l_x_return_status|| ' rate '||x_projfunc_bill_rate||' rev '||x_projfunc_raw_revenue);
1233: ELSIF (p_calling_mode= 'ROLE' ) THEN

Line 1230: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

1226: x_rev_txn_curr_code := l_rev_txn_curr_code;
1227:
1228: IF g1_debug_mode = 'Y' THEN
1229: PA_DEBUG.g_err_stage := 'RT21 : Leaving PA_REVENUE.get_rev_amt';
1230: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1231: END IF;
1232: -- dbms_output.put_line('end of get rev amt '||l_x_return_status|| ' rate '||x_projfunc_bill_rate||' rev '||x_projfunc_raw_revenue);
1233: ELSIF (p_calling_mode= 'ROLE' ) THEN
1234:

Line 1238: PA_DEBUG.g_err_stage := 'RT20 : Entering PA_REVENUE.requirement_rev_amt';

1234:
1235: -- dbms_output.put_line('start of req rev amt '||l_x_return_status);
1236:
1237: IF g1_debug_mode = 'Y' THEN
1238: PA_DEBUG.g_err_stage := 'RT20 : Entering PA_REVENUE.requirement_rev_amt';
1239: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1240: END IF;
1241:
1242: PA_REVENUE.Requirement_Rev_Amt(

Line 1239: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

1235: -- dbms_output.put_line('start of req rev amt '||l_x_return_status);
1236:
1237: IF g1_debug_mode = 'Y' THEN
1238: PA_DEBUG.g_err_stage := 'RT20 : Entering PA_REVENUE.requirement_rev_amt';
1239: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1240: END IF;
1241:
1242: PA_REVENUE.Requirement_Rev_Amt(
1243: p_project_id => p_project_id ,

Line 1289: PA_DEBUG.g_err_stage := 'RT21 : Leaving PA_REVENUE.requirement_rev_amt';

1285: x_txn_rev_raw_revenue := l_txn_rev_raw_revenue;
1286: x_rev_txn_curr_code := l_rev_txn_curr_code;
1287:
1288: IF g1_debug_mode = 'Y' THEN
1289: PA_DEBUG.g_err_stage := 'RT21 : Leaving PA_REVENUE.requirement_rev_amt';
1290: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1291: END IF;
1292:
1293: -- dbms_output.put_line('end of req rev amt '||l_x_return_status||' rate '||x_projfunc_bill_rate||' rev '||x_projfunc_raw_revenue);

Line 1290: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

1286: x_rev_txn_curr_code := l_rev_txn_curr_code;
1287:
1288: IF g1_debug_mode = 'Y' THEN
1289: PA_DEBUG.g_err_stage := 'RT21 : Leaving PA_REVENUE.requirement_rev_amt';
1290: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1291: END IF;
1292:
1293: -- dbms_output.put_line('end of req rev amt '||l_x_return_status||' rate '||x_projfunc_bill_rate||' rev '||x_projfunc_raw_revenue);
1294:

Line 1399: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';

1395:
1396: -- dbms_output.put_line(' End error in multi cost '||x_cost_rejct_reason);
1397: -- dbms_output.put_line('end of procs '||l_x_return_status);
1398: IF g1_debug_mode = 'Y' THEN
1399: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';
1400: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1401: PA_DEBUG.Reset_Curr_Function;
1402: END IF;
1403:

Line 1400: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

1396: -- dbms_output.put_line(' End error in multi cost '||x_cost_rejct_reason);
1397: -- dbms_output.put_line('end of procs '||l_x_return_status);
1398: IF g1_debug_mode = 'Y' THEN
1399: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';
1400: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1401: PA_DEBUG.Reset_Curr_Function;
1402: END IF;
1403:
1404:

Line 1401: PA_DEBUG.Reset_Curr_Function;

1397: -- dbms_output.put_line('end of procs '||l_x_return_status);
1398: IF g1_debug_mode = 'Y' THEN
1399: PA_DEBUG.g_err_stage := 'RT22 : Leaving PA_RATE_PVT_PKG.get_item_amount';
1400: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
1401: PA_DEBUG.Reset_Curr_Function;
1402: END IF;
1403:
1404:
1405: EXCEPTION

Line 1408: PA_DEBUG.Reset_Curr_Function;

1404:
1405: EXCEPTION
1406: WHEN l_insufficient_parameters THEN
1407: IF g1_debug_mode = 'Y' THEN
1408: PA_DEBUG.Reset_Curr_Function;
1409: END IF;
1410: x_return_status := FND_API.G_RET_STS_ERROR;
1411: x_msg_count := 1;
1412: x_msg_data := 'PA_FCST_INSUFFICIENT_PARA';

Line 1417: PA_DEBUG.Reset_Curr_Function;

1413: x_others_rejct_reason := 'PA_FCST_INSUFFICIENT_PARA';
1414:
1415: WHEN l_raw_cost_null THEN
1416: IF g1_debug_mode = 'Y' THEN
1417: PA_DEBUG.Reset_Curr_Function;
1418: END IF;
1419: x_return_status := FND_API.G_RET_STS_ERROR;
1420: x_cost_rejct_reason := 'PA_FCST_NO_COST_RATE';
1421: x_exp_func_raw_cost_rate := 0;

Line 1425: PA_DEBUG.Reset_Curr_Function;

1421: x_exp_func_raw_cost_rate := 0;
1422: x_exp_func_raw_cost := 0;
1423: WHEN l_raw_proj_cost_null THEN
1424: IF g1_debug_mode = 'Y' THEN
1425: PA_DEBUG.Reset_Curr_Function;
1426: END IF;
1427: x_return_status := FND_API.G_RET_STS_ERROR;
1428: x_cost_rejct_reason := 'PA_FCST_NO_COST_RATE';
1429: /* Added for Org Forecasting */

Line 1453: PA_DEBUG.Reset_Curr_Function;

1449:
1450: --dbms_output.put_line('exp2');
1451: WHEN l_raw_revenue_null THEN
1452: IF g1_debug_mode = 'Y' THEN
1453: PA_DEBUG.Reset_Curr_Function;
1454: END IF;
1455: x_return_status := FND_API.G_RET_STS_ERROR;
1456: x_rev_rejct_reason := 'PA_FCST_NO_BILL_RATE';
1457: x_txn_rev_bill_rt := 0;

Line 1464: PA_DEBUG.Reset_Curr_Function;

1460: --dbms_output.put_line('exp3');
1461:
1462: WHEN l_burdened_cost_null THEN
1463: IF g1_debug_mode = 'Y' THEN
1464: PA_DEBUG.Reset_Curr_Function;
1465: END IF;
1466: x_return_status := FND_API.G_RET_STS_ERROR;
1467: x_burdened_rejct_reason := 'PA_FCST_NO_COST_RATE';
1468: x_exp_func_burdened_cost_rate := 0;

Line 1475: PA_DEBUG.Reset_Curr_Function;

1471: --dbms_output.put_line('exp4');
1472:
1473: WHEN OTHERS THEN
1474: IF g1_debug_mode = 'Y' THEN
1475: PA_DEBUG.Reset_Curr_Function;
1476: END IF;
1477:
1478: --dbms_output.put_line('exp5'||SQLERRM);
1479:

Line 2143: PA_DEBUG.Set_Curr_Function( p_function => 'Get Initial Bill Rate');

2139:
2140: BEGIN
2141:
2142: IF g1_debug_mode = 'Y' THEN
2143: PA_DEBUG.Set_Curr_Function( p_function => 'Get Initial Bill Rate');
2144: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2145: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2146: END IF;
2147:

Line 2144: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';

2140: BEGIN
2141:
2142: IF g1_debug_mode = 'Y' THEN
2143: PA_DEBUG.Set_Curr_Function( p_function => 'Get Initial Bill Rate');
2144: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2145: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2146: END IF;
2147:
2148: /* Validating that the required parameters should not be null */

Line 2145: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2141:
2142: IF g1_debug_mode = 'Y' THEN
2143: PA_DEBUG.Set_Curr_Function( p_function => 'Get Initial Bill Rate');
2144: PA_DEBUG.g_err_stage := 'RT50 : Before Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2145: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2146: END IF;
2147:
2148: /* Validating that the required parameters should not be null */
2149: IF ( p_assignment_type IS NULL) OR (p_asgn_start_date IS NULL ) OR (p_project_id IS NULL)

Line 2444: PA_DEBUG.g_err_stage := 'RT51 : After Validation PA_RATE_PVT_PKG.get_initial_bill_rate';

2440: l_calculate_cost_flag := p_calculate_cost_flag;
2441: END IF;
2442:
2443: IF g1_debug_mode = 'Y' THEN
2444: PA_DEBUG.g_err_stage := 'RT51 : After Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2445: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2446: END IF;
2447: /* Calling the rate calculation APIs */
2448:

Line 2445: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2441: END IF;
2442:
2443: IF g1_debug_mode = 'Y' THEN
2444: PA_DEBUG.g_err_stage := 'RT51 : After Validation PA_RATE_PVT_PKG.get_initial_bill_rate';
2445: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2446: END IF;
2447: /* Calling the rate calculation APIs */
2448:
2449: --------------------------------------------

Line 2459: PA_DEBUG.g_err_stage := 'RT52 : Entering PA_COST.get_raw_cost';

2455:
2456: IF (l_calculate_cost_flag = 'Y') THEN /* Added this if to fix bug 2162965 */
2457: IF ( p_assignment_type = 'A') THEN
2458: IF g1_debug_mode = 'Y' THEN
2459: PA_DEBUG.g_err_stage := 'RT52 : Entering PA_COST.get_raw_cost';
2460: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2461: END IF;
2462:
2463: PA_COST.get_raw_cost ( P_person_id => p_person_id ,

Line 2460: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2456: IF (l_calculate_cost_flag = 'Y') THEN /* Added this if to fix bug 2162965 */
2457: IF ( p_assignment_type = 'A') THEN
2458: IF g1_debug_mode = 'Y' THEN
2459: PA_DEBUG.g_err_stage := 'RT52 : Entering PA_COST.get_raw_cost';
2460: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2461: END IF;
2462:
2463: PA_COST.get_raw_cost ( P_person_id => p_person_id ,
2464: P_expenditure_org_id => p_expenditure_org_id ,

Line 2478: PA_DEBUG.g_err_stage := 'RT53 : Leaving PA_COST.get_raw_cost';

2474: x_msg_data => x_msg_data
2475: );
2476:
2477: IF g1_debug_mode = 'Y' THEN
2478: PA_DEBUG.g_err_stage := 'RT53 : Leaving PA_COST.get_raw_cost';
2479: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2480: END IF;
2481:
2482: IF (l_x_return_status = FND_API.G_RET_STS_SUCCESS) THEN

Line 2479: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2475: );
2476:
2477: IF g1_debug_mode = 'Y' THEN
2478: PA_DEBUG.g_err_stage := 'RT53 : Leaving PA_COST.get_raw_cost';
2479: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2480: END IF;
2481:
2482: IF (l_x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2483: IF g1_debug_mode = 'Y' THEN

Line 2484: PA_DEBUG.g_err_stage := 'RT54 : Entering PA_COST.override_exp_organization';

2480: END IF;
2481:
2482: IF (l_x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2483: IF g1_debug_mode = 'Y' THEN
2484: PA_DEBUG.g_err_stage := 'RT54 : Entering PA_COST.override_exp_organization';
2485: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2486: END IF;
2487:
2488: PA_COST.override_exp_organization(P_item_date => p_asgn_start_date ,

Line 2485: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2481:
2482: IF (l_x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
2483: IF g1_debug_mode = 'Y' THEN
2484: PA_DEBUG.g_err_stage := 'RT54 : Entering PA_COST.override_exp_organization';
2485: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2486: END IF;
2487:
2488: PA_COST.override_exp_organization(P_item_date => p_asgn_start_date ,
2489: P_person_id => p_person_id ,

Line 2500: PA_DEBUG.g_err_stage := 'RT55 : Leaving PA_COST.override_exp_organization';

2496: x_msg_data => x_msg_data
2497: );
2498:
2499: IF g1_debug_mode = 'Y' THEN
2500: PA_DEBUG.g_err_stage := 'RT55 : Leaving PA_COST.override_exp_organization';
2501: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2502: END IF;
2503:
2504: END IF;

Line 2501: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2497: );
2498:
2499: IF g1_debug_mode = 'Y' THEN
2500: PA_DEBUG.g_err_stage := 'RT55 : Leaving PA_COST.override_exp_organization';
2501: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2502: END IF;
2503:
2504: END IF;
2505:

Line 2508: PA_DEBUG.g_err_stage := 'RT52 : Entering PA_COST.requirement_raw_cost';

2504: END IF;
2505:
2506: ELSIF (p_assignment_type = 'R') THEN
2507: IF g1_debug_mode = 'Y' THEN
2508: PA_DEBUG.g_err_stage := 'RT52 : Entering PA_COST.requirement_raw_cost';
2509: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2510: END IF;
2511: /* Four project functional attributes added for MCB2 */
2512: PA_COST.requirement_raw_cost( p_forecast_cost_job_group_id => l_forecast_job_group_id ,

Line 2509: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2505:
2506: ELSIF (p_assignment_type = 'R') THEN
2507: IF g1_debug_mode = 'Y' THEN
2508: PA_DEBUG.g_err_stage := 'RT52 : Entering PA_COST.requirement_raw_cost';
2509: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2510: END IF;
2511: /* Four project functional attributes added for MCB2 */
2512: PA_COST.requirement_raw_cost( p_forecast_cost_job_group_id => l_forecast_job_group_id ,
2513: p_forecast_cost_job_id => l_forecast_job_id ,

Line 2605: PA_DEBUG.g_err_stage := 'RT56 : Entering PA_REVENUE.get_rev_amt';

2601:
2602: IF (SUBSTR(l_distribution_rule,1,4) = 'WORK' AND l_class_code = 'CONTRACT') THEN
2603: IF ( p_assignment_type = 'A') THEN
2604: IF g1_debug_mode = 'Y' THEN
2605: PA_DEBUG.g_err_stage := 'RT56 : Entering PA_REVENUE.get_rev_amt';
2606: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2607: END IF;
2608:
2609: PA_REVENUE.Assignment_Rev_Amt(

Line 2606: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2602: IF (SUBSTR(l_distribution_rule,1,4) = 'WORK' AND l_class_code = 'CONTRACT') THEN
2603: IF ( p_assignment_type = 'A') THEN
2604: IF g1_debug_mode = 'Y' THEN
2605: PA_DEBUG.g_err_stage := 'RT56 : Entering PA_REVENUE.get_rev_amt';
2606: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2607: END IF;
2608:
2609: PA_REVENUE.Assignment_Rev_Amt(
2610: p_project_id => p_project_id ,

Line 2656: PA_DEBUG.g_err_stage := 'RT57 : Leaving PA_REVENUE.get_rev_amt';

2652: );
2653:
2654: -- dbms_output.put_line(' Get Ini rev : '||l_txn_rev_raw_revenue||' curr : '||l_rev_txn_curr_code);
2655: IF g1_debug_mode = 'Y' THEN
2656: PA_DEBUG.g_err_stage := 'RT57 : Leaving PA_REVENUE.get_rev_amt';
2657: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2658: END IF;
2659: /* IF ( x_projfunc_raw_revenue IS NULL OR x_projfunc_raw_revenue = 0 ) THEN
2660: x_projfunc_bill_rate := 0;

Line 2657: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2653:
2654: -- dbms_output.put_line(' Get Ini rev : '||l_txn_rev_raw_revenue||' curr : '||l_rev_txn_curr_code);
2655: IF g1_debug_mode = 'Y' THEN
2656: PA_DEBUG.g_err_stage := 'RT57 : Leaving PA_REVENUE.get_rev_amt';
2657: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2658: END IF;
2659: /* IF ( x_projfunc_raw_revenue IS NULL OR x_projfunc_raw_revenue = 0 ) THEN
2660: x_projfunc_bill_rate := 0;
2661: x_projfunc_raw_revenue := 0;

Line 2667: PA_DEBUG.g_err_stage := 'RT53 : Leaving PA_COST.requirement_raw_cost';

2663:
2664:
2665: ELSIF (p_assignment_type = 'R') THEN
2666: IF g1_debug_mode = 'Y' THEN
2667: PA_DEBUG.g_err_stage := 'RT53 : Leaving PA_COST.requirement_raw_cost';
2668: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2669: END IF;
2670:
2671: PA_REVENUE.requirement_rev_amt(

Line 2668: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2664:
2665: ELSIF (p_assignment_type = 'R') THEN
2666: IF g1_debug_mode = 'Y' THEN
2667: PA_DEBUG.g_err_stage := 'RT53 : Leaving PA_COST.requirement_raw_cost';
2668: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2669: END IF;
2670:
2671: PA_REVENUE.requirement_rev_amt(
2672: p_project_id => p_project_id ,

Line 2713: PA_DEBUG.g_err_stage := 'RT55 : Leaving PA_REVENUE.requirement_rev_amt';

2709: x_msg_data => x_msg_data
2710: );
2711:
2712: IF g1_debug_mode = 'Y' THEN
2713: PA_DEBUG.g_err_stage := 'RT55 : Leaving PA_REVENUE.requirement_rev_amt';
2714: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2715: END IF;
2716:
2717: END IF; /* End of assignment_type if */

Line 2714: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2710: );
2711:
2712: IF g1_debug_mode = 'Y' THEN
2713: PA_DEBUG.g_err_stage := 'RT55 : Leaving PA_REVENUE.requirement_rev_amt';
2714: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2715: END IF;
2716:
2717: END IF; /* End of assignment_type if */
2718:

Line 2767: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';

2763: x_rev_currency_code := l_projfunc_currency_code;
2764: x_markup_percentage := l_markup_percentage; /* Added for Asgmt overide */
2765:
2766: IF g1_debug_mode = 'Y' THEN
2767: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';
2768: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2769: PA_DEBUG.Reset_Curr_Function;
2770: END IF;
2771:

Line 2768: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

2764: x_markup_percentage := l_markup_percentage; /* Added for Asgmt overide */
2765:
2766: IF g1_debug_mode = 'Y' THEN
2767: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';
2768: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2769: PA_DEBUG.Reset_Curr_Function;
2770: END IF;
2771:
2772: EXCEPTION

Line 2769: PA_DEBUG.Reset_Curr_Function;

2765:
2766: IF g1_debug_mode = 'Y' THEN
2767: PA_DEBUG.g_err_stage := 'RT58 : Leaving PA_RATE_PVT_PKG.get_initial_bill_rate';
2768: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
2769: PA_DEBUG.Reset_Curr_Function;
2770: END IF;
2771:
2772: EXCEPTION
2773: WHEN l_insufficient_parameters THEN

Line 2775: PA_DEBUG.Reset_Curr_Function;

2771:
2772: EXCEPTION
2773: WHEN l_insufficient_parameters THEN
2774: IF g1_debug_mode = 'Y' THEN
2775: PA_DEBUG.Reset_Curr_Function;
2776: END IF;
2777: x_return_status := FND_API.G_RET_STS_ERROR;
2778: x_msg_count := 1;
2779: x_msg_data := 'PA_FCST_INSUFFICIENT_PARA';

Line 2782: PA_DEBUG.Reset_Curr_Function;

2778: x_msg_count := 1;
2779: x_msg_data := 'PA_FCST_INSUFFICIENT_PARA';
2780: WHEN l_job_not_found THEN
2781: IF g1_debug_mode = 'Y' THEN
2782: PA_DEBUG.Reset_Curr_Function;
2783: END IF;
2784: x_return_status := FND_API.G_RET_STS_ERROR;
2785: x_msg_count := 1;
2786: x_msg_data := 'PA_FCST_NO_JOB_FOUND';

Line 2789: PA_DEBUG.Reset_Curr_Function;

2785: x_msg_count := 1;
2786: x_msg_data := 'PA_FCST_NO_JOB_FOUND';
2787: WHEN OTHERS THEN
2788: IF g1_debug_mode = 'Y' THEN
2789: PA_DEBUG.Reset_Curr_Function;
2790: END IF;
2791:
2792: /* ATG Changes */
2793:

Line 3035: PA_DEBUG.Set_Curr_Function( p_function => 'Calc Rate Amount');

3031:
3032: --dbms_output.put_line(' I am in CALC RATE AMOUNT ');
3033:
3034: IF g1_debug_mode = 'Y' THEN
3035: PA_DEBUG.Set_Curr_Function( p_function => 'Calc Rate Amount');
3036: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';
3037: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3038: END IF;
3039:

Line 3036: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';

3032: --dbms_output.put_line(' I am in CALC RATE AMOUNT ');
3033:
3034: IF g1_debug_mode = 'Y' THEN
3035: PA_DEBUG.Set_Curr_Function( p_function => 'Calc Rate Amount');
3036: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';
3037: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3038: END IF;
3039:
3040: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3037: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3033:
3034: IF g1_debug_mode = 'Y' THEN
3035: PA_DEBUG.Set_Curr_Function( p_function => 'Calc Rate Amount');
3036: PA_DEBUG.g_err_stage := 'RT40 : Entering PA_RATE_PVT_PKG.Calc_Rate_Amount';
3037: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3038: END IF;
3039:
3040: x_return_status := FND_API.G_RET_STS_SUCCESS;
3041: IF g1_debug_mode = 'Y' THEN

Line 3042: PA_DEBUG.g_err_stage := 'RTS1 : Checking tab count '||TO_CHAR(NVL(p_rate_calc_date_tab.count,0));

3038: END IF;
3039:
3040: x_return_status := FND_API.G_RET_STS_SUCCESS;
3041: IF g1_debug_mode = 'Y' THEN
3042: PA_DEBUG.g_err_stage := 'RTS1 : Checking tab count '||TO_CHAR(NVL(p_rate_calc_date_tab.count,0));
3043: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3044:
3045:
3046: PA_DEBUG.g_err_stage := ' Rate CALC Amt : Inside API project id '||p_project_id||' Item Id '||p_item_id;

Line 3043: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3039:
3040: x_return_status := FND_API.G_RET_STS_SUCCESS;
3041: IF g1_debug_mode = 'Y' THEN
3042: PA_DEBUG.g_err_stage := 'RTS1 : Checking tab count '||TO_CHAR(NVL(p_rate_calc_date_tab.count,0));
3043: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3044:
3045:
3046: PA_DEBUG.g_err_stage := ' Rate CALC Amt : Inside API project id '||p_project_id||' Item Id '||p_item_id;
3047: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

Line 3046: PA_DEBUG.g_err_stage := ' Rate CALC Amt : Inside API project id '||p_project_id||' Item Id '||p_item_id;

3042: PA_DEBUG.g_err_stage := 'RTS1 : Checking tab count '||TO_CHAR(NVL(p_rate_calc_date_tab.count,0));
3043: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3044:
3045:
3046: PA_DEBUG.g_err_stage := ' Rate CALC Amt : Inside API project id '||p_project_id||' Item Id '||p_item_id;
3047: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3048: END IF;
3049:
3050: IF ((p_rate_calc_date_tab.count) >= 1 ) THEN

Line 3047: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3043: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3044:
3045:
3046: PA_DEBUG.g_err_stage := ' Rate CALC Amt : Inside API project id '||p_project_id||' Item Id '||p_item_id;
3047: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3048: END IF;
3049:
3050: IF ((p_rate_calc_date_tab.count) >= 1 ) THEN
3051: --dbms_output.put_line(' First : '||p_rate_calc_date_tab.FIRST);

Line 3191: PA_DEBUG.g_err_stage := 'RT41 : Entering PA_RATE_PVT_PKG.get_item_amount';

3187: l_expenditure_orgz_id := p_expenditure_orgz_id_tab(l_J);
3188: l_forecast_item_id := p_forecast_item_id_tab(l_J); /* added for bug 2212852 */
3189:
3190: IF g1_debug_mode = 'Y' THEN
3191: PA_DEBUG.g_err_stage := 'RT41 : Entering PA_RATE_PVT_PKG.get_item_amount';
3192: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3193: END IF;
3194:
3195: -- dbms_output.put_line('before calling Get Item AMount the index is : '||l_J);

Line 3192: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3188: l_forecast_item_id := p_forecast_item_id_tab(l_J); /* added for bug 2212852 */
3189:
3190: IF g1_debug_mode = 'Y' THEN
3191: PA_DEBUG.g_err_stage := 'RT41 : Entering PA_RATE_PVT_PKG.get_item_amount';
3192: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3193: END IF;
3194:
3195: -- dbms_output.put_line('before calling Get Item AMount the index is : '||l_J);
3196: PA_RATE_PVT_PKG.get_item_amount(

Line 3294: PA_DEBUG.g_err_stage := 'RT42 : Leaving PA_RATE_PVT_PKG.get_item_amount';

3290: x_msg_count => x_msg_count ,
3291: x_msg_data => x_msg_data );
3292:
3293: IF g1_debug_mode = 'Y' THEN
3294: PA_DEBUG.g_err_stage := 'RT42 : Leaving PA_RATE_PVT_PKG.get_item_amount';
3295: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3296: END IF;
3297:
3298: -- dbms_output.put_line(' I am in CALC RATE AMOUNT end of get_item_amount : '||l_J);

Line 3295: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3291: x_msg_data => x_msg_data );
3292:
3293: IF g1_debug_mode = 'Y' THEN
3294: PA_DEBUG.g_err_stage := 'RT42 : Leaving PA_RATE_PVT_PKG.get_item_amount';
3295: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3296: END IF;
3297:
3298: -- dbms_output.put_line(' I am in CALC RATE AMOUNT end of get_item_amount : '||l_J);
3299: -- dbms_output.put_line(' I am in CALC RATE AMOUNT end of get_item_amount l_cost_rejct_reason : '||l_J||l_cost_rejct_reason);

Line 3403: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';

3399:
3400: -- dbms_output.put_line(' I am in CALC RATE AMT ERROR END : ');
3401:
3402: IF g1_debug_mode = 'Y' THEN
3403: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';
3404: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3405: PA_DEBUG.Reset_Curr_Function;
3406: END IF;
3407:

Line 3404: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3400: -- dbms_output.put_line(' I am in CALC RATE AMT ERROR END : ');
3401:
3402: IF g1_debug_mode = 'Y' THEN
3403: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';
3404: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3405: PA_DEBUG.Reset_Curr_Function;
3406: END IF;
3407:
3408: EXCEPTION

Line 3405: PA_DEBUG.Reset_Curr_Function;

3401:
3402: IF g1_debug_mode = 'Y' THEN
3403: PA_DEBUG.g_err_stage := 'RT43 : Leaving PA_RATE_PVT_PKG.calc rate amount';
3404: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3405: PA_DEBUG.Reset_Curr_Function;
3406: END IF;
3407:
3408: EXCEPTION
3409: WHEN OTHERS THEN

Line 3411: PA_DEBUG.Reset_Curr_Function;

3407:
3408: EXCEPTION
3409: WHEN OTHERS THEN
3410: IF g1_debug_mode = 'Y' THEN
3411: PA_DEBUG.Reset_Curr_Function;
3412: END IF;
3413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3414: x_error_msg := SUBSTR(SQLERRM,1,30);
3415: /* Checking error condition. Added for bug 2218386 */

Line 3460: PA_DEBUG.Set_Curr_Function( p_function => 'get_rep_period_dates ');

3456:
3457: BEGIN
3458:
3459: IF g1_debug_mode = 'Y' THEN
3460: PA_DEBUG.Set_Curr_Function( p_function => 'get_rep_period_dates ');
3461: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';
3462: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3463: END IF;
3464:

Line 3461: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';

3457: BEGIN
3458:
3459: IF g1_debug_mode = 'Y' THEN
3460: PA_DEBUG.Set_Curr_Function( p_function => 'get_rep_period_dates ');
3461: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';
3462: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3463: END IF;
3464:
3465: x_error_value := 'NO_ERROR';

Line 3462: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3458:
3459: IF g1_debug_mode = 'Y' THEN
3460: PA_DEBUG.Set_Curr_Function( p_function => 'get_rep_period_dates ');
3461: PA_DEBUG.g_err_stage := 'RT 101 : Entering PA_RATE_PVT_PKG.get_rep_period_dates';
3462: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3463: END IF;
3464:
3465: x_error_value := 'NO_ERROR';
3466:

Line 3470: PA_DEBUG.g_err_stage := 'RT 102 : get_rep_period_dates-> Inside GL select prd typ '||p_period_type;

3466:
3467: IF (p_period_type = 'GL' ) THEN
3468:
3469: IF g1_debug_mode = 'Y' THEN
3470: PA_DEBUG.g_err_stage := 'RT 102 : get_rep_period_dates-> Inside GL select prd typ '||p_period_type;
3471: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3472: END IF;
3473:
3474: SELECT

Line 3471: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3467: IF (p_period_type = 'GL' ) THEN
3468:
3469: IF g1_debug_mode = 'Y' THEN
3470: PA_DEBUG.g_err_stage := 'RT 102 : get_rep_period_dates-> Inside GL select prd typ '||p_period_type;
3471: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3472: END IF;
3473:
3474: SELECT
3475: glper.period_year,

Line 3509: PA_DEBUG.g_err_stage := 'RT 103 : get_rep_period_dates-> Passed GL select prd nam '||l_period_name;

3505: AND prsts.lookup_type ='CLOSING_STATUS'
3506: AND glpersts.closing_status = prsts.lookup_code);
3507:
3508: IF g1_debug_mode = 'Y' THEN
3509: PA_DEBUG.g_err_stage := 'RT 103 : get_rep_period_dates-> Passed GL select prd nam '||l_period_name;
3510: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3511: END IF;
3512:
3513: ELSIF (p_period_type = 'PA' ) THEN

Line 3510: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3506: AND glpersts.closing_status = prsts.lookup_code);
3507:
3508: IF g1_debug_mode = 'Y' THEN
3509: PA_DEBUG.g_err_stage := 'RT 103 : get_rep_period_dates-> Passed GL select prd nam '||l_period_name;
3510: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3511: END IF;
3512:
3513: ELSIF (p_period_type = 'PA' ) THEN
3514:

Line 3516: PA_DEBUG.g_err_stage := 'RT 104 : get_rep_period_dates-> Inside PA select prd typ '||p_period_type;

3512:
3513: ELSIF (p_period_type = 'PA' ) THEN
3514:
3515: IF g1_debug_mode = 'Y' THEN
3516: PA_DEBUG.g_err_stage := 'RT 104 : get_rep_period_dates-> Inside PA select prd typ '||p_period_type;
3517: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3518: END IF;
3519:
3520: SELECT

Line 3517: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3513: ELSIF (p_period_type = 'PA' ) THEN
3514:
3515: IF g1_debug_mode = 'Y' THEN
3516: PA_DEBUG.g_err_stage := 'RT 104 : get_rep_period_dates-> Inside PA select prd typ '||p_period_type;
3517: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3518: END IF;
3519:
3520: SELECT
3521: glp.period_year

Line 3544: PA_DEBUG.g_err_stage := 'RT 104 : get_rep_period_dates-> Passed PA select prd nam '||l_period_name;

3540: WHERE pal.lookup_type = 'CLOSING STATUS'
3541: AND pal.lookup_code = pap.status);
3542:
3543: IF g1_debug_mode = 'Y' THEN
3544: PA_DEBUG.g_err_stage := 'RT 104 : get_rep_period_dates-> Passed PA select prd nam '||l_period_name;
3545: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3546: END IF;
3547:
3548: ELSIF (p_period_type = 'QR' ) THEN

Line 3545: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3541: AND pal.lookup_code = pap.status);
3542:
3543: IF g1_debug_mode = 'Y' THEN
3544: PA_DEBUG.g_err_stage := 'RT 104 : get_rep_period_dates-> Passed PA select prd nam '||l_period_name;
3545: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3546: END IF;
3547:
3548: ELSIF (p_period_type = 'QR' ) THEN
3549:

Line 3551: PA_DEBUG.g_err_stage := 'RT 105 : get_rep_period_dates-> Inside QR select prd typ '||p_period_type;

3547:
3548: ELSIF (p_period_type = 'QR' ) THEN
3549:
3550: IF g1_debug_mode = 'Y' THEN
3551: PA_DEBUG.g_err_stage := 'RT 105 : get_rep_period_dates-> Inside QR select prd typ '||p_period_type;
3552: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3553: END IF;
3554:
3555: SELECT

Line 3552: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3548: ELSIF (p_period_type = 'QR' ) THEN
3549:
3550: IF g1_debug_mode = 'Y' THEN
3551: PA_DEBUG.g_err_stage := 'RT 105 : get_rep_period_dates-> Inside QR select prd typ '||p_period_type;
3552: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3553: END IF;
3554:
3555: SELECT
3556: period_yr

Line 3598: PA_DEBUG.g_err_stage := 'RT 106 : get_rep_period_dates-> Passed QR select prd nam '||l_period_name;

3594: )
3595: WHERE p_completion_date BETWEEN start_dt AND end_dt;
3596:
3597: IF g1_debug_mode = 'Y' THEN
3598: PA_DEBUG.g_err_stage := 'RT 106 : get_rep_period_dates-> Passed QR select prd nam '||l_period_name;
3599: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3600: END IF;
3601:
3602: ELSIF (p_period_type = 'YR' ) THEN

Line 3599: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3595: WHERE p_completion_date BETWEEN start_dt AND end_dt;
3596:
3597: IF g1_debug_mode = 'Y' THEN
3598: PA_DEBUG.g_err_stage := 'RT 106 : get_rep_period_dates-> Passed QR select prd nam '||l_period_name;
3599: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3600: END IF;
3601:
3602: ELSIF (p_period_type = 'YR' ) THEN
3603:

Line 3605: PA_DEBUG.g_err_stage := 'RT 107 : get_rep_period_dates-> Inside YR select prd typ '||p_period_type;

3601:
3602: ELSIF (p_period_type = 'YR' ) THEN
3603:
3604: IF g1_debug_mode = 'Y' THEN
3605: PA_DEBUG.g_err_stage := 'RT 107 : get_rep_period_dates-> Inside YR select prd typ '||p_period_type;
3606: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3607: END IF;
3608:
3609: SELECT

Line 3606: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3602: ELSIF (p_period_type = 'YR' ) THEN
3603:
3604: IF g1_debug_mode = 'Y' THEN
3605: PA_DEBUG.g_err_stage := 'RT 107 : get_rep_period_dates-> Inside YR select prd typ '||p_period_type;
3606: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3607: END IF;
3608:
3609: SELECT
3610: period_yr

Line 3651: PA_DEBUG.g_err_stage := 'RT 108 : get_rep_period_dates-> Passed YR select prd nam '||l_period_name;

3647: )
3648: WHERE p_completion_date BETWEEN start_dt AND end_dt;
3649:
3650: IF g1_debug_mode = 'Y' THEN
3651: PA_DEBUG.g_err_stage := 'RT 108 : get_rep_period_dates-> Passed YR select prd nam '||l_period_name;
3652: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3653: END IF;
3654:
3655: ELSIF (p_period_type = 'GE' ) THEN

Line 3652: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3648: WHERE p_completion_date BETWEEN start_dt AND end_dt;
3649:
3650: IF g1_debug_mode = 'Y' THEN
3651: PA_DEBUG.g_err_stage := 'RT 108 : get_rep_period_dates-> Passed YR select prd nam '||l_period_name;
3652: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3653: END IF;
3654:
3655: ELSIF (p_period_type = 'GE' ) THEN
3656:

Line 3658: PA_DEBUG.g_err_stage := 'RT 109 : get_rep_period_dates-> Inside GE select prd typ '||p_period_type;

3654:
3655: ELSIF (p_period_type = 'GE' ) THEN
3656:
3657: IF g1_debug_mode = 'Y' THEN
3658: PA_DEBUG.g_err_stage := 'RT 109 : get_rep_period_dates-> Inside GE select prd typ '||p_period_type;
3659: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3660: END IF;
3661:
3662: SELECT

Line 3659: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3655: ELSIF (p_period_type = 'GE' ) THEN
3656:
3657: IF g1_debug_mode = 'Y' THEN
3658: PA_DEBUG.g_err_stage := 'RT 109 : get_rep_period_dates-> Inside GE select prd typ '||p_period_type;
3659: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3660: END IF;
3661:
3662: SELECT
3663: period_yr

Line 3688: PA_DEBUG.g_err_stage := 'RT 110 : get_rep_period_dates-> Passed GE select prd nam '||l_period_name;

3684: )
3685: WHERE p_completion_date BETWEEN start_dt AND end_dt;
3686:
3687: IF g1_debug_mode = 'Y' THEN
3688: PA_DEBUG.g_err_stage := 'RT 110 : get_rep_period_dates-> Passed GE select prd nam '||l_period_name;
3689: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3690: END IF;
3691:
3692: END IF;

Line 3689: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3685: WHERE p_completion_date BETWEEN start_dt AND end_dt;
3686:
3687: IF g1_debug_mode = 'Y' THEN
3688: PA_DEBUG.g_err_stage := 'RT 110 : get_rep_period_dates-> Passed GE select prd nam '||l_period_name;
3689: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3690: END IF;
3691:
3692: END IF;
3693:

Line 3700: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';

3696: x_start_date := l_start_date;
3697: x_end_date := l_end_date;
3698:
3699: IF g1_debug_mode = 'Y' THEN
3700: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';
3701: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3702: PA_DEBUG.Reset_Curr_Function;
3703: END IF;
3704:

Line 3701: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);

3697: x_end_date := l_end_date;
3698:
3699: IF g1_debug_mode = 'Y' THEN
3700: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';
3701: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3702: PA_DEBUG.Reset_Curr_Function;
3703: END IF;
3704:
3705: EXCEPTION

Line 3702: PA_DEBUG.Reset_Curr_Function;

3698:
3699: IF g1_debug_mode = 'Y' THEN
3700: PA_DEBUG.g_err_stage := 'RT 111 : Leaving PA_RATE_PVT_PKG.get_rep_period_dates';
3701: PA_DEBUG.Log_Message(p_message => PA_DEBUG.g_err_stage);
3702: PA_DEBUG.Reset_Curr_Function;
3703: END IF;
3704:
3705: EXCEPTION
3706: WHEN NO_DATA_FOUND THEN

Line 3709: PA_DEBUG.Reset_Curr_Function;

3705: EXCEPTION
3706: WHEN NO_DATA_FOUND THEN
3707: x_error_value := 'NO_DATA_FOUND';
3708: IF g1_debug_mode = 'Y' THEN
3709: PA_DEBUG.Reset_Curr_Function;
3710: END IF;
3711: NULL;
3712: WHEN TOO_MANY_ROWS THEN
3713: x_error_value := 'TOO_MANY_ROWS';

Line 3715: PA_DEBUG.Reset_Curr_Function;

3711: NULL;
3712: WHEN TOO_MANY_ROWS THEN
3713: x_error_value := 'TOO_MANY_ROWS';
3714: IF g1_debug_mode = 'Y' THEN
3715: PA_DEBUG.Reset_Curr_Function;
3716: END IF;
3717: NULL;
3718: WHEN OTHERS THEN
3719: IF g1_debug_mode = 'Y' THEN

Line 3720: PA_DEBUG.Reset_Curr_Function;

3716: END IF;
3717: NULL;
3718: WHEN OTHERS THEN
3719: IF g1_debug_mode = 'Y' THEN
3720: PA_DEBUG.Reset_Curr_Function;
3721: END IF;
3722:
3723: /* ATG Changes */
3724: