DBA Data[Home] [Help]

APPS.PA_BUDGET_FUND_PKG dependencies on DUAL

Line 14: -- x_dual_bdgt_cntrl_flag : Y --> Yes, N --> No

10: -- for input budget version id.
11:
12: --Parameters :
13: -- p_calling_code : CHECK_FUNDS/CHECK_BASELINE/RESERVE_BASELINE
14: -- x_dual_bdgt_cntrl_flag : Y --> Yes, N --> No
15:
16: CURSOR c_close_period_check( c_set_of_books_id NUMBER, c_budget_version_id NUMBER ) IS
17: SELECT 'X'
18: FROM dual

Line 18: FROM dual

14: -- x_dual_bdgt_cntrl_flag : Y --> Yes, N --> No
15:
16: CURSOR c_close_period_check( c_set_of_books_id NUMBER, c_budget_version_id NUMBER ) IS
17: SELECT 'X'
18: FROM dual
19: WHERE EXISTS
20: (SELECT 'X'
21: FROM PA_BUDGET_ACCT_LINES PBA,
22: GL_PERIOD_STATUSES GLS

Line 388: FROM dual ;

384: 'F','F',
385: 'T','F' )),
386: 'F')
387: INTO l_funds_chk_rsrv_status
388: FROM dual ;
389:
390: --commit;--Bug 6524116; Removed as this is causing issue with IGC funds checking.
391:
392: x_funds_chk_rsrv_status := l_funds_chk_rsrv_status;

Line 894: x_dual_bdgt_cntrl_flag OUT NOCOPY VARCHAR2,

890: -- -------------------------------------------------------------------+
891: PROCEDURE check_or_reserve_funds ( p_project_id IN NUMBER,
892: p_budget_version_id IN NUMBER,
893: p_calling_mode IN VARCHAR2,
894: x_dual_bdgt_cntrl_flag OUT NOCOPY VARCHAR2,
895: x_cc_budget_version_id OUT NOCOPY NUMBER,
896: x_return_status OUT NOCOPY VARCHAR2,
897: x_msg_count OUT NOCOPY NUMBER,
898: x_msg_data OUT NOCOPY VARCHAR2 )

Line 905: l_dual_mode_acct_gen_failed EXCEPTION;

901: l_budget_processing_failure EXCEPTION;
902:
903: l_top_down_bdgt_failed EXCEPTION;
904:
905: l_dual_mode_acct_gen_failed EXCEPTION;
906: l_dual_bc_fc_failed EXCEPTION;
907: l_cbc_not_supported EXCEPTION;
908:
909: l_draft_budget_version_id PA_BUDGET_VERSIONS.budget_version_id%TYPE;

Line 906: l_dual_bc_fc_failed EXCEPTION;

902:
903: l_top_down_bdgt_failed EXCEPTION;
904:
905: l_dual_mode_acct_gen_failed EXCEPTION;
906: l_dual_bc_fc_failed EXCEPTION;
907: l_cbc_not_supported EXCEPTION;
908:
909: l_draft_budget_version_id PA_BUDGET_VERSIONS.budget_version_id%TYPE;
910: l_cc_draft_budget_version_id PA_BUDGET_VERSIONS.budget_version_id%TYPE;

Line 929: l_dual_bdgt_cntrl_flag VARCHAR2(1);

925: l_budget_type PA_BUDGETARY_CONTROL_OPTIONS.budget_type_code%TYPE ;
926: l_budget_amount_code PA_BUDGET_TYPES.Budget_amount_code%TYPE;
927: l_budget_entry_level_code PA_Budget_Entry_Methods.entry_level_code%TYPE;
928:
929: l_dual_bdgt_cntrl_flag VARCHAR2(1);
930: l_cc_budget_version_id NUMBER;
931: l_gl_budget_version_id NUMBER;
932: l_return_status VARCHAR2(1) ;
933: t_return_status VARCHAR2(1) ;

Line 1028: x_dual_bdgt_cntrl_flag := 'N';

1024: x_return_status := FND_API.G_RET_STS_SUCCESS;
1025: RETURN;
1026: End If;
1027:
1028: x_dual_bdgt_cntrl_flag := 'N';
1029: x_cc_budget_version_id := NULL;
1030:
1031: -----------------------------------------------+
1032: -- 1.0: Get the budgetary control options

Line 1153: g_external_link := 'DUAL';

1149: ElsIf l_external_budget_code = 'CC' then
1150: If g_processing_mode = 'CHECK_FUNDS' then
1151: g_external_link := 'CC';
1152: ElsIf g_processing_mode = 'BASELINE' then
1153: g_external_link := 'DUAL';
1154: End If;
1155: ELSE /*Added condition for bug#12333255 */
1156: g_external_link := 'GL'; /*Added for bug#12333255 */
1157: End If;

Line 1473: from dual;

1469: -- ## Call Budgetary Control Funds Check API
1470:
1471: Select decode(g_budget_amount_code,'C','Cost_Budget','R','Revenue_Budget')
1472: into l_calling_module
1473: from dual;
1474:
1475: log_message('Calling CREATE_EVENTS_AND_FUNDSCHECK');
1476:
1477: CREATE_EVENTS_AND_FUNDSCHECK

Line 1502: -- ## 1. Check if its dual budgeting ...

1498:
1499: -- top down budgeting
1500: log_message('implemented top down budgeting ....') ;
1501:
1502: -- ## 1. Check if its dual budgeting ...
1503: log_message(' Check if its dual budgeting ...');
1504:
1505: BEGIN
1506: Select budget_type_code, encumbrance_type_id

Line 1503: log_message(' Check if its dual budgeting ...');

1499: -- top down budgeting
1500: log_message('implemented top down budgeting ....') ;
1501:
1502: -- ## 1. Check if its dual budgeting ...
1503: log_message(' Check if its dual budgeting ...');
1504:
1505: BEGIN
1506: Select budget_type_code, encumbrance_type_id
1507: into l_cc_budget_type_code, l_cc_encumbrance_type_id

Line 1522: -- ## 2. Its not Dual integration

1518: ||l_cc_budget_type_code||','||to_char(l_cc_encumbrance_type_id)) ;
1519:
1520: -- ------------------------------------------------------------+
1521: If ( l_cc_budget_type_code is null ) then -- III
1522: -- ## 2. Its not Dual integration
1523:
1524: --If g_cost_rebaseline_flag = 'Y' then
1525: -- ## 2.1 Call Budget Account generator ..
1526: -- Calling gen_acct_all_lines which is non autonomous ..

Line 1616: g_external_link := 'DUAL';

1612: -- Following code needs to be uncommented for CC Integration .
1613: -- Fix the account generator issue by calling gen_Account_all_lines
1614:
1615: -- Overried g_external_link, used in pa_funds_control_pkg (tieback code)
1616: g_external_link := 'DUAL';
1617:
1618: -- ## 3 Dual Integration
1619: -- ## 3.1 Check if CC Budget exists
1620: -- ## 3.2 Check if CC and GL, total budget amounts match

Line 1618: -- ## 3 Dual Integration

1614:
1615: -- Overried g_external_link, used in pa_funds_control_pkg (tieback code)
1616: g_external_link := 'DUAL';
1617:
1618: -- ## 3 Dual Integration
1619: -- ## 3.1 Check if CC Budget exists
1620: -- ## 3.2 Check if CC and GL, total budget amounts match
1621: -- ## 3.3 Call PA FC for GL Budget
1622: -- ## 3.4 Get CC Draft version

Line 1754: (P_calling_module => 'Dual_Budget',

1750: -- ------------------------------------------------------------+
1751: log_message('Call BC FC API');
1752:
1753: CREATE_EVENTS_AND_FUNDSCHECK
1754: (P_calling_module => 'Dual_Budget',
1755: P_mode => 'Reserve_Baseline',
1756: P_External_Budget_Code => 'Dual',
1757: P_budget_version_id => P_Budget_version_id,
1758: P_cc_budget_version_id => l_cc_budget_version_id,

Line 1756: P_External_Budget_Code => 'Dual',

1752:
1753: CREATE_EVENTS_AND_FUNDSCHECK
1754: (P_calling_module => 'Dual_Budget',
1755: P_mode => 'Reserve_Baseline',
1756: P_External_Budget_Code => 'Dual',
1757: P_budget_version_id => P_Budget_version_id,
1758: P_cc_budget_version_id => l_cc_budget_version_id,
1759: P_result_code => l_return_status);
1760:

Line 1765: RAISE l_dual_bc_fc_failed;

1761: log_message('After calling CREATE_EVENTS_AND_FUNDSCHECK, l_return_status:'||l_return_status);
1762:
1763: IF l_return_status = 'E' THEN
1764: l_msg_data := g_msg_data;
1765: RAISE l_dual_bc_fc_failed;
1766:
1767: ELSE
1768: x_cc_budget_version_id := l_cc_budget_version_id;
1769: x_dual_bdgt_cntrl_flag := 'Y';

Line 1769: x_dual_bdgt_cntrl_flag := 'Y';

1765: RAISE l_dual_bc_fc_failed;
1766:
1767: ELSE
1768: x_cc_budget_version_id := l_cc_budget_version_id;
1769: x_dual_bdgt_cntrl_flag := 'Y';
1770:
1771: END IF;
1772:
1773: -- ------------------------------------------------------------+

Line 1893: RAISE l_dual_mode_acct_gen_failed ;

1889: X_Msg_Count => l_msg_count,
1890: X_Msg_Data => l_msg_data) ;
1891:
1892: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1893: RAISE l_dual_mode_acct_gen_failed ;
1894: END IF ;
1895:
1896: -- ------------------------------------------------------------+
1897: -- ## 3.8 Call Account generator for CC Budget

Line 1909: RAISE l_dual_mode_acct_gen_failed ;

1905: X_Msg_Count => l_msg_count,
1906: X_Msg_Data => l_msg_data) ;
1907:
1908: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1909: RAISE l_dual_mode_acct_gen_failed ;
1910: END IF ;
1911: */
1912:
1913: --Start Bug 6524116

Line 1948: RAISE l_dual_bc_fc_failed;

1944: and bc_event_id is not null;
1945: end if;
1946: /*PSA_FUNDS_CHECKER_PKG.sync_xla_errors(p_failed_ldgr_array => ledger_id_tab,
1947: p_failed_evnt_array => rejected_event_id_tab);*/
1948: RAISE l_dual_bc_fc_failed;
1949: END if;
1950: --END Bug 6524116
1951:
1952: -- As the last step, update pa_bc to pass

Line 1959: End If; -- III (Top Down: GL or Dual check)

1955: -- Bug 5206537 : Procedure to stamp latest budget version id and budget line id on CDL
1956: PA_FUNDS_CONTROL_UTILS.Update_bvid_blid_on_cdl_bccom ( p_bud_ver_id => p_budget_version_id,
1957: p_calling_mode => p_calling_mode);
1958:
1959: End If; -- III (Top Down: GL or Dual check)
1960:
1961:
1962: end if; /* top-down and bottom-up check if */ -- II
1963:

Line 2077: WHEN l_dual_mode_acct_gen_failed OR l_dual_bc_fc_failed THEN

2073: x_msg_data := l_msg_data;
2074: x_msg_count := 3; -- made to 3 so that it can read all message buffers
2075: -- if you dont have enough messages then it does not error out
2076:
2077: WHEN l_dual_mode_acct_gen_failed OR l_dual_bc_fc_failed THEN
2078:
2079: g_procedure_name := 'check_or_reserve_funds';
2080: log_message(' Exception: l_dual_mode_acct_gen_failed OR l_dual_bc_fc_failed');
2081:

Line 2080: log_message(' Exception: l_dual_mode_acct_gen_failed OR l_dual_bc_fc_failed');

2076:
2077: WHEN l_dual_mode_acct_gen_failed OR l_dual_bc_fc_failed THEN
2078:
2079: g_procedure_name := 'check_or_reserve_funds';
2080: log_message(' Exception: l_dual_mode_acct_gen_failed OR l_dual_bc_fc_failed');
2081:
2082: IF p_calling_mode = 'RESERVE_BASELINE' then
2083:
2084: release_bc_lock (p_project_id => p_project_id,

Line 2171: select length(l_sqlerrm) into l_dummy from dual;

2167:
2168: l_sqlerrm := SQLERRM;
2169: x_msg_data := substr(SQLERRM,1,240);
2170:
2171: select length(l_sqlerrm) into l_dummy from dual;
2172:
2173: If l_dummy > 0 then
2174: ADD_MESSAGE(substr(SQLERRM,1,200)||'...');
2175: log_message('When Others:'||substr(SQLERRM,1,200));

Line 2321: into x_bdgt_intg_flag from dual ;

2317: if ( nvl(x_balance_type,'X') = 'B' ) then
2318: x_bdgt_intg_flag := 'G';
2319: else
2320: SELECT decode(nvl(l_external_budget_code,'X'),'GL','G','CC','C','N')
2321: into x_bdgt_intg_flag from dual ;
2322: end if;
2323:
2324: ELSE
2325: OPEN C_BUDGET_VERSION( l_budget_type_code ) ;

Line 2340: x_bdgt_intg_flag from dual ;

2336:
2337: ELSIF C_BUDGET_VERSION%FOUND THEN
2338: IF l_external_budget_code is not null THEN
2339: SELECT decode(l_external_budget_code,'GL','G','CC','C','N') into
2340: x_bdgt_intg_flag from dual ;
2341: x_encum_type_id := l_encumbrance_type_id ;
2342: ELSE
2343: x_bdgt_intg_flag := 'N' ;
2344: x_encum_type_id := NULL ;

Line 2504: FROM DUAL

2500: l_bdgt_enabled VARCHAR2(1) ;
2501:
2502: CURSOR c_bdgt_enabled IS
2503: SELECT 'X'
2504: FROM DUAL
2505: WHERE EXISTS
2506: ( SELECT 'x'
2507: FROM PA_BUDGETARY_CONTROL_OPTIONS PBA
2508: WHERE PBA.project_id = p_project_id

Line 2827: -- 'Cmt_Budget'/'Revenue_Budget'/'Dual_Budget'(Budgets)

2823: -- API for budget baseline/re-baseline/year-end processing/check funds
2824: -- for budget
2825: -- Parameters and values:
2826: -- p_calling_module - 'Year_End_Rollover' (Year End)/'Cost_Budget'/
2827: -- 'Cmt_Budget'/'Revenue_Budget'/'Dual_Budget'(Budgets)
2828: -- p_mode - 'Reserve_Baseline'/'Check_Baseline'/'Force'(Year-end)
2829: -- p_external_budget_code - 'GL'/'CC'/'Dual'
2830: -- p_budget_version_id - GL Budget version id
2831: -- p_cc_budget_version_id - CC Budget version id

Line 2829: -- p_external_budget_code - 'GL'/'CC'/'Dual'

2825: -- Parameters and values:
2826: -- p_calling_module - 'Year_End_Rollover' (Year End)/'Cost_Budget'/
2827: -- 'Cmt_Budget'/'Revenue_Budget'/'Dual_Budget'(Budgets)
2828: -- p_mode - 'Reserve_Baseline'/'Check_Baseline'/'Force'(Year-end)
2829: -- p_external_budget_code - 'GL'/'CC'/'Dual'
2830: -- p_budget_version_id - GL Budget version id
2831: -- p_cc_budget_version_id - CC Budget version id
2832: -- p_Result_code - 'S' for success amd 'E' for failure (OUT parameter)
2833: --

Line 2956: g_external_link := 'DUAL';

2952:
2953: If P_External_Budget_Code = 'GL' then
2954: g_external_link := 'GL';
2955: Else
2956: g_external_link := 'DUAL';
2957: End If;
2958:
2959: log_message(' YREND:g_cost_prev_bvid : '||g_cost_prev_bvid );
2960: log_message(' YREND:g_external_link : '||g_external_link);

Line 2996: ElsIf (P_calling_module = 'Dual_Budget' and

2992:
2993: l_calling_module := 'COST_BUDGET';
2994: l_data_set_id := P_budget_version_id;
2995:
2996: ElsIf (P_calling_module = 'Dual_Budget' and
2997: P_External_Budget_Code = 'Dual'
2998: ) then
2999:
3000: l_calling_module := 'COST_BUDGET';

Line 2997: P_External_Budget_Code = 'Dual'

2993: l_calling_module := 'COST_BUDGET';
2994: l_data_set_id := P_budget_version_id;
2995:
2996: ElsIf (P_calling_module = 'Dual_Budget' and
2997: P_External_Budget_Code = 'Dual'
2998: ) then
2999:
3000: l_calling_module := 'COST_BUDGET';
3001: l_data_set_id := P_budget_version_id;

Line 3042: select length(g_msg_data) into l_dummy from dual;

3038: When others then
3039: log_message(' In Create_events_and_fundscheck: When Others: Error creating GL events');
3040: g_msg_data := SQLERRM;
3041:
3042: select length(g_msg_data) into l_dummy from dual;
3043: If l_dummy > 0 then
3044: ADD_MESSAGE(substr(g_msg_data,1,200));
3045: log_message('Create events failed:'||substr(g_msg_data,1,200));
3046: End if;

Line 3106: from dual;

3102: Select decode(p_mode,'Force','F', -- 'Year End'
3103: 'Check_Baseline','C', -- 'Check funds'
3104: 'Reserve_Baseline','R') -- 'Baseline'
3105: into l_bc_mode
3106: from dual;
3107:
3108: PSA_BC_XLA_PUB.Budgetary_Control
3109: (p_api_version => 1.0
3110: ,p_init_msg_list => FND_API.G_FALSE

Line 3153: select length(x.encoded_msg) into l_dummy from dual;

3149: loop
3150:
3151: If p_mode = 'Check_Baseline' then
3152:
3153: select length(x.encoded_msg) into l_dummy from dual;
3154:
3155: If l_dummy > 0 then
3156:
3157: ADD_MESSAGE(substr(x.encoded_msg,1,200)||'...');

Line 3181: select -1 into l_dummy from dual where exists

3177: end loop;
3178:
3179: If l_dummy is null then
3180: Begin
3181: select -1 into l_dummy from dual where exists
3182: (select evt.event_id
3183: from xla_events evt,
3184: psa_bc_xla_events_gt tmp
3185: where evt.event_id = tmp.event_id

Line 3364: from dual

3360: RETURN FALSE;
3361: Else
3362: -- Sep line is the issue, as we use BTC for the burden ..
3363: Select 'Y' into l_exists
3364: from dual
3365: where exists
3366: (select 1
3367: from pa_cost_distribution_lines_all cdl
3368: where project_id = X_project_id