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.GL_SRS_INCREMENTOR_API dependencies on FND_RESUB

Line 434: v_sch_date := fnd_resub.get_requested_start_date;

430: calc_date_pnum NUMBER;
431: exit_fail EXCEPTION;
432: BEGIN
433: error_buffer := '';
434: v_sch_date := fnd_resub.get_requested_start_date;
435: v_days_elapsed := fnd_resub.get_rusub_delta;
436: v_last_sch_date := TRUNC( v_sch_date
437: - v_days_elapsed);
438:

Line 435: v_days_elapsed := fnd_resub.get_rusub_delta;

431: exit_fail EXCEPTION;
432: BEGIN
433: error_buffer := '';
434: v_sch_date := fnd_resub.get_requested_start_date;
435: v_days_elapsed := fnd_resub.get_rusub_delta;
436: v_last_sch_date := TRUNC( v_sch_date
437: - v_days_elapsed);
438:
439: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

Line 439: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

435: v_days_elapsed := fnd_resub.get_rusub_delta;
436: v_last_sch_date := TRUNC( v_sch_date
437: - v_days_elapsed);
438:
439: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN
440: error_code := -230;
441: -- Cannot get parameter number for PARA. Please check your
442: -- concurrent program definition
443: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');

Line 449: v_last_period := fnd_resub.get_parameter(period_pnum);

445: error_buffer := fnd_message.get;
446: RAISE exit_fail;
447: END IF;
448:
449: v_last_period := fnd_resub.get_parameter(period_pnum);
450: error_code := inc_period_by_days_offset(
451: x_ledger_id,
452: v_last_sch_date,
453: v_last_period,

Line 461: fnd_resub.set_parameter(period_pnum, v_period);

457: IF error_code < 0 THEN
458: RAISE exit_fail;
459: END IF;
460:
461: fnd_resub.set_parameter(period_pnum, v_period);
462: error_code := -200;
463:
464: SELECT start_date
465: INTO v_pstart_date

Line 471: IF fnd_resub.get_param_number(x_je_date_para, je_date_pnum) <> 0 THEN

467: WHERE application_id = 101
468: AND ledger_id = x_ledger_id
469: AND period_name = v_period;
470:
471: IF fnd_resub.get_param_number(x_je_date_para, je_date_pnum) <> 0 THEN
472: error_code := -210;
473: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');
474: fnd_message.set_token('PARA', x_je_date_para);
475: error_buffer := fnd_message.get;

Line 478: IF fnd_resub.get_param_number(x_calc_date_para, calc_date_pnum) <> 0 THEN

474: fnd_message.set_token('PARA', x_je_date_para);
475: error_buffer := fnd_message.get;
476: RAISE exit_fail;
477: ELSE
478: IF fnd_resub.get_param_number(x_calc_date_para, calc_date_pnum) <> 0 THEN
479: error_code := -220;
480: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');
481: fnd_message.set_token('PARA', x_calc_date_para);
482: error_buffer := fnd_message.get;

Line 487: fnd_resub.set_parameter(

483: RAISE exit_fail;
484: END IF;
485: END IF;
486:
487: fnd_resub.set_parameter(
488: je_date_pnum,
489: TO_CHAR(v_pstart_date, x_date_format));
490: fnd_resub.set_parameter(
491: calc_date_pnum,

Line 490: fnd_resub.set_parameter(

486:
487: fnd_resub.set_parameter(
488: je_date_pnum,
489: TO_CHAR(v_pstart_date, x_date_format));
490: fnd_resub.set_parameter(
491: calc_date_pnum,
492: TO_CHAR(v_pstart_date, x_date_format));
493: fnd_resub.return_info(0, error_buffer);
494: EXCEPTION

Line 493: fnd_resub.return_info(0, error_buffer);

489: TO_CHAR(v_pstart_date, x_date_format));
490: fnd_resub.set_parameter(
491: calc_date_pnum,
492: TO_CHAR(v_pstart_date, x_date_format));
493: fnd_resub.return_info(0, error_buffer);
494: EXCEPTION
495: WHEN exit_fail THEN
496: fnd_resub.return_info(error_code, error_buffer);
497: WHEN OTHERS THEN

Line 496: fnd_resub.return_info(error_code, error_buffer);

492: TO_CHAR(v_pstart_date, x_date_format));
493: fnd_resub.return_info(0, error_buffer);
494: EXCEPTION
495: WHEN exit_fail THEN
496: fnd_resub.return_info(error_code, error_buffer);
497: WHEN OTHERS THEN
498: error_buffer := 'gl_srs_incrementor_api.cons_inc_private error #'
499: || TO_CHAR(error_code)
500: || ' : '

Line 502: fnd_resub.return_info(error_code, error_buffer);

498: error_buffer := 'gl_srs_incrementor_api.cons_inc_private error #'
499: || TO_CHAR(error_code)
500: || ' : '
501: || SUBSTR(SQLERRM, 1, 100);
502: fnd_resub.return_info(error_code, error_buffer);
503: END cons_inc_private;
504:
505:
506: ------------------------------------------------------

Line 524: IF fnd_resub.get_increment_flag = 'N' THEN

520: exit_fail EXCEPTION;
521: BEGIN
522: error_buffer := '';
523:
524: IF fnd_resub.get_increment_flag = 'N' THEN
525: fnd_resub.return_info(0, error_buffer);
526: RETURN;
527: END IF;
528:

Line 525: fnd_resub.return_info(0, error_buffer);

521: BEGIN
522: error_buffer := '';
523:
524: IF fnd_resub.get_increment_flag = 'N' THEN
525: fnd_resub.return_info(0, error_buffer);
526: RETURN;
527: END IF;
528:
529: --fnd_profile.get('GL_SET_OF_BKS_ID', l_value);

Line 531: v_sch_date := fnd_resub.get_requested_start_date;

527: END IF;
528:
529: --fnd_profile.get('GL_SET_OF_BKS_ID', l_value);
530: --v_sob_id := TO_NUMBER(l_value);
531: v_sch_date := fnd_resub.get_requested_start_date;
532: v_days_elapsed := fnd_resub.get_rusub_delta;
533: v_last_sch_date := TRUNC( v_sch_date
534: - v_days_elapsed);
535:

Line 532: v_days_elapsed := fnd_resub.get_rusub_delta;

528:
529: --fnd_profile.get('GL_SET_OF_BKS_ID', l_value);
530: --v_sob_id := TO_NUMBER(l_value);
531: v_sch_date := fnd_resub.get_requested_start_date;
532: v_days_elapsed := fnd_resub.get_rusub_delta;
533: v_last_sch_date := TRUNC( v_sch_date
534: - v_days_elapsed);
535:
536: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

Line 536: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

532: v_days_elapsed := fnd_resub.get_rusub_delta;
533: v_last_sch_date := TRUNC( v_sch_date
534: - v_days_elapsed);
535:
536: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN
537: error_code := -100;
538: -- Cannot get parameter number for PARA. Please check your
539: -- concurrent program definition
540: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');

Line 546: v_last_period := fnd_resub.get_parameter(period_pnum);

542: error_buffer := fnd_message.get;
543: RAISE exit_fail;
544: END IF;
545:
546: v_last_period := fnd_resub.get_parameter(period_pnum);
547: error_code := inc_period_by_days_offset(
548: x_ledger_id,
549: v_last_sch_date,
550: v_last_period,

Line 555: fnd_resub.set_parameter(period_pnum, v_period);

551: v_sch_date,
552: v_period);
553:
554: IF error_code >= 0 THEN
555: fnd_resub.set_parameter(period_pnum, v_period);
556: ELSE
557: RAISE exit_fail;
558: END IF;
559:

Line 560: fnd_resub.return_info(0, error_buffer);

556: ELSE
557: RAISE exit_fail;
558: END IF;
559:
560: fnd_resub.return_info(0, error_buffer);
561: EXCEPTION
562: WHEN exit_fail THEN
563: fnd_resub.return_info(error_code, error_buffer);
564: WHEN OTHERS THEN

Line 563: fnd_resub.return_info(error_code, error_buffer);

559:
560: fnd_resub.return_info(0, error_buffer);
561: EXCEPTION
562: WHEN exit_fail THEN
563: fnd_resub.return_info(error_code, error_buffer);
564: WHEN OTHERS THEN
565: error_buffer := 'gl_srs_incrementor_api.increment_period error #'
566: || TO_CHAR(error_code)
567: || ' : '

Line 569: fnd_resub.return_info(error_code, error_buffer);

565: error_buffer := 'gl_srs_incrementor_api.increment_period error #'
566: || TO_CHAR(error_code)
567: || ' : '
568: || SUBSTR(SQLERRM, 1, 100);
569: fnd_resub.return_info(error_code, error_buffer);
570: END increment_period;
571:
572: --PROCEDURE increment_period IS
573: --BEGIN

Line 605: v_sch_date := fnd_resub.get_requested_start_date;

601: exit_fail EXCEPTION;
602: BEGIN
603: error_buffer := '';
604: error_code := -300;
605: v_sch_date := fnd_resub.get_requested_start_date;
606: v_days_elapsed := fnd_resub.get_rusub_delta;
607: v_last_sch_date := TRUNC( v_sch_date
608: - v_days_elapsed);
609:

Line 606: v_days_elapsed := fnd_resub.get_rusub_delta;

602: BEGIN
603: error_buffer := '';
604: error_code := -300;
605: v_sch_date := fnd_resub.get_requested_start_date;
606: v_days_elapsed := fnd_resub.get_rusub_delta;
607: v_last_sch_date := TRUNC( v_sch_date
608: - v_days_elapsed);
609:
610: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

Line 610: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

606: v_days_elapsed := fnd_resub.get_rusub_delta;
607: v_last_sch_date := TRUNC( v_sch_date
608: - v_days_elapsed);
609:
610: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN
611: error_code := -310;
612: -- Cannot get parameter number for PARA. Please check your
613: -- concurrent program definition
614: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');

Line 620: IF fnd_resub.get_param_number(x_je_date_para, je_date_pnum) <> 0 THEN

616: error_buffer := fnd_message.get;
617: RAISE exit_fail;
618: END IF;
619:
620: IF fnd_resub.get_param_number(x_je_date_para, je_date_pnum) <> 0 THEN
621: error_code := -320;
622: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');
623: fnd_message.set_token('PARA', x_je_date_para);
624: error_buffer := fnd_message.get;

Line 627: IF fnd_resub.get_param_number(x_calc_date_para, calc_date_pnum) <> 0 THEN

623: fnd_message.set_token('PARA', x_je_date_para);
624: error_buffer := fnd_message.get;
625: RAISE exit_fail;
626: ELSE
627: IF fnd_resub.get_param_number(x_calc_date_para, calc_date_pnum) <> 0 THEN
628: error_code := -330;
629: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');
630: fnd_message.set_token('PARA', x_calc_date_para);
631: error_buffer := fnd_message.get;

Line 637: TO_DATE(fnd_resub.get_parameter(je_date_pnum), x_date_format);

633: END IF;
634: END IF;
635:
636: v_last_je_date :=
637: TO_DATE(fnd_resub.get_parameter(je_date_pnum), x_date_format);
638: v_last_calc_date :=
639: TO_DATE(fnd_resub.get_parameter(calc_date_pnum), x_date_format);
640: -- Get journal effective date
641: error_code := increment_bus_date(

Line 639: TO_DATE(fnd_resub.get_parameter(calc_date_pnum), x_date_format);

635:
636: v_last_je_date :=
637: TO_DATE(fnd_resub.get_parameter(je_date_pnum), x_date_format);
638: v_last_calc_date :=
639: TO_DATE(fnd_resub.get_parameter(calc_date_pnum), x_date_format);
640: -- Get journal effective date
641: error_code := increment_bus_date(
642: v_ledger_id,
643: v_last_sch_date,

Line 666: fnd_resub.set_parameter(period_pnum, v_period);

662: IF error_code < 0 THEN
663: RAISE exit_fail;
664: END IF;
665:
666: fnd_resub.set_parameter(period_pnum, v_period);
667: fnd_resub.set_parameter(je_date_pnum, TO_CHAR(v_je_date, x_date_format));
668: fnd_resub.set_parameter(
669: calc_date_pnum,
670: TO_CHAR(v_calc_date, x_date_format));

Line 667: fnd_resub.set_parameter(je_date_pnum, TO_CHAR(v_je_date, x_date_format));

663: RAISE exit_fail;
664: END IF;
665:
666: fnd_resub.set_parameter(period_pnum, v_period);
667: fnd_resub.set_parameter(je_date_pnum, TO_CHAR(v_je_date, x_date_format));
668: fnd_resub.set_parameter(
669: calc_date_pnum,
670: TO_CHAR(v_calc_date, x_date_format));
671: fnd_resub.return_info(0, error_buffer);

Line 668: fnd_resub.set_parameter(

664: END IF;
665:
666: fnd_resub.set_parameter(period_pnum, v_period);
667: fnd_resub.set_parameter(je_date_pnum, TO_CHAR(v_je_date, x_date_format));
668: fnd_resub.set_parameter(
669: calc_date_pnum,
670: TO_CHAR(v_calc_date, x_date_format));
671: fnd_resub.return_info(0, error_buffer);
672: EXCEPTION

Line 671: fnd_resub.return_info(0, error_buffer);

667: fnd_resub.set_parameter(je_date_pnum, TO_CHAR(v_je_date, x_date_format));
668: fnd_resub.set_parameter(
669: calc_date_pnum,
670: TO_CHAR(v_calc_date, x_date_format));
671: fnd_resub.return_info(0, error_buffer);
672: EXCEPTION
673: WHEN exit_fail THEN
674: fnd_resub.return_info(error_code, error_buffer);
675: WHEN OTHERS THEN

Line 674: fnd_resub.return_info(error_code, error_buffer);

670: TO_CHAR(v_calc_date, x_date_format));
671: fnd_resub.return_info(0, error_buffer);
672: EXCEPTION
673: WHEN exit_fail THEN
674: fnd_resub.return_info(error_code, error_buffer);
675: WHEN OTHERS THEN
676: error_buffer := 'gl_srs_incrementor_api.incremnt_adb error #'
677: || TO_CHAR(error_code)
678: || ' : '

Line 680: fnd_resub.return_info(error_code, error_buffer);

676: error_buffer := 'gl_srs_incrementor_api.incremnt_adb error #'
677: || TO_CHAR(error_code)
678: || ' : '
679: || SUBSTR(SQLERRM, 1, 100);
680: fnd_resub.return_info(error_code, error_buffer);
681: END increment_adb;
682:
683: PROCEDURE increment_parameters IS
684: l_value fnd_profile_option_values.profile_option_value%TYPE;

Line 726: IF fnd_resub.get_increment_flag = 'N' THEN

722: BEGIN
723: error_buffer := '';
724:
725: -- Do not increment if user did not check the increment date flag
726: IF fnd_resub.get_increment_flag = 'N' THEN
727: fnd_resub.return_info(0, error_buffer);
728: RETURN;
729: END IF;
730: error_code := -1;

Line 727: fnd_resub.return_info(0, error_buffer);

723: error_buffer := '';
724:
725: -- Do not increment if user did not check the increment date flag
726: IF fnd_resub.get_increment_flag = 'N' THEN
727: fnd_resub.return_info(0, error_buffer);
728: RETURN;
729: END IF;
730: error_code := -1;
731:

Line 733: fnd_resub.get_program(program_name, application_name);

729: END IF;
730: error_code := -1;
731:
732: -- get program name;
733: fnd_resub.get_program(program_name, application_name);
734: error_code := -2;
735:
736: --con_ledger_flag := 'Y';
737: SELECT consolidation_ledger_flag

Line 743: IF fnd_resub.get_param_number('Ledger Id',ledger_pnum) <> 0 THEN

739: FROM gl_system_usages;
740: error_code := -3;
741:
742: IF (program_name = 'GLCRVL') THEN
743: IF fnd_resub.get_param_number('Ledger Id',ledger_pnum) <> 0 THEN
744: error_code := -31;
745: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
746: fnd_message.set_token('PARA','Ledger Id');
747: error_buffer := fnd_message.get;

Line 750: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);

746: fnd_message.set_token('PARA','Ledger Id');
747: error_buffer := fnd_message.get;
748: RAISE exit_fail;
749: END IF;
750: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);
751: increment_date('Effective Date', 'Y', 'Period', v_ledger_id);
752: increment_date('Rate Date', 'N', NULL, v_ledger_id);
753: ELSIF program_name = 'GLPRJE' THEN
754: IF fnd_resub.get_param_number('Recurring Batch Id',batch_pnum) <>0 THEN

Line 754: IF fnd_resub.get_param_number('Recurring Batch Id',batch_pnum) <>0 THEN

750: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);
751: increment_date('Effective Date', 'Y', 'Period', v_ledger_id);
752: increment_date('Rate Date', 'N', NULL, v_ledger_id);
753: ELSIF program_name = 'GLPRJE' THEN
754: IF fnd_resub.get_param_number('Recurring Batch Id',batch_pnum) <>0 THEN
755: error_code := -32;
756: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
757: fnd_message.set_token('PARA','Recurring Batch Id');
758: error_buffer := fnd_message.get;

Line 761: v_batch_id := fnd_resub.get_parameter(batch_pnum);

757: fnd_message.set_token('PARA','Recurring Batch Id');
758: error_buffer := fnd_message.get;
759: RAISE exit_fail;
760: END IF;
761: v_batch_id := fnd_resub.get_parameter(batch_pnum);
762:
763: IF(con_ledger_flag = 'Y') THEN
764: IF fnd_resub.get_param_number('Average Journal Flag',usage_pnum) <>0 THEN
765: error_code := -33;

Line 764: IF fnd_resub.get_param_number('Average Journal Flag',usage_pnum) <>0 THEN

760: END IF;
761: v_batch_id := fnd_resub.get_parameter(batch_pnum);
762:
763: IF(con_ledger_flag = 'Y') THEN
764: IF fnd_resub.get_param_number('Average Journal Flag',usage_pnum) <>0 THEN
765: error_code := -33;
766: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
767: fnd_message.set_token('PARA','Average Journal Flag');
768: error_buffer := fnd_message.get;

Line 771: usage_flag := fnd_resub.get_parameter(usage_pnum);

767: fnd_message.set_token('PARA','Average Journal Flag');
768: error_buffer := fnd_message.get;
769: RAISE exit_fail;
770: END IF;
771: usage_flag := fnd_resub.get_parameter(usage_pnum);
772: ELSE
773: usage_flag := 'N';
774: END IF;
775:

Line 841: IF fnd_resub.get_param_number('allocation_batch_id',batch_pnum) <>0 THEN

837: 'CALCULATION_EFFECTIVE_DATE',
838: 'YYYY/MM/DD');
839: END IF;
840: ELSIF (program_name = 'GLAMAS') THEN
841: IF fnd_resub.get_param_number('allocation_batch_id',batch_pnum) <>0 THEN
842: error_code := -34;
843: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
844: fnd_message.set_token('PARA','allocation_batch_id');
845: error_buffer := fnd_message.get;

Line 849: v_batch_id := fnd_resub.get_parameter(batch_pnum);

845: error_buffer := fnd_message.get;
846: RAISE exit_fail;
847: END IF;
848:
849: v_batch_id := fnd_resub.get_parameter(batch_pnum);
850: IF fnd_resub.get_param_number('ledger_override_id',ledger_pnum) <> 0 THEN
851: error_code := -35;
852: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
853: fnd_message.set_token('PARA','ledger_override_id');

Line 850: IF fnd_resub.get_param_number('ledger_override_id',ledger_pnum) <> 0 THEN

846: RAISE exit_fail;
847: END IF;
848:
849: v_batch_id := fnd_resub.get_parameter(batch_pnum);
850: IF fnd_resub.get_param_number('ledger_override_id',ledger_pnum) <> 0 THEN
851: error_code := -35;
852: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
853: fnd_message.set_token('PARA','ledger_override_id');
854: error_buffer := fnd_message.get;

Line 857: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);

853: fnd_message.set_token('PARA','ledger_override_id');
854: error_buffer := fnd_message.get;
855: RAISE exit_fail;
856: END IF;
857: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);
858:
859: IF(con_ledger_flag = 'Y') THEN
860: IF fnd_resub.get_param_number('average_je_flag',usage_pnum) <>0 THEN
861: error_code := -36;

Line 860: IF fnd_resub.get_param_number('average_je_flag',usage_pnum) <>0 THEN

856: END IF;
857: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);
858:
859: IF(con_ledger_flag = 'Y') THEN
860: IF fnd_resub.get_param_number('average_je_flag',usage_pnum) <>0 THEN
861: error_code := -36;
862: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
863: fnd_message.set_token('PARA','average_je_flag');
864: error_buffer := fnd_message.get;

Line 867: usage_flag := fnd_resub.get_parameter(usage_pnum);

863: fnd_message.set_token('PARA','average_je_flag');
864: error_buffer := fnd_message.get;
865: RAISE exit_fail;
866: END IF;
867: usage_flag := fnd_resub.get_parameter(usage_pnum);
868: ELSE
869: usage_flag := 'N';
870: END IF;
871:

Line 959: IF fnd_resub.get_param_number('allocation_set_id',batch_pnum)<> 0 THEN

955: 'CALCULATION_EFFECTIVE_DATE',
956: 'YYYY/MM/DD HH24:MI:SS');
957: END IF;
958: ELSIF program_name = 'GLALGEN' THEN
959: IF fnd_resub.get_param_number('allocation_set_id',batch_pnum)<> 0 THEN
960: error_code := -37;
961: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
962: fnd_message.set_token('PARA','allocation_set_id');
963: error_buffer := fnd_message.get;

Line 967: v_batch_id := fnd_resub.get_parameter(batch_pnum);

963: error_buffer := fnd_message.get;
964: RAISE exit_fail;
965: END IF;
966:
967: v_batch_id := fnd_resub.get_parameter(batch_pnum);
968:
969: IF fnd_resub.get_param_number('LEDGER_ID',ledger_pnum) <>0 THEN
970: error_code := -38;
971: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');

Line 969: IF fnd_resub.get_param_number('LEDGER_ID',ledger_pnum) <>0 THEN

965: END IF;
966:
967: v_batch_id := fnd_resub.get_parameter(batch_pnum);
968:
969: IF fnd_resub.get_param_number('LEDGER_ID',ledger_pnum) <>0 THEN
970: error_code := -38;
971: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
972: fnd_message.set_token('PARA','LEDGER_ID');
973: error_buffer := fnd_message.get;

Line 977: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);

973: error_buffer := fnd_message.get;
974: RAISE exit_fail;
975: END IF;
976:
977: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);
978:
979: IF(con_ledger_flag = 'Y') THEN
980: IF fnd_resub.get_param_number('average_journal_flag',usage_pnum) <>0 THEN
981: error_code := -39;

Line 980: IF fnd_resub.get_param_number('average_journal_flag',usage_pnum) <>0 THEN

976:
977: v_ledger_id := fnd_resub.get_parameter(ledger_pnum);
978:
979: IF(con_ledger_flag = 'Y') THEN
980: IF fnd_resub.get_param_number('average_journal_flag',usage_pnum) <>0 THEN
981: error_code := -39;
982: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
983: fnd_message.set_token('PARA','average_journal_flag');
984: error_buffer := fnd_message.get;

Line 987: usage_flag := fnd_resub.get_parameter(usage_pnum);

983: fnd_message.set_token('PARA','average_journal_flag');
984: error_buffer := fnd_message.get;
985: RAISE exit_fail;
986: END IF;
987: usage_flag := fnd_resub.get_parameter(usage_pnum);
988: ELSE
989: usage_flag := 'N';
990: END IF;
991:

Line 1136: IF fnd_resub.get_param_number('Budget Batch Id',batch_pnum) <> 0 THEN

1132: 'YYYY/MM/DD HH24:MI:SS');
1133: END IF;
1134:
1135: ELSIF program_name = 'GLPRBE' THEN
1136: IF fnd_resub.get_param_number('Budget Batch Id',batch_pnum) <> 0 THEN
1137: error_code := -40;
1138: fnd_message.set_name('SQLGL','GL_SCH_INC_GET_PARA_NUM');
1139: fnd_message.set_token('PARA','Ledger Id');
1140: error_buffer := fnd_message.get;

Line 1144: v_batch_id := fnd_resub.get_parameter(batch_pnum);

1140: error_buffer := fnd_message.get;
1141: RAISE exit_fail;
1142: END IF;
1143:
1144: v_batch_id := fnd_resub.get_parameter(batch_pnum);
1145: random_ledger_id := get_random_ledger('GLPRBE',NULL,v_batch_id);
1146: increment_period(random_ledger_id,'PERIOD_NAME_START');
1147: increment_period(random_ledger_id,'PERIOD_NAME_END');
1148: END IF;

Line 1150: fnd_resub.return_info(0, error_buffer);

1146: increment_period(random_ledger_id,'PERIOD_NAME_START');
1147: increment_period(random_ledger_id,'PERIOD_NAME_END');
1148: END IF;
1149:
1150: fnd_resub.return_info(0, error_buffer);
1151: EXCEPTION
1152: WHEN exit_fail THEN
1153: fnd_resub.return_info(error_code, error_buffer);
1154: WHEN OTHERS THEN

Line 1153: fnd_resub.return_info(error_code, error_buffer);

1149:
1150: fnd_resub.return_info(0, error_buffer);
1151: EXCEPTION
1152: WHEN exit_fail THEN
1153: fnd_resub.return_info(error_code, error_buffer);
1154: WHEN OTHERS THEN
1155: error_buffer :=
1156: 'gl_srs_incrementor_api.increment_parameters error #'
1157: || TO_CHAR(error_code)

Line 1160: fnd_resub.return_info(error_code, error_buffer);

1156: 'gl_srs_incrementor_api.increment_parameters error #'
1157: || TO_CHAR(error_code)
1158: || ' : '
1159: || SUBSTR(SQLERRM, 1, 100);
1160: fnd_resub.return_info(error_code, error_buffer);
1161: END increment_parameters;
1162:
1163: PROCEDURE increment_date(
1164: x_date_para VARCHAR2,

Line 1185: IF fnd_resub.get_increment_flag = 'N' THEN

1181: BEGIN
1182: error_buffer := '';
1183:
1184: -- Do not increment if user did not check the increment date flag
1185: IF fnd_resub.get_increment_flag = 'N' THEN
1186: fnd_resub.return_info(0, error_buffer);
1187: RETURN;
1188: END IF;
1189:

Line 1186: fnd_resub.return_info(0, error_buffer);

1182: error_buffer := '';
1183:
1184: -- Do not increment if user did not check the increment date flag
1185: IF fnd_resub.get_increment_flag = 'N' THEN
1186: fnd_resub.return_info(0, error_buffer);
1187: RETURN;
1188: END IF;
1189:
1190: --fnd_profile.get('GL_SET_OF_BKS_ID', l_value);

Line 1192: v_sch_date := fnd_resub.get_requested_start_date;

1188: END IF;
1189:
1190: --fnd_profile.get('GL_SET_OF_BKS_ID', l_value);
1191: --v_sob_id := TO_NUMBER(l_value);
1192: v_sch_date := fnd_resub.get_requested_start_date;
1193: v_days_elapsed := fnd_resub.get_rusub_delta;
1194: v_last_sch_date := TRUNC( v_sch_date
1195: - v_days_elapsed);
1196:

Line 1193: v_days_elapsed := fnd_resub.get_rusub_delta;

1189:
1190: --fnd_profile.get('GL_SET_OF_BKS_ID', l_value);
1191: --v_sob_id := TO_NUMBER(l_value);
1192: v_sch_date := fnd_resub.get_requested_start_date;
1193: v_days_elapsed := fnd_resub.get_rusub_delta;
1194: v_last_sch_date := TRUNC( v_sch_date
1195: - v_days_elapsed);
1196:
1197: IF fnd_resub.get_param_number(x_date_para, date_pnum) <> 0 THEN

Line 1197: IF fnd_resub.get_param_number(x_date_para, date_pnum) <> 0 THEN

1193: v_days_elapsed := fnd_resub.get_rusub_delta;
1194: v_last_sch_date := TRUNC( v_sch_date
1195: - v_days_elapsed);
1196:
1197: IF fnd_resub.get_param_number(x_date_para, date_pnum) <> 0 THEN
1198: error_code := -400;
1199: -- Cannot get parameter number for PARA. Please check your
1200: -- concurrent program definition
1201: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');

Line 1207: temp_date := fnd_resub.get_parameter(date_pnum);

1203: error_buffer := fnd_message.get;
1204: RAISE exit_fail;
1205: END IF;
1206:
1207: temp_date := fnd_resub.get_parameter(date_pnum);
1208: temp_date := SUBSTR(temp_date, 1, 10);
1209: c_date := TO_DATE(temp_date, 'YYYY/MM/DD');
1210: c_date := c_date
1211: + v_days_elapsed;

Line 1214: fnd_resub.set_parameter(date_pnum, v_date);

1210: c_date := c_date
1211: + v_days_elapsed;
1212: v_date := TO_CHAR(c_date, 'YYYY/MM/DD')
1213: || ' 00:00:00';
1214: fnd_resub.set_parameter(date_pnum, v_date);
1215:
1216: IF (x_period_flag = 'Y') THEN
1217: BEGIN
1218: SELECT period_name

Line 1234: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN

1230: error_buffer := fnd_message.get;
1231: RAISE exit_fail;
1232: END;
1233:
1234: IF fnd_resub.get_param_number(x_period_para, period_pnum) <> 0 THEN
1235: error_code := -420;
1236: -- Cannot get parameter number for PARA. Please check your
1237: -- concurrent program definition
1238: fnd_message.set_name('SQLGL', 'GL_SCH_INC_GET_PARA_NUM');

Line 1244: fnd_resub.set_parameter(period_pnum, c_start_period);

1240: error_buffer := fnd_message.get;
1241: RAISE exit_fail;
1242: END IF;
1243:
1244: fnd_resub.set_parameter(period_pnum, c_start_period);
1245: END IF;
1246:
1247: fnd_resub.return_info(0, error_buffer);
1248: EXCEPTION

Line 1247: fnd_resub.return_info(0, error_buffer);

1243:
1244: fnd_resub.set_parameter(period_pnum, c_start_period);
1245: END IF;
1246:
1247: fnd_resub.return_info(0, error_buffer);
1248: EXCEPTION
1249: WHEN exit_fail THEN
1250: fnd_resub.return_info(error_code, error_buffer);
1251: WHEN OTHERS THEN

Line 1250: fnd_resub.return_info(error_code, error_buffer);

1246:
1247: fnd_resub.return_info(0, error_buffer);
1248: EXCEPTION
1249: WHEN exit_fail THEN
1250: fnd_resub.return_info(error_code, error_buffer);
1251: WHEN OTHERS THEN
1252: error_buffer := 'gl_srs_incrementor_api.increment_date error #'
1253: || TO_CHAR(error_code)
1254: || ' : '

Line 1256: fnd_resub.return_info(error_code, error_buffer);

1252: error_buffer := 'gl_srs_incrementor_api.increment_date error #'
1253: || TO_CHAR(error_code)
1254: || ' : '
1255: || SUBSTR(SQLERRM, 1, 100);
1256: fnd_resub.return_info(error_code, error_buffer);
1257: END increment_date;
1258:
1259:
1260: FUNCTION get_random_ledger(