eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FPA_PLANNINGCYCLE_PVT dependencies on FPA_PLANNINGCYCLE_PVT

Line 1: PACKAGE BODY fpa_planningcycle_pvt as

1: PACKAGE BODY fpa_planningcycle_pvt as
2: /* $Header: FPAVPCPB.pls 120.4 2007/06/21 15:20:16 rdave ship $ */
3: --
4: -- To modify this template, edit file PKGBODY.TXT in TEMPLATE
5: -- directory of SQL Navigator

Line 50: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc.begin',

46: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
47: FND_LOG.String
48: (
49: FND_LOG.LEVEL_PROCEDURE,
50: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc.begin',
51: 'Entering FPA_PlanningCycle_Pvt.Create_Pc'
52: );
53: END IF;
54:

Line 51: 'Entering FPA_PlanningCycle_Pvt.Create_Pc'

47: FND_LOG.String
48: (
49: FND_LOG.LEVEL_PROCEDURE,
50: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc.begin',
51: 'Entering FPA_PlanningCycle_Pvt.Create_Pc'
52: );
53: END IF;
54:
55:

Line 125: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc.end',

121: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
122: FND_LOG.String
123: (
124: FND_LOG.LEVEL_PROCEDURE,
125: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc.end',
126: 'Exiting FPA_PlanningCycle_Pvt.Create_Pc'
127: );
128: END IF;
129:

Line 126: 'Exiting FPA_PlanningCycle_Pvt.Create_Pc'

122: FND_LOG.String
123: (
124: FND_LOG.LEVEL_PROCEDURE,
125: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc.end',
126: 'Exiting FPA_PlanningCycle_Pvt.Create_Pc'
127: );
128: END IF;
129:
130: EXCEPTION

Line 146: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc',

142: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
143: FND_LOG.String
144: (
145: FND_LOG.LEVEL_ERROR,
146: 'fpa.sql.FPA_PlanningCycle_Pvt.Create_Pc',
147: SQLERRM
148: );
149: END IF;
150:

Line 175: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.begin',

171: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
172: FND_LOG.String
173: (
174: FND_LOG.LEVEL_PROCEDURE,
175: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.begin',
176: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'
177: );
178: END IF;
179:

Line 176: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'

172: FND_LOG.String
173: (
174: FND_LOG.LEVEL_PROCEDURE,
175: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.begin',
176: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'
177: );
178: END IF;
179:
180: --DBMS_OUTPUT.put_line(' ..Inside if in Update_Pc_Invest_Mix...');

Line 226: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.end',

222: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
223: FND_LOG.String
224: (
225: FND_LOG.LEVEL_PROCEDURE,
226: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.end',
227: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'
228: );
229: END IF;
230:

Line 227: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'

223: FND_LOG.String
224: (
225: FND_LOG.LEVEL_PROCEDURE,
226: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix.end',
227: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix'
228: );
229: END IF;
230:
231: EXCEPTION

Line 242: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix',

238: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR THEN
239: FND_LOG.String
240: (
241: FND_LOG.LEVEL_ERROR,
242: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Invest_Mix',
243: SQLERRM
244: );
245: END IF;
246:

Line 274: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.begin',

270: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
271: FND_LOG.String
272: (
273: FND_LOG.LEVEL_PROCEDURE,
274: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.begin',
275: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'
276: );
277: END IF;
278:

Line 275: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'

271: FND_LOG.String
272: (
273: FND_LOG.LEVEL_PROCEDURE,
274: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.begin',
275: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'
276: );
277: END IF;
278:
279: --DBMS_OUTPUT.put_line(' ..Inside if in Update_Pc_Fin_Targets...');

Line 331: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.end',

327: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
328: FND_LOG.String
329: (
330: FND_LOG.LEVEL_PROCEDURE,
331: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.end',
332: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'
333: );
334: END IF;
335:

Line 332: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'

328: FND_LOG.String
329: (
330: FND_LOG.LEVEL_PROCEDURE,
331: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets.end',
332: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets'
333: );
334: END IF;
335:
336: EXCEPTION

Line 349: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets',

345: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR THEN
346: FND_LOG.String
347: (
348: FND_LOG.LEVEL_ERROR,
349: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Fin_Targets',
350: SQLERRM
351: );
352: END IF;
353:

Line 377: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.begin',

373:
374: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
375: FND_LOG.String
376: ( FND_LOG.LEVEL_PROCEDURE,
377: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.begin',
378: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'
379: );
380: END IF;
381:

Line 378: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'

374: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
375: FND_LOG.String
376: ( FND_LOG.LEVEL_PROCEDURE,
377: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.begin',
378: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'
379: );
380: END IF;
381:
382: --DBMS_OUTPUT.put_line(' ..Inside if in Update_Pc_Inv_Criteria_Data...');

Line 393: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

389: -- Limit PCID
390: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
391: FND_LOG.String
392: ( FND_LOG.LEVEL_PROCEDURE,
393: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
394: 'Limit pc dimension to ' || p_inv_crit_tbl(1).planning_cycle || ' value.'
395: );
396: END IF;
397: dbms_aw.execute('LMT planning_cycle_d TO ' || p_inv_crit_tbl(1).planning_cycle);

Line 403: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

399: -- Set the score source
400: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
401: FND_LOG.String
402: ( FND_LOG.LEVEL_PROCEDURE,
403: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
404: 'Setting score_type_pc_r to: ' || p_inv_crit_tbl(1).pc_project_score_source || ' value.'
405: );
406: END IF;
407: dbms_aw.execute('score_type_pc_r = ''' || p_inv_crit_tbl(1).pc_project_score_source || '''');

Line 413: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

409: -- Set the score scale
410: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
411: FND_LOG.String
412: ( FND_LOG.LEVEL_PROCEDURE,
413: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
414: 'Setting pc_project_score_scale_m to: ' || p_inv_crit_tbl(1).pc_project_score_scale || ' value.'
415: );
416: END IF;
417: dbms_aw.execute('pc_project_score_scale_m = ' || p_inv_crit_tbl(1).pc_project_score_scale );

Line 426: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

422:
423: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
424: FND_LOG.String
425: ( FND_LOG.LEVEL_PROCEDURE,
426: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
427: 'Debugging, we are in ' || i || ' value.'
428: );
429: END IF;
430:

Line 436: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

432: -- Limit strategic_obj_d
433: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
434: FND_LOG.String
435: ( FND_LOG.LEVEL_PROCEDURE,
436: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
437: 'Limit strategic_obj_d dimension to ' || p_inv_crit_tbl(i).investment_criteria || ' value.'
438: );
439: END IF;
440: dbms_aw.execute('LMT strategic_obj_d TO ' || p_inv_crit_tbl(i).investment_criteria );

Line 448: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

444: -- Set the weights for each strategic_obj
445: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
446: FND_LOG.String
447: ( FND_LOG.LEVEL_PROCEDURE,
448: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
449: 'Setting pc_strategic_obj_weights_m: ' || p_inv_crit_tbl(i).pc_inv_criteria_weight || ' value.'
450: );
451: END IF;
452: dbms_aw.execute('pc_strategic_obj_weights_m = ' || p_inv_crit_tbl(i).pc_inv_criteria_weight );

Line 460: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

456: -- Set the target from for each strategic_obj
457: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
458: FND_LOG.String
459: ( FND_LOG.LEVEL_PROCEDURE,
460: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
461: 'Setting pc_obj_wscore_targets_from_m: ' || p_inv_crit_tbl(i).pc_inv_crit_score_target_from || ' value.'
462: );
463: END IF;
464:

Line 479: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

475: -- Set the target to for each strategic_obj
476: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
477: FND_LOG.String
478: ( FND_LOG.LEVEL_PROCEDURE,
479: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
480: 'Setting pc_obj_wscore_targets_to_m: ' || p_inv_crit_tbl(i).pc_inv_crit_score_target_to || ' value.'
481: );
482: END IF;
483: -- If the target_to value from UI is null, update it in AW with NA

Line 498: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

494: /*
495: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
496: FND_LOG.String
497: ( FND_LOG.LEVEL_PROCEDURE,
498: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
499: 'Calling AW program: set_pc_invest_criteria_prg( ' || p_inv_crit_tbl(1).planning_cycle || ').'
500: );
501: END IF;
502: dbms_aw.execute('call set_pc_invest_criteria_prg(' || p_inv_crit_tbl(1).planning_cycle || ')');

Line 510: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.end',

506: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
507: FND_LOG.String
508: (
509: FND_LOG.LEVEL_PROCEDURE,
510: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.end',
511: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'
512: );
513: END IF;
514:

Line 511: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'

507: FND_LOG.String
508: (
509: FND_LOG.LEVEL_PROCEDURE,
510: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data.end',
511: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data'
512: );
513: END IF;
514:
515: EXCEPTION

Line 526: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',

522: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR THEN
523: FND_LOG.String
524: (
525: FND_LOG.LEVEL_ERROR,
526: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Inv_Criteria_Data',
527: SQLERRM
528: );
529: END IF;
530:

Line 555: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.begin',

551: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
552: FND_LOG.String
553: (
554: FND_LOG.LEVEL_PROCEDURE,
555: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.begin',
556: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'
557: );
558: END IF;
559:

Line 556: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'

552: FND_LOG.String
553: (
554: FND_LOG.LEVEL_PROCEDURE,
555: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.begin',
556: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'
557: );
558: END IF;
559:
560: -- Update name and description

Line 577: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.end',

573: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
574: FND_LOG.String
575: (
576: FND_LOG.LEVEL_PROCEDURE,
577: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.end',
578: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'
579: );
580: END IF;
581:

Line 578: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'

574: FND_LOG.String
575: (
576: FND_LOG.LEVEL_PROCEDURE,
577: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields.end',
578: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields'
579: );
580: END IF;
581:
582: EXCEPTION

Line 591: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields',

587: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR THEN
588: FND_LOG.String
589: (
590: FND_LOG.LEVEL_ERROR,
591: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Desc_Fields',
592: SQLERRM
593: );
594: END IF;
595:

Line 621: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status.begin',

617: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
618: FND_LOG.String
619: (
620: FND_LOG.LEVEL_PROCEDURE,
621: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status.begin',
622: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Status'
623: );
624: END IF;
625: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_id );

Line 622: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Status'

618: FND_LOG.String
619: (
620: FND_LOG.LEVEL_PROCEDURE,
621: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status.begin',
622: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Status'
623: );
624: END IF;
625: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_id );
626:

Line 639: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status.end',

635: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
636: FND_LOG.String
637: (
638: FND_LOG.LEVEL_PROCEDURE,
639: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status.end',
640: 'Exiting FPA_PlanningCycle_Pvt.Set_Pc_Status'
641: );
642: END IF;
643:

Line 640: 'Exiting FPA_PlanningCycle_Pvt.Set_Pc_Status'

636: FND_LOG.String
637: (
638: FND_LOG.LEVEL_PROCEDURE,
639: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status.end',
640: 'Exiting FPA_PlanningCycle_Pvt.Set_Pc_Status'
641: );
642: END IF;
643:
644: EXCEPTION

Line 653: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status',

649: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
650: FND_LOG.String
651: (
652: FND_LOG.LEVEL_ERROR,
653: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Status',
654: SQLERRM
655: );
656: END IF;
657:

Line 681: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date.begin',

677: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
678: FND_LOG.String
679: (
680: FND_LOG.LEVEL_PROCEDURE,
681: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date.begin',
682: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date'
683: );
684: END IF;
685: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_id );

Line 682: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date'

678: FND_LOG.String
679: (
680: FND_LOG.LEVEL_PROCEDURE,
681: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date.begin',
682: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date'
683: );
684: END IF;
685: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_id );
686:

Line 722: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date.end',

718: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
719: FND_LOG.String
720: (
721: FND_LOG.LEVEL_PROCEDURE,
722: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date.end',
723: 'Exiting FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date'
724: );
725: END IF;
726:

Line 723: 'Exiting FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date'

719: FND_LOG.String
720: (
721: FND_LOG.LEVEL_PROCEDURE,
722: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date.end',
723: 'Exiting FPA_PlanningCycle_Pvt.Set_Pc_Initiate_Date'
724: );
725: END IF;
726:
727: EXCEPTION

Line 736: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate',

732: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
733: FND_LOG.String
734: (
735: FND_LOG.LEVEL_ERROR,
736: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Initiate',
737: SQLERRM
738: );
739: END IF;
740:

Line 767: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.begin',

763: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
764: FND_LOG.String
765: (
766: FND_LOG.LEVEL_PROCEDURE,
767: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.begin',
768: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'
769: );
770: END IF;
771: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_id );

Line 768: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'

764: FND_LOG.String
765: (
766: FND_LOG.LEVEL_PROCEDURE,
767: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.begin',
768: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'
769: );
770: END IF;
771: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_id );
772:

Line 785: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.end',

781: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
782: FND_LOG.String
783: (
784: FND_LOG.LEVEL_PROCEDURE,
785: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.end',
786: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'
787: );
788: END IF;
789:

Line 786: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'

782: FND_LOG.String
783: (
784: FND_LOG.LEVEL_PROCEDURE,
785: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category.end',
786: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Class_Category'
787: );
788: END IF;
789:
790: EXCEPTION

Line 799: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category',

795: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
796: FND_LOG.String
797: (
798: FND_LOG.LEVEL_ERROR,
799: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Class_Category',
800: SQLERRM
801: );
802: END IF;
803:

Line 828: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.begin',

824: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
825: FND_LOG.String
826: (
827: FND_LOG.LEVEL_PROCEDURE,
828: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.begin',
829: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Calendar'
830: );
831: END IF;
832: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_info.planning_cycle );

Line 829: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Calendar'

825: FND_LOG.String
826: (
827: FND_LOG.LEVEL_PROCEDURE,
828: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.begin',
829: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Calendar'
830: );
831: END IF;
832: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_info.planning_cycle );
833:

Line 891: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.end',

887: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
888: FND_LOG.String
889: (
890: FND_LOG.LEVEL_PROCEDURE,
891: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.end',
892: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Calendar'
893: );
894: END IF;
895:

Line 892: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Calendar'

888: FND_LOG.String
889: (
890: FND_LOG.LEVEL_PROCEDURE,
891: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar.end',
892: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Calendar'
893: );
894: END IF;
895:
896: EXCEPTION

Line 905: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar',

901: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
902: FND_LOG.String
903: (
904: FND_LOG.LEVEL_ERROR,
905: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Calendar',
906: SQLERRM
907: );
908: END IF;
909:

Line 933: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.begin',

929:
930: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
931: FND_LOG.String
932: (FND_LOG.LEVEL_PROCEDURE,
933: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.begin',
934: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Currency'
935: );
936: END IF;
937: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_info.planning_cycle );

Line 934: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Currency'

930: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
931: FND_LOG.String
932: (FND_LOG.LEVEL_PROCEDURE,
933: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.begin',
934: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Currency'
935: );
936: END IF;
937: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_info.planning_cycle );
938:

Line 972: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',

968: then
969: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
970: FND_LOG.String
971: (FND_LOG.LEVEL_PROCEDURE,
972: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',
973: 'Setting currency_date_pc_r to : ' || to_char(fnd_date.chardate_to_date(p_pc_info.conversion_rate_date), 'DDMONYYYY' || '''') || ' value.'
974: );
975: END IF;
976:

Line 990: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',

986: else
987: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
988: FND_LOG.String
989: (FND_LOG.LEVEL_PROCEDURE,
990: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',
991: 'Setting currency_date_pc_r to sysdate value.'||to_char(sysdate,'DDMONYYYY' || '''')
992: );
993: END IF;
994:

Line 1010: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.end',

1006: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1007: FND_LOG.String
1008: (
1009: FND_LOG.LEVEL_PROCEDURE,
1010: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.end',
1011: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Currency'
1012: );
1013: END IF;
1014:

Line 1011: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Currency'

1007: FND_LOG.String
1008: (
1009: FND_LOG.LEVEL_PROCEDURE,
1010: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency.end',
1011: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Currency'
1012: );
1013: END IF;
1014:
1015: EXCEPTION

Line 1024: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',

1020: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1021: FND_LOG.String
1022: (
1023: FND_LOG.LEVEL_ERROR,
1024: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Currency',
1025: SQLERRM
1026: );
1027: END IF;
1028:

Line 1054: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.begin',

1050: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1051: FND_LOG.String
1052: (
1053: FND_LOG.LEVEL_PROCEDURE,
1054: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.begin',
1055: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'
1056: );
1057: END IF;
1058: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_info.planning_cycle );

Line 1055: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'

1051: FND_LOG.String
1052: (
1053: FND_LOG.LEVEL_PROCEDURE,
1054: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.begin',
1055: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'
1056: );
1057: END IF;
1058: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_pc_info.planning_cycle );
1059:

Line 1095: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.end',

1091: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1092: FND_LOG.String
1093: (
1094: FND_LOG.LEVEL_PROCEDURE,
1095: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.end',
1096: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'
1097: );
1098: END IF;
1099:

Line 1096: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'

1092: FND_LOG.String
1093: (
1094: FND_LOG.LEVEL_PROCEDURE,
1095: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date.end',
1096: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date'
1097: );
1098: END IF;
1099:
1100: EXCEPTION

Line 1109: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date',

1105: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1106: FND_LOG.String
1107: (
1108: FND_LOG.LEVEL_ERROR,
1109: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Sub_Due_Date',
1110: SQLERRM
1111: );
1112: END IF;
1113:

Line 1140: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.begin',

1136: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1137: FND_LOG.String
1138: (
1139: FND_LOG.LEVEL_PROCEDURE,
1140: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.begin',
1141: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'
1142: );
1143: END IF;
1144:

Line 1141: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'

1137: FND_LOG.String
1138: (
1139: FND_LOG.LEVEL_PROCEDURE,
1140: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.begin',
1141: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'
1142: );
1143: END IF;
1144:
1145: --DBMS_OUTPUT.put_line('Before limiting planning_cycle_d to: ' || p_disc_funds.planning_cycle );

Line 1172: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.end',

1168: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1169: FND_LOG.String
1170: (
1171: FND_LOG.LEVEL_PROCEDURE,
1172: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.end',
1173: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'
1174: );
1175: END IF;
1176:

Line 1173: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'

1169: FND_LOG.String
1170: (
1171: FND_LOG.LEVEL_PROCEDURE,
1172: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds.end',
1173: 'Exiting FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds'
1174: );
1175: END IF;
1176:
1177: EXCEPTION

Line 1186: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds',

1182: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1183: FND_LOG.String
1184: (
1185: FND_LOG.LEVEL_ERROR,
1186: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Discount_funds',
1187: SQLERRM
1188: );
1189: END IF;
1190:

Line 1221: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name.begin',

1217: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1218: FND_LOG.String
1219: (
1220: FND_LOG.LEVEL_PROCEDURE,
1221: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name.begin',
1222: 'Entering FPA_PlanningCycle_Pvt.Check_Pc_Name'
1223: );
1224: END IF;
1225:

Line 1222: 'Entering FPA_PlanningCycle_Pvt.Check_Pc_Name'

1218: FND_LOG.String
1219: (
1220: FND_LOG.LEVEL_PROCEDURE,
1221: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name.begin',
1222: 'Entering FPA_PlanningCycle_Pvt.Check_Pc_Name'
1223: );
1224: END IF;
1225:
1226: IF (p_pc_id is null) THEN

Line 1250: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name.end',

1246: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE THEN
1247: FND_LOG.String
1248: (
1249: FND_LOG.LEVEL_PROCEDURE,
1250: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name.end',
1251: 'Exiting FPA_PlanningCycle_Pvt.Check_Pc_Name'
1252: );
1253: END IF;
1254:

Line 1251: 'Exiting FPA_PlanningCycle_Pvt.Check_Pc_Name'

1247: FND_LOG.String
1248: (
1249: FND_LOG.LEVEL_PROCEDURE,
1250: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name.end',
1251: 'Exiting FPA_PlanningCycle_Pvt.Check_Pc_Name'
1252: );
1253: END IF;
1254:
1255: EXCEPTION

Line 1264: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name',

1260: IF FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_ERROR THEN
1261: FND_LOG.String
1262: (
1263: FND_LOG.LEVEL_ERROR,
1264: 'fpa.sql.FPA_PlanningCycle_Pvt.Check_Pc_Name',
1265: SQLERRM
1266: );
1267: END IF;
1268:

Line 1508: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.begin',

1504: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1505: fnd_log.string
1506: (
1507: FND_LOG.LEVEL_PROCEDURE,
1508: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.begin',
1509: 'Entering fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.'
1510: );
1511: END IF;
1512:

Line 1509: 'Entering fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.'

1505: fnd_log.string
1506: (
1507: FND_LOG.LEVEL_PROCEDURE,
1508: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.begin',
1509: 'Entering fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.'
1510: );
1511: END IF;
1512:
1513: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 1517: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.begin',

1513: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1514: fnd_log.string
1515: (
1516: FND_LOG.LEVEL_PROCEDURE,
1517: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.begin',
1518: 'Calling AW Program SET_PC_INVEST_CRITERIA_PRG.'
1519: );
1520: END IF;
1521:

Line 1528: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.end',

1524: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1525: fnd_log.string
1526: (
1527: FND_LOG.LEVEL_PROCEDURE,
1528: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.end',
1529: 'Entering fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.'
1530: );
1531: END IF;
1532:

Line 1529: 'Entering fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.'

1525: fnd_log.string
1526: (
1527: FND_LOG.LEVEL_PROCEDURE,
1528: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.end',
1529: 'Entering fpa_planningcycle_pvt.Set_Pc_Investment_Criteria.'
1530: );
1531: END IF;
1532:
1533: EXCEPTION

Line 1541: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria',

1537: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1538: fnd_log.string
1539: (
1540: FND_LOG.LEVEL_ERROR,
1541: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Investment_Criteria',
1542: SQLERRM
1543: );
1544: END IF;
1545: FND_MSG_PUB.count_and_get

Line 1570: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.begin',

1566: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1567: FND_LOG.String
1568: (
1569: FND_LOG.LEVEL_PROCEDURE,
1570: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.begin',
1571: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag'
1572: );
1573: END IF;
1574:

Line 1571: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag'

1567: FND_LOG.String
1568: (
1569: FND_LOG.LEVEL_PROCEDURE,
1570: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.begin',
1571: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag'
1572: );
1573: END IF;
1574:
1575: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 1579: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',

1575: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1576: FND_LOG.String
1577: (
1578: FND_LOG.LEVEL_PROCEDURE,
1579: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',
1580: 'Limiting to passed PC id'
1581: );
1582: END IF;
1583:

Line 1593: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',

1589: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1590: FND_LOG.String
1591: (
1592: FND_LOG.LEVEL_PROCEDURE,
1593: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',
1594: 'Limiting to portfolio for passed PC id'
1595: );
1596: END IF;
1597: dbms_aw.execute('limit portfolio_d to portfolio_pc_r');

Line 1603: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',

1599: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1600: FND_LOG.String
1601: (
1602: FND_LOG.LEVEL_PROCEDURE,
1603: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',
1604: 'Limiting to planning cycles for the same portfolio'
1605: );
1606: END IF;
1607: dbms_aw.execute('limit planning_cycle_d to portfolio_d');

Line 1613: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',

1609: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1610: FND_LOG.String
1611: (
1612: FND_LOG.LEVEL_PROCEDURE,
1613: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',
1614: 'Reset last approved flag'
1615: );
1616: END IF;
1617: dbms_aw.execute('pc_last_approved_flag_m = na');

Line 1623: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',

1619: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1620: FND_LOG.String
1621: (
1622: FND_LOG.LEVEL_PROCEDURE,
1623: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag',
1624: 'Setting last approved flag to passed pc ID'
1625: );
1626: END IF;
1627: dbms_aw.execute('limit planning_cycle_d to ' || p_pc_id);

Line 1636: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.end',

1632: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1633: FND_LOG.String
1634: (
1635: FND_LOG.LEVEL_PROCEDURE,
1636: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.end',
1637: 'Exiting fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.end'
1638: );
1639: END IF;
1640:

Line 1637: 'Exiting fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.end'

1633: FND_LOG.String
1634: (
1635: FND_LOG.LEVEL_PROCEDURE,
1636: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.end',
1637: 'Exiting fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Approved_Flag.end'
1638: );
1639: END IF;
1640:
1641: EXCEPTION

Line 1649: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Approved_Flag',

1645: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1646: fnd_log.string
1647: (
1648: FND_LOG.LEVEL_ERROR,
1649: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Approved_Flag',
1650: SQLERRM
1651: );
1652: END IF;
1653: FND_MSG_PUB.count_and_get

Line 1678: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag.begin',

1674: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1675: FND_LOG.String
1676: (
1677: FND_LOG.LEVEL_PROCEDURE,
1678: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag.begin',
1679: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag'
1680: );
1681: END IF;
1682:

Line 1679: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag'

1675: FND_LOG.String
1676: (
1677: FND_LOG.LEVEL_PROCEDURE,
1678: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag.begin',
1679: 'Entering FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag'
1680: );
1681: END IF;
1682:
1683: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 1687: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',

1683: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1684: FND_LOG.String
1685: (
1686: FND_LOG.LEVEL_PROCEDURE,
1687: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',
1688: 'Limiting to passed PC id'
1689: );
1690: END IF;
1691:

Line 1701: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',

1697: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1698: FND_LOG.String
1699: (
1700: FND_LOG.LEVEL_PROCEDURE,
1701: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',
1702: 'Limiting to portfolio for passed PC id'
1703: );
1704: END IF;
1705: dbms_aw.execute('limit portfolio_d to portfolio_pc_r');

Line 1711: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',

1707: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1708: FND_LOG.String
1709: (
1710: FND_LOG.LEVEL_PROCEDURE,
1711: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',
1712: 'Limiting to planning cycles for the same portfolio'
1713: );
1714: END IF;
1715: dbms_aw.execute('limit planning_cycle_d to portfolio_d');

Line 1721: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',

1717: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1718: FND_LOG.String
1719: (
1720: FND_LOG.LEVEL_PROCEDURE,
1721: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',
1722: 'Reset last approved flag'
1723: );
1724: END IF;
1725: dbms_aw.execute('pc_last_flag_m = na');

Line 1731: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',

1727: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1728: FND_LOG.String
1729: (
1730: FND_LOG.LEVEL_PROCEDURE,
1731: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag',
1732: 'Setting last approved flag to passed pc ID'
1733: );
1734: END IF;
1735: dbms_aw.execute('limit planning_cycle_d to ' || p_pc_id);

Line 1744: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag.end',

1740: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1741: FND_LOG.String
1742: (
1743: FND_LOG.LEVEL_PROCEDURE,
1744: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag.end',
1745: 'Exiting fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag'
1746: );
1747: END IF;
1748:

Line 1745: 'Exiting fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag'

1741: FND_LOG.String
1742: (
1743: FND_LOG.LEVEL_PROCEDURE,
1744: 'fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag.end',
1745: 'Exiting fpa.sql.FPA_PlanningCycle_Pvt.Set_Pc_Last_Flag'
1746: );
1747: END IF;
1748:
1749: EXCEPTION

Line 1757: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Approved_Flag',

1753: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1754: fnd_log.string
1755: (
1756: FND_LOG.LEVEL_ERROR,
1757: 'fpa.sql.fpa_planningcycle_pvt.Set_Pc_Approved_Flag',
1758: SQLERRM
1759: );
1760: END IF;
1761: FND_MSG_PUB.count_and_get

Line 1793: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.begin',

1789:
1790: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1791: FND_LOG.String
1792: (FND_LOG.LEVEL_PROCEDURE,
1793: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.begin',
1794: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');
1795: END IF;
1796:
1797: IF l_api_version <> p_api_version THEN

Line 1794: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');

1790: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1791: FND_LOG.String
1792: (FND_LOG.LEVEL_PROCEDURE,
1793: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.begin',
1794: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');
1795: END IF;
1796:
1797: IF l_api_version <> p_api_version THEN
1798: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 1801: 'FPA.SQL.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',

1797: IF l_api_version <> p_api_version THEN
1798: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1799: FND_LOG.STRING
1800: ( FND_LOG.LEVEL_PROCEDURE,
1801: 'FPA.SQL.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',
1802: 'Checking API version.');
1803: END IF;
1804: RAISE FND_API.G_EXC_ERROR;
1805: END IF;

Line 1810: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',

1806:
1807: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1808: FND_LOG.String
1809: (FND_LOG.LEVEL_PROCEDURE,
1810: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',
1811: 'Updating Annual discount rates for the PC in AW.');
1812: END IF;
1813:
1814: dbms_aw.execute('lmt planning_cycle_d to ' || p_pc_id);

Line 1821: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',

1817:
1818: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1819: FND_LOG.String
1820: (FND_LOG.LEVEL_PROCEDURE,
1821: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.',
1822: 'Done Updating Annual discount rates for the PC in AW.');
1823: END IF;
1824:
1825: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 1828: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.end',

1824:
1825: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1826: FND_LOG.String
1827: (FND_LOG.LEVEL_PROCEDURE,
1828: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.end',
1829: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');
1830: END IF;
1831:
1832: EXCEPTION

Line 1829: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');

1825: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1826: FND_LOG.String
1827: (FND_LOG.LEVEL_PROCEDURE,
1828: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates.end',
1829: 'Entering FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates');
1830: END IF;
1831:
1832: EXCEPTION
1833: WHEN FND_API.G_EXC_ERROR THEN

Line 1841: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates',

1837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1838: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1839: FND_LOG.String
1840: ( FND_LOG.LEVEL_ERROR,
1841: 'fpa.sql.FPA_PlanningCycle_Pvt.Update_Pc_Annual_Disc_Rates',
1842: SQLERRM);
1843: END IF;
1844:
1845: FND_MSG_PUB.count_and_get

Line 1854: END FPA_PLANNINGCYCLE_PVT;

1850:
1851: END Update_Pc_Annual_Disc_Rates;
1852:
1853:
1854: END FPA_PLANNINGCYCLE_PVT;
1855: