DBA Data[Home] [Help]

APPS.GMS_BUDGET_CORE dependencies on GMS_BUDGET_CORE

Line 1: PACKAGE BODY gms_budget_core AS

1: PACKAGE BODY gms_budget_core AS
2: /* $Header: gmsbubcb.pls 120.2.12010000.2 2008/12/23 05:31:34 prabsing ship $ */
3:
4: -- To check on, whether to print debug messages in log file or not
5: L_DEBUG varchar2(1) := NVL(FND_PROFILE.value('GMS_ENABLE_DEBUG_MODE'), 'N');

Line 383: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_CORE.BASELINE ***','C');

379:
380: BEGIN
381:
382: IF L_DEBUG = 'Y' THEN
383: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_CORE.BASELINE ***','C');
384: END IF;
385:
386: savepoint before_baseline;
387:

Line 402: x_err_stage := 'GMS_BUDGET_CORE.BASELINE - Error occurred while validating employee information';

398:
399: v_emp_id := PA_UTILS.GetEmpIdFromUser(x_created_by );
400:
401: if v_emp_id IS NULL then
402: x_err_stage := 'GMS_BUDGET_CORE.BASELINE - Error occurred while validating employee information';
403: gms_error_pkg.gms_message( x_err_name => 'GMS_ALL_WARN_NO_EMPL_REC',
404: x_err_code => x_err_code,
405: x_err_buff => x_err_stage);
406:

Line 438: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling GMS_BUDGET_UTILS.Verify_Budget_Rules - Baseline','C');

434: IF ( x_verify_budget_rules = 'Y' )
435: THEN
436:
437: IF L_DEBUG = 'Y' THEN
438: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling GMS_BUDGET_UTILS.Verify_Budget_Rules - Baseline','C');
439: END IF;
440:
441: GMS_BUDGET_UTILS.Verify_Budget_Rules
442: (p_draft_version_id => x_draft_version_id

Line 466: x_err_stage := 'GMS_BUDGET_CORE.BASELINE - Error occurred while validating Budget';

462: --IF (l_err_msg_count > 0)
463: IF (x_err_code <> 0)
464: THEN
465: IF (l_warnings_only_flag = 'N') THEN
466: x_err_stage := 'GMS_BUDGET_CORE.BASELINE - Error occurred while validating Budget';
467: gms_error_pkg.gms_message(x_err_name => 'GMS_VERIFY_BUDGET_FAIL_B',
468: x_err_code => x_err_code,
469: x_err_buff => x_err_stage);
470: fnd_msg_pub.add;

Line 480: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling GMS_BUDGET_UTILS.get_baselined_version_id','C');

476: -- End R11 rewrite
477: -- ----------------------------------------------------------------------------------
478:
479: IF L_DEBUG = 'Y' THEN
480: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling GMS_BUDGET_UTILS.get_baselined_version_id','C');
481: END IF;
482:
483: GMS_BUDGET_UTILS.get_baselined_version_id(x_project_id,
484: x_award_id,

Line 493: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to GMS_BUDGET_UTILS.get_baselined_version_id returned x_err_code : '||x_err_code ,'C');

489: x_err_stack);
490:
491: if (x_err_code < 0) then
492: IF L_DEBUG = 'Y' THEN
493: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to GMS_BUDGET_UTILS.get_baselined_version_id returned x_err_code : '||x_err_code ,'C');
494: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to GMS_BUDGET_UTILS.get_baselined_version_id returned x_err_stage : '||x_err_stage ,'C');
495: END IF;
496:
497: rollback to before_baseline;

Line 494: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to GMS_BUDGET_UTILS.get_baselined_version_id returned x_err_stage : '||x_err_stage ,'C');

490:
491: if (x_err_code < 0) then
492: IF L_DEBUG = 'Y' THEN
493: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to GMS_BUDGET_UTILS.get_baselined_version_id returned x_err_code : '||x_err_code ,'C');
494: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to GMS_BUDGET_UTILS.get_baselined_version_id returned x_err_stage : '||x_err_stage ,'C');
495: END IF;
496:
497: rollback to before_baseline;
498: return;

Line 505: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- First time baselining','C');

501:
502: -- baseline budget does not exist
503:
504: IF L_DEBUG = 'Y' THEN
505: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- First time baselining','C');
506: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling pa_res_list_assignments.create_rl_assgmt','C');
507: END IF;
508:
509: x_err_stage := 'create resource list assignment <'

Line 506: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling pa_res_list_assignments.create_rl_assgmt','C');

502: -- baseline budget does not exist
503:
504: IF L_DEBUG = 'Y' THEN
505: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- First time baselining','C');
506: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling pa_res_list_assignments.create_rl_assgmt','C');
507: END IF;
508:
509: x_err_stage := 'create resource list assignment <'
510: || to_char(x_project_id) || '><'

Line 524: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_assgmt returned x_err_code : '||x_err_code ,'C');

520:
521: -- if oracle or application error, return
522: if (x_err_code <> 0) then
523: IF L_DEBUG = 'Y' THEN
524: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_assgmt returned x_err_code : '||x_err_code ,'C');
525: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_assgmt returned x_err_stage : '||x_err_stage ,'C');
526: END IF;
527: rollback to before_baseline;
528: return;

Line 525: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_assgmt returned x_err_stage : '||x_err_stage ,'C');

521: -- if oracle or application error, return
522: if (x_err_code <> 0) then
523: IF L_DEBUG = 'Y' THEN
524: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_assgmt returned x_err_code : '||x_err_code ,'C');
525: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_assgmt returned x_err_stage : '||x_err_stage ,'C');
526: END IF;
527: rollback to before_baseline;
528: return;
529: end if;

Line 539: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling pa_res_list_assignments.create_rl_uses','C');

535:
536: -- create resource list usage if necessary
537:
538: IF L_DEBUG = 'Y' THEN
539: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling pa_res_list_assignments.create_rl_uses','C');
540: END IF;
541:
542: pa_res_list_assignments.create_rl_uses(x_project_id,
543: x_resource_list_assgmt_id,

Line 553: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_uses returned x_err_code :'||x_err_code ,'C');

549: -- if oracle or application error, return.
550:
551: if (x_err_code <> 0) then
552: IF L_DEBUG = 'Y' THEN
553: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_uses returned x_err_code :'||x_err_code ,'C');
554: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_uses returned x_err_stage :'||x_err_stage ,'C');
555: END IF;
556: rollback to before_baseline;
557: return;

Line 554: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_uses returned x_err_stage :'||x_err_stage ,'C');

550:
551: if (x_err_code <> 0) then
552: IF L_DEBUG = 'Y' THEN
553: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_uses returned x_err_code :'||x_err_code ,'C');
554: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to pa_res_list_assignments.create_rl_uses returned x_err_stage :'||x_err_stage ,'C');
555: END IF;
556: rollback to before_baseline;
557: return;
558: end if;

Line 567: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_mark_as_original : '||x_mark_as_original ,'C');

563: || x_budget_type_code || '>';
564:
565:
566: IF L_DEBUG = 'Y' THEN
567: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_mark_as_original : '||x_mark_as_original ,'C');
568: END IF;
569:
570: if (x_mark_as_original = 'Y') then
571:

Line 594: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Updating current_flag to an intermediate status R','C');

590: -- at the end of Baseline process.
591: -------------------------------------------------------------------------------------------
592:
593: IF L_DEBUG = 'Y' THEN
594: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Updating current_flag to an intermediate status R','C');
595: END IF;
596:
597: update gms_budget_versions
598: set current_flag = 'R',

Line 630: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Inserting records into gms_budget_versions','C');

626: || '><' || to_char(max_version)
627: || '><' || to_char(x_created_by) || '>';
628:
629: IF L_DEBUG = 'Y' THEN
630: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Inserting records into gms_budget_versions','C');
631: END IF;
632:
633: insert into gms_budget_versions(
634: budget_version_id,

Line 738: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_core.copy_draft_lines','C');

734: || '><' || to_char(x_dest_version_id)
735: || '>';
736:
737: IF L_DEBUG = 'Y' THEN
738: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_core.copy_draft_lines','C');
739: END IF;
740:
741: gms_budget_core.copy_draft_lines(x_src_version_id => x_draft_version_id,
742: x_time_phased_type_code => x_time_phased_type_code,

Line 741: gms_budget_core.copy_draft_lines(x_src_version_id => x_draft_version_id,

737: IF L_DEBUG = 'Y' THEN
738: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_core.copy_draft_lines','C');
739: END IF;
740:
741: gms_budget_core.copy_draft_lines(x_src_version_id => x_draft_version_id,
742: x_time_phased_type_code => x_time_phased_type_code,
743: x_entry_level_code => x_entry_level_code,
744: x_dest_version_id => x_dest_version_id,
745: x_err_code => x_err_code,

Line 753: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_core.copy_draft_lines returned x_err_code : '||x_err_code ,'C');

749:
750:
751: if (x_err_code <> 0) then
752: IF L_DEBUG = 'Y' THEN
753: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_core.copy_draft_lines returned x_err_code : '||x_err_code ,'C');
754: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_core.copy_draft_lines returned x_err_stage : '||x_err_stage ,'C');
755: END IF;
756: rollback to before_baseline;
757: return;

Line 754: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_core.copy_draft_lines returned x_err_stage : '||x_err_stage ,'C');

750:
751: if (x_err_code <> 0) then
752: IF L_DEBUG = 'Y' THEN
753: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_core.copy_draft_lines returned x_err_code : '||x_err_code ,'C');
754: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_core.copy_draft_lines returned x_err_stage : '||x_err_stage ,'C');
755: END IF;
756: rollback to before_baseline;
757: return;
758: end if;

Line 768: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_time_phased_type_code : '||x_time_phased_type_code,'C');

764: -- Begin Bug 2404567
765: -- gp_msg('TIME:'||x_time_phased_type_code||':ENTRY:'||x_entry_level_code);
766:
767: IF L_DEBUG = 'Y' THEN
768: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_time_phased_type_code : '||x_time_phased_type_code,'C');
769: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_entry_level_code : '||x_entry_level_code,'C');
770: END IF;
771:
772: if (x_time_phased_type_code = 'N')

Line 769: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_entry_level_code : '||x_entry_level_code,'C');

765: -- gp_msg('TIME:'||x_time_phased_type_code||':ENTRY:'||x_entry_level_code);
766:
767: IF L_DEBUG = 'Y' THEN
768: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_time_phased_type_code : '||x_time_phased_type_code,'C');
769: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- x_entry_level_code : '||x_entry_level_code,'C');
770: END IF;
771:
772: if (x_time_phased_type_code = 'N')
773: and (x_entry_level_code = 'P') then -- Project Level

Line 778: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_utils.get_valid_period_dates','C');

774:
775: -- Added call to GMS_BUDGET_UTILS.get_valid_period_dates() for Bug:2592747
776:
777: IF L_DEBUG = 'Y' THEN
778: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_utils.get_valid_period_dates','C');
779: END IF;
780:
781: gms_budget_utils.get_valid_period_dates(
782: x_err_code => x_err_code,

Line 798: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Updating dates on gms_budget_lines','C');

794: p_budget_end_date_out => v_project_completion_date);
795:
796:
797: IF L_DEBUG = 'Y' THEN
798: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Updating dates on gms_budget_lines','C');
799: END IF;
800:
801: -- update for baselined version
802: update gms_budget_lines

Line 833: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_utils.get_valid_period_dates','C');

829: from pa_projects_all
830: where project_id = x_project_id;
831:
832: IF L_DEBUG = 'Y' THEN
833: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_utils.get_valid_period_dates','C');
834: END IF;
835:
836: for b1_rec in (select t.task_id, resource_assignment_id
837: from pa_tasks t , gms_resource_assignments r

Line 877: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_utils.get_valid_period_dates for draft version','C');

873:
874: end loop;
875:
876: IF L_DEBUG = 'Y' THEN
877: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_utils.get_valid_period_dates for draft version','C');
878: END IF;
879:
880: --following loop is for draft version
881: for b2_rec in (select t.task_id, resource_assignment_id

Line 934: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling fnd_attached_documents2_pkg.copy_attachments','C');

930:
931: -- End Bug 2404567
932:
933: IF L_DEBUG = 'Y' THEN
934: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling fnd_attached_documents2_pkg.copy_attachments','C');
935: END IF;
936:
937: -- Copy attachments for every draft budget copied
938:

Line 951: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_pub.summerize_project_totals','C');

947: 275, null, null) ;
948: -- End copying attachments
949:
950: IF L_DEBUG = 'Y' THEN
951: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Calling gms_budget_pub.summerize_project_totals','C');
952: END IF;
953:
954: gms_budget_pub.summerize_project_totals(x_dest_version_id,
955: x_err_code,

Line 960: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_pub.summerize_project_totals returned failed status','C');

956: x_err_stage,
957: x_err_stack);
958: if (x_err_code <> 0) then
959: IF L_DEBUG = 'Y' THEN
960: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_pub.summerize_project_totals returned failed status','C');
961: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_code '||x_err_code,'C');
962: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_stage '||x_err_stage,'C');
963: END IF;
964: rollback to before_baseline;

Line 961: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_code '||x_err_code,'C');

957: x_err_stack);
958: if (x_err_code <> 0) then
959: IF L_DEBUG = 'Y' THEN
960: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_pub.summerize_project_totals returned failed status','C');
961: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_code '||x_err_code,'C');
962: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_stage '||x_err_stage,'C');
963: END IF;
964: rollback to before_baseline;
965: return;

Line 962: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_stage '||x_err_stage,'C');

958: if (x_err_code <> 0) then
959: IF L_DEBUG = 'Y' THEN
960: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Call to gms_budget_pub.summerize_project_totals returned failed status','C');
961: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_code '||x_err_code,'C');
962: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- Value of x_err_stage '||x_err_stage,'C');
963: END IF;
964: rollback to before_baseline;
965: return;
966: end if;

Line 971: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_CORE.BASELINE ***','C');

967:
968: x_err_stack := old_stack;
969:
970: IF L_DEBUG = 'Y' THEN
971: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_CORE.BASELINE ***','C');
972: END IF;
973:
974: exception
975: when OTHERS

Line 978: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- In when others exception','C');

974: exception
975: when OTHERS
976: then
977: IF L_DEBUG = 'Y' THEN
978: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.BASELINE- In when others exception','C');
979: END IF;
980: rollback to before_baseline;
981:
982: -- x_err_code := SQLCODE;

Line 1362: gms_budget_core.copy_lines(x_src_version_id,

1358: NULL
1359: from gms_budget_versions v
1360: where v.budget_version_id = x_src_version_id;
1361:
1362: gms_budget_core.copy_lines(x_src_version_id,
1363: x_amount_change_pct,
1364: x_rounding_precision,
1365: x_shift_days,
1366: x_dest_version_id,

Line 3251: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_CORE.COPY_DRAFT_LINES ***','C');

3247:
3248: begin
3249:
3250: IF L_DEBUG = 'Y' THEN
3251: gms_error_pkg.gms_debug('*** Start of GMS_BUDGET_CORE.COPY_DRAFT_LINES ***','C');
3252: END IF;
3253:
3254: x_err_code := 0;
3255: old_stack := x_err_stack;

Line 3267: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.COPY_DRAFT_LINES- Inserting records into gms_resource_assignments','C');

3263: x_err_stage := 'copy resource assignment <' || to_char(x_src_version_id)
3264: || '>' ;
3265:
3266: IF L_DEBUG = 'Y' THEN
3267: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.COPY_DRAFT_LINES- Inserting records into gms_resource_assignments','C');
3268: END IF;
3269:
3270:
3271: insert into gms_resource_assignments

Line 3305: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.COPY_DRAFT_LINES- Inserting records into gms_budget_lines','C');

3301: x_err_stage := 'copy budget lines <' ||to_char(x_src_version_id)
3302: || '>' ;
3303:
3304: IF L_DEBUG = 'Y' THEN
3305: gms_error_pkg.gms_debug('GMS_BUDGET_CORE.COPY_DRAFT_LINES- Inserting records into gms_budget_lines','C');
3306: END IF;
3307:
3308: insert into gms_budget_lines
3309: (resource_assignment_id,

Line 3403: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_CORE.COPY_DRAFT_LINES ***','C');

3399:
3400: x_err_stack := old_stack;
3401:
3402: IF L_DEBUG = 'Y' THEN
3403: gms_error_pkg.gms_debug('*** End of GMS_BUDGET_CORE.COPY_DRAFT_LINES ***','C');
3404: END IF;
3405:
3406: exception
3407: when others then

Line 3410: x_err_stage := 'GMS_BUDGET_CORE.COPY_DRAFT_LINES - In others exception';

3406: exception
3407: when others then
3408: -- Bug 2587078 : Modified the below code to set proper error message
3409: -- x_err_code := SQLCODE;
3410: x_err_stage := 'GMS_BUDGET_CORE.COPY_DRAFT_LINES - In others exception';
3411: gms_error_pkg.gms_message(x_err_name => 'GMS_BU_COPY_BUDG_LINES_FAIL',
3412: x_err_code => x_err_code,
3413: x_err_buff => x_err_stage);
3414: fnd_msg_pub.add;

Line 3420: END gms_budget_core;

3416: return;
3417:
3418: end copy_draft_lines;
3419:
3420: END gms_budget_core;