[Home] [Help]
218: BEGIN
219:
220: print_time('VALIDATE_SET_PR_PARAMS : Begin.. ');
221:
222: PJI_PJP_FP_CURR_WRAP.INIT_ERR_STACK
223: ( p_package_name => g_package_name
224: , x_return_status => x_return_status );
225:
226: x_num_rows := 0;
224: , x_return_status => x_return_status );
225:
226: x_num_rows := 0;
227:
228: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
229: print_time ( ' Worker id is.. ' || g_worker_id );
230:
231: print_time(' VALIDATE_SET_PR_PARAMS : plan type id is ' || p_plan_type_id );
232: print_time(' p_context is ' || p_context || ' and rbs ver id is ' || p_rbs_version_id );
997: print_time('VALIDATE_SET_PR_PARAMS : end.. ');
998:
999: EXCEPTION
1000: WHEN OTHERS THEN
1001: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
1002: ( p_package_name => g_package_name
1003: , p_procedure_name => ' VALIDATE_SET_PR_PARAMS '
1004: , x_return_status => l_return_status ) ;
1005:
1222:
1223: EXCEPTION
1224:
1225: WHEN OTHERS THEN
1226: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
1227: ( p_package_name => g_package_name
1228: , p_procedure_name => ' OBTAIN_RELEASE_LOCKS '
1229: , x_return_status => x_return_status ) ;
1230:
1274: FOR UPDATE;
1275:
1276: BEGIN
1277:
1278: Pji_Pjp_Fp_Curr_Wrap.INIT_ERR_STACK
1279: ( p_package_name => g_package_name
1280: , x_return_status => x_return_status ) ;
1281:
1282: print_time ( ' UPDATE_LOCKS: p_context = ' || p_context || ' p_update_mode = ' || NVL(p_update_mode, 'X'));
1705: Fnd_Msg_Pub.add_detail(p_message_type=>Fnd_Api.G_RET_STS_ERROR);
1706:
1707: print_time ( ' UPDATE_LOCKS exception ' || SQLERRM);
1708:
1709: Pji_Pjp_Fp_Curr_Wrap.EXCP_HANDLER
1710: ( p_package_name => g_package_name
1711: , p_procedure_name => ' UPDATE_LOCKS '
1712: , x_return_status => x_return_status ) ;
1713:
1713:
1714: RAISE;
1715:
1716: WHEN OTHERS THEN
1717: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
1718: ( p_package_name => g_package_name
1719: , p_procedure_name => ' UPDATE_LOCKS '
1720: , x_return_status => x_return_status ) ;
1721:
4793: BEGIN
4794:
4795: -- dbms_output.put_line ( ' Begin.. ');
4796:
4797: Pji_Pjp_Fp_Curr_Wrap.INIT_ERR_STACK
4798: ( p_package_name => g_package_name
4799: , x_return_status => l_return_status ) ;
4800:
4801: --
4866: */
4867:
4868: EXCEPTION
4869: WHEN OTHERS THEN
4870: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
4871: ( p_package_name => g_package_name
4872: , p_procedure_name => 'RETRIEVE_OVERRIDDEN_WP_ETC'
4873: , x_return_status => l_return_status ) ;
4874:
4890: l_msg_count NUMBER;
4891:
4892: BEGIN
4893:
4894: Pji_Pjp_Fp_Curr_Wrap.INIT_ERR_STACK
4895: ( p_package_name => g_package_name
4896: , x_return_status => l_return_status ) ;
4897:
4898: print_time('EXTRACT_PLAN_ETC_PRIRBS : Begin' );
5430:
5431:
5432: EXCEPTION
5433: WHEN OTHERS THEN
5434: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
5435: ( p_package_name => g_package_name
5436: , p_procedure_name => 'EXTRACT_PLAN_ETC_PRIRBS'
5437: , x_return_status => l_return_status ) ;
5438:
5450: BEGIN
5451:
5452: print_time ( 'DELETE_PLAN_LINES : begin ' );
5453:
5454: Pji_Pjp_Fp_Curr_Wrap.INIT_ERR_STACK
5455: ( p_package_name => g_package_name
5456: , x_return_status => x_return_status ) ;
5457:
5458: --Bug 6047966.
5487: print_time ( 'DELETE_PLAN_LINES : after deletion of plan lines , # rows deleted is ' || SQL%ROWCOUNT );
5488:
5489: EXCEPTION
5490: WHEN OTHERS THEN
5491: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
5492: ( p_package_name => g_package_name
5493: , p_procedure_name => 'DELETE_PLAN_LINES'
5494: , x_return_status => x_return_status ) ;
5495:
6049: else
6050:
6051: print_time('........GET_GLOBAL_EXCHANGE_RATES: Begin. ' );
6052:
6053: PJI_PJP_FP_CURR_WRAP.get_global_currency_info (
6054: x_currency_conversion_rule => g_currency_conversion_rule
6055: , x_prorating_format => g_prorating_format
6056: , x_global1_currency_code => g_global1_currency_code
6057: , x_global2_currency_code => g_global2_currency_code
6438:
6439: EXCEPTION
6440: WHEN NO_DATA_FOUND THEN
6441:
6442: /* This issue will come only when PJI_PJP_FP_CURR_WRAP.get_ent_dates_info gives a no_data_found error.
6443: updating the plan versions as time dangling so that the plan will be marked as dangling. Not updating
6444: the existing records so that data for the primary calendar is not impacted because of issue in proration to
6445: other calendars */
6446:
6467: PJI_PJP_PRG_PERF_ALL.PRORATE_TO_ENT;
6468:
6469: else
6470:
6471: PJI_PJP_FP_CURR_WRAP.get_global_currency_info (
6472: x_currency_conversion_rule => g_currency_conversion_rule
6473: , x_prorating_format => g_prorating_format
6474: , x_global1_currency_code => g_global1_currency_code
6475: , x_global2_currency_code => g_global2_currency_code
6476: , x_global1_currency_mau => g_global1_currency_mau
6477: , x_global2_currency_mau => g_global2_currency_mau ) ;
6478:
6479:
6480: PJI_PJP_FP_CURR_WRAP.get_ent_dates_info (
6481: x_global_start_date => g_global_start_date
6482: , x_ent_start_period_id => g_ent_start_period_id
6483: , x_ent_start_period_name => g_ent_start_period_name
6484: , x_ent_start_date => g_ent_start_date
6526: ELSE RETURN;
6527: END IF;
6528:
6529:
6530: PJI_PJP_FP_CURR_WRAP.get_global_currency_info (
6531: x_currency_conversion_rule => g_currency_conversion_rule
6532: , x_prorating_format => g_prorating_format
6533: , x_global1_currency_code => g_global1_currency_code
6534: , x_global2_currency_code => g_global2_currency_code
6535: , x_global1_currency_mau => g_global1_currency_mau
6536: , x_global2_currency_mau => g_global2_currency_mau ) ;
6537:
6538:
6539: PJI_PJP_FP_CURR_WRAP.get_ent_dates_info (
6540: x_global_start_date => g_global_start_date
6541: , x_ent_start_period_id => g_ent_start_period_id
6542: , x_ent_start_period_name => g_ent_start_period_name
6543: , x_ent_start_date => g_ent_start_date
8822: */
8823:
8824: EXCEPTION
8825: WHEN OTHERS THEN
8826: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
8827: ( p_package_name => g_package_name
8828: , p_procedure_name => 'PRINT_NUM_WBSRLPRCDS_INPJP1'
8829: , x_return_status => l_return_status ) ;
8830:
8863: -- Print time API to measure time taken by each api. Also useful for debugging.
8864: ----------
8865: PROCEDURE PRINT_TIME(p_tag IN VARCHAR2) IS
8866: BEGIN
8867: PJI_PJP_FP_CURR_WRAP.print_time(p_tag);
8868: EXCEPTION
8869: WHEN OTHERS THEN
8870: FND_MSG_PUB.add_exc_msg( p_pkg_name => g_package_name ,
8871: p_procedure_name => 'PRINT_TIME');
8878: BEGIN
8879:
8880: print_time ( ' EXTRACT_PLAN_AMTS_SECRBS_GLC12 begin. ' );
8881:
8882: PJI_PJP_FP_CURR_WRAP.get_global_currency_info (
8883: x_currency_conversion_rule => g_currency_conversion_rule
8884: , x_prorating_format => g_prorating_format
8885: , x_global1_currency_code => g_global1_currency_code
8886: , x_global2_currency_code => g_global2_currency_code
10069: else
10070:
10071: print_time ( ' EXTRACT_PLAN_AMTS_PRIRBS_GLC12 begin. ' );
10072:
10073: PJI_PJP_FP_CURR_WRAP.get_global_currency_info (
10074: x_currency_conversion_rule => g_currency_conversion_rule
10075: , x_prorating_format => g_prorating_format
10076: , x_global1_currency_code => g_global1_currency_code
10077: , x_global2_currency_code => g_global2_currency_code
11983: l_extract_etc VARCHAR2(1) := NULL; -- 4682341
11984:
11985: BEGIN
11986:
11987: PJI_PJP_FP_CURR_WRAP.INIT_ERR_STACK
11988: ( p_package_name => g_package_name
11989: , x_return_status => x_return_status );
11990:
11991: IF (p_extrn_type NOT IN ('FULL', 'INCREMENTAL', 'RBS', 'PARTIAL')) THEN
12485: -- DELETE PLAN LINES.
12486:
12487: EXCEPTION
12488: WHEN OTHERS THEN
12489: PJI_PJP_FP_CURR_WRAP.EXCP_HANDLER
12490: ( p_package_name => g_package_name
12491: , p_procedure_name => ' PROCESS_PENDING_PLAN_UPDATES '
12492: , x_return_status => x_return_status ) ;
12493:
14020: -- bug 6063826
14021:
14022: BEGIN -- this portion is executed WHENever the package is initialized
14023:
14024: g_worker_id := PJI_PJP_FP_CURR_WRAP.GET_WORKER_ID;
14025:
14026: END PJI_FM_PLAN_MAINT_PVT;