DBA Data[Home] [Help]

APPS.PA_FUNDS_CONTROL_PKG dependencies on PA_FUNDS_CONTROL_PKG

Line 1: package body PA_FUNDS_CONTROL_PKG as

1: package body PA_FUNDS_CONTROL_PKG as
2: -- $Header: PABCFCKB.pls 120.43 2007/11/06 10:09:15 vchilla noship $
3:
4: /**-----------------------------------------------------------------------
5: --- Declare Global Variables

Line 1265: pa_debug.init_err_stack('PA_FUNDS_CONTROL_PKG.result_status_code_update');

1261:
1262: PRAGMA AUTONOMOUS_TRANSACTION;
1263:
1264: BEGIN
1265: pa_debug.init_err_stack('PA_FUNDS_CONTROL_PKG.result_status_code_update');
1266: /******
1267: -- Added if else condition to avoid full table scan on pa_bc_packets
1268: --EXPLAIN PLAN IS:
1269: --1:UPDATE STATEMENT :(cost=2,rows=1)

Line 1418: pa_debug.write('pa.plsql.PA_FUNDS_CONTROL_PKG','LOG: '||pa_debug.g_err_stage,3);

1414:
1415: IF p_stage is NOT null then
1416: pa_debug.g_err_stage := 'Stage :'|| substr(p_stage,1,250);
1417: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1418: pa_debug.write('pa.plsql.PA_FUNDS_CONTROL_PKG','LOG: '||pa_debug.g_err_stage,3);
1419: g_error_stage := substr(p_stage,1,10);
1420: END IF;
1421:
1422: IF p_error_msg is NOT NULL then

Line 1426: (x_Module => 'pa.plsql.PA_FUNDS_CONTROL_PKG'

1422: IF p_error_msg is NOT NULL then
1423: pa_debug.g_err_stage := 'Error Msg :'||substr(p_error_msg,1,250);
1424: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1425: PA_DEBUG.write
1426: (x_Module => 'pa.plsql.PA_FUNDS_CONTROL_PKG'
1427: ,x_Msg => substr('LOG:'||p_error_msg,1,240)
1428: ,x_Log_Level => 3);
1429: g_error_msg := p_error_msg;
1430: END IF;

Line 1436: pa_debug.write('pa.plsql.PA_FUNDS_CONTROL_PKG','LOG: '||pa_debug.g_err_stage,3);

1432: IF p_msg_token1 is NOT NULL or p_msg_token2 is NOT NULL then
1433: IF p_msg_token2 is not null then
1434: pa_debug.g_err_stage := substr(p_msg_token2,1,250);
1435: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1436: pa_debug.write('pa.plsql.PA_FUNDS_CONTROL_PKG','LOG: '||pa_debug.g_err_stage,3);
1437: END IF;
1438: IF p_msg_token1 is NOT NULL then
1439: pa_debug.g_err_stage := substr(p_msg_token1,1,250);
1440: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);

Line 1442: (x_Module => 'pa.plsql.PA_FUNDS_CONTROL_PKG'

1438: IF p_msg_token1 is NOT NULL then
1439: pa_debug.g_err_stage := substr(p_msg_token1,1,250);
1440: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1441: PA_DEBUG.write
1442: (x_Module => 'pa.plsql.PA_FUNDS_CONTROL_PKG'
1443: ,x_Msg => substr('LOG:'||p_msg_token1,1,240)
1444: ,x_Log_Level => 3);
1445:
1446: END IF ;

Line 1582: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.is_ap_from_project');

1578: log_message(p_msg_token1 => 'Inside the is_ap_from project api');
1579: End If;
1580:
1581: --Initialize the error stack
1582: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.is_ap_from_project');
1583:
1584: x_return_status := 'S';
1585:
1586: IF p_calling_module = 'GL' then

Line 7598: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.Derive_rlmi');

7594:
7595: BEGIN
7596:
7597: -- Initialize the error stack
7598: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.Derive_rlmi');
7599: IF g_debug_mode = 'Y' THEN
7600: log_message(p_msg_token1 => 'inside the fundscheck derive rlmi');
7601: End if;
7602: -- initialize the pl/sql talbes

Line 8003: pa_funds_control_pkg.log_message(p_msg_token1=>'NumOfCwkRecs['||g_tab_bc_packet_id.count||']');

7999: ,g_tab_doc_line_id
8000: ,g_tab_exp_type
8001: ,g_tab_rlmi
8002: ,l_tab_resmap_pkt_line_type LIMIT 500;
8003: pa_funds_control_pkg.log_message(p_msg_token1=>'NumOfCwkRecs['||g_tab_bc_packet_id.count||']');
8004: IF NOT g_tab_bc_packet_id.EXISTS(1) THEN
8005: EXIT;
8006: END IF;
8007:

Line 8022: pa_funds_control_pkg.log_message(p_msg_token1=>'bcPktId['||g_tab_bc_packet_id(i)||

8018: ,g_tab_exp_type(i)
8019: ,l_tab_resmap_pkt_line_type(i)
8020: ,'FUNDS_CHECK');
8021:
8022: pa_funds_control_pkg.log_message(p_msg_token1=>'bcPktId['||g_tab_bc_packet_id(i)||
8023: ']pktrlmi['||g_tab_rlmi(i)||']cwkRlmi['||l_fc_utils2_cwk_rlmi||
8024: ']pktLineType['||l_tab_resmap_pkt_line_type(i)||']');
8025: g_tab_rlmi(i) := NVL(l_fc_utils2_cwk_rlmi,g_tab_rlmi(i));
8026: END LOOP;

Line 8237: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.setup');

8233: l_imp_count Number := 0;
8234:
8235: BEGIN
8236: -- Initialize the error stack
8237: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.setup');
8238:
8239: If p_calling_module in ('DISTBTC','DISTERADJ','CBC','EXPENDITURE','DISTCWKST','DISTVIADJ'
8240: ,'TRXIMPORT','RESERVE_BASELINE') then
8241:

Line 8242: -- Note: For commitment Funds check, derive_rlmi is called in pa_funds_control_pkg1

8238:
8239: If p_calling_module in ('DISTBTC','DISTERADJ','CBC','EXPENDITURE','DISTCWKST','DISTVIADJ'
8240: ,'TRXIMPORT','RESERVE_BASELINE') then
8241:
8242: -- Note: For commitment Funds check, derive_rlmi is called in pa_funds_control_pkg1
8243: -- R12: BC-SLA Integration ..
8244:
8245: IF g_debug_mode = 'Y' THEN
8246: log_message(p_msg_token1 => 'inside the fundscheck setup api Calling Derive_rlmi ');

Line 8652: -- In normal FC mode, call pa_funds_control_pkg1.setup_start_end_date to derive dates

8648: /* ========================================================================================+
8649: Following code is incorrect ..not required.
8650: -- If p_mode is 'B' and 'S', use the period_name stamped on the txn. being funds checked
8651: -- to get the start and end date
8652: -- In normal FC mode, call pa_funds_control_pkg1.setup_start_end_date to derive dates
8653: log_message(p_msg_token1 =>'Mode ['||p_mode||'] Period name['||g_tab_period_name(i)||']');
8654:
8655: If p_mode in ('B','S') then -- Mode check
8656: Begin

Line 8687: log_message(p_msg_token1 => 'Calling pa_funds_control_pkg1.setup_start_end_date API');

8683: (l_pre_boundary_code is NULL or l_pre_boundary_code <> g_tab_boundary_code(i)) OR
8684: (l_pre_fc_sdate is NULL or l_pre_fc_edate is NULL OR
8685: trunc(l_trx_item_date) NOT BETWEEN l_pre_fc_sdate AND l_pre_fc_edate) THEN -- call date API
8686: If g_debug_mode = 'Y' THEN
8687: log_message(p_msg_token1 => 'Calling pa_funds_control_pkg1.setup_start_end_date API');
8688: End if;
8689:
8690: /*PAM changes derive start and end dates */
8691: pa_funds_control_pkg1.setup_start_end_date (

Line 8691: pa_funds_control_pkg1.setup_start_end_date (

8687: log_message(p_msg_token1 => 'Calling pa_funds_control_pkg1.setup_start_end_date API');
8688: End if;
8689:
8690: /*PAM changes derive start and end dates */
8691: pa_funds_control_pkg1.setup_start_end_date (
8692: p_packet_id => p_packet_id
8693: ,p_bc_packet_id => g_tab_bc_packet_id(i)
8694: ,p_project_id => g_tab_project_id(i)
8695: ,p_budget_version_id => g_tab_budget_version_id(i)

Line 9108: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.update_trxn_doc_levl');

9104:
9105: l_num_rows NUMBER := 200;
9106: BEGIN
9107: -- Initialize the error stack
9108: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.update_trxn_doc_levl');
9109:
9110: --reset the return status
9111: x_return_status := 'S';
9112: IF g_debug_mode = 'Y' THEN

Line 9379: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.status_code_update');

9375: -- initialize the return status to success
9376: x_return_status := 'S';
9377:
9378: --Initialize the err stack
9379: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.status_code_update');
9380:
9381: IF g_debug_mode = 'Y' THEN
9382: log_message(p_msg_token1 =>'Inside the status code update api p_calling_module['
9383: ||p_calling_module||']packet_id['||p_packet_id||']mode['

Line 9826: pa_debug.init_err_stack('PA_FUNDS_CONTROL_PKG.update_EIS');

9822:
9823: BEGIN
9824:
9825: --Initialize the error stack
9826: pa_debug.init_err_stack('PA_FUNDS_CONTROL_PKG.update_EIS');
9827:
9828: -- initialize the return status
9829: x_return_status := 'S';
9830:

Line 10115: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.upd_bdgt_encum_bal');

10111:
10112: BEGIN
10113: g_debug_mode := 'Y';
10114: --Initialize the error stack
10115: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.upd_bdgt_encum_bal');
10116: IF g_debug_mode = 'Y' THEN
10117: log_message(p_msg_token1 => 'inside the update budget acct api'||
10118: 'calling module ['||p_calling_module||']p_mode ['||p_mode||
10119: ']p_packet_status ['||p_packet_status ||']' );

Line 10228: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.create_liqd_entry');

10224: l_max_batch_line_id number(10);
10225:
10226: BEGIN
10227: --Initialize the error stack
10228: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.create_liqd_entry');
10229:
10230: x_return_status := 'S';
10231: If g_debug_mode = 'Y' Then
10232: log_message(p_msg_token1 => 'Inside the create_liqd_entry api ');

Line 10442: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.gen_return_code');

10438:
10439: BEGIN
10440:
10441: -- Initialize the error stack
10442: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.gen_return_code');
10443:
10444: -- Initialize the return status to success
10445: x_return_status := l_return_code;
10446:

Line 10560: pa_debug.init_err_stack ('PA_Funds_Control_Pkg.Post_Burden_Lines_To_GL');

10556: BEGIN
10557:
10558: x_return_status := FND_API.G_RET_STS_SUCCESS;
10559:
10560: pa_debug.init_err_stack ('PA_Funds_Control_Pkg.Post_Burden_Lines_To_GL');
10561:
10562: If g_debug_mode = 'Y' Then
10563: log_message(p_msg_token1 => 'Inside the Post_Burden_Lines_To_GL api');
10564: End if;

Line 10772: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.update_GL_CBC_result_code');

10768: WHERE gl.packet_id = p_packet_id;
10769: BEGIN
10770:
10771: --Initialize the err stack
10772: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.update_GL_CBC_result_code');
10773:
10774: -- initialize the return status to success
10775: x_return_status := 'S';
10776: l_pkt_fatal_error_flag := 'N';

Line 11823: PA_DEBUG.init_err_stack ('PA_FUNDS_CONTROL_PKG.pa_funds_check');

11819: --------------------------------------------------------------------------------------------------------------
11820: BEGIN
11821:
11822: --- Initialize the error statck
11823: PA_DEBUG.init_err_stack ('PA_FUNDS_CONTROL_PKG.pa_funds_check');
11824:
11825: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
11826: g_debug_mode := NVL(g_debug_mode, 'N');
11827:

Line 11875: -- PA_FUNDS_CONTROL_PKG1.copy_gl_pkt_to_pa_pkt

11871: If g_debug_mode = 'Y' then
11872: log_message(p_stage => 10,p_msg_token1 => 'For CBC calling copy_gl_pkt_to_pa_pkt in mode ='||l_mode);
11873: end if;
11874:
11875: -- PA_FUNDS_CONTROL_PKG1.copy_gl_pkt_to_pa_pkt
11876: -- (p_packet_id => l_packet_id
11877: -- ,p_calling_module => p_calling_module
11878: -- ,p_return_code => l_return_status
11879: -- ,p_reference1 => p_reference1

Line 12033: If NOT PA_FUNDS_CONTROL_PKG1.create_unrsvd_lines

12029: If l_mode in ('U') and p_calling_module in ('GL','CBC') then
12030: If g_debug_mode = 'Y' then
12031: log_message(p_msg_token1 => ' calling create_unrsvd_lines api');
12032: end if;
12033: If NOT PA_FUNDS_CONTROL_PKG1.create_unrsvd_lines
12034: ( x_packet_id => l_packet_id
12035: ,p_mode => l_mode
12036: ,p_calling_module => p_calling_module
12037: ,p_reference1 => p_reference1

Line 12101: PA_FUNDS_CONTROL_PKG1.populate_plsql_tabs_CBC

12097: If g_debug_mode = 'Y' then
12098: log_message(p_msg_token1 => 'calling populate plsql tabs api');
12099: end if;
12100:
12101: PA_FUNDS_CONTROL_PKG1.populate_plsql_tabs_CBC
12102: (p_packet_id => l_packet_id
12103: ,p_calling_module => p_calling_module
12104: ,p_reference1 => p_reference1
12105: ,p_reference2 => p_reference2

Line 12168: -- Note: For commitment Funds check, populate_burden_cost is called in pa_funds_control_pkg1

12164: END IF;
12165:
12166: If p_calling_module in ('DISTBTC','DISTERADJ','CBC','EXPENDITURE','DISTCWKST','DISTVIADJ','TRXIMPORT') then
12167:
12168: -- Note: For commitment Funds check, populate_burden_cost is called in pa_funds_control_pkg1
12169: -- R12: BC-SLA Integration ..
12170:
12171: -----------------------------------------------------------------------------------------------------
12172: -- Populate the Burden cost for each record in packet if project type is of burden on same EI

Line 12181: PA_FUNDS_CONTROL_PKG1.Populate_burden_cost

12177: If g_debug_mode = 'Y' then
12178: log_message(p_stage => 50,p_msg_token1 => p_calling_module||':Calling Populate_burden_cost API');
12179: end if;
12180:
12181: PA_FUNDS_CONTROL_PKG1.Populate_burden_cost
12182: (p_packet_id => l_packet_id
12183: ,p_calling_module => p_calling_module
12184: ,x_return_status => l_return_status
12185: ,x_err_msg_code => l_err_msg_code);

Line 12806: pa_funds_control_pkg.log_message(p_msg_token1 => 'Failed in tie_back_status apiSQLERR:'||

12802:
12803: EXCEPTION
12804: WHEN OTHERS THEN
12805: If g_debug_mode = 'Y' Then
12806: pa_funds_control_pkg.log_message(p_msg_token1 => 'Failed in tie_back_status apiSQLERR:'||
12807: sqlcode||sqlerrm);
12808: End if;
12809: RAISE;
12810:

Line 12921: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.PA_GL_CBC_CONFIRMATION');

12917: l_event_result_status VARCHAR2(15);
12918:
12919: BEGIN
12920: --Initialize the error stack
12921: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.PA_GL_CBC_CONFIRMATION');
12922:
12923: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode );
12924: g_debug_mode := NVL(g_debug_mode, 'N');
12925:

Line 13228: pa_funds_control_pkg1.upd_cwk_attributes

13224:
13225: /* PAM changes */
13226: If p_calling_module = 'GL' Then
13227: -- update the cwk attributes for the passed transactions
13228: pa_funds_control_pkg1.upd_cwk_attributes
13229: (p_calling_module => p_calling_module
13230: ,p_packet_id => l_packet_id
13231: ,p_mode => l_mode
13232: ,p_reference => 'UPD_AMTS'

Line 13237: pa_funds_control_pkg1.upd_cwk_attributes(

13233: ,x_return_status => l_return_status
13234: );
13235:
13236: -- update the cwk compiled_multiplier
13237: pa_funds_control_pkg1.upd_cwk_attributes(
13238: p_calling_module => p_calling_module
13239: ,p_packet_id => l_packet_id
13240: ,p_mode => l_mode
13241: ,p_reference => 'UPD_MULTIPLIER'

Line 13365: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.tieback_pkt_status');

13361: l_mode := p_mode;
13362: l_partial_flag := NVl(p_partial_flag,'N');
13363:
13364: --Initialize the error stack
13365: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.tieback_pkt_status');
13366:
13367: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode );
13368: g_debug_mode := NVL(g_debug_mode, 'N');
13369:

Line 13444: pa_funds_control_pkg1.upd_cwk_attributes

13440: /* PAM changes */
13441: If p_calling_module in ('DISTCWKST') Then
13442: log_message(p_msg_token1 => 'Calling upd_cwk_attributes API');
13443: -- update the cwk attributes for the passed transactions
13444: pa_funds_control_pkg1.upd_cwk_attributes
13445: (p_calling_module => p_calling_module
13446: ,p_packet_id => l_packet_id
13447: ,p_mode => l_mode
13448: ,p_reference => 'UPD_AMTS'

Line 14101: l_project_burden_method := pa_funds_control_pkg.check_bdn_on_sep_item(x.project_id);

14097: End if;
14098:
14099: for x in c_bc_packet_id loop
14100:
14101: l_project_burden_method := pa_funds_control_pkg.check_bdn_on_sep_item(x.project_id);
14102:
14103: If (l_project_burden_method <> 'DIFFERENT') then
14104:
14105: Update gl_bc_packets glbc

Line 16561: END PA_FUNDS_CONTROL_PKG;

16557:
16558:
16559: -- ------------------------------------ R12 End ------------------------------------------------+
16560:
16561: END PA_FUNDS_CONTROL_PKG;