DBA Data[Home] [Help]

APPS.PA_FP_GEN_FCST_AMT_PUB1 dependencies on PA_FP_GEN_FCST_AMT_PUB1

Line 1: PACKAGE body PA_FP_GEN_FCST_AMT_PUB1 as

1: PACKAGE body PA_FP_GEN_FCST_AMT_PUB1 as
2: /* $Header: PAFPFG2B.pls 120.12.12020000.2 2013/05/17 09:39:40 bpottipa ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:

Line 34: l_package_name VARCHAR2(30) := 'PA_FP_GEN_FCST_AMT_PUB1';

30: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
31: X_MSG_COUNT OUT NOCOPY NUMBER,
32: X_MSG_DATA OUT NOCOPY VARCHAR2 )
33: IS
34: l_package_name VARCHAR2(30) := 'PA_FP_GEN_FCST_AMT_PUB1';
35: l_procedure_name VARCHAR2(30) := 'UPD_NRB_TXN_OVR_RATES';
36: l_module_name VARCHAR2(100);
37:
38: -- This cursor gets distinct (resource_assignment_id,txn_currency_code)

Line 490: l_package_name VARCHAR2(30) := 'PA_FP_GEN_FCST_AMT_PUB1';

486: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
487: X_MSG_COUNT OUT NOCOPY NUMBER,
488: X_MSG_DATA OUT NOCOPY VARCHAR2)
489: IS
490: l_package_name VARCHAR2(30) := 'PA_FP_GEN_FCST_AMT_PUB1';
491: l_procedure_name VARCHAR2(30) := 'POPULATE_GEN_RATE';
492: l_module_name VARCHAR2(100);
493:
494: CURSOR bl_rates_cur (c_res_asg_id PA_BUDGET_LINES.RESOURCE_ASSIGNMENT_ID%TYPE) IS

Line 629: l_module_name VARCHAR2(200) := 'pa.plsql.pa_fp_gen_fcst_amt_pub1.chk_upd_rate_based_flag';

625: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
626: X_MSG_COUNT OUT NOCOPY NUMBER,
627: X_MSG_DATA OUT NOCOPY VARCHAR2)
628: IS
629: l_module_name VARCHAR2(200) := 'pa.plsql.pa_fp_gen_fcst_amt_pub1.chk_upd_rate_based_flag';
630:
631: CURSOR get_res_asg_cur IS
632: SELECT /*+ INDEX(tmp,PA_FP_CALC_AMT_TMP1_N1)*/
633: DISTINCT(tmp.target_res_asg_id)

Line 721: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

717: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
718: x_msg_count := 1;
719: x_msg_data := substr(sqlerrm,1,240);
720: FND_MSG_PUB.ADD_EXC_MSG
721: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
722: p_procedure_name => 'CHK_UPD_RATE_BASED_FLAG',
723: p_error_text => substr(sqlerrm,1,240));
724:
725: IF p_pa_debug_mode = 'Y' THEN

Line 755: l_module_name VARCHAR2(200) := 'pa.plsql.pa_fp_gen_fcst_amt_pub1.call_summ_pop_tmps';

751: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
752: X_MSG_COUNT OUT NOCOPY NUMBER,
753: X_MSG_DATA OUT NOCOPY VARCHAR2)
754: IS
755: l_module_name VARCHAR2(200) := 'pa.plsql.pa_fp_gen_fcst_amt_pub1.call_summ_pop_tmps';
756: l_project_id_tab SYSTEM.pa_num_tbl_type:=SYSTEM.pa_num_tbl_type();
757: l_resource_list_id_tab SYSTEM.pa_num_tbl_type:=SYSTEM.pa_num_tbl_type();
758: l_struct_ver_id_tab SYSTEM.pa_num_tbl_type:=SYSTEM.pa_num_tbl_type();
759: l_calendar_type_tab SYSTEM.pa_varchar2_1_tbl_type := SYSTEM.pa_varchar2_1_tbl_type();

Line 992: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1'

988: WHEN OTHERS THEN
989: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
990: x_msg_data := SUBSTR(SQLERRM,1,240);
991: FND_MSG_PUB.add_exc_msg
992: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1'
993: ,p_procedure_name => 'CALL_SUMM_POP_TMPS');
994: IF P_PA_DEBUG_MODE = 'Y' THEN
995: pa_fp_gen_amount_utils.fp_debug
996: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),

Line 1017: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_AVERAGE_OF_ACTUALS_WRP';

1013: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
1014: X_MSG_COUNT OUT NOCOPY NUMBER,
1015: X_MSG_DATA OUT NOCOPY VARCHAR2)
1016: IS
1017: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_AVERAGE_OF_ACTUALS_WRP';
1018: l_task_id_flag VARCHAR2(1);
1019: CURSOR get_res_asg_cur(c_task_id_flag VARCHAR2) IS
1020: SELECT ra.resource_assignment_id,
1021: ra.resource_list_member_id,

Line 1467: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

1463: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1464: x_msg_count := 1;
1465: x_msg_data := substr(sqlerrm,1,240);
1466: FND_MSG_PUB.add_exc_msg
1467: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
1468: p_procedure_name => 'GEN_AVERAGE_OF_ACTUALS_WRP',
1469: p_error_text => substr(sqlerrm,1,240));
1470:
1471: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1498: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_REMAIN_BDGT_AMTS';

1494: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
1495: X_MSG_COUNT OUT NOCOPY NUMBER,
1496: X_MSG_DATA OUT NOCOPY VARCHAR2)
1497: IS
1498: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_REMAIN_BDGT_AMTS';
1499:
1500: l_currency_count_tot NUMBER;
1501: l_currency_count_act NUMBER;
1502: l_currency_code_tot PA_PROJECTS_ALL.PROJECT_CURRENCY_CODE%TYPE;

Line 1894: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

1890: x_msg_count := 1;
1891: x_msg_data := substr(sqlerrm,1,240);
1892: --dbms_output.put_line('error msg :'||x_msg_data);
1893: FND_MSG_PUB.add_exc_msg
1894: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
1895: p_procedure_name => 'GEN_ETC_REMAIN_BDGT_AMTS',
1896: p_error_text => substr(sqlerrm,1,240));
1897:
1898: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 1922: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_BDGT_COMPLETE_AMTS';

1918: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
1919: X_MSG_COUNT OUT NOCOPY NUMBER,
1920: X_MSG_DATA OUT NOCOPY VARCHAR2 )
1921: IS
1922: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_BDGT_COMPLETE_AMTS';
1923:
1924: l_currency_count_tot NUMBER;
1925: l_currency_count_bsl NUMBER;
1926: l_currency_code_tot PA_PROJECTS_ALL.PROJECT_CURRENCY_CODE%TYPE;

Line 2164: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

2160: x_msg_count := 1;
2161: x_msg_data := substr(sqlerrm,1,240);
2162: -- dbms_output.put_line('error msg :'||x_msg_data);
2163: FND_MSG_PUB.add_exc_msg
2164: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
2165: p_procedure_name => 'GEN_ETC_BDGT_COMPLETE_AMTS',
2166: p_error_text => substr(sqlerrm,1,240));
2167:
2168: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 2191: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_EARNED_VALUE_AMTS';

2187: X_MSG_COUNT OUT NOCOPY NUMBER,
2188: X_MSG_DATA OUT NOCOPY VARCHAR2
2189: )
2190: IS
2191: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_EARNED_VALUE_AMTS';
2192:
2193: l_txn_currency_count_act NUMBER;
2194: l_txn_currency_code_act PA_PROJECTS_ALL.PROJECT_CURRENCY_CODE%TYPE;
2195: l_txn_currency_count_tot NUMBER;

Line 2634: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

2630: x_msg_count := 1;
2631: x_msg_data := substr(sqlerrm,1,240);
2632: -- dbms_output.put_line('error msg :'||x_msg_data);
2633: FND_MSG_PUB.add_exc_msg
2634: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
2635: p_procedure_name => 'GEN_ETC_EARNED_VALUE_AMTS',
2636: p_error_text => substr(sqlerrm,1,240));
2637:
2638: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 2661: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_WORK_QTY_AMT';

2657: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
2658: X_MSG_COUNT OUT NOCOPY NUMBER,
2659: X_MSG_DATA OUT NOCOPY VARCHAR2)
2660: IS
2661: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_WORK_QTY_AMT';
2662:
2663: l_stru_sharing_code pa_projects_all.STRUCTURE_SHARING_CODE%TYPE;
2664:
2665: l_act_work_qty NUMBER :=0;

Line 3101: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

3097: x_msg_count := 1;
3098: x_msg_data := substr(sqlerrm,1,240);
3099: -- dbms_output.put_line('error msg :'||x_msg_data);
3100: FND_MSG_PUB.add_exc_msg
3101: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3102: p_procedure_name => 'GEN_ETC_WORK_QTY_AMTS',
3103: p_error_text => substr(sqlerrm,1,240));
3104:
3105: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 3124: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.NONE_ETC_SRC';

3120: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
3121: X_MSG_COUNT OUT NOCOPY NUMBER,
3122: X_MSG_DATA OUT NOCOPY VARCHAR2)
3123: IS
3124: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.NONE_ETC_SRC';
3125: l_task_start_date DATE;
3126: l_task_completion_date DATE;
3127: l_target_class_rlm_id NUMBER;
3128:

Line 3228: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

3224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3225: x_msg_count := 1;
3226: x_msg_data := substr(sqlerrm,1,240);
3227: FND_MSG_PUB.add_exc_msg
3228: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3229: p_procedure_name => 'NONE_ETC_SOURCE',
3230: p_error_text => substr(sqlerrm,1,240));
3231:
3232: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 3251: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1. MAINTAIN_BUDGET_VERSION';

3247: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
3248: X_MSG_COUNT OUT NOCOPY NUMBER,
3249: X_MSG_DATA OUT NOCOPY VARCHAR2 )
3250: IS
3251: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1. MAINTAIN_BUDGET_VERSION';
3252: l_fp_version_ids_tab SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type();
3253:
3254: l_msg_count NUMBER;
3255: l_msg_data VARCHAR2(2000);

Line 3660: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||

3656: IF P_CALL_MAINTAIN_DATA_API = 'Y' THEN
3657: -- Call the maintenance api in ROLLUP mode
3658: IF p_pa_debug_mode = 'Y' THEN
3659: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3660: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
3661: 'UPD_NRB_TXN_OVR_RATES',
3662: --P_CALLED_MODE => p_called_mode,
3663: P_MODULE_NAME => l_module_name);
3664: END IF;

Line 3665: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES

3661: 'UPD_NRB_TXN_OVR_RATES',
3662: --P_CALLED_MODE => p_called_mode,
3663: P_MODULE_NAME => l_module_name);
3664: END IF;
3665: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES
3666: (P_PROJECT_ID => P_PROJECT_ID,
3667: P_BUDGET_VERSION_ID => P_BUDGET_VERSION_ID,
3668: P_FP_COLS_REC => l_fp_cols_rec,
3669: P_ETC_START_DATE => P_ETC_START_DATE,

Line 3675: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||

3671: X_MSG_COUNT => X_MSG_COUNT,
3672: X_MSG_DATA => X_MSG_DATA);
3673: IF p_pa_debug_mode = 'Y' THEN
3674: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3675: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
3676: 'UPD_NRB_TXN_OVR_RATES: '||x_return_status,
3677: --P_CALLED_MODE => p_called_mode,
3678: P_MODULE_NAME => l_module_name);
3679: END IF;

Line 3921: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

3917: x_msg_count := 1;
3918: x_msg_data := substr(sqlerrm,1,240);
3919: -- dbms_output.put_line('error msg :'||x_msg_data);
3920: FND_MSG_PUB.add_exc_msg
3921: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3922: p_procedure_name => 'MAINTAIN_BUDGET_VERSION',
3923: p_error_text => substr(sqlerrm,1,240));
3924:
3925: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 4205: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GET_ACTUALS_FOR_RA';

4201: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
4202: X_MSG_COUNT OUT NOCOPY NUMBER,
4203: X_MSG_DATA OUT NOCOPY VARCHAR2 )
4204: IS
4205: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GET_ACTUALS_FOR_RA';
4206:
4207: l_wp_bdgt_ver_id pa_budget_versions.budget_version_id%type;
4208:
4209: l_txn_currency_code_tab PA_PLSQL_DATATYPES.Char30TabTyp;

Line 4346: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

4342: x_msg_count := 1;
4343: x_msg_data := substr(sqlerrm,1,240);
4344: -- dbms_output.put_line('error msg :'||x_msg_data);
4345: FND_MSG_PUB.add_exc_msg
4346: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
4347: p_procedure_name => 'GET_WP_ACTUALS_FOR_RA',
4348: p_error_text => substr(sqlerrm,1,240));
4349:
4350: IF P_PA_DEBUG_MODE = 'Y' THEN

Line 4687: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||

4683:
4684:
4685: IF p_pa_debug_mode = 'Y' THEN
4686: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4687: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
4688: 'UPD_NRB_TXN_OVR_RATES',
4689: --P_CALLED_MODE => p_called_mode,
4690: P_MODULE_NAME => l_module_name);
4691: END IF;

Line 4692: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES

4688: 'UPD_NRB_TXN_OVR_RATES',
4689: --P_CALLED_MODE => p_called_mode,
4690: P_MODULE_NAME => l_module_name);
4691: END IF;
4692: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES
4693: (P_PROJECT_ID => P_PROJECT_ID,
4694: P_BUDGET_VERSION_ID => P_BUDGET_VERSION_ID,
4695: P_FP_COLS_REC => l_fp_cols_rec,
4696: P_ETC_START_DATE => l_etc_start_date,

Line 4702: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||

4698: X_MSG_COUNT => X_MSG_COUNT,
4699: X_MSG_DATA => X_MSG_DATA);
4700: IF p_pa_debug_mode = 'Y' THEN
4701: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4702: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
4703: 'UPD_NRB_TXN_OVR_RATES: '||x_return_status,
4704: --P_CALLED_MODE => p_called_mode,
4705: P_MODULE_NAME => l_module_name);
4706: END IF;

Line 5809: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

5805: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5806: x_msg_count := 1;
5807: x_msg_data := substr(sqlerrm,1,240);
5808: FND_MSG_PUB.ADD_EXC_MSG
5809: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
5810: p_procedure_name => 'call_clnt_extn_and_update_bl',
5811: p_error_text => substr(sqlerrm,1,240));
5812:
5813: IF p_pa_debug_mode = 'Y' THEN

Line 5825: END PA_FP_GEN_FCST_AMT_PUB1;

5821:
5822: END call_clnt_extn_and_update_bl;
5823:
5824:
5825: END PA_FP_GEN_FCST_AMT_PUB1;