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.56.12020000.3 2013/03/06 09:10:44 admarath ship $
3:
4: /**-----------------------------------------------------------------------
5: --- Declare Global Variables

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

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

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

1421:
1422: IF p_stage is NOT null then
1423: pa_debug.g_err_stage := 'Stage :'|| substr(p_stage,1,250);
1424: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1425: pa_debug.write('pa.plsql.PA_FUNDS_CONTROL_PKG','LOG: '||pa_debug.g_err_stage,3);
1426: g_error_stage := substr(p_stage,1,10);
1427: END IF;
1428:
1429: IF p_error_msg is NOT NULL then

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

1429: IF p_error_msg is NOT NULL then
1430: pa_debug.g_err_stage := 'Error Msg :'||substr(p_error_msg,1,250);
1431: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1432: PA_DEBUG.write
1433: (x_Module => 'pa.plsql.PA_FUNDS_CONTROL_PKG'
1434: ,x_Msg => substr('LOG:'||p_error_msg,1,240)
1435: ,x_Log_Level => 3);
1436: g_error_msg := p_error_msg;
1437: END IF;

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

1439: IF p_msg_token1 is NOT NULL or p_msg_token2 is NOT NULL then
1440: IF p_msg_token2 is not null then
1441: pa_debug.g_err_stage := substr(p_msg_token2,1,250);
1442: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1443: pa_debug.write('pa.plsql.PA_FUNDS_CONTROL_PKG','LOG: '||pa_debug.g_err_stage,3);
1444: END IF;
1445: IF p_msg_token1 is NOT NULL then
1446: pa_debug.g_err_stage := substr(p_msg_token1,1,250);
1447: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);

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

1445: IF p_msg_token1 is NOT NULL then
1446: pa_debug.g_err_stage := substr(p_msg_token1,1,250);
1447: pa_debug.write_file('LOG: '||pa_debug.g_err_stage);
1448: PA_DEBUG.write
1449: (x_Module => 'pa.plsql.PA_FUNDS_CONTROL_PKG'
1450: ,x_Msg => substr('LOG:'||p_msg_token1,1,240)
1451: ,x_Log_Level => 3);
1452:
1453: END IF ;

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

1585: log_message(p_msg_token1 => 'Inside the is_ap_from project api');
1586: End If;
1587:
1588: --Initialize the error stack
1589: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.is_ap_from_project');
1590:
1591: x_return_status := 'S';
1592:
1593: IF p_calling_module = 'GL' then

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

7792:
7793: BEGIN
7794:
7795: -- Initialize the error stack
7796: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.Derive_rlmi');
7797: IF g_debug_mode = 'Y' THEN
7798: log_message(p_msg_token1 => 'inside the fundscheck derive rlmi');
7799: End if;
7800: -- initialize the pl/sql talbes

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

8220: ,g_tab_doc_line_id
8221: ,g_tab_exp_type
8222: ,g_tab_rlmi
8223: ,l_tab_resmap_pkt_line_type LIMIT 500;
8224: pa_funds_control_pkg.log_message(p_msg_token1=>'NumOfCwkRecs['||g_tab_bc_packet_id.count||']');
8225: IF NOT g_tab_bc_packet_id.EXISTS(1) THEN
8226: EXIT;
8227: END IF;
8228:

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

8239: ,g_tab_exp_type(i)
8240: ,l_tab_resmap_pkt_line_type(i)
8241: ,'FUNDS_CHECK');
8242:
8243: pa_funds_control_pkg.log_message(p_msg_token1=>'bcPktId['||g_tab_bc_packet_id(i)||
8244: ']pktrlmi['||g_tab_rlmi(i)||']cwkRlmi['||l_fc_utils2_cwk_rlmi||
8245: ']pktLineType['||l_tab_resmap_pkt_line_type(i)||']');
8246: g_tab_rlmi(i) := NVL(l_fc_utils2_cwk_rlmi,g_tab_rlmi(i));
8247: END LOOP;

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

8456: l_imp_count Number := 0;
8457:
8458: BEGIN
8459: -- Initialize the error stack
8460: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.setup');
8461:
8462: If p_calling_module in ('DISTBTC','DISTERADJ','CBC','EXPENDITURE','DISTCWKST','DISTVIADJ'
8463: ,'TRXIMPORT','RESERVE_BASELINE') then
8464:

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

8461:
8462: If p_calling_module in ('DISTBTC','DISTERADJ','CBC','EXPENDITURE','DISTCWKST','DISTVIADJ'
8463: ,'TRXIMPORT','RESERVE_BASELINE') then
8464:
8465: -- Note: For commitment Funds check, derive_rlmi is called in pa_funds_control_pkg1
8466: -- R12: BC-SLA Integration ..
8467:
8468: IF g_debug_mode = 'Y' THEN
8469: log_message(p_msg_token1 => 'inside the fundscheck setup api Calling Derive_rlmi ');

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

8882: /* ========================================================================================+
8883: Following code is incorrect ..not required.
8884: -- If p_mode is 'B' and 'S', use the period_name stamped on the txn. being funds checked
8885: -- to get the start and end date
8886: -- In normal FC mode, call pa_funds_control_pkg1.setup_start_end_date to derive dates
8887: log_message(p_msg_token1 =>'Mode ['||p_mode||'] Period name['||g_tab_period_name(i)||']');
8888:
8889: If p_mode in ('B','S') then -- Mode check
8890: Begin

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

8919: trunc(l_trx_item_date) NOT BETWEEN l_pre_fc_sdate AND l_pre_fc_edate) OR
8920: (to_char(nvl(l_pre_ei_date,g_tab_exp_item_date(i)),'YYYY')<>to_char(g_tab_exp_item_date(i),'YYYY') AND g_tab_exp_item_date(i) is not NULL ) /*Bug 8562406 */
8921: THEN -- call date API
8922: If g_debug_mode = 'Y' THEN
8923: log_message(p_msg_token1 => 'Calling pa_funds_control_pkg1.setup_start_end_date API');
8924: End if;
8925:
8926: /*PAM changes derive start and end dates */
8927: pa_funds_control_pkg1.setup_start_end_date (

Line 8927: pa_funds_control_pkg1.setup_start_end_date (

8923: log_message(p_msg_token1 => 'Calling pa_funds_control_pkg1.setup_start_end_date API');
8924: End if;
8925:
8926: /*PAM changes derive start and end dates */
8927: pa_funds_control_pkg1.setup_start_end_date (
8928: p_packet_id => p_packet_id
8929: ,p_bc_packet_id => g_tab_bc_packet_id(i)
8930: ,p_project_id => g_tab_project_id(i)
8931: ,p_budget_version_id => g_tab_budget_version_id(i)

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

9352:
9353: l_num_rows NUMBER := 200;
9354: BEGIN
9355: -- Initialize the error stack
9356: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.update_trxn_doc_levl');
9357:
9358: --reset the return status
9359: x_return_status := 'S';
9360: IF g_debug_mode = 'Y' THEN

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

9628: -- initialize the return status to success
9629: x_return_status := 'S';
9630:
9631: --Initialize the err stack
9632: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.status_code_update');
9633:
9634: IF g_debug_mode = 'Y' THEN
9635: log_message(p_msg_token1 =>'Inside the status code update api p_calling_module['
9636: ||p_calling_module||']packet_id['||p_packet_id||']mode['

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

10075:
10076: BEGIN
10077:
10078: --Initialize the error stack
10079: pa_debug.init_err_stack('PA_FUNDS_CONTROL_PKG.update_EIS');
10080:
10081: -- initialize the return status
10082: x_return_status := 'S';
10083: IF g_debug_mode = 'Y' THEN

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

10368:
10369: BEGIN
10370: g_debug_mode := 'Y';
10371: --Initialize the error stack
10372: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.upd_bdgt_encum_bal');
10373: IF g_debug_mode = 'Y' THEN
10374: log_message(p_msg_token1 => 'inside the update budget acct api'||
10375: 'calling module ['||p_calling_module||']p_mode ['||p_mode||
10376: ']p_packet_status ['||p_packet_status ||']' );

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

10481: l_max_batch_line_id number(10);
10482:
10483: BEGIN
10484: --Initialize the error stack
10485: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.create_liqd_entry');
10486:
10487: x_return_status := 'S';
10488: If g_debug_mode = 'Y' Then
10489: log_message(p_msg_token1 => 'Inside the create_liqd_entry api ');

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

10700: If g_debug_mode = 'Y' Then
10701: log_message(p_msg_token1 => 'Inside gen_return_code api');
10702: End if;
10703: -- Initialize the error stack
10704: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.gen_return_code');
10705:
10706: -- Initialize the return status to success
10707: x_return_status := l_return_code;
10708:

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

10818: BEGIN
10819:
10820: x_return_status := FND_API.G_RET_STS_SUCCESS;
10821:
10822: pa_debug.init_err_stack ('PA_Funds_Control_Pkg.Post_Burden_Lines_To_GL');
10823:
10824: If g_debug_mode = 'Y' Then
10825: log_message(p_msg_token1 => 'Inside the Post_Burden_Lines_To_GL api');
10826: log_message(p_msg_token1 => 'p_calling_module='||p_calling_module);

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

11031: WHERE gl.packet_id = p_packet_id;
11032: BEGIN
11033:
11034: --Initialize the err stack
11035: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.update_GL_CBC_result_code');
11036:
11037: -- initialize the return status to success
11038: x_return_status := 'S';
11039: l_pkt_fatal_error_flag := 'N';

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

12089: --------------------------------------------------------------------------------------------------------------
12090: BEGIN
12091:
12092: --- Initialize the error statck
12093: PA_DEBUG.init_err_stack ('PA_FUNDS_CONTROL_PKG.pa_funds_check');
12094:
12095: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
12096: g_debug_mode := NVL(g_debug_mode, 'N');
12097:

Line 12145: -- PA_FUNDS_CONTROL_PKG1.copy_gl_pkt_to_pa_pkt

12141: If g_debug_mode = 'Y' then
12142: log_message(p_stage => 10,p_msg_token1 => 'For CBC calling copy_gl_pkt_to_pa_pkt in mode ='||l_mode);
12143: end if;
12144:
12145: -- PA_FUNDS_CONTROL_PKG1.copy_gl_pkt_to_pa_pkt
12146: -- (p_packet_id => l_packet_id
12147: -- ,p_calling_module => p_calling_module
12148: -- ,p_return_code => l_return_status
12149: -- ,p_reference1 => p_reference1

Line 12319: If NOT PA_FUNDS_CONTROL_PKG1.create_unrsvd_lines

12315: If l_mode in ('U') and p_calling_module in ('GL','CBC') then
12316: If g_debug_mode = 'Y' then
12317: log_message(p_msg_token1 => ' calling create_unrsvd_lines api');
12318: end if;
12319: If NOT PA_FUNDS_CONTROL_PKG1.create_unrsvd_lines
12320: ( x_packet_id => l_packet_id
12321: ,p_mode => l_mode
12322: ,p_calling_module => p_calling_module
12323: ,p_reference1 => p_reference1

Line 12389: PA_FUNDS_CONTROL_PKG1.populate_plsql_tabs_CBC

12385: If g_debug_mode = 'Y' then
12386: log_message(p_msg_token1 => 'calling populate plsql tabs api');
12387: end if;
12388:
12389: PA_FUNDS_CONTROL_PKG1.populate_plsql_tabs_CBC
12390: (p_packet_id => l_packet_id
12391: ,p_calling_module => p_calling_module
12392: ,p_reference1 => p_reference1
12393: ,p_reference2 => p_reference2

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

12459: END IF;
12460:
12461: If p_calling_module in ('DISTBTC','DISTERADJ','CBC','EXPENDITURE','DISTCWKST','DISTVIADJ','TRXIMPORT') then
12462:
12463: -- Note: For commitment Funds check, populate_burden_cost is called in pa_funds_control_pkg1
12464: -- R12: BC-SLA Integration ..
12465:
12466: -----------------------------------------------------------------------------------------------------
12467: -- Populate the Burden cost for each record in packet if project type is of burden on same EI

Line 12476: PA_FUNDS_CONTROL_PKG1.Populate_burden_cost

12472: If g_debug_mode = 'Y' then
12473: log_message(p_stage => 50,p_msg_token1 => p_calling_module||':Calling Populate_burden_cost API');
12474: end if;
12475:
12476: PA_FUNDS_CONTROL_PKG1.Populate_burden_cost
12477: (p_packet_id => l_packet_id
12478: ,p_calling_module => p_calling_module
12479: ,x_return_status => l_return_status
12480: ,x_err_msg_code => l_err_msg_code);

Line 12483: log_message(p_msg_token1 => 'After calling PA_FUNDS_CONTROL_PKG1.Populate_burden_cost api');

12479: ,x_return_status => l_return_status
12480: ,x_err_msg_code => l_err_msg_code);
12481:
12482: If g_debug_mode = 'Y' then
12483: log_message(p_msg_token1 => 'After calling PA_FUNDS_CONTROL_PKG1.Populate_burden_cost api');
12484: end if;
12485:
12486: IF l_return_status <> 'S' then
12487: If g_debug_mode = 'Y' then

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

13130:
13131: EXCEPTION
13132: WHEN OTHERS THEN
13133: If g_debug_mode = 'Y' Then
13134: pa_funds_control_pkg.log_message(p_msg_token1 => 'Failed in tie_back_status apiSQLERR:'||
13135: sqlcode||sqlerrm);
13136: End if;
13137: RAISE;
13138:

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

13245: l_event_result_status VARCHAR2(15);
13246:
13247: BEGIN
13248: --Initialize the error stack
13249: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.PA_GL_CBC_CONFIRMATION');
13250:
13251: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode );
13252: g_debug_mode := NVL(g_debug_mode, 'N');
13253:

Line 13560: pa_funds_control_pkg1.upd_cwk_attributes

13556:
13557: /* PAM changes */
13558: If p_calling_module = 'GL' Then
13559: -- update the cwk attributes for the passed transactions
13560: pa_funds_control_pkg1.upd_cwk_attributes
13561: (p_calling_module => p_calling_module
13562: ,p_packet_id => l_packet_id
13563: ,p_mode => l_mode
13564: ,p_reference => 'UPD_AMTS'

Line 13569: pa_funds_control_pkg1.upd_cwk_attributes(

13565: ,x_return_status => l_return_status
13566: );
13567:
13568: -- update the cwk compiled_multiplier
13569: pa_funds_control_pkg1.upd_cwk_attributes(
13570: p_calling_module => p_calling_module
13571: ,p_packet_id => l_packet_id
13572: ,p_mode => l_mode
13573: ,p_reference => 'UPD_MULTIPLIER'

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

13696: l_mode := p_mode;
13697: l_partial_flag := NVl(p_partial_flag,'N');
13698:
13699: --Initialize the error stack
13700: PA_DEBUG.init_err_stack('PA_FUNDS_CONTROL_PKG.tieback_pkt_status');
13701:
13702: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode );
13703: g_debug_mode := NVL(g_debug_mode, 'N');
13704:

Line 13792: pa_funds_control_pkg1.upd_cwk_attributes

13788: /* PAM changes */
13789: If p_calling_module in ('DISTCWKST') Then
13790: log_message(p_msg_token1 => 'Calling upd_cwk_attributes API');
13791: -- update the cwk attributes for the passed transactions
13792: pa_funds_control_pkg1.upd_cwk_attributes
13793: (p_calling_module => p_calling_module
13794: ,p_packet_id => l_packet_id
13795: ,p_mode => l_mode
13796: ,p_reference => 'UPD_AMTS'

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

14514: End if;
14515:
14516: for x in c_bc_packet_id loop
14517:
14518: l_project_burden_method := pa_funds_control_pkg.check_bdn_on_sep_item(x.project_id);
14519:
14520: If (l_project_burden_method <> 'DIFFERENT') then
14521:
14522: Update gl_bc_packets glbc

Line 16996: END PA_FUNDS_CONTROL_PKG;

16992:
16993:
16994: -- ------------------------------------ R12 End ------------------------------------------------+
16995:
16996: END PA_FUNDS_CONTROL_PKG;