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.5.12010000.3 2008/09/30 01:10:02 asahoo 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 990: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1'

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

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

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

Line 1444: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

1440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1441: x_msg_count := 1;
1442: x_msg_data := substr(sqlerrm,1,240);
1443: FND_MSG_PUB.add_exc_msg
1444: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
1445: p_procedure_name => 'GEN_AVERAGE_OF_ACTUALS_WRP',
1446: p_error_text => substr(sqlerrm,1,240));
1447:
1448: IF P_PA_DEBUG_MODE = 'Y' THEN

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

1471: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
1472: X_MSG_COUNT OUT NOCOPY NUMBER,
1473: X_MSG_DATA OUT NOCOPY VARCHAR2)
1474: IS
1475: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_REMAIN_BDGT_AMTS';
1476:
1477: l_currency_count_tot NUMBER;
1478: l_currency_count_act NUMBER;
1479: l_currency_code_tot PA_PROJECTS_ALL.PROJECT_CURRENCY_CODE%TYPE;

Line 1871: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

1867: x_msg_count := 1;
1868: x_msg_data := substr(sqlerrm,1,240);
1869: --dbms_output.put_line('error msg :'||x_msg_data);
1870: FND_MSG_PUB.add_exc_msg
1871: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
1872: p_procedure_name => 'GEN_ETC_REMAIN_BDGT_AMTS',
1873: p_error_text => substr(sqlerrm,1,240));
1874:
1875: IF P_PA_DEBUG_MODE = 'Y' THEN

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

1895: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
1896: X_MSG_COUNT OUT NOCOPY NUMBER,
1897: X_MSG_DATA OUT NOCOPY VARCHAR2 )
1898: IS
1899: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_BDGT_COMPLETE_AMTS';
1900:
1901: l_currency_count_tot NUMBER;
1902: l_currency_count_bsl NUMBER;
1903: l_currency_code_tot PA_PROJECTS_ALL.PROJECT_CURRENCY_CODE%TYPE;

Line 2141: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

2137: x_msg_count := 1;
2138: x_msg_data := substr(sqlerrm,1,240);
2139: -- dbms_output.put_line('error msg :'||x_msg_data);
2140: FND_MSG_PUB.add_exc_msg
2141: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
2142: p_procedure_name => 'GEN_ETC_BDGT_COMPLETE_AMTS',
2143: p_error_text => substr(sqlerrm,1,240));
2144:
2145: IF P_PA_DEBUG_MODE = 'Y' THEN

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

2164: X_MSG_COUNT OUT NOCOPY NUMBER,
2165: X_MSG_DATA OUT NOCOPY VARCHAR2
2166: )
2167: IS
2168: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_EARNED_VALUE_AMTS';
2169:
2170: l_txn_currency_count_act NUMBER;
2171: l_txn_currency_code_act PA_PROJECTS_ALL.PROJECT_CURRENCY_CODE%TYPE;
2172: l_txn_currency_count_tot NUMBER;

Line 2611: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

2607: x_msg_count := 1;
2608: x_msg_data := substr(sqlerrm,1,240);
2609: -- dbms_output.put_line('error msg :'||x_msg_data);
2610: FND_MSG_PUB.add_exc_msg
2611: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
2612: p_procedure_name => 'GEN_ETC_EARNED_VALUE_AMTS',
2613: p_error_text => substr(sqlerrm,1,240));
2614:
2615: IF P_PA_DEBUG_MODE = 'Y' THEN

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

2634: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
2635: X_MSG_COUNT OUT NOCOPY NUMBER,
2636: X_MSG_DATA OUT NOCOPY VARCHAR2)
2637: IS
2638: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GEN_ETC_WORK_QTY_AMT';
2639:
2640: l_stru_sharing_code pa_projects_all.STRUCTURE_SHARING_CODE%TYPE;
2641:
2642: l_act_work_qty NUMBER :=0;

Line 3078: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

3074: x_msg_count := 1;
3075: x_msg_data := substr(sqlerrm,1,240);
3076: -- dbms_output.put_line('error msg :'||x_msg_data);
3077: FND_MSG_PUB.add_exc_msg
3078: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3079: p_procedure_name => 'GEN_ETC_WORK_QTY_AMTS',
3080: p_error_text => substr(sqlerrm,1,240));
3081:
3082: IF P_PA_DEBUG_MODE = 'Y' THEN

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

3097: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
3098: X_MSG_COUNT OUT NOCOPY NUMBER,
3099: X_MSG_DATA OUT NOCOPY VARCHAR2)
3100: IS
3101: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.NONE_ETC_SRC';
3102: l_task_start_date DATE;
3103: l_task_completion_date DATE;
3104: l_target_class_rlm_id NUMBER;
3105:

Line 3205: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

3201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3202: x_msg_count := 1;
3203: x_msg_data := substr(sqlerrm,1,240);
3204: FND_MSG_PUB.add_exc_msg
3205: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3206: p_procedure_name => 'NONE_ETC_SOURCE',
3207: p_error_text => substr(sqlerrm,1,240));
3208:
3209: IF P_PA_DEBUG_MODE = 'Y' THEN

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

3224: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
3225: X_MSG_COUNT OUT NOCOPY NUMBER,
3226: X_MSG_DATA OUT NOCOPY VARCHAR2 )
3227: IS
3228: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1. MAINTAIN_BUDGET_VERSION';
3229: l_fp_version_ids_tab SYSTEM.pa_num_tbl_type := SYSTEM.pa_num_tbl_type();
3230:
3231: l_msg_count NUMBER;
3232: l_msg_data VARCHAR2(2000);

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

3632: IF P_CALL_MAINTAIN_DATA_API = 'Y' THEN
3633: -- Call the maintenance api in ROLLUP mode
3634: IF p_pa_debug_mode = 'Y' THEN
3635: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3636: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
3637: 'UPD_NRB_TXN_OVR_RATES',
3638: --P_CALLED_MODE => p_called_mode,
3639: P_MODULE_NAME => l_module_name);
3640: END IF;

Line 3641: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES

3637: 'UPD_NRB_TXN_OVR_RATES',
3638: --P_CALLED_MODE => p_called_mode,
3639: P_MODULE_NAME => l_module_name);
3640: END IF;
3641: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES
3642: (P_PROJECT_ID => P_PROJECT_ID,
3643: P_BUDGET_VERSION_ID => P_BUDGET_VERSION_ID,
3644: P_FP_COLS_REC => l_fp_cols_rec,
3645: P_ETC_START_DATE => P_ETC_START_DATE,

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

3647: X_MSG_COUNT => X_MSG_COUNT,
3648: X_MSG_DATA => X_MSG_DATA);
3649: IF p_pa_debug_mode = 'Y' THEN
3650: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3651: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
3652: 'UPD_NRB_TXN_OVR_RATES: '||x_return_status,
3653: --P_CALLED_MODE => p_called_mode,
3654: P_MODULE_NAME => l_module_name);
3655: END IF;

Line 3897: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

3893: x_msg_count := 1;
3894: x_msg_data := substr(sqlerrm,1,240);
3895: -- dbms_output.put_line('error msg :'||x_msg_data);
3896: FND_MSG_PUB.add_exc_msg
3897: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
3898: p_procedure_name => 'MAINTAIN_BUDGET_VERSION',
3899: p_error_text => substr(sqlerrm,1,240));
3900:
3901: IF P_PA_DEBUG_MODE = 'Y' THEN

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

4177: X_RETURN_STATUS OUT NOCOPY VARCHAR2,
4178: X_MSG_COUNT OUT NOCOPY NUMBER,
4179: X_MSG_DATA OUT NOCOPY VARCHAR2 )
4180: IS
4181: l_module_name VARCHAR2(200) := 'pa.plsql.PA_FP_GEN_FCST_AMT_PUB1.GET_ACTUALS_FOR_RA';
4182:
4183: l_wp_bdgt_ver_id pa_budget_versions.budget_version_id%type;
4184:
4185: l_txn_currency_code_tab PA_PLSQL_DATATYPES.Char30TabTyp;

Line 4322: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

4318: x_msg_count := 1;
4319: x_msg_data := substr(sqlerrm,1,240);
4320: -- dbms_output.put_line('error msg :'||x_msg_data);
4321: FND_MSG_PUB.add_exc_msg
4322: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
4323: p_procedure_name => 'GET_WP_ACTUALS_FOR_RA',
4324: p_error_text => substr(sqlerrm,1,240));
4325:
4326: IF P_PA_DEBUG_MODE = 'Y' THEN

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

4659:
4660:
4661: IF p_pa_debug_mode = 'Y' THEN
4662: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4663: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
4664: 'UPD_NRB_TXN_OVR_RATES',
4665: --P_CALLED_MODE => p_called_mode,
4666: P_MODULE_NAME => l_module_name);
4667: END IF;

Line 4668: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES

4664: 'UPD_NRB_TXN_OVR_RATES',
4665: --P_CALLED_MODE => p_called_mode,
4666: P_MODULE_NAME => l_module_name);
4667: END IF;
4668: PA_FP_GEN_FCST_AMT_PUB1.UPD_NRB_TXN_OVR_RATES
4669: (P_PROJECT_ID => P_PROJECT_ID,
4670: P_BUDGET_VERSION_ID => P_BUDGET_VERSION_ID,
4671: P_FP_COLS_REC => l_fp_cols_rec,
4672: P_ETC_START_DATE => l_etc_start_date,

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

4674: X_MSG_COUNT => X_MSG_COUNT,
4675: X_MSG_DATA => X_MSG_DATA);
4676: IF p_pa_debug_mode = 'Y' THEN
4677: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
4678: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
4679: 'UPD_NRB_TXN_OVR_RATES: '||x_return_status,
4680: --P_CALLED_MODE => p_called_mode,
4681: P_MODULE_NAME => l_module_name);
4682: END IF;

Line 5705: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',

5701: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5702: x_msg_count := 1;
5703: x_msg_data := substr(sqlerrm,1,240);
5704: FND_MSG_PUB.ADD_EXC_MSG
5705: ( p_pkg_name => 'PA_FP_GEN_FCST_AMT_PUB1',
5706: p_procedure_name => 'call_clnt_extn_and_update_bl',
5707: p_error_text => substr(sqlerrm,1,240));
5708:
5709: IF p_pa_debug_mode = 'Y' THEN

Line 5721: END PA_FP_GEN_FCST_AMT_PUB1;

5717:
5718: END call_clnt_extn_and_update_bl;
5719:
5720:
5721: END PA_FP_GEN_FCST_AMT_PUB1;