DBA Data[Home] [Help]

APPS.PA_FP_GEN_COMMITMENT_AMOUNTS dependencies on PA_DEBUG

Line 4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

1: PACKAGE body PA_FP_GEN_COMMITMENT_AMOUNTS as
2: /* $Header: PAFPGACB.pls 120.8.12020000.2 2013/05/23 07:32:41 bpottipa ship $ */
3:
4: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE GEN_COMMITMENT_AMOUNTS
7: (P_PROJECT_ID IN PA_PROJ_FP_OPTIONS.PROJECT_ID%TYPE,
8: P_BUDGET_VERSION_ID IN PA_BUDGET_VERSIONS.BUDGET_VERSION_ID%TYPE,

Line 301: IF p_pa_debug_mode = 'Y' THEN

297: /* hr_utility.trace('---BEGIN---'); */
298: X_MSG_COUNT := 0;
299: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
300:
301: IF p_pa_debug_mode = 'Y' THEN
302: pa_debug.set_curr_function( p_function => 'GEN_COMMITMENT_AMOUNTS'
303: ,p_debug_mode => p_pa_debug_mode);
304: END IF;
305:

Line 302: pa_debug.set_curr_function( p_function => 'GEN_COMMITMENT_AMOUNTS'

298: X_MSG_COUNT := 0;
299: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
300:
301: IF p_pa_debug_mode = 'Y' THEN
302: pa_debug.set_curr_function( p_function => 'GEN_COMMITMENT_AMOUNTS'
303: ,p_debug_mode => p_pa_debug_mode);
304: END IF;
305:
306: l_stru_sharing_code := PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(P_PROJECT_ID=> P_PROJECT_ID);

Line 303: ,p_debug_mode => p_pa_debug_mode);

299: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
300:
301: IF p_pa_debug_mode = 'Y' THEN
302: pa_debug.set_curr_function( p_function => 'GEN_COMMITMENT_AMOUNTS'
303: ,p_debug_mode => p_pa_debug_mode);
304: END IF;
305:
306: l_stru_sharing_code := PA_PROJECT_STRUCTURE_UTILS.get_Structure_sharing_code(P_PROJECT_ID=> P_PROJECT_ID);
307:

Line 413: IF P_PA_DEBUG_MODE = 'Y' THEN

409: AND NVL(CT.generation_error_flag,'N') = 'N'
410: AND ct.RESOURCE_CLASS = rc.RESOURCE_CLASS_CODE(+);
411: --dbms_output.put_line('l_TXN_SOURCE_ID_tab.count: '||l_TXN_SOURCE_ID_tab.count);
412: IF l_TXN_SOURCE_ID_tab.count = 0 THEN
413: IF P_PA_DEBUG_MODE = 'Y' THEN
414: PA_DEBUG.Reset_Curr_Function;
415: END IF;
416: RETURN;
417: END IF;

Line 414: PA_DEBUG.Reset_Curr_Function;

410: AND ct.RESOURCE_CLASS = rc.RESOURCE_CLASS_CODE(+);
411: --dbms_output.put_line('l_TXN_SOURCE_ID_tab.count: '||l_TXN_SOURCE_ID_tab.count);
412: IF l_TXN_SOURCE_ID_tab.count = 0 THEN
413: IF P_PA_DEBUG_MODE = 'Y' THEN
414: PA_DEBUG.Reset_Curr_Function;
415: END IF;
416: RETURN;
417: END IF;
418:

Line 440: IF P_PA_DEBUG_MODE = 'Y' THEN

436: l_TXN_WBS_ELEMENT_VER_ID_tab(bb):= null;
437: l_TXN_RBS_ELEMENT_ID_tab(bb) := null;
438: END LOOP;
439: --dbms_output.put_line('b4 calling MAP_RLMI_RBS api');
440: IF P_PA_DEBUG_MODE = 'Y' THEN
441: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
442: P_MSG => 'Before calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS',
443: P_MODULE_NAME => l_module_name);
444: END IF;

Line 496: IF P_PA_DEBUG_MODE = 'Y' THEN

492: X_TXN_ACCUM_HEADER_ID_TAB =>l_map_txn_accum_header_id_tab,
493: X_RETURN_STATUS => x_return_status,
494: X_MSG_COUNT => x_msg_count,
495: X_MSG_DATA => x_msg_data );
496: IF P_PA_DEBUG_MODE = 'Y' THEN
497: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
498: P_MSG => 'After calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS: '||
499: x_return_status,
500: P_MODULE_NAME => l_module_name);

Line 521: IF p_pa_debug_mode = 'Y' THEN

517: p_msg_name => 'PA_INVALID_MAPPING_ERR');
518: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
519: END IF;
520:
521: IF p_pa_debug_mode = 'Y' THEN
522: pa_fp_gen_amount_utils.fp_debug
523: (p_msg => 'Before calling pa_fp_gen_budget_amt_pub.create_res_asg',
524: p_module_name => l_module_name,
525: p_log_level => 5);

Line 544: IF p_pa_debug_mode = 'Y' THEN

540: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
541: END IF;
542:
543: --dbms_output.put_line('after calling PA_FP_GEN_BUDGET_AMT_PUB.CREATE_RES_ASG');
544: IF p_pa_debug_mode = 'Y' THEN
545: pa_fp_gen_amount_utils.fp_debug
546: (p_msg => 'Status after calling pa_fp_gen_budget_amt_pub.create_res_asg'
547: ||x_return_status,
548: p_module_name => l_module_name,

Line 552: IF p_pa_debug_mode = 'Y' THEN

548: p_module_name => l_module_name,
549: p_log_level => 5);
550: END IF;
551:
552: IF p_pa_debug_mode = 'Y' THEN
553: pa_fp_gen_amount_utils.fp_debug
554: (p_msg => 'Before calling pa_fp_gen_budget_amt_pub.update_res_asg',
555: p_module_name => l_module_name,
556: p_log_level => 5);

Line 573: IF p_pa_debug_mode = 'Y' THEN

569: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
570: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
571: END IF;
572: --dbms_output.put_line('after calling PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_RES_ASG');
573: IF p_pa_debug_mode = 'Y' THEN
574: pa_fp_gen_amount_utils.fp_debug
575: (p_msg => 'Status after calling pa_fp_gen_budget_amt_pub.update_res_asg'
576: ||x_return_status,
577: p_module_name => l_module_name,

Line 620: IF P_PA_DEBUG_MODE = 'Y' THEN

616: --dbms_output.put_line('closing cursor SUM_COMM_CRSR');
617: CLOSE SUM_COMM_CRSR;
618:
619: IF l_res_asg_id.count = 0 THEN
620: IF P_PA_DEBUG_MODE = 'Y' THEN
621: PA_DEBUG.Reset_Curr_Function;
622: END IF;
623: RETURN; -- added by dkuo 2005.04.13
624: END IF;

Line 621: PA_DEBUG.Reset_Curr_Function;

617: CLOSE SUM_COMM_CRSR;
618:
619: IF l_res_asg_id.count = 0 THEN
620: IF P_PA_DEBUG_MODE = 'Y' THEN
621: PA_DEBUG.Reset_Curr_Function;
622: END IF;
623: RETURN; -- added by dkuo 2005.04.13
624: END IF;
625:

Line 633: IF p_pa_debug_mode = 'Y' THEN

629: -- dates any time after the tmp4 table has been created and the
630: -- UPDATE_RES_ASG API has been called. Thus, we have moved the call
631: -- to SYNC_UP_PLANNING_DATES from the end of the API to here.
632:
633: IF p_pa_debug_mode = 'Y' THEN
634: pa_fp_gen_amount_utils.fp_debug
635: (p_msg => 'Before calling
636: pa_fp_maintain_actual_pub.sync_up_planning_dates',
637: p_module_name => l_module_name,

Line 646: IF p_pa_debug_mode = 'Y' THEN

642: P_CALLING_CONTEXT => 'GEN_COMMITMENTS',
643: X_RETURN_STATUS => x_return_Status,
644: X_MSG_COUNT => x_msg_count,
645: X_MSG_DATA => x_msg_data );
646: IF p_pa_debug_mode = 'Y' THEN
647: pa_fp_gen_amount_utils.fp_debug
648: (p_msg => 'Status after calling
649: pa_fp_maintain_actual_pub.sync_up_planning_dates'
650: ||x_return_status,

Line 1642: IF P_PA_DEBUG_MODE = 'Y' THEN

1638: IF l_fp_src_plan_ver_id IS NOT NULL AND
1639: l_gen_src_code IN ('FINANCIAL_PLAN','TASK_LEVEL_SEL') THEN
1640:
1641: -- Get Source Financial Plan Details
1642: IF P_PA_DEBUG_MODE = 'Y' THEN
1643: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1644: P_MSG => 'Before calling PA_FP_GEN_AMOUNT_UTILS.'||
1645: 'GET_PLAN_VERSION_DTL',
1646: P_MODULE_NAME => l_module_name,

Line 1656: IF P_PA_DEBUG_MODE = 'Y' THEN

1652: X_FP_COLS_REC => l_fp_cols_rec_src_finplan,
1653: X_RETURN_STATUS => x_return_status,
1654: X_MSG_COUNT => x_msg_count,
1655: X_MSG_DATA => x_msg_data);
1656: IF P_PA_DEBUG_MODE = 'Y' THEN
1657: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1658: P_MSG => 'After calling PA_FP_GEN_AMOUNT_UTILS.'||
1659: 'GET_PLAN_VERSION_DTL:'||x_return_status,
1660: P_MODULE_NAME => l_module_name,

Line 1675: IF P_PA_DEBUG_MODE = 'Y' THEN

1671:
1672: IF l_fp_cols_rec_src_finplan.x_version_type = 'ALL' THEN
1673:
1674: -- Get Planning Options Flag for Source Financial Plan
1675: IF P_PA_DEBUG_MODE = 'Y' THEN
1676: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1677: P_MSG => 'Before calling PA_FP_FCST_GEN_AMT_UTILS.'||
1678: 'COMPARE_ETC_SRC_TARGET_FP_OPT',
1679: P_MODULE_NAME => l_module_name,

Line 1691: IF P_PA_DEBUG_MODE = 'Y' THEN

1687: X_SAME_PLANNING_OPTION_FLAG => l_fp_planning_options_flag,
1688: X_RETURN_STATUS => X_RETURN_STATUS,
1689: X_MSG_COUNT => X_MSG_COUNT,
1690: X_MSG_DATA => X_MSG_DATA);
1691: IF P_PA_DEBUG_MODE = 'Y' THEN
1692: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1693: P_MSG => 'After calling PA_FP_FCST_GEN_AMT_UTILS.'||
1694: 'COMPARE_ETC_SRC_TARGET_FP_OPT:'||
1695: l_fp_planning_options_flag,

Line 1787: IF P_PA_DEBUG_MODE = 'Y' THEN

1783: -- Periodic Source Rates.
1784:
1785: FOR i IN 1..l_sr_src_ra_id_tab.count LOOP
1786:
1787: IF P_PA_DEBUG_MODE = 'Y' THEN
1788: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1789: P_MSG =>
1790: 'Before calling PA_FP_GEN_FCST_AMT_PUB1.POPULATE_GEN_RATE',
1791: P_MODULE_NAME => l_module_name,

Line 1801: IF P_PA_DEBUG_MODE = 'Y' THEN

1797: P_TXN_CURRENCY_CODE => l_sr_txn_currency_code_tab(i),
1798: X_RETURN_STATUS => x_return_status,
1799: X_MSG_COUNT => x_msg_count,
1800: X_MSG_DATA => x_msg_data);
1801: IF P_PA_DEBUG_MODE = 'Y' THEN
1802: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1803: P_MSG =>
1804: 'After calling PA_FP_GEN_FCST_AMT_PUB1.POPULATE_GEN_RATE: '||x_return_status,
1805: P_MODULE_NAME => l_module_name,

Line 1908: IF P_PA_DEBUG_MODE = 'Y' THEN

1904: END IF; -- None time phase check
1905:
1906: --hr_utility.trace('bef calling calculate api:'||x_return_status);
1907: --Calling the calculate API
1908: IF P_PA_DEBUG_MODE = 'Y' THEN
1909: pa_fp_gen_amount_utils.fp_debug
1910: (p_msg => 'Before calling
1911: PA_FP_CALC_PLAN_PKG.calculate',
1912: p_module_name => l_module_name,

Line 1943: IF P_PA_DEBUG_MODE = 'Y' THEN

1939: x_return_status => x_return_status,
1940: x_msg_count => x_msg_count,
1941: x_msg_data => x_msg_data);
1942: --hr_utility.trace('aft calling calculate api: '||x_return_status);
1943: IF P_PA_DEBUG_MODE = 'Y' THEN
1944: pa_fp_gen_amount_utils.fp_debug
1945: (p_msg => 'Status after calling
1946: PA_FP_CALC_PLAN_PKG.calculate: '
1947: ||x_return_status,

Line 1957: IF P_PA_DEBUG_MODE = 'Y' THEN

1953: END IF;
1954:
1955: END IF; -- l_calc_api_required_flag check
1956:
1957: IF P_PA_DEBUG_MODE = 'Y' THEN
1958: PA_DEBUG.Reset_Curr_Function;
1959: END IF;
1960:
1961: EXCEPTION

Line 1958: PA_DEBUG.Reset_Curr_Function;

1954:
1955: END IF; -- l_calc_api_required_flag check
1956:
1957: IF P_PA_DEBUG_MODE = 'Y' THEN
1958: PA_DEBUG.Reset_Curr_Function;
1959: END IF;
1960:
1961: EXCEPTION
1962: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1983: IF P_PA_DEBUG_MODE = 'Y' THEN

1979: ROLLBACK;
1980:
1981: x_return_status := FND_API.G_RET_STS_ERROR;
1982:
1983: IF P_PA_DEBUG_MODE = 'Y' THEN
1984: PA_DEBUG.Reset_Curr_Function;
1985: END IF;
1986:
1987: RAISE;

Line 1984: PA_DEBUG.Reset_Curr_Function;

1980:
1981: x_return_status := FND_API.G_RET_STS_ERROR;
1982:
1983: IF P_PA_DEBUG_MODE = 'Y' THEN
1984: PA_DEBUG.Reset_Curr_Function;
1985: END IF;
1986:
1987: RAISE;
1988:

Line 1996: IF P_PA_DEBUG_MODE = 'Y' THEN

1992: FND_MSG_PUB.add_exc_msg
1993: ( p_pkg_name => 'PA_FP_GEN_COMMITMENT_AMOUNTS'
1994: ,p_procedure_name => 'GEN_COMMITMENT_AMOUNTS');
1995:
1996: IF P_PA_DEBUG_MODE = 'Y' THEN
1997: PA_DEBUG.Reset_Curr_Function;
1998: END IF;
1999:
2000: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1997: PA_DEBUG.Reset_Curr_Function;

1993: ( p_pkg_name => 'PA_FP_GEN_COMMITMENT_AMOUNTS'
1994: ,p_procedure_name => 'GEN_COMMITMENT_AMOUNTS');
1995:
1996: IF P_PA_DEBUG_MODE = 'Y' THEN
1997: PA_DEBUG.Reset_Curr_Function;
1998: END IF;
1999:
2000: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2001: