DBA Data[Home] [Help]

APPS.GMS_BUDG_CONT_SETUP dependencies on GMS_BUDG_CONT_SETUP

Line 1: PACKAGE BODY GMS_BUDG_CONT_SETUP AS

1: PACKAGE BODY GMS_BUDG_CONT_SETUP AS
2: -- $Header: gmsbudcb.pls 120.4 2011/05/20 10:03:26 rrambati ship $
3:
4: -- Bug 5162777: To check 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 380: Then gms_budg_cont_setup.create_records is called with the appropriate calling mode

376: Else
377: l_calling_mode := 'REBASELINE'
378: end if
379: End if
380: Then gms_budg_cont_setup.create_records is called with the appropriate calling mode
381: */
382:
383: --====================================================================================
384:

Line 388: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Setting up default budgetary_control', 'C');

384:
385:
386:
387: IF L_DEBUG = 'Y' THEN
388: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Setting up default budgetary_control', 'C');
389: END IF;
390:
391: OPEN c_budctrl_exists;
392: FETCH c_budctrl_exists INTO l_budctrl_exists;

Line 399: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - First time baselining', 'C');

395:
396: IF l_budctrl_exists <> 'Y' THEN -- First time baselining
397:
398: IF L_DEBUG = 'Y' THEN
399: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - First time baselining', 'C');
400: END IF;
401:
402: ELSE -- rebaselining
403:

Line 406: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Re-baselining if the entry level code is changed', 'C');

402: ELSE -- rebaselining
403:
404: IF nvl(p_prev_entry_level_code, p_entry_level_code) <> p_entry_level_code then
405: IF L_DEBUG = 'Y' THEN
406: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Re-baselining if the entry level code is changed', 'C');
407: END IF;
408:
409: -- Bug 5162777 : Call del_bc_rec_for_reset_auto to delete BC records in autonomous mode during BC reset.
410: del_bc_rec_for_reset_auto (p_project_id => p_project_id,

Line 415: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Re-baselining if the entry level code is not changed', 'C');

411: p_award_id => p_award_id);
412:
413: ELSE
414: IF L_DEBUG = 'Y' THEN
415: gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Re-baselining if the entry level code is not changed', 'C');
416: END IF;
417: l_calling_mode := 'REBASELINE';
418:
419: end if; -- If entry_level_code is changed then we need to refresh budgetary control

Line 422: /*gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Calling gms_budg_cont_setup.create_records', 'C');

418:
419: end if; -- If entry_level_code is changed then we need to refresh budgetary control
420: end if; --IF l_budctrl_exists <> 'Y'
421:
422: /*gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Calling gms_budg_cont_setup.create_records', 'C');
423: gms_budg_cont_setup.create_records(x_project_id => p_project_id
424: ,x_award_id => p_award_id
425: ,x_entry_level_code => p_entry_level_code
426: ,x_resource_list_id => p_resource_list_id

Line 423: gms_budg_cont_setup.create_records(x_project_id => p_project_id

419: end if; -- If entry_level_code is changed then we need to refresh budgetary control
420: end if; --IF l_budctrl_exists <> 'Y'
421:
422: /*gms_error_pkg.gms_debug('GMS_BUDG_CONT_SETUP.bud_ctrl_create - Calling gms_budg_cont_setup.create_records', 'C');
423: gms_budg_cont_setup.create_records(x_project_id => p_project_id
424: ,x_award_id => p_award_id
425: ,x_entry_level_code => p_entry_level_code
426: ,x_resource_list_id => p_resource_list_id
427: ,x_group_resource_type_id => p_group_resource_type_id

Line 434: END GMS_BUDG_CONT_SETUP;

430: ,p_calling_mode => l_calling_mode); commented for bug 12432376*/
431:
432: END bud_ctrl_create;
433:
434: END GMS_BUDG_CONT_SETUP;