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.7 2007/02/06 09:55:19 dthakker 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 300: IF p_pa_debug_mode = 'Y' THEN

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

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

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

Line 302: ,p_debug_mode => p_pa_debug_mode);

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

Line 410: IF P_PA_DEBUG_MODE = 'Y' THEN

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

Line 411: PA_DEBUG.Reset_Curr_Function;

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

Line 438: IF P_PA_DEBUG_MODE = 'Y' THEN

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

Line 492: IF P_PA_DEBUG_MODE = 'Y' THEN

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

Line 515: IF p_pa_debug_mode = 'Y' THEN

511: p_msg_name => 'PA_INVALID_MAPPING_ERR');
512: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
513: END IF;
514:
515: IF p_pa_debug_mode = 'Y' THEN
516: pa_fp_gen_amount_utils.fp_debug
517: (p_msg => 'Before calling pa_fp_gen_budget_amt_pub.create_res_asg',
518: p_module_name => l_module_name,
519: p_log_level => 5);

Line 536: IF p_pa_debug_mode = 'Y' THEN

532: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
533: END IF;
534:
535: --dbms_output.put_line('after calling PA_FP_GEN_BUDGET_AMT_PUB.CREATE_RES_ASG');
536: IF p_pa_debug_mode = 'Y' THEN
537: pa_fp_gen_amount_utils.fp_debug
538: (p_msg => 'Status after calling pa_fp_gen_budget_amt_pub.create_res_asg'
539: ||x_return_status,
540: p_module_name => l_module_name,

Line 544: IF p_pa_debug_mode = 'Y' THEN

540: p_module_name => l_module_name,
541: p_log_level => 5);
542: END IF;
543:
544: IF p_pa_debug_mode = 'Y' THEN
545: pa_fp_gen_amount_utils.fp_debug
546: (p_msg => 'Before calling pa_fp_gen_budget_amt_pub.update_res_asg',
547: p_module_name => l_module_name,
548: p_log_level => 5);

Line 565: IF p_pa_debug_mode = 'Y' THEN

561: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
562: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
563: END IF;
564: --dbms_output.put_line('after calling PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_RES_ASG');
565: IF p_pa_debug_mode = 'Y' THEN
566: pa_fp_gen_amount_utils.fp_debug
567: (p_msg => 'Status after calling pa_fp_gen_budget_amt_pub.update_res_asg'
568: ||x_return_status,
569: p_module_name => l_module_name,

Line 612: IF P_PA_DEBUG_MODE = 'Y' THEN

608: --dbms_output.put_line('closing cursor SUM_COMM_CRSR');
609: CLOSE SUM_COMM_CRSR;
610:
611: IF l_res_asg_id.count = 0 THEN
612: IF P_PA_DEBUG_MODE = 'Y' THEN
613: PA_DEBUG.Reset_Curr_Function;
614: END IF;
615: RETURN; -- added by dkuo 2005.04.13
616: END IF;

Line 613: PA_DEBUG.Reset_Curr_Function;

609: CLOSE SUM_COMM_CRSR;
610:
611: IF l_res_asg_id.count = 0 THEN
612: IF P_PA_DEBUG_MODE = 'Y' THEN
613: PA_DEBUG.Reset_Curr_Function;
614: END IF;
615: RETURN; -- added by dkuo 2005.04.13
616: END IF;
617:

Line 625: IF p_pa_debug_mode = 'Y' THEN

621: -- dates any time after the tmp4 table has been created and the
622: -- UPDATE_RES_ASG API has been called. Thus, we have moved the call
623: -- to SYNC_UP_PLANNING_DATES from the end of the API to here.
624:
625: IF p_pa_debug_mode = 'Y' THEN
626: pa_fp_gen_amount_utils.fp_debug
627: (p_msg => 'Before calling
628: pa_fp_maintain_actual_pub.sync_up_planning_dates',
629: p_module_name => l_module_name,

Line 638: IF p_pa_debug_mode = 'Y' THEN

634: P_CALLING_CONTEXT => 'GEN_COMMITMENTS',
635: X_RETURN_STATUS => x_return_Status,
636: X_MSG_COUNT => x_msg_count,
637: X_MSG_DATA => x_msg_data );
638: IF p_pa_debug_mode = 'Y' THEN
639: pa_fp_gen_amount_utils.fp_debug
640: (p_msg => 'Status after calling
641: pa_fp_maintain_actual_pub.sync_up_planning_dates'
642: ||x_return_status,

Line 1634: IF P_PA_DEBUG_MODE = 'Y' THEN

1630: IF l_fp_src_plan_ver_id IS NOT NULL AND
1631: l_gen_src_code IN ('FINANCIAL_PLAN','TASK_LEVEL_SEL') THEN
1632:
1633: -- Get Source Financial Plan Details
1634: IF P_PA_DEBUG_MODE = 'Y' THEN
1635: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1636: P_MSG => 'Before calling PA_FP_GEN_AMOUNT_UTILS.'||
1637: 'GET_PLAN_VERSION_DTL',
1638: P_MODULE_NAME => l_module_name,

Line 1648: IF P_PA_DEBUG_MODE = 'Y' THEN

1644: X_FP_COLS_REC => l_fp_cols_rec_src_finplan,
1645: X_RETURN_STATUS => x_return_status,
1646: X_MSG_COUNT => x_msg_count,
1647: X_MSG_DATA => x_msg_data);
1648: IF P_PA_DEBUG_MODE = 'Y' THEN
1649: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1650: P_MSG => 'After calling PA_FP_GEN_AMOUNT_UTILS.'||
1651: 'GET_PLAN_VERSION_DTL:'||x_return_status,
1652: P_MODULE_NAME => l_module_name,

Line 1667: IF P_PA_DEBUG_MODE = 'Y' THEN

1663:
1664: IF l_fp_cols_rec_src_finplan.x_version_type = 'ALL' THEN
1665:
1666: -- Get Planning Options Flag for Source Financial Plan
1667: IF P_PA_DEBUG_MODE = 'Y' THEN
1668: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1669: P_MSG => 'Before calling PA_FP_FCST_GEN_AMT_UTILS.'||
1670: 'COMPARE_ETC_SRC_TARGET_FP_OPT',
1671: P_MODULE_NAME => l_module_name,

Line 1683: IF P_PA_DEBUG_MODE = 'Y' THEN

1679: X_SAME_PLANNING_OPTION_FLAG => l_fp_planning_options_flag,
1680: X_RETURN_STATUS => X_RETURN_STATUS,
1681: X_MSG_COUNT => X_MSG_COUNT,
1682: X_MSG_DATA => X_MSG_DATA);
1683: IF P_PA_DEBUG_MODE = 'Y' THEN
1684: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1685: P_MSG => 'After calling PA_FP_FCST_GEN_AMT_UTILS.'||
1686: 'COMPARE_ETC_SRC_TARGET_FP_OPT:'||
1687: l_fp_planning_options_flag,

Line 1779: IF P_PA_DEBUG_MODE = 'Y' THEN

1775: -- Periodic Source Rates.
1776:
1777: FOR i IN 1..l_sr_src_ra_id_tab.count LOOP
1778:
1779: IF P_PA_DEBUG_MODE = 'Y' THEN
1780: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1781: P_MSG =>
1782: 'Before calling PA_FP_GEN_FCST_AMT_PUB1.POPULATE_GEN_RATE',
1783: P_MODULE_NAME => l_module_name,

Line 1793: IF P_PA_DEBUG_MODE = 'Y' THEN

1789: P_TXN_CURRENCY_CODE => l_sr_txn_currency_code_tab(i),
1790: X_RETURN_STATUS => x_return_status,
1791: X_MSG_COUNT => x_msg_count,
1792: X_MSG_DATA => x_msg_data);
1793: IF P_PA_DEBUG_MODE = 'Y' THEN
1794: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1795: P_MSG =>
1796: 'After calling PA_FP_GEN_FCST_AMT_PUB1.POPULATE_GEN_RATE: '||x_return_status,
1797: P_MODULE_NAME => l_module_name,

Line 1900: IF P_PA_DEBUG_MODE = 'Y' THEN

1896: END IF; -- None time phase check
1897:
1898: --hr_utility.trace('bef calling calculate api:'||x_return_status);
1899: --Calling the calculate API
1900: IF P_PA_DEBUG_MODE = 'Y' THEN
1901: pa_fp_gen_amount_utils.fp_debug
1902: (p_msg => 'Before calling
1903: PA_FP_CALC_PLAN_PKG.calculate',
1904: p_module_name => l_module_name,

Line 1935: IF P_PA_DEBUG_MODE = 'Y' THEN

1931: x_return_status => x_return_status,
1932: x_msg_count => x_msg_count,
1933: x_msg_data => x_msg_data);
1934: --hr_utility.trace('aft calling calculate api: '||x_return_status);
1935: IF P_PA_DEBUG_MODE = 'Y' THEN
1936: pa_fp_gen_amount_utils.fp_debug
1937: (p_msg => 'Status after calling
1938: PA_FP_CALC_PLAN_PKG.calculate: '
1939: ||x_return_status,

Line 1949: IF P_PA_DEBUG_MODE = 'Y' THEN

1945: END IF;
1946:
1947: END IF; -- l_calc_api_required_flag check
1948:
1949: IF P_PA_DEBUG_MODE = 'Y' THEN
1950: PA_DEBUG.Reset_Curr_Function;
1951: END IF;
1952:
1953: EXCEPTION

Line 1950: PA_DEBUG.Reset_Curr_Function;

1946:
1947: END IF; -- l_calc_api_required_flag check
1948:
1949: IF P_PA_DEBUG_MODE = 'Y' THEN
1950: PA_DEBUG.Reset_Curr_Function;
1951: END IF;
1952:
1953: EXCEPTION
1954: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1975: IF P_PA_DEBUG_MODE = 'Y' THEN

1971: ROLLBACK;
1972:
1973: x_return_status := FND_API.G_RET_STS_ERROR;
1974:
1975: IF P_PA_DEBUG_MODE = 'Y' THEN
1976: PA_DEBUG.Reset_Curr_Function;
1977: END IF;
1978:
1979: RAISE;

Line 1976: PA_DEBUG.Reset_Curr_Function;

1972:
1973: x_return_status := FND_API.G_RET_STS_ERROR;
1974:
1975: IF P_PA_DEBUG_MODE = 'Y' THEN
1976: PA_DEBUG.Reset_Curr_Function;
1977: END IF;
1978:
1979: RAISE;
1980:

Line 1988: IF P_PA_DEBUG_MODE = 'Y' THEN

1984: FND_MSG_PUB.add_exc_msg
1985: ( p_pkg_name => 'PA_FP_GEN_COMMITMENT_AMOUNTS'
1986: ,p_procedure_name => 'GEN_COMMITMENT_AMOUNTS');
1987:
1988: IF P_PA_DEBUG_MODE = 'Y' THEN
1989: PA_DEBUG.Reset_Curr_Function;
1990: END IF;
1991:
1992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1989: PA_DEBUG.Reset_Curr_Function;

1985: ( p_pkg_name => 'PA_FP_GEN_COMMITMENT_AMOUNTS'
1986: ,p_procedure_name => 'GEN_COMMITMENT_AMOUNTS');
1987:
1988: IF P_PA_DEBUG_MODE = 'Y' THEN
1989: PA_DEBUG.Reset_Curr_Function;
1990: END IF;
1991:
1992: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1993: