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.PA_FUNDS_CONTROL_PKG dependencies on PA_BUDGET_FUND_PKG

Line 10158: log_message(p_msg_token1 => 'calling pa_budget_fund_pkg.UPD_BDGT_ACCT_BAL api ');

10154: log_message(p_msg_token1 => 'Calling UPD_BDGT_ACCT_BAL api in Loop');
10155: FOR i IN g_tab_budget_ccid.FIRST .. g_tab_budget_ccid.LAST LOOP
10156: l_bdgt_acct_amt := (nvl(g_tab_accounted_dr(i),0) - nvl(g_tab_accounted_cr(i),0));
10157: IF g_debug_mode = 'Y' THEN
10158: log_message(p_msg_token1 => 'calling pa_budget_fund_pkg.UPD_BDGT_ACCT_BAL api ');
10159: l_debug_stage := 'p_gl_period_name ['||g_tab_period_name(i)||']p_budget_version_id [';
10160: l_debug_stage := l_debug_stage||g_tab_budget_version_id(i)||']p_ccid [';
10161: l_debug_stage := l_debug_stage||g_tab_budget_ccid(i)||']p_amount [';
10162: l_debug_stage := l_debug_stage||l_bdgt_acct_amt||']' ;

Line 10166: pa_budget_fund_pkg.UPD_BDGT_ACCT_BAL

10162: l_debug_stage := l_debug_stage||l_bdgt_acct_amt||']' ;
10163: log_message(p_msg_token1 => l_debug_stage);
10164: End if;
10165: If NVL(l_bdgt_acct_amt,0) <> 0 Then
10166: pa_budget_fund_pkg.UPD_BDGT_ACCT_BAL
10167: (p_gl_period_name => g_tab_period_name(i),
10168: p_budget_version_id => g_tab_budget_version_id(i),
10169: p_ccid => g_tab_budget_ccid(i),
10170: p_amount => l_bdgt_acct_amt,

Line 14165: If nvl(pa_budget_fund_pkg.g_processing_mode,'FC') in ('YEAR_END','BASELINE','CHECK_FUNDS') then

14161: When no_data_found then
14162:
14163: -- Is it a budget baseline /year-end/budget check funds related FC call ..
14164:
14165: If nvl(pa_budget_fund_pkg.g_processing_mode,'FC') in ('YEAR_END','BASELINE','CHECK_FUNDS') then
14166:
14167: p_return_code := 'BUD_FC';
14168:
14169: Else

Line 14403: If (pa_budget_fund_pkg.g_processing_mode in ('BASELINE','CHECK_FUNDS') and pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') then

14399: If g_debug_mode = 'Y' then
14400: log_message(p_msg_token1=>'Any_txns_against_project:p_project_id:'||p_project_id);
14401: End If;
14402:
14403: If (pa_budget_fund_pkg.g_processing_mode in ('BASELINE','CHECK_FUNDS') and pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') then
14404:
14405: If g_debug_mode = 'Y' then
14406: log_message(p_msg_token1=>'Any_txns_against_project:Baseline/CF Mode-Check if txns. exists in pa_bc_packets');
14407: End If;

Line 14638: and pbl.budget_version_id = pa_budget_fund_pkg.g_cost_current_bvid

14634: where exists (Select 1
14635: from gl_bc_packets glbc,
14636: pa_budget_lines pbl
14637: where glbc.packet_id = p_packet_id
14638: and pbl.budget_version_id = pa_budget_fund_pkg.g_cost_current_bvid
14639: and pbl.budget_line_id = glbc.source_distribution_id_num_1);
14640:
14641: Exception
14642: When no_data_found then

Line 14677: l_current_budget_version_id := pa_budget_fund_pkg.g_cost_current_bvid;

14673: -- 1.2: initalize limit var. used for bulk ..
14674: l_limit := 500;
14675:
14676: -- 1.3: Get latest budget version being baselined
14677: l_current_budget_version_id := pa_budget_fund_pkg.g_cost_current_bvid;
14678:
14679: -- 1.4: Get draft version ...
14680: -- This is required to udpate the account summary table (we will be updating acct.
14681: -- summary table for the draft version, except for 'Year end' where we will be updating

Line 14688: --If (pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') then

14684: If g_debug_mode = 'Y' then
14685: log_message(p_msg_token1=>l_program_name||'Get Draft Budget');
14686: End If;
14687:
14688: --If (pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') then
14689: If pa_budget_fund_pkg.g_processing_mode in ('YEAR_END','BASELINE') then
14690:
14691: -- Get the draft or working budget ..
14692:

Line 14689: If pa_budget_fund_pkg.g_processing_mode in ('YEAR_END','BASELINE') then

14685: log_message(p_msg_token1=>l_program_name||'Get Draft Budget');
14686: End If;
14687:
14688: --If (pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') then
14689: If pa_budget_fund_pkg.g_processing_mode in ('YEAR_END','BASELINE') then
14690:
14691: -- Get the draft or working budget ..
14692:
14693: Select pbv.budget_version_id

Line 14700: and pbv.budget_status_code = decode(pa_budget_fund_pkg.g_processing_mode,

14696: where (pbv.project_id,pbv.budget_type_code) in
14697: (select project_id,budget_type_code
14698: from pa_budget_versions
14699: where budget_version_id = l_current_budget_version_id)
14700: and pbv.budget_status_code = decode(pa_budget_fund_pkg.g_processing_mode,
14701: 'YEAR_END','W','S');
14702:
14703: If g_debug_mode = 'Y' then
14704: log_message(p_msg_token1=>l_program_name||'Yr End/Base Draft Budget:'||l_draft_budget_version_id);

Line 14712: If pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS' then

14708:
14709: -- End If;
14710:
14711:
14712: If pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS' then
14713:
14714: l_draft_budget_version_id := l_current_budget_version_id;
14715:
14716: If g_debug_mode = 'Y' then

Line 14723: If (pa_budget_fund_pkg.g_balance_type = 'E' /Top Down/ and

14719:
14720: End If;
14721:
14722: -- 1.5: Derive budget entry level code
14723: If (pa_budget_fund_pkg.g_balance_type = 'E' /*Top Down*/ and
14724: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' ) then
14725:
14726: If g_debug_mode = 'Y' then
14727: log_message(p_msg_token1=>l_program_name||'Get Budget Entry Method');

Line 14724: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' ) then

14720: End If;
14721:
14722: -- 1.5: Derive budget entry level code
14723: If (pa_budget_fund_pkg.g_balance_type = 'E' /*Top Down*/ and
14724: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' ) then
14725:
14726: If g_debug_mode = 'Y' then
14727: log_message(p_msg_token1=>l_program_name||'Get Budget Entry Method');
14728: End If;

Line 14740: log_message(p_msg_token1=>l_program_name||':g_processing_mode:'||pa_budget_fund_pkg.g_processing_mode||

14736:
14737: End If;
14738:
14739: If g_debug_mode = 'Y' then
14740: log_message(p_msg_token1=>l_program_name||':g_processing_mode:'||pa_budget_fund_pkg.g_processing_mode||
14741: ':Balance type:'||pa_budget_fund_pkg.g_balance_type||
14742: ':Budget Amount Code:'||pa_budget_fund_pkg.g_budget_amount_code||
14743: ':Rebaseline Flag:'||pa_budget_fund_pkg.g_cost_rebaseline_flag);
14744:

Line 14741: ':Balance type:'||pa_budget_fund_pkg.g_balance_type||

14737: End If;
14738:
14739: If g_debug_mode = 'Y' then
14740: log_message(p_msg_token1=>l_program_name||':g_processing_mode:'||pa_budget_fund_pkg.g_processing_mode||
14741: ':Balance type:'||pa_budget_fund_pkg.g_balance_type||
14742: ':Budget Amount Code:'||pa_budget_fund_pkg.g_budget_amount_code||
14743: ':Rebaseline Flag:'||pa_budget_fund_pkg.g_cost_rebaseline_flag);
14744:
14745: log_message(p_msg_token1=>l_program_name||':Current budget version:'||l_current_budget_version_id||

Line 14742: ':Budget Amount Code:'||pa_budget_fund_pkg.g_budget_amount_code||

14738:
14739: If g_debug_mode = 'Y' then
14740: log_message(p_msg_token1=>l_program_name||':g_processing_mode:'||pa_budget_fund_pkg.g_processing_mode||
14741: ':Balance type:'||pa_budget_fund_pkg.g_balance_type||
14742: ':Budget Amount Code:'||pa_budget_fund_pkg.g_budget_amount_code||
14743: ':Rebaseline Flag:'||pa_budget_fund_pkg.g_cost_rebaseline_flag);
14744:
14745: log_message(p_msg_token1=>l_program_name||':Current budget version:'||l_current_budget_version_id||
14746: ':Draft version:'||l_draft_budget_version_id||':budget entry level code:' || l_budget_entry_level_code);

Line 14743: ':Rebaseline Flag:'||pa_budget_fund_pkg.g_cost_rebaseline_flag);

14739: If g_debug_mode = 'Y' then
14740: log_message(p_msg_token1=>l_program_name||':g_processing_mode:'||pa_budget_fund_pkg.g_processing_mode||
14741: ':Balance type:'||pa_budget_fund_pkg.g_balance_type||
14742: ':Budget Amount Code:'||pa_budget_fund_pkg.g_budget_amount_code||
14743: ':Rebaseline Flag:'||pa_budget_fund_pkg.g_cost_rebaseline_flag);
14744:
14745: log_message(p_msg_token1=>l_program_name||':Current budget version:'||l_current_budget_version_id||
14746: ':Draft version:'||l_draft_budget_version_id||':budget entry level code:' || l_budget_entry_level_code);
14747: End If;

Line 14757: --If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') or

14753: -- existing status ... if there is any failure ..
14754: -- 8/22/06: This step should be carried out for CF/baseline/rebaseline for E/B balance_type
14755: -- Failures can happen for first time baseline and also for bottom up budgets too
14756:
14757: --If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') or
14758: --(pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14759: -- pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14760: -- pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14761: --then

Line 14758: --(pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down

14754: -- 8/22/06: This step should be carried out for CF/baseline/rebaseline for E/B balance_type
14755: -- Failures can happen for first time baseline and also for bottom up budgets too
14756:
14757: --If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') or
14758: --(pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14759: -- pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14760: -- pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14761: --then
14762:

Line 14759: -- pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing

14755: -- Failures can happen for first time baseline and also for bottom up budgets too
14756:
14757: --If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') or
14758: --(pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14759: -- pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14760: -- pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14761: --then
14762:
14763: If (pa_budget_fund_pkg.g_processing_mode in ('CHECK_FUNDS','BASELINE')) then

Line 14760: -- pa_budget_fund_pkg.g_processing_mode = 'BASELINE')

14756:
14757: --If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') or
14758: --(pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14759: -- pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14760: -- pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14761: --then
14762:
14763: If (pa_budget_fund_pkg.g_processing_mode in ('CHECK_FUNDS','BASELINE')) then
14764:

Line 14763: If (pa_budget_fund_pkg.g_processing_mode in ('CHECK_FUNDS','BASELINE')) then

14759: -- pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14760: -- pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14761: --then
14762:
14763: If (pa_budget_fund_pkg.g_processing_mode in ('CHECK_FUNDS','BASELINE')) then
14764:
14765: If g_debug_mode = 'Y' then
14766: --log_message(p_msg_token1=>l_program_name||'Nullify failure status from draft version - Check funds');
14767: log_message(p_msg_token1=>l_program_name||' Rebuild Draft summary');

Line 14775: x_balance_type =>pa_budget_fund_pkg.g_balance_type,

14771: End If;
14772:
14773: --RESET_STATUS_CODE_ON_SUMMARY(l_draft_budget_version_id);
14774: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
14775: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
14776: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
14777: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
14778: x_mode=>'PASS');
14779:

Line 14776: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,

14772:
14773: --RESET_STATUS_CODE_ON_SUMMARY(l_draft_budget_version_id);
14774: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
14775: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
14776: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
14777: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
14778: x_mode=>'PASS');
14779:
14780: -- Autonomous used as we're updating pa_budget_acct_lines in AUTONOMOUS

Line 14777: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,

14773: --RESET_STATUS_CODE_ON_SUMMARY(l_draft_budget_version_id);
14774: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
14775: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
14776: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
14777: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
14778: x_mode=>'PASS');
14779:
14780: -- Autonomous used as we're updating pa_budget_acct_lines in AUTONOMOUS
14781: -- mode for failures later ..

Line 14808: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down

14804: l_txn_exists_bc_pkt_flag := 'N';
14805: l_txn_exists_bc_cmt_flag := 'N';
14806:
14807: -- 8/22: This should fire for re-baseline/top-down only ..
14808: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14809: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') --and -- Re-costing
14810: --pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14811: then
14812:

Line 14809: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') --and -- Re-costing

14805: l_txn_exists_bc_cmt_flag := 'N';
14806:
14807: -- 8/22: This should fire for re-baseline/top-down only ..
14808: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14809: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') --and -- Re-costing
14810: --pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14811: then
14812:
14813: ANY_TXNS_AGAINST_PROJECT(p_project_id => l_project_id,

Line 14810: --pa_budget_fund_pkg.g_processing_mode = 'BASELINE')

14806:
14807: -- 8/22: This should fire for re-baseline/top-down only ..
14808: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14809: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y') --and -- Re-costing
14810: --pa_budget_fund_pkg.g_processing_mode = 'BASELINE')
14811: then
14812:
14813: ANY_TXNS_AGAINST_PROJECT(p_project_id => l_project_id,
14814: p_txn_exists_in_bc_pkt => l_txn_exists_bc_pkt_flag,

Line 14833: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down

14829: -- calculated here as during the regular flow the zero $ lines created
14830: -- during baseline are not visible ...
14831: -- Call procedure update_budget_ccid, this has to be autonomous ...
14832: -- ---------------------------------------------------------------------------+
14833: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14834: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14835: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and -- Baseline
14836: l_txn_exists_bc_pkt_flag = 'Y') -- Txn. exists against the project
14837: then -- (2.0 Main If)

Line 14834: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing

14830: -- during baseline are not visible ...
14831: -- Call procedure update_budget_ccid, this has to be autonomous ...
14832: -- ---------------------------------------------------------------------------+
14833: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14834: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14835: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and -- Baseline
14836: l_txn_exists_bc_pkt_flag = 'Y') -- Txn. exists against the project
14837: then -- (2.0 Main If)
14838:

Line 14835: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and -- Baseline

14831: -- Call procedure update_budget_ccid, this has to be autonomous ...
14832: -- ---------------------------------------------------------------------------+
14833: If (pa_budget_fund_pkg.g_balance_type = 'E' and -- Top Down
14834: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and -- Re-costing
14835: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and -- Baseline
14836: l_txn_exists_bc_pkt_flag = 'Y') -- Txn. exists against the project
14837: then -- (2.0 Main If)
14838:
14839: -- Get set of books

Line 14953: If (pa_budget_fund_pkg.g_balance_type = 'E' and

14949: log_message(p_msg_token1=>l_program_name||': GL failed case exists');
14950: End If;
14951: -- ----------------------------------------------------------------------------------+
14952:
14953: If (pa_budget_fund_pkg.g_balance_type = 'E' and
14954: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
14955: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
14956: l_txn_exists_bc_pkt_flag = 'Y') then
14957: -- ----------------------------------------------------------------------------------+

Line 14954: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and

14950: End If;
14951: -- ----------------------------------------------------------------------------------+
14952:
14953: If (pa_budget_fund_pkg.g_balance_type = 'E' and
14954: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
14955: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
14956: l_txn_exists_bc_pkt_flag = 'Y') then
14957: -- ----------------------------------------------------------------------------------+
14958: -- ## Fail pa_bc_packets:

Line 14955: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

14951: -- ----------------------------------------------------------------------------------+
14952:
14953: If (pa_budget_fund_pkg.g_balance_type = 'E' and
14954: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
14955: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
14956: l_txn_exists_bc_pkt_flag = 'Y') then
14957: -- ----------------------------------------------------------------------------------+
14958: -- ## Fail pa_bc_packets:
14959: If g_debug_mode = 'Y' then

Line 14984: If pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS' then

14980: -- ----------------------------------------------------------------------------------+
14981: -- Update Draft version (account summary table) to failure ..
14982: -- Note: in case of 'Year End' the working budget will be updated ..
14983:
14984: If pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS' then
14985: l_result_code := 'F150';
14986: Else
14987: l_result_code := 'F155';
14988: End If;

Line 14995: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then

14991: -- so, we need to derive the account that exists on the draft version ..
14992: -- else issue was that baseline had acct A2 and draft had A1 and then the call
14993: -- to UPDATE_FAILURE_IN_ACCT_SUMMARY would not udpate any records ...
14994:
14995: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then
14996:
14997: If g_debug_mode = 'Y' then
14998: log_message(p_msg_token1=>l_program_name||': Derive draft ccid');
14999: End If;

Line 15032: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then

15028: -- ----------------------------------------------------------------------------------+
15029: -- Following if condition is required as t_draft_ccid is calcualted for non-CF mode only ...
15030: -- as for CF mode, t_bud_ccid is the draft ccid ...
15031: -- ----------------------------------------------------------------------------------+
15032: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then
15033:
15034: If g_debug_mode = 'Y' then
15035: log_message(p_msg_token1=>l_program_name||': <> CF, Calling Update_failure_in_acct_summary');
15036: End If;

Line 15085: If (pa_budget_fund_pkg.g_balance_type = 'E' and

15081: End Loop;
15082:
15083: close c_gl_failure;
15084: -- -------------------------------------------------------------------------------------------------------+
15085: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15086: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15087: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15088: p_return_status = 'F' and
15089: l_txn_exists_bc_pkt_flag = 'Y') then

Line 15086: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and

15082:
15083: close c_gl_failure;
15084: -- -------------------------------------------------------------------------------------------------------+
15085: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15086: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15087: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15088: p_return_status = 'F' and
15089: l_txn_exists_bc_pkt_flag = 'Y') then
15090:

Line 15087: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

15083: close c_gl_failure;
15084: -- -------------------------------------------------------------------------------------------------------+
15085: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15086: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15087: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15088: p_return_status = 'F' and
15089: l_txn_exists_bc_pkt_flag = 'Y') then
15090:
15091: If g_debug_mode = 'Y' then

Line 15127: If (--pa_budget_fund_pkg.g_balance_type = 'E' /Top Down/ and

15123: -- Note: We however have to synch data for all modes and all budget types ..
15124: -- ---------------------------------------------------------------------------+
15125:
15126:
15127: If (--pa_budget_fund_pkg.g_balance_type = 'E' /*Top Down*/ and
15128: --pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15129: p_return_status = 'S' ) then -- I
15130:
15131: If g_debug_mode = 'Y' then

Line 15128: --pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

15124: -- ---------------------------------------------------------------------------+
15125:
15126:
15127: If (--pa_budget_fund_pkg.g_balance_type = 'E' /*Top Down*/ and
15128: --pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15129: p_return_status = 'S' ) then -- I
15130:
15131: If g_debug_mode = 'Y' then
15132: log_message(p_msg_token1=>l_program_name||':Executing account validation');

Line 15184: If (pa_budget_fund_pkg.g_balance_type = 'E' and

15180:
15181: -- ----------------------------------------------------------------------------------+
15182: -- ## B. Get prev. version budget ccid
15183: -- ----------------------------------------------------------------------------------+
15184: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15185: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15186: (l_txn_exists_bc_pkt_flag ='Y' OR l_txn_exists_bc_cmt_flag = 'Y'))
15187: then -- B
15188:

Line 15185: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

15181: -- ----------------------------------------------------------------------------------+
15182: -- ## B. Get prev. version budget ccid
15183: -- ----------------------------------------------------------------------------------+
15184: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15185: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15186: (l_txn_exists_bc_pkt_flag ='Y' OR l_txn_exists_bc_cmt_flag = 'Y'))
15187: then -- B
15188:
15189: If g_debug_mode = 'Y' then

Line 15218: and pbl.budget_version_id = pa_budget_fund_pkg.g_cost_prev_bvid

15214: from pa_budget_lines pbl,
15215: pa_resource_assignments pra
15216: where pbl.start_date = t_budget_start_date(x)
15217: and pbl.txn_currency_code = t_txn_currency_code(x)
15218: and pbl.budget_version_id = pa_budget_fund_pkg.g_cost_prev_bvid
15219: and pbl.budget_version_id = pra.budget_version_id
15220: and pbl.resource_assignment_id = pra.resource_assignment_id
15221: and pra.project_id = t_project_id(x)
15222: and (pra.task_id = t_task_id(x) OR

Line 15248: If (pa_budget_fund_pkg.g_balance_type = 'E' and

15244:
15245: -- ----------------------------------------------------------------------------------+
15246: -- ## C. Call API for validation (if account change allowed)
15247: -- ----------------------------------------------------------------------------------+
15248: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15249: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15250: (l_txn_exists_bc_pkt_flag ='Y' OR l_txn_exists_bc_cmt_flag = 'Y')
15251: )
15252: then -- API If

Line 15249: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

15245: -- ----------------------------------------------------------------------------------+
15246: -- ## C. Call API for validation (if account change allowed)
15247: -- ----------------------------------------------------------------------------------+
15248: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15249: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15250: (l_txn_exists_bc_pkt_flag ='Y' OR l_txn_exists_bc_cmt_flag = 'Y')
15251: )
15252: then -- API If
15253: -- ----------------------------------------------------------------------------------------------------+

Line 15269: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then

15265: end loop;
15266: End If;
15267: -- ----------------------------------------------------------------------------------------------------+
15268:
15269: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then
15270: l_bvid_for_acct_changed_API := l_current_budget_version_id;
15271: Else
15272: l_bvid_for_acct_changed_API := pa_budget_fund_pkg.g_cost_prev_bvid;
15273: End if;

Line 15272: l_bvid_for_acct_changed_API := pa_budget_fund_pkg.g_cost_prev_bvid;

15268:
15269: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then
15270: l_bvid_for_acct_changed_API := l_current_budget_version_id;
15271: Else
15272: l_bvid_for_acct_changed_API := pa_budget_fund_pkg.g_cost_prev_bvid;
15273: End if;
15274:
15275: If g_debug_mode = 'Y' then
15276: log_message(p_msg_token1=>l_program_name||': For acct. change API, bvid being used:'

Line 15344: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then -- CF

15340: If g_debug_mode = 'Y' then
15341: log_message(p_msg_token1=>l_program_name||': Derive draft rowid and draft ccid');
15342: End If;
15343:
15344: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then -- CF
15345: for x in t_project_id.FIRST..t_project_id.LAST
15346: loop
15347:
15348: -- If draft needs update then we need to get the draft rowid for updating

Line 15419: If (pa_budget_fund_pkg.g_balance_type = 'E' and

15415: If g_debug_mode = 'Y' then
15416: log_message(p_msg_token1=>l_program_name||SQL%ROWCOUNT||' GL line updated');
15417: End If;
15418:
15419: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15420: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15421: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15422: l_txn_exists_bc_pkt_flag = 'Y') then
15423:

Line 15420: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and

15416: log_message(p_msg_token1=>l_program_name||SQL%ROWCOUNT||' GL line updated');
15417: End If;
15418:
15419: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15420: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15421: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15422: l_txn_exists_bc_pkt_flag = 'Y') then
15423:
15424: -- ----------------------------------------------------------------------------------+

Line 15421: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

15417: End If;
15418:
15419: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15420: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15421: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15422: l_txn_exists_bc_pkt_flag = 'Y') then
15423:
15424: -- ----------------------------------------------------------------------------------+
15425: -- ## Fail pa_bc_packets:

Line 15452: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then

15448: -- Note: in case of 'Year End' the working budget will be updated ..
15449: -- ----------------------------------------------------------------------------------+
15450: -- Following if condition being used as for = 'CF' ..t_draft_ccid is not calculated ..
15451:
15452: If pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' then
15453:
15454: -- -------------------------------------------------------------------------------------------------+
15455: If g_debug_mode = 'Y' then
15456: log_message(p_msg_token1=>l_program_name||': Upd acct. summ - <> CF:l_draft_budget_version_id['

Line 15515: If (l_validation_failed = 'N' or pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') then

15511: End If;
15512: -- --------------------------------------------------------------------------------+
15513: If l_acct_changed = 'Y' then
15514:
15515: If (l_validation_failed = 'N' or pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') then
15516: -- update budget lines only if there is no failure
15517: -- reason: because if there is any failure, baseline/yearend/checkfunds fails ..
15518: -- and a rollback is issued for the 1st 2 ..
15519: -- However for CF, we will update the account change for the records

Line 15533: If (sql%rowcount > 0 and pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') then

15529: where pbl.rowid = t_budget_rowid(x)
15530: and t_bud_ccid(x) <> t_ccid(x)
15531: and g_tab_allow_flag(x) = 'Y';
15532:
15533: If (sql%rowcount > 0 and pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') then
15534: l_draft_acct_changed_flag := 'Y';
15535: End If;
15536:
15537: If g_debug_mode = 'Y' then

Line 15544: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS') then

15540: End If;
15541:
15542: End If; -- If l_validation_failed = 'N' then
15543:
15544: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS') then
15545:
15546: -- We also need to update the draft version account information ..atleast for the ones
15547: -- where account change is allowed .. AUTONOMOUS Update ..
15548:

Line 15626: If (pa_budget_fund_pkg.g_balance_type = 'E' and

15622:
15623: End If; -- I , Top-Down Check, re-baseline
15624:
15625: -- --------------------------------------------------------------------------+
15626: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15627: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15628: p_return_status = 'F' and
15629: l_txn_exists_bc_pkt_flag = 'Y') then
15630:

Line 15627: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and

15623: End If; -- I , Top-Down Check, re-baseline
15624:
15625: -- --------------------------------------------------------------------------+
15626: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15627: pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15628: p_return_status = 'F' and
15629: l_txn_exists_bc_pkt_flag = 'Y') then
15630:
15631: If g_debug_mode = 'Y' then

Line 15664: x_balance_type =>pa_budget_fund_pkg.g_balance_type,

15660: log_message(p_msg_token1=>l_program_name||': Failure case - Rebuild draft acct. sumamry');
15661: End If;
15662:
15663: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
15664: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
15665: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15666: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
15667: x_mode=>'FAIL');
15668: End If;

Line 15665: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,

15661: End If;
15662:
15663: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
15664: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
15665: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15666: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
15667: x_mode=>'FAIL');
15668: End If;
15669: -- ------------------------- END STEP 4 --------------------------------------+

Line 15666: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,

15662:
15663: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
15664: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
15665: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15666: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
15667: x_mode=>'FAIL');
15668: End If;
15669: -- ------------------------- END STEP 4 --------------------------------------+
15670:

Line 15676: log_message(p_msg_token1=>l_program_name||':Processing Mode:'||pa_budget_fund_pkg.g_processing_mode);

15672: -- ------------------------------------------------------------------------+
15673: -- 5.0: Build account summary for the current version ..
15674: -- ------------------------------------------------------------------------+
15675: If g_debug_mode = 'Y' then
15676: log_message(p_msg_token1=>l_program_name||':Processing Mode:'||pa_budget_fund_pkg.g_processing_mode);
15677: log_message(p_msg_token1=>l_program_name||':Build account summary for the current version');
15678: End If;
15679:
15680: -- ACCOUNT SUMMARY SHOULD ALWAYS BE GENERATED .. CASE WHERE USER MANUALLY UPDATED

Line 15684: p_balance_type =>pa_budget_fund_pkg.g_balance_type,

15680: -- ACCOUNT SUMMARY SHOULD ALWAYS BE GENERATED .. CASE WHERE USER MANUALLY UPDATED
15681: -- ACCOUNT, IN THIS CASE, ACCT. SUMMARY IS DIFF. THAN ACTUAL SUMMARY
15682:
15683: BUILD_ACCOUNT_SUMMARY(p_budget_version_id => l_current_budget_version_id,
15684: p_balance_type =>pa_budget_fund_pkg.g_balance_type,
15685: p_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15686: p_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid);
15687:
15688: If g_debug_mode = 'Y' then

Line 15685: p_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,

15681: -- ACCOUNT, IN THIS CASE, ACCT. SUMMARY IS DIFF. THAN ACTUAL SUMMARY
15682:
15683: BUILD_ACCOUNT_SUMMARY(p_budget_version_id => l_current_budget_version_id,
15684: p_balance_type =>pa_budget_fund_pkg.g_balance_type,
15685: p_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15686: p_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid);
15687:
15688: If g_debug_mode = 'Y' then
15689: log_message(p_msg_token1=>l_program_name||': Done building account summary for the current version');

Line 15686: p_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid);

15682:
15683: BUILD_ACCOUNT_SUMMARY(p_budget_version_id => l_current_budget_version_id,
15684: p_balance_type =>pa_budget_fund_pkg.g_balance_type,
15685: p_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15686: p_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid);
15687:
15688: If g_debug_mode = 'Y' then
15689: log_message(p_msg_token1=>l_program_name||': Done building account summary for the current version');
15690: End If;

Line 15695: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and l_draft_acct_changed_flag = 'Y')

15691: -- ------------------------- END STEP 5 -----------------------------------+
15692: -- 6.0: Build account summary for the draf version .. <> CF mode ..
15693: -- 'Cause in CF mode, we build for the draft version :)
15694: -- ------------------------------------------------------------------------+
15695: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and l_draft_acct_changed_flag = 'Y')
15696: then
15697:
15698: If g_debug_mode = 'Y' then
15699: log_message(p_msg_token1=>l_program_name||':Build account summary for the draft version');

Line 15703: x_balance_type =>pa_budget_fund_pkg.g_balance_type,

15699: log_message(p_msg_token1=>l_program_name||':Build account summary for the draft version');
15700: End If;
15701:
15702: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
15703: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
15704: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15705: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
15706: x_mode=>'PASS');
15707:

Line 15704: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,

15700: End If;
15701:
15702: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
15703: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
15704: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15705: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
15706: x_mode=>'PASS');
15707:
15708: If g_debug_mode = 'Y' then

Line 15705: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,

15701:
15702: BUILD_ACCOUNT_SUMMARY_AUTO(x_budget_version_id => l_draft_budget_version_id,
15703: x_balance_type =>pa_budget_fund_pkg.g_balance_type,
15704: x_budget_amount_code=> pa_budget_fund_pkg.g_budget_amount_code,
15705: x_prev_budget_version_id=>pa_budget_fund_pkg.g_cost_prev_bvid,
15706: x_mode=>'PASS');
15707:
15708: If g_debug_mode = 'Y' then
15709: log_message(p_msg_token1=>l_program_name||': Done building account summary for the draft version');

Line 15719: If (pa_budget_fund_pkg.g_balance_type = 'E' and

15715: -- 7.0: Top Down (but not "Year-End") and re-baseline, carry out
15716: -- "Account level" FC
15717: -- ------------------------------------------------------------------------+
15718:
15719: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15720: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15721: pa_budget_fund_pkg.g_processing_mode = 'BASELINE') then
15722: --l_txn_exists_bc_pkt_flag = 'Y') then
15723:

Line 15720: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and

15716: -- "Account level" FC
15717: -- ------------------------------------------------------------------------+
15718:
15719: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15720: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15721: pa_budget_fund_pkg.g_processing_mode = 'BASELINE') then
15722: --l_txn_exists_bc_pkt_flag = 'Y') then
15723:
15724: -- Account level FC .. ONLY for BASELINE mode

Line 15721: pa_budget_fund_pkg.g_processing_mode = 'BASELINE') then

15717: -- ------------------------------------------------------------------------+
15718:
15719: If (pa_budget_fund_pkg.g_balance_type = 'E' and
15720: pa_budget_fund_pkg.g_cost_rebaseline_flag = 'Y' and
15721: pa_budget_fund_pkg.g_processing_mode = 'BASELINE') then
15722: --l_txn_exists_bc_pkt_flag = 'Y') then
15723:
15724: -- Account level FC .. ONLY for BASELINE mode
15725:

Line 15846: If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') OR

15842: -- Step 8.1: Update Pass status/result code on current version (CF/Baseline/Yearend)
15843: /* ==============================================================================================+
15844: -- STEP NOT REQUIRED AS acct. summary initialized/build with 'P101' and 'A' ...
15845:
15846: If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') OR
15847: (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and p_return_status = 'S')
15848: ) then
15849:
15850: If g_debug_mode = 'Y' then

Line 15847: (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and p_return_status = 'S')

15843: /* ==============================================================================================+
15844: -- STEP NOT REQUIRED AS acct. summary initialized/build with 'P101' and 'A' ...
15845:
15846: If ((pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') OR
15847: (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and p_return_status = 'S')
15848: ) then
15849:
15850: If g_debug_mode = 'Y' then
15851: log_message(p_msg_token1=>'End:'||l_program_name||'Update Pass status/result code on pa_budget_acct_lines - Current');

Line 15868: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and p_return_status = 'S')

15864: End If;
15865:
15866: -- Step 8.2: Update Pass status/result code on draft version for Baseline/year End mode
15867:
15868: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and p_return_status = 'S')
15869: then
15870:
15871: If g_debug_mode = 'Y' then
15872: log_message(p_msg_token1=>'End:'||l_program_name||'Update Pass status/result code on pa_budget_acct_lines - Draft');

Line 15892: If (pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and

15888:
15889: -- ------------------------- STEP 9 -----------------------------------+
15890: -- Step 9.0: Update project_acct_result_code/result_code on pa_bc_packets
15891:
15892: If (pa_budget_fund_pkg.g_processing_mode = 'BASELINE' and
15893: p_return_status = 'S' and
15894: l_txn_exists_bc_pkt_flag = 'Y') then
15895:
15896: If g_debug_mode = 'Y' then

Line 15908: If (p_return_status = 'F' and pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') then

15904:
15905: -- -------------------------- STEP 10 --------------------------------------+
15906: -- Step 10.0: We need to fail all records in case of Check funds/reserve ..
15907:
15908: If (p_return_status = 'F' and pa_budget_fund_pkg.g_processing_mode = 'CHECK_FUNDS') then
15909: -- Filtering reserve_baseline as during baseline if there is a failure everything rolls back ..
15910:
15911: g_packet_debit_processed := 'Y';
15912:

Line 16156: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and

16152: If g_debug_mode = 'Y' then
16153: log_message(p_msg_token1=>l_program_name||':Creating missing records');
16154: End If;
16155:
16156: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and
16157: P_budget_version_id = pa_budget_fund_pkg.g_cost_current_bvid )then
16158:
16159: -- This IF..END IF ..is reqd. as this procedure is called for the draft version
16160: -- during <> 'CF' mode ..to rebuild the acct. sumamry for the draft version

Line 16157: P_budget_version_id = pa_budget_fund_pkg.g_cost_current_bvid )then

16153: log_message(p_msg_token1=>l_program_name||':Creating missing records');
16154: End If;
16155:
16156: If (pa_budget_fund_pkg.g_processing_mode <> 'CHECK_FUNDS' and
16157: P_budget_version_id = pa_budget_fund_pkg.g_cost_current_bvid )then
16158:
16159: -- This IF..END IF ..is reqd. as this procedure is called for the draft version
16160: -- during <> 'CF' mode ..to rebuild the acct. sumamry for the draft version
16161: -- In this case, the else part should fire ..

Line 16504: glbc.status_code = decode(pa_budget_fund_pkg.g_processing_mode,

16500: -- -------------------------------------------------------------------------- +
16501: forall i in t_glrowid.FIRST..t_glrowid.LAST
16502: Update gl_bc_packets glbc
16503: set glbc.result_code = decode(substr(glbc.result_code,1,1),'F',glbc.result_code,'F35'),
16504: glbc.status_code = decode(pa_budget_fund_pkg.g_processing_mode,
16505: 'CHECK_FUNDS','F','R')
16506: where rowid = t_glrowid(i);
16507:
16508: If g_debug_mode = 'Y' then

Line 16517: SET funds_status_code = decode(pa_budget_fund_pkg.g_processing_mode,

16513: -- Fail xla_ae_headers_gt records ...
16514: -- -------------------------------------------------------------------------- +
16515: forall i in t_ae_header_id.FIRST..t_ae_header_id.LAST
16516: UPDATE xla_ae_headers_gt
16517: SET funds_status_code = decode(pa_budget_fund_pkg.g_processing_mode,
16518: 'CHECK_FUNDS','F','R')
16519: WHERE ae_header_id = t_ae_header_id(i)
16520: AND ledger_id = t_ledger_id(i);
16521: