DBA Data[Home] [Help]

APPS.PA_FP_WP_GEN_BUDGET_AMT_PUB dependencies on PA_DEBUG

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

1: PACKAGE body PA_FP_WP_GEN_BUDGET_AMT_PUB as
2: /* $Header: PAFPWPGB.pls 120.17.12020000.2 2013/05/23 07:44:33 bpottipa ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: PROCEDURE GENERATE_WP_BUDGET_AMT
6: (P_PROJECT_ID IN PA_PROJ_FP_OPTIONS.PROJECT_ID%TYPE,
7: P_BUDGET_VERSION_ID IN PA_BUDGET_VERSIONS.BUDGET_VERSION_ID%TYPE,

Line 490: IF P_PA_DEBUG_MODE = 'Y' THEN

486: l_remove_record_flag_tab PA_PLSQL_DATATYPES.Char1TabTyp;
487: l_remove_records_flag VARCHAR2(1);
488:
489: BEGIN
490: IF P_PA_DEBUG_MODE = 'Y' THEN
491: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',
492: p_debug_mode => p_pa_debug_mode );
493: END IF;
494: --hr_utility.trace_on(null,'mftest');

Line 491: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',

487: l_remove_records_flag VARCHAR2(1);
488:
489: BEGIN
490: IF P_PA_DEBUG_MODE = 'Y' THEN
491: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',
492: p_debug_mode => p_pa_debug_mode );
493: END IF;
494: --hr_utility.trace_on(null,'mftest');
495: --hr_utility.trace('==BEGIN==');

Line 492: p_debug_mode => p_pa_debug_mode );

488:
489: BEGIN
490: IF P_PA_DEBUG_MODE = 'Y' THEN
491: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',
492: p_debug_mode => p_pa_debug_mode );
493: END IF;
494: --hr_utility.trace_on(null,'mftest');
495: --hr_utility.trace('==BEGIN==');
496:

Line 526: IF P_PA_DEBUG_MODE = 'Y' THEN

522: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
523: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
524: END IF;
525:
526: IF P_PA_DEBUG_MODE = 'Y' THEN
527: pa_fp_gen_amount_utils.fp_debug
528: ( p_called_mode => p_called_mode,
529: p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
530: p_module_name => l_module_name,

Line 541: IF P_PA_DEBUG_MODE = 'Y' THEN

537: X_FP_COLS_REC => l_fp_cols_rec_target,
538: X_RETURN_STATUS => x_return_status,
539: X_MSG_COUNT => x_msg_count,
540: X_MSG_DATA => x_msg_data );
541: IF P_PA_DEBUG_MODE = 'Y' THEN
542: pa_fp_gen_amount_utils.fp_debug
543: ( p_called_mode => p_called_mode,
544: p_msg => 'Status after calling
545: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '

Line 707: IF P_PA_DEBUG_MODE = 'Y' THEN

703: OR l_gen_src_plan_ver_code = 'ORIGINAL_BASELINED'
704: OR l_gen_src_plan_ver_code = 'CURRENT_APPROVED'
705: OR l_gen_src_plan_ver_code = 'ORIGINAL_APPROVED' THEN
706: /*Get the current baselined or original baselined version*/
707: IF P_PA_DEBUG_MODE = 'Y' THEN
708: pa_fp_gen_amount_utils.fp_debug
709: ( p_called_mode => p_called_mode,
710: p_msg => 'Before calling
711: pa_fp_gen_amount_utils.Get_Curr_Original_Version_Info',

Line 725: IF P_PA_DEBUG_MODE = 'Y' THEN

721: x_fin_plan_version_id => l_source_id,
722: x_return_status => x_return_status,
723: x_msg_count => x_msg_count,
724: x_msg_data => x_msg_data );
725: IF P_PA_DEBUG_MODE = 'Y' THEN
726: pa_fp_gen_amount_utils.fp_debug
727: ( p_called_mode => p_called_mode,
728: p_msg => 'Status after calling
729: pa_fp_gen_amount_utils.Get_Curr_Original_Version_Info'

Line 740: IF P_PA_DEBUG_MODE = 'Y' THEN

736: END IF;
737:
738: ELSIF l_gen_src_plan_ver_code = 'CURRENT_WORKING' THEN
739: /*Get the current working version*/
740: IF P_PA_DEBUG_MODE = 'Y' THEN
741: pa_fp_gen_amount_utils.fp_debug
742: ( p_called_mode => p_called_mode,
743: p_msg => 'Before calling
744: pa_fin_plan_utils.Get_Curr_Working_Version_Info',

Line 757: IF P_PA_DEBUG_MODE = 'Y' THEN

753: x_fin_plan_version_id => l_source_id,
754: x_return_status => x_return_status,
755: x_msg_count => x_msg_count,
756: x_msg_data => x_msg_data );
757: IF P_PA_DEBUG_MODE = 'Y' THEN
758: pa_fp_gen_amount_utils.fp_debug
759: ( p_called_mode => p_called_mode,
760: p_msg => 'Status after calling
761: pa_fin_plan_utils.Get_Curr_Working_Version_Info'

Line 807: IF P_PA_DEBUG_MODE = 'Y' THEN

803: END IF; -- context-based l_source_id, l_wp_id logic.
804:
805:
806: /*Calling the UTIL API to get the source info l_fp_cols_rec_source*/
807: IF P_PA_DEBUG_MODE = 'Y' THEN
808: pa_fp_gen_amount_utils.fp_debug
809: ( p_called_mode => p_called_mode,
810: p_msg => 'Before calling
811: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',

Line 822: IF P_PA_DEBUG_MODE = 'Y' THEN

818: X_FP_COLS_REC => l_fp_cols_rec_source,
819: X_RETURN_STATUS => x_return_status,
820: X_MSG_COUNT => x_msg_count,
821: X_MSG_DATA => x_msg_data );
822: IF P_PA_DEBUG_MODE = 'Y' THEN
823: pa_fp_gen_amount_utils.fp_debug
824: ( p_called_mode => p_called_mode,
825: p_msg => 'Status after calling
826: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '

Line 887: IF p_pa_debug_mode = 'Y' THEN

883: -- after calls to CREATE_RES_ASG and UPDATE_RES_ASG so that planning dates
884: -- from the source are honored when possible, since resources created by
885: -- the Copy Actuals API use task/project-level default dates.
886: IF l_calling_context = lc_ForecastGeneration THEN
887: IF p_pa_debug_mode = 'Y' THEN
888: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
889: P_CALLED_MODE => P_CALLED_MODE,
890: P_MSG => 'Before calling pa_fp_copy_actuals_pub.copy_actuals',
891: P_MODULE_NAME => l_module_name);

Line 903: IF p_pa_debug_mode = 'Y' THEN

899: P_COMMIT_FLAG => 'N',
900: X_RETURN_STATUS => X_RETURN_STATUS,
901: X_MSG_COUNT => X_MSG_COUNT,
902: X_MSG_DATA => X_MSG_DATA);
903: IF p_pa_debug_mode = 'Y' THEN
904: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
905: P_CALLED_MODE => P_CALLED_MODE,
906: P_MSG => 'After calling pa_fp_copy_actuals_pub.copy_actuals:'
907: ||x_return_status,

Line 986: IF P_PA_DEBUG_MODE = 'Y' THEN

982: l_CBS_ELEMENT_ID_tab --bug#16827157
983: FROM PA_RESOURCE_ASSIGNMENTS ra
984: WHERE ra.budget_version_id = l_source_id;
985: IF l_TXN_SOURCE_ID_tab.count = 0 THEN
986: IF P_PA_DEBUG_MODE = 'Y' THEN
987: PA_DEBUG.RESET_CURR_FUNCTION;
988: END IF;
989: RETURN;
990: END IF;

Line 987: PA_DEBUG.RESET_CURR_FUNCTION;

983: FROM PA_RESOURCE_ASSIGNMENTS ra
984: WHERE ra.budget_version_id = l_source_id;
985: IF l_TXN_SOURCE_ID_tab.count = 0 THEN
986: IF P_PA_DEBUG_MODE = 'Y' THEN
987: PA_DEBUG.RESET_CURR_FUNCTION;
988: END IF;
989: RETURN;
990: END IF;
991:

Line 998: IF P_PA_DEBUG_MODE = 'Y' THEN

994: l_EVENT_CLASSIFICATION_tab(j):= null;
995: l_SYS_LINK_FUNCTION_tab(j) := null;
996: END LOOP;
997:
998: IF P_PA_DEBUG_MODE = 'Y' THEN
999: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1000: P_MSG => 'Before calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS',
1001: P_MODULE_NAME => l_module_name);
1002: END IF;

Line 1056: IF P_PA_DEBUG_MODE = 'Y' THEN

1052: X_TXN_ACCUM_HEADER_ID_TAB =>l_map_txn_accum_header_id_tab,
1053: X_RETURN_STATUS => x_return_status,
1054: X_MSG_COUNT => x_msg_count,
1055: X_MSG_DATA => x_msg_data );
1056: IF P_PA_DEBUG_MODE = 'Y' THEN
1057: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1058: P_MSG => 'After calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS: '||
1059: x_return_status,
1060: P_MODULE_NAME => l_module_name);

Line 1074: IF P_PA_DEBUG_MODE = 'Y' THEN

1070: p_msg_name => 'PA_INVALID_MAPPING_ERR');
1071: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1072: END IF;
1073: --@@
1074: IF P_PA_DEBUG_MODE = 'Y' THEN
1075: tmp_rlm_tab.delete;
1076: select distinct resource_list_member_id,txn_task_id
1077: bulk collect into tmp_rlm_tab, tmp_task_tab
1078: from PA_RES_LIST_MAP_TMP4;

Line 1091: IF P_PA_DEBUG_MODE = 'Y' THEN

1087: --dbms_output.put_line('@@rlm in tmp4:'||tmp_rlm_tab(i));
1088: select 'Y' into tmp_flag from PA_RESource_list_members
1089: where resource_list_member_id = tmp_rlm_tab(i);
1090: --dbms_output.put_line('@@exist in rlm? '||tmp_flag);
1091: IF P_PA_DEBUG_MODE = 'Y' THEN
1092: pa_fp_gen_amount_utils.fp_debug
1093: (p_called_mode => p_called_mode,
1094: p_msg => 'after res mapping, @@rlm in tmp4:'||tmp_rlm_tab(i)||
1095: '@@exist in rlm?'||tmp_flag,

Line 1102: IF P_PA_DEBUG_MODE = 'Y' THEN

1098: END IF;
1099: exception
1100: when no_data_found then
1101: --dbms_output.put_line('@@exist in rlm? '||'N');
1102: IF P_PA_DEBUG_MODE = 'Y' THEN
1103: pa_fp_gen_amount_utils.fp_debug
1104: (p_called_mode => p_called_mode,
1105: p_msg => 'after res mapping, @@rlm in tmp4:'||tmp_rlm_tab(i)||
1106: '@@exist in rlm?'||'N',

Line 1201: IF P_PA_DEBUG_MODE = 'Y' THEN

1197: CBS_ELEMENT_ID--bug#16827157
1198: FROM PA_RESOURCE_ASSIGNMENTS ra
1199: WHERE ra.budget_version_id = l_source_id;
1200: IF sql%rowcount = 0 THEN
1201: IF P_PA_DEBUG_MODE = 'Y' THEN
1202: PA_DEBUG.RESET_CURR_FUNCTION;
1203: END IF;
1204: RETURN;
1205: END IF;

Line 1202: PA_DEBUG.RESET_CURR_FUNCTION;

1198: FROM PA_RESOURCE_ASSIGNMENTS ra
1199: WHERE ra.budget_version_id = l_source_id;
1200: IF sql%rowcount = 0 THEN
1201: IF P_PA_DEBUG_MODE = 'Y' THEN
1202: PA_DEBUG.RESET_CURR_FUNCTION;
1203: END IF;
1204: RETURN;
1205: END IF;
1206: END IF;

Line 1208: IF P_PA_DEBUG_MODE = 'Y' THEN

1204: RETURN;
1205: END IF;
1206: END IF;
1207:
1208: IF P_PA_DEBUG_MODE = 'Y' THEN
1209: pa_fp_gen_amount_utils.fp_debug
1210: ( p_called_mode => p_called_mode,
1211: p_msg => 'Before calling
1212: pa_fp_gen_budget_amt_pub.create_res_asg',

Line 1229: IF P_PA_DEBUG_MODE = 'Y' THEN

1225: X_MSG_DATA => x_msg_data );
1226:
1227: -- select count(*) into l_count1 from PA_RES_LIST_MAP_TMP4;
1228: -- dbms_output.put_line('after calling cre res asg api, tmp4 has: '||l_count1);
1229: IF P_PA_DEBUG_MODE = 'Y' THEN
1230: pa_fp_gen_amount_utils.fp_debug
1231: ( p_called_mode => p_called_mode,
1232: p_msg => 'Status after calling
1233: pa_fp_gen_budget_amt_pub.create_res_asg: '

Line 1242: IF P_PA_DEBUG_MODE = 'Y' THEN

1238: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1239: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1240: END IF;
1241: /*
1242: IF P_PA_DEBUG_MODE = 'Y' THEN
1243: tmp_rlm_tab.delete;
1244: tmp_task_tab.delete;
1245: tmp_ra_tab.delete;
1246: select resource_list_member_id, task_id, resource_assignment_id

Line 1272: IF P_PA_DEBUG_MODE = 'Y' THEN

1268: -- budget_version_id = p_budget_version_id;
1269: -- dbms_output.put_line('before calling upd res asg api: res assign has: '||l_count);
1270:
1271: /*Calling UPDATE_RES_ASG API to update resource_assignment_id in tmp4 for target budget version*/
1272: IF P_PA_DEBUG_MODE = 'Y' THEN
1273: pa_fp_gen_amount_utils.fp_debug
1274: ( p_called_mode => p_called_mode,
1275: p_msg => 'Before calling
1276: PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_RES_ASG',

Line 1298: IF P_PA_DEBUG_MODE = 'Y' THEN

1294:
1295: -- select count(*) into l_count from pa_resource_assignments where
1296: -- budget_version_id = p_budget_version_id;
1297: -- dbms_output.put_line('after calling upd res asg api: res assign has: '||l_count);
1298: IF P_PA_DEBUG_MODE = 'Y' THEN
1299: pa_fp_gen_amount_utils.fp_debug
1300: ( p_called_mode => p_called_mode,
1301: p_msg => 'Status after calling
1302: PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_RES_ASG: '

Line 1337: IF P_PA_DEBUG_MODE = 'Y' THEN

1333:
1334: END IF;
1335:
1336: /*
1337: IF P_PA_DEBUG_MODE = 'Y' THEN
1338: tmp_rlm_tab.delete;
1339: tmp_task_tab.delete;
1340: tmp_ra_tab.delete;
1341: select distinct resource_list_member_id,txn_task_id,txn_resource_assignment_id

Line 1435: IF P_PA_DEBUG_MODE = 'Y' THEN

1431: IF l_fp_cols_rec_source.X_TIME_PHASED_CODE =
1432: l_fp_cols_rec_target.X_TIME_PHASED_CODE
1433: THEN
1434: /*API to populating from Source budget lines table to Target budget lines table*/
1435: IF P_PA_DEBUG_MODE = 'Y' THEN
1436: pa_fp_gen_amount_utils.fp_debug
1437: ( p_called_mode => p_called_mode,
1438: p_msg => 'Before calling
1439: PA_FP_WP_GEN_BUDGET_AMT_PUB.MAINTAIN_BUDGET_LINES',

Line 1453: IF P_PA_DEBUG_MODE = 'Y' THEN

1449: P_RETAIN_MANUAL_FLAG => P_RETAIN_MANUAL_FLAG,
1450: X_RETURN_STATUS => x_return_Status,
1451: X_MSG_COUNT => x_msg_count,
1452: X_MSG_DATA => x_msg_data );
1453: IF P_PA_DEBUG_MODE = 'Y' THEN
1454: pa_fp_gen_amount_utils.fp_debug
1455: ( p_called_mode => p_called_mode,
1456: p_msg => 'Status after calling
1457: PA_FP_WP_GEN_BUDGET_AMT_PUB.MAINTAIN_BUDGET_LINES: '

Line 1473: IF P_PA_DEBUG_MODE = 'Y' THEN

1469:
1470: IF l_calling_context = lc_ForecastGeneration AND
1471: l_fp_cols_rec_target.x_version_type = 'REVENUE' AND
1472: l_rev_gen_method = 'T' THEN
1473: IF P_PA_DEBUG_MODE = 'Y' THEN
1474: PA_DEBUG.RESET_CURR_FUNCTION;
1475: END IF;
1476: RETURN;
1477: END IF;

Line 1474: PA_DEBUG.RESET_CURR_FUNCTION;

1470: IF l_calling_context = lc_ForecastGeneration AND
1471: l_fp_cols_rec_target.x_version_type = 'REVENUE' AND
1472: l_rev_gen_method = 'T' THEN
1473: IF P_PA_DEBUG_MODE = 'Y' THEN
1474: PA_DEBUG.RESET_CURR_FUNCTION;
1475: END IF;
1476: RETURN;
1477: END IF;
1478:

Line 1543: IF p_pa_debug_mode = 'Y' THEN

1539: /* Bug Fix (Internal testing): We need to sync up the planning dates
1540: * before leaving this flow since it is not handled by the forecast
1541: * generation flow, and is normally handled by the Calculate API in
1542: * the budget generation flow. */
1543: IF p_pa_debug_mode = 'Y' THEN
1544: pa_fp_gen_amount_utils.fp_debug
1545: ( p_msg => 'Before calling
1546: pa_fp_maintain_actual_pub.sync_up_planning_dates',
1547: p_module_name => l_module_name,

Line 1555: IF p_pa_debug_mode = 'Y' THEN

1551: ( P_BUDGET_VERSION_ID => p_budget_version_id,
1552: X_RETURN_STATUS => x_return_Status,
1553: X_MSG_COUNT => x_msg_count,
1554: X_MSG_DATA => x_msg_data );
1555: IF p_pa_debug_mode = 'Y' THEN
1556: pa_fp_gen_amount_utils.fp_debug
1557: ( p_msg => 'Status after calling
1558: pa_fp_maintain_actual_pub.sync_up_planning_dates'
1559: ||x_return_status,

Line 1564: IF P_PA_DEBUG_MODE = 'Y' THEN

1560: p_module_name => l_module_name,
1561: p_log_level => 5 );
1562: END IF;
1563:
1564: IF P_PA_DEBUG_MODE = 'Y' THEN
1565: PA_DEBUG.RESET_CURR_FUNCTION;
1566: END IF;
1567: RETURN;
1568: END IF; /*end bug: 3804791 and 3831190*/

Line 1565: PA_DEBUG.RESET_CURR_FUNCTION;

1561: p_log_level => 5 );
1562: END IF;
1563:
1564: IF P_PA_DEBUG_MODE = 'Y' THEN
1565: PA_DEBUG.RESET_CURR_FUNCTION;
1566: END IF;
1567: RETURN;
1568: END IF; /*end bug: 3804791 and 3831190*/
1569: /**times phases or res list for source and target are different**/

Line 1638: IF P_PA_DEBUG_MODE = 'Y' THEN

1634:
1635: /* API to get pro-rated amounts for the first source period, which may
1636: * be passed by during source data collection if the target's actual through
1637: * date falls between the start and end dates of the first source period. */
1638: IF P_PA_DEBUG_MODE = 'Y' THEN
1639: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1640: ( p_called_mode => p_called_mode,
1641: p_msg => 'Before calling ' ||
1642: 'PA_FP_GEN_PUB.PRORATE_UNALIGNED_PERIOD_AMTS',

Line 1662: IF P_PA_DEBUG_MODE = 'Y' THEN

1658: X_PROJ_REVENUE => l_prorated_proj_revenue,
1659: X_RETURN_STATUS => x_return_Status,
1660: X_MSG_COUNT => x_msg_count,
1661: X_MSG_DATA => x_msg_data );
1662: IF P_PA_DEBUG_MODE = 'Y' THEN
1663: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1664: ( p_called_mode => p_called_mode,
1665: p_msg => 'Status after calling ' ||
1666: 'PA_FP_GEN_PUB.PRORATE_UNALIGNED_PERIOD_AMTS: ' ||

Line 1881: IF P_PA_DEBUG_MODE = 'Y' THEN

1877: l_target_version_type = 'REVENUE' AND
1878: l_rev_gen_method = 'E' THEN
1879: /*Revenue is only based on billing events, which is handled seperately*/
1880: l_dummy := 1;
1881: IF P_PA_DEBUG_MODE = 'Y' THEN
1882: PA_DEBUG.RESET_CURR_FUNCTION;
1883: END IF;
1884: RETURN;
1885: ELSIF l_source_version_type = 'COST' AND

Line 1882: PA_DEBUG.RESET_CURR_FUNCTION;

1878: l_rev_gen_method = 'E' THEN
1879: /*Revenue is only based on billing events, which is handled seperately*/
1880: l_dummy := 1;
1881: IF P_PA_DEBUG_MODE = 'Y' THEN
1882: PA_DEBUG.RESET_CURR_FUNCTION;
1883: END IF;
1884: RETURN;
1885: ELSIF l_source_version_type = 'COST' AND
1886: l_target_version_type = 'ALL' AND

Line 1962: IF P_PA_DEBUG_MODE = 'Y' THEN

1958: l_target_version_type = 'REVENUE' AND
1959: l_rev_gen_method = 'C' THEN
1960: /*This is invalid operation, had been handled at the beginning of process*/
1961: l_dummy := 1;
1962: IF P_PA_DEBUG_MODE = 'Y' THEN
1963: PA_DEBUG.RESET_CURR_FUNCTION;
1964: END IF;
1965: RETURN;
1966: ELSIF l_source_version_type = 'REVENUE' AND

Line 1963: PA_DEBUG.RESET_CURR_FUNCTION;

1959: l_rev_gen_method = 'C' THEN
1960: /*This is invalid operation, had been handled at the beginning of process*/
1961: l_dummy := 1;
1962: IF P_PA_DEBUG_MODE = 'Y' THEN
1963: PA_DEBUG.RESET_CURR_FUNCTION;
1964: END IF;
1965: RETURN;
1966: ELSIF l_source_version_type = 'REVENUE' AND
1967: l_target_version_type = 'REVENUE' AND

Line 1971: IF P_PA_DEBUG_MODE = 'Y' THEN

1967: l_target_version_type = 'REVENUE' AND
1968: l_rev_gen_method = 'E' THEN
1969: /*Revenue is only based on billing events, which is handled seperately*/
1970: l_dummy := 1;
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: PA_DEBUG.RESET_CURR_FUNCTION;
1973: END IF;
1974: RETURN;
1975: ELSIF l_source_version_type = 'REVENUE' AND

Line 1972: PA_DEBUG.RESET_CURR_FUNCTION;

1968: l_rev_gen_method = 'E' THEN
1969: /*Revenue is only based on billing events, which is handled seperately*/
1970: l_dummy := 1;
1971: IF P_PA_DEBUG_MODE = 'Y' THEN
1972: PA_DEBUG.RESET_CURR_FUNCTION;
1973: END IF;
1974: RETURN;
1975: ELSIF l_source_version_type = 'REVENUE' AND
1976: l_target_version_type = 'ALL' AND

Line 1991: IF P_PA_DEBUG_MODE = 'Y' THEN

1987: l_target_version_type = 'ALL' AND
1988: l_rev_gen_method = 'C' THEN
1989: /*This is invalid operation, had been handled at the beginning of process*/
1990: l_dummy := 1;
1991: IF P_PA_DEBUG_MODE = 'Y' THEN
1992: PA_DEBUG.RESET_CURR_FUNCTION;
1993: END IF;
1994: RETURN;
1995: ELSIF l_source_version_type = 'REVENUE' AND

Line 1992: PA_DEBUG.RESET_CURR_FUNCTION;

1988: l_rev_gen_method = 'C' THEN
1989: /*This is invalid operation, had been handled at the beginning of process*/
1990: l_dummy := 1;
1991: IF P_PA_DEBUG_MODE = 'Y' THEN
1992: PA_DEBUG.RESET_CURR_FUNCTION;
1993: END IF;
1994: RETURN;
1995: ELSIF l_source_version_type = 'REVENUE' AND
1996: l_target_version_type = 'ALL' AND

Line 2072: IF P_PA_DEBUG_MODE = 'Y' THEN

2068: l_target_version_type = 'REVENUE' AND
2069: l_rev_gen_method = 'E' THEN
2070: /*Revenue is only based on billing events, which is handled seperately*/
2071: l_dummy := 1;
2072: IF P_PA_DEBUG_MODE = 'Y' THEN
2073: PA_DEBUG.RESET_CURR_FUNCTION;
2074: END IF;
2075: RETURN;
2076: ELSIF l_source_version_type = 'ALL' AND

Line 2073: PA_DEBUG.RESET_CURR_FUNCTION;

2069: l_rev_gen_method = 'E' THEN
2070: /*Revenue is only based on billing events, which is handled seperately*/
2071: l_dummy := 1;
2072: IF P_PA_DEBUG_MODE = 'Y' THEN
2073: PA_DEBUG.RESET_CURR_FUNCTION;
2074: END IF;
2075: RETURN;
2076: ELSIF l_source_version_type = 'ALL' AND
2077: l_target_version_type = 'ALL' AND

Line 2574: IF P_PA_DEBUG_MODE = 'Y' THEN

2570: VALUES(
2571: l_tgt_res_asg_id_tab(i),
2572: l_txn_currency_code_tab(i),
2573: l_src_quantity_tab(i));
2574: IF P_PA_DEBUG_MODE = 'Y' THEN
2575: PA_DEBUG.RESET_CURR_FUNCTION;
2576: END IF;
2577: RETURN;
2578: END IF;

Line 2575: PA_DEBUG.RESET_CURR_FUNCTION;

2571: l_tgt_res_asg_id_tab(i),
2572: l_txn_currency_code_tab(i),
2573: l_src_quantity_tab(i));
2574: IF P_PA_DEBUG_MODE = 'Y' THEN
2575: PA_DEBUG.RESET_CURR_FUNCTION;
2576: END IF;
2577: RETURN;
2578: END IF;
2579:

Line 2581: IF p_pa_debug_mode = 'Y' THEN

2577: RETURN;
2578: END IF;
2579:
2580: /* Get the api code for the Calculate API call. */
2581: IF p_pa_debug_mode = 'Y' THEN
2582: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2583: ( p_called_mode => p_called_mode,
2584: p_msg => 'Before calling ' ||
2585: 'PA_FP_WP_GEN_BUDGET_AMT_PUB.GET_CALC_API_FLAG_PARAMS',

Line 2598: IF p_pa_debug_mode = 'Y' THEN

2594: X_CALCULATE_API_CODE => l_calculate_api_code,
2595: X_RETURN_STATUS => x_return_status,
2596: X_MSG_COUNT => x_msg_count,
2597: X_MSG_DATA => x_msg_data );
2598: IF p_pa_debug_mode = 'Y' THEN
2599: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2600: ( p_called_mode => p_called_mode,
2601: p_msg => 'Status after calling ' ||
2602: 'PA_FP_WP_GEN_BUDGET_AMT_PUB.GET_CALC_API_FLAG_PARAMS: ' ||

Line 2645: IF P_PA_DEBUG_MODE = 'Y' THEN

2641: END IF; */
2642:
2643: --hr_utility.trace('bef calling calculate api:'||x_return_status);
2644: /*Calling the calculate API*/
2645: IF P_PA_DEBUG_MODE = 'Y' THEN
2646: pa_fp_gen_amount_utils.fp_debug
2647: (p_called_mode => p_called_mode,
2648: p_msg => 'Before calling
2649: PA_FP_CALC_PLAN_PKG.calculate',

Line 2690: IF P_PA_DEBUG_MODE = 'Y' THEN

2686: x_msg_count => x_msg_count,
2687: x_msg_data => x_msg_data);
2688: --hr_utility.trace('aft calling calculate api: '||x_return_status);
2689:
2690: IF P_PA_DEBUG_MODE = 'Y' THEN
2691: pa_fp_gen_amount_utils.fp_debug
2692: (p_called_mode => p_called_mode,
2693: p_msg => 'Status after calling
2694: PA_FP_CALC_PLAN_PKG.calculate: '

Line 2705: IF P_PA_DEBUG_MODE = 'Y' THEN

2701: END IF;
2702: IF p_commit_flag = 'Y' THEN
2703: COMMIT;
2704: END IF;
2705: IF P_PA_DEBUG_MODE = 'Y' THEN
2706: PA_DEBUG.RESET_CURR_FUNCTION;
2707: END IF;
2708: EXCEPTION
2709: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2706: PA_DEBUG.RESET_CURR_FUNCTION;

2702: IF p_commit_flag = 'Y' THEN
2703: COMMIT;
2704: END IF;
2705: IF P_PA_DEBUG_MODE = 'Y' THEN
2706: PA_DEBUG.RESET_CURR_FUNCTION;
2707: END IF;
2708: EXCEPTION
2709: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2710:

Line 2730: IF P_PA_DEBUG_MODE = 'Y' THEN

2726: ROLLBACK;
2727:
2728: x_return_status := FND_API.G_RET_STS_ERROR;
2729:
2730: IF P_PA_DEBUG_MODE = 'Y' THEN
2731: pa_fp_gen_amount_utils.fp_debug
2732: ( p_called_mode => p_called_mode,
2733: p_msg => 'Invalid Arguments Passed',
2734: p_module_name => l_module_name,

Line 2736: PA_DEBUG.RESET_CURR_FUNCTION;

2732: ( p_called_mode => p_called_mode,
2733: p_msg => 'Invalid Arguments Passed',
2734: p_module_name => l_module_name,
2735: p_log_level => 5 );
2736: PA_DEBUG.RESET_CURR_FUNCTION;
2737: END IF;
2738: RAISE;
2739:
2740: WHEN OTHERS THEN

Line 2750: IF P_PA_DEBUG_MODE = 'Y' THEN

2746: FND_MSG_PUB.add_exc_msg
2747: ( p_pkg_name => 'PA_FP_WP_GEN_BUDGET_AMT_PUB',
2748: p_procedure_name => 'GENERATE_WP_BUDGET_AMT',
2749: p_error_text => substr(sqlerrm,1,240));
2750: IF P_PA_DEBUG_MODE = 'Y' THEN
2751: pa_fp_gen_amount_utils.fp_debug
2752: ( p_called_mode => p_called_mode,
2753: p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2754: p_module_name => l_module_name,

Line 2756: PA_DEBUG.RESET_CURR_FUNCTION;

2752: ( p_called_mode => p_called_mode,
2753: p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2754: p_module_name => l_module_name,
2755: p_log_level => 5);
2756: PA_DEBUG.RESET_CURR_FUNCTION;
2757: END IF;
2758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2759:
2760: END GENERATE_WP_BUDGET_AMT;

Line 3453: IF P_PA_DEBUG_MODE = 'Y' THEN

3449: l_remove_record_flag_tab PA_PLSQL_DATATYPES.Char1TabTyp;
3450: l_remove_records_flag VARCHAR2(1);
3451:
3452: BEGIN
3453: IF P_PA_DEBUG_MODE = 'Y' THEN
3454: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',
3455: p_debug_mode => p_pa_debug_mode );
3456: END IF;
3457:

Line 3454: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',

3450: l_remove_records_flag VARCHAR2(1);
3451:
3452: BEGIN
3453: IF P_PA_DEBUG_MODE = 'Y' THEN
3454: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',
3455: p_debug_mode => p_pa_debug_mode );
3456: END IF;
3457:
3458: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3455: p_debug_mode => p_pa_debug_mode );

3451:
3452: BEGIN
3453: IF P_PA_DEBUG_MODE = 'Y' THEN
3454: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',
3455: p_debug_mode => p_pa_debug_mode );
3456: END IF;
3457:
3458: x_return_status := FND_API.G_RET_STS_SUCCESS;
3459: x_msg_count := 0;

Line 3475: IF P_PA_DEBUG_MODE = 'Y' THEN

3471: ELSE
3472: l_calling_context := lc_BudgetGeneration;
3473: END IF;
3474:
3475: IF P_PA_DEBUG_MODE = 'Y' THEN
3476: pa_fp_gen_amount_utils.fp_debug
3477: ( p_msg => 'Before calling
3478: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
3479: p_module_name => l_module_name,

Line 3489: IF P_PA_DEBUG_MODE = 'Y' THEN

3485: X_FP_COLS_REC => l_fp_cols_rec_source,
3486: X_RETURN_STATUS => x_return_status,
3487: X_MSG_COUNT => x_msg_count,
3488: X_MSG_DATA => x_msg_data );
3489: IF P_PA_DEBUG_MODE = 'Y' THEN
3490: pa_fp_gen_amount_utils.fp_debug
3491: ( p_msg => 'Status after calling
3492: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
3493: ||x_return_status,

Line 3501: IF P_PA_DEBUG_MODE = 'Y' THEN

3497: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3498: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3499: END IF;
3500:
3501: IF P_PA_DEBUG_MODE = 'Y' THEN
3502: pa_fp_gen_amount_utils.fp_debug
3503: ( p_msg => 'Before calling
3504: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
3505: p_module_name => l_module_name,

Line 3515: IF P_PA_DEBUG_MODE = 'Y' THEN

3511: X_FP_COLS_REC => l_fp_cols_rec_target,
3512: X_RETURN_STATUS => x_return_status,
3513: X_MSG_COUNT => x_msg_count,
3514: X_MSG_DATA => x_msg_data );
3515: IF P_PA_DEBUG_MODE = 'Y' THEN
3516: pa_fp_gen_amount_utils.fp_debug
3517: ( p_msg => 'Status after calling
3518: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
3519: ||x_return_status,

Line 3542: IF p_pa_debug_mode = 'Y' THEN

3538: ELSIF l_gen_src_code = lc_FinancialPlanSrcCode THEN
3539: l_fp_src_plan_ver_id := p_source_bv_id;
3540: END IF;
3541:
3542: IF p_pa_debug_mode = 'Y' THEN
3543: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
3544: ( p_msg => 'Before calling ' ||
3545: 'PA_FP_FCST_GEN_AMT_UTILS.COMPARE_ETC_SRC_TARGET_FP_OPT',
3546: p_module_name => l_module_name,

Line 3558: IF p_pa_debug_mode = 'Y' THEN

3554: X_SAME_PLANNING_OPTION_FLAG => l_same_planning_options_flag,
3555: X_RETURN_STATUS => x_return_status,
3556: X_MSG_COUNT => x_msg_count,
3557: X_MSG_DATA => x_msg_data );
3558: IF p_pa_debug_mode = 'Y' THEN
3559: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
3560: ( p_msg => 'Status after calling ' ||
3561: 'PA_FP_FCST_GEN_AMT_UTILS.COMPARE_ETC_SRC_TARGET_FP_OPT: ' ||
3562: x_return_status,

Line 3708: IF p_pa_debug_mode = 'Y' THEN

3704:
3705: IF l_fp_cols_rec_target.x_gen_ret_manual_line_flag = 'N' THEN
3706:
3707: -- Call the maintenance api in COPY mode
3708: IF p_pa_debug_mode = 'Y' THEN
3709: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3710: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3711: 'MAINTAIN_DATA',
3712: --P_CALLED_MODE => p_called_mode,

Line 3726: IF p_pa_debug_mode = 'Y' THEN

3722: --P_CALLED_MODE => p_called_mode,
3723: X_RETURN_STATUS => x_return_status,
3724: X_MSG_COUNT => x_msg_count,
3725: X_MSG_DATA => x_msg_data );
3726: IF p_pa_debug_mode = 'Y' THEN
3727: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3728: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3729: 'MAINTAIN_DATA: '||x_return_status,
3730: --P_CALLED_MODE => p_called_mode,

Line 3757: IF p_pa_debug_mode = 'Y' THEN

3753: SELECT DISTINCT txn_resource_assignment_id
3754: FROM pa_res_list_map_tmp4;
3755:
3756: -- Call the maintenance api in COPY mode
3757: IF p_pa_debug_mode = 'Y' THEN
3758: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3759: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3760: 'MAINTAIN_DATA',
3761: --P_CALLED_MODE => p_called_mode,

Line 3775: IF p_pa_debug_mode = 'Y' THEN

3771: --P_CALLED_MODE => p_called_mode,
3772: X_RETURN_STATUS => x_return_status,
3773: X_MSG_COUNT => x_msg_count,
3774: X_MSG_DATA => x_msg_data );
3775: IF p_pa_debug_mode = 'Y' THEN
3776: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3777: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3778: 'MAINTAIN_DATA: '||x_return_status,
3779: --P_CALLED_MODE => p_called_mode,

Line 3827: IF p_pa_debug_mode = 'Y' THEN

3823: l_count := SQL%ROWCOUNT;
3824:
3825: IF l_count > 0 THEN
3826: -- CALL the maintenance api in INSERT mode
3827: IF p_pa_debug_mode = 'Y' THEN
3828: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3829: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3830: 'MAINTAIN_DATA',
3831: --P_CALLED_MODE => p_called_mode,

Line 3843: IF p_pa_debug_mode = 'Y' THEN

3839: --P_CALLED_MODE => p_called_mode,
3840: X_RETURN_STATUS => x_return_status,
3841: X_MSG_COUNT => x_msg_count,
3842: X_MSG_DATA => x_msg_data );
3843: IF p_pa_debug_mode = 'Y' THEN
3844: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3845: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3846: 'MAINTAIN_DATA: '||x_return_status,
3847: --P_CALLED_MODE => p_called_mode,

Line 4053: IF P_PA_DEBUG_MODE = 'Y' THEN

4049: END IF; -- context-based data fetching
4050:
4051: -- Stop processing if no budget line data is fetched.
4052: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4053: IF P_PA_DEBUG_MODE = 'Y' THEN
4054: PA_DEBUG.RESET_CURR_FUNCTION;
4055: END IF;
4056: RETURN;
4057: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 4054: PA_DEBUG.RESET_CURR_FUNCTION;

4050:
4051: -- Stop processing if no budget line data is fetched.
4052: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4053: IF P_PA_DEBUG_MODE = 'Y' THEN
4054: PA_DEBUG.RESET_CURR_FUNCTION;
4055: END IF;
4056: RETURN;
4057: END IF; -- l_tgt_res_asg_id_tab.count <= 0
4058:

Line 4189: IF P_PA_DEBUG_MODE = 'Y' THEN

4185: l_markup_percent_tab := l_tmp_markup_percent_tab; -- Added for Bug 5166047
4186:
4187: -- Stop processing if no data remains (ie. all the tasks were non-billable).
4188: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4189: IF P_PA_DEBUG_MODE = 'Y' THEN
4190: PA_DEBUG.RESET_CURR_FUNCTION;
4191: END IF;
4192: RETURN;
4193: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 4190: PA_DEBUG.RESET_CURR_FUNCTION;

4186:
4187: -- Stop processing if no data remains (ie. all the tasks were non-billable).
4188: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4189: IF P_PA_DEBUG_MODE = 'Y' THEN
4190: PA_DEBUG.RESET_CURR_FUNCTION;
4191: END IF;
4192: RETURN;
4193: END IF; -- l_tgt_res_asg_id_tab.count <= 0
4194:

Line 4269: IF P_PA_DEBUG_MODE = 'Y' THEN

4265: l_target_version_type = 'REVENUE' AND
4266: l_rev_gen_method = 'E' THEN
4267: /*Revenue is only based on billing events, which is handled seperately*/
4268: l_dummy := 1;
4269: IF P_PA_DEBUG_MODE = 'Y' THEN
4270: PA_DEBUG.RESET_CURR_FUNCTION;
4271: END IF;
4272: RETURN;
4273: ELSIF l_source_version_type = 'COST' AND

Line 4270: PA_DEBUG.RESET_CURR_FUNCTION;

4266: l_rev_gen_method = 'E' THEN
4267: /*Revenue is only based on billing events, which is handled seperately*/
4268: l_dummy := 1;
4269: IF P_PA_DEBUG_MODE = 'Y' THEN
4270: PA_DEBUG.RESET_CURR_FUNCTION;
4271: END IF;
4272: RETURN;
4273: ELSIF l_source_version_type = 'COST' AND
4274: l_target_version_type = 'ALL' AND

Line 4357: IF P_PA_DEBUG_MODE = 'Y' THEN

4353: l_target_version_type = 'REVENUE' AND
4354: l_rev_gen_method = 'C' THEN
4355: /*This is invalid operation, had been handled at the beginning of process*/
4356: l_dummy := 1;
4357: IF P_PA_DEBUG_MODE = 'Y' THEN
4358: PA_DEBUG.RESET_CURR_FUNCTION;
4359: END IF;
4360: RETURN;
4361: ELSIF l_source_version_type = 'REVENUE' AND

Line 4358: PA_DEBUG.RESET_CURR_FUNCTION;

4354: l_rev_gen_method = 'C' THEN
4355: /*This is invalid operation, had been handled at the beginning of process*/
4356: l_dummy := 1;
4357: IF P_PA_DEBUG_MODE = 'Y' THEN
4358: PA_DEBUG.RESET_CURR_FUNCTION;
4359: END IF;
4360: RETURN;
4361: ELSIF l_source_version_type = 'REVENUE' AND
4362: l_target_version_type = 'REVENUE' AND

Line 4366: IF P_PA_DEBUG_MODE = 'Y' THEN

4362: l_target_version_type = 'REVENUE' AND
4363: l_rev_gen_method = 'E' THEN
4364: /*Revenue is only based on billing events, which is handled seperately*/
4365: l_dummy := 1;
4366: IF P_PA_DEBUG_MODE = 'Y' THEN
4367: PA_DEBUG.RESET_CURR_FUNCTION;
4368: END IF;
4369: RETURN;
4370: ELSIF l_source_version_type = 'REVENUE' AND

Line 4367: PA_DEBUG.RESET_CURR_FUNCTION;

4363: l_rev_gen_method = 'E' THEN
4364: /*Revenue is only based on billing events, which is handled seperately*/
4365: l_dummy := 1;
4366: IF P_PA_DEBUG_MODE = 'Y' THEN
4367: PA_DEBUG.RESET_CURR_FUNCTION;
4368: END IF;
4369: RETURN;
4370: ELSIF l_source_version_type = 'REVENUE' AND
4371: l_target_version_type = 'ALL' AND

Line 4388: IF P_PA_DEBUG_MODE = 'Y' THEN

4384: l_target_version_type = 'ALL' AND
4385: l_rev_gen_method = 'C' THEN
4386: /*This is invalid operation, had been handled at the beginning of process*/
4387: l_dummy := 1;
4388: IF P_PA_DEBUG_MODE = 'Y' THEN
4389: PA_DEBUG.RESET_CURR_FUNCTION;
4390: END IF;
4391: RETURN;
4392: ELSIF l_source_version_type = 'REVENUE' AND

Line 4389: PA_DEBUG.RESET_CURR_FUNCTION;

4385: l_rev_gen_method = 'C' THEN
4386: /*This is invalid operation, had been handled at the beginning of process*/
4387: l_dummy := 1;
4388: IF P_PA_DEBUG_MODE = 'Y' THEN
4389: PA_DEBUG.RESET_CURR_FUNCTION;
4390: END IF;
4391: RETURN;
4392: ELSIF l_source_version_type = 'REVENUE' AND
4393: l_target_version_type = 'ALL' AND

Line 4476: IF P_PA_DEBUG_MODE = 'Y' THEN

4472: l_target_version_type = 'REVENUE' AND
4473: l_rev_gen_method = 'E' THEN
4474: /*Revenue is only based on billing events, which is handled seperately*/
4475: l_dummy := 1;
4476: IF P_PA_DEBUG_MODE = 'Y' THEN
4477: PA_DEBUG.RESET_CURR_FUNCTION;
4478: END IF;
4479: RETURN;
4480: ELSIF l_source_version_type = 'ALL' AND

Line 4477: PA_DEBUG.RESET_CURR_FUNCTION;

4473: l_rev_gen_method = 'E' THEN
4474: /*Revenue is only based on billing events, which is handled seperately*/
4475: l_dummy := 1;
4476: IF P_PA_DEBUG_MODE = 'Y' THEN
4477: PA_DEBUG.RESET_CURR_FUNCTION;
4478: END IF;
4479: RETURN;
4480: ELSIF l_source_version_type = 'ALL' AND
4481: l_target_version_type = 'ALL' AND

Line 4825: IF P_PA_DEBUG_MODE = 'Y' THEN

4821: l_markup_percent_tab := l_tmp_markup_percent_tab; -- Added for Bug 5166047
4822:
4823: -- Stop processing if no data remains (ie. all records removed).
4824: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4825: IF P_PA_DEBUG_MODE = 'Y' THEN
4826: PA_DEBUG.RESET_CURR_FUNCTION;
4827: END IF;
4828: RETURN;
4829: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 4826: PA_DEBUG.RESET_CURR_FUNCTION;

4822:
4823: -- Stop processing if no data remains (ie. all records removed).
4824: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4825: IF P_PA_DEBUG_MODE = 'Y' THEN
4826: PA_DEBUG.RESET_CURR_FUNCTION;
4827: END IF;
4828: RETURN;
4829: END IF; -- l_tgt_res_asg_id_tab.count <= 0
4830:

Line 5066: IF P_PA_DEBUG_MODE = 'Y' THEN

5062: -- Note that l_tgt_res_asg_id_tab.count should be greater than 0
5063: -- at this point, since we checked this condition earlier. However,
5064: -- to be on the safe side, check once more to avoid unecessary work.
5065: IF l_tgt_res_asg_id_tab.count <= 0 THEN
5066: IF P_PA_DEBUG_MODE = 'Y' THEN
5067: PA_DEBUG.RESET_CURR_FUNCTION;
5068: END IF;
5069: RETURN;
5070: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 5067: PA_DEBUG.RESET_CURR_FUNCTION;

5063: -- at this point, since we checked this condition earlier. However,
5064: -- to be on the safe side, check once more to avoid unecessary work.
5065: IF l_tgt_res_asg_id_tab.count <= 0 THEN
5066: IF P_PA_DEBUG_MODE = 'Y' THEN
5067: PA_DEBUG.RESET_CURR_FUNCTION;
5068: END IF;
5069: RETURN;
5070: END IF; -- l_tgt_res_asg_id_tab.count <= 0
5071:

Line 5159: IF P_PA_DEBUG_MODE = 'Y' THEN

5155: -- processing ETC lines, which should not exist at this point.
5156: l_source_context := 'BUDGET_LINE';
5157:
5158: --Calling the calculate API
5159: IF P_PA_DEBUG_MODE = 'Y' THEN
5160: pa_fp_gen_amount_utils.fp_debug
5161: (p_msg => 'Before calling
5162: PA_FP_CALC_PLAN_PKG.calculate',
5163: p_module_name => l_module_name,

Line 5194: IF P_PA_DEBUG_MODE = 'Y' THEN

5190: x_return_status => x_return_status,
5191: x_msg_count => x_msg_count,
5192: x_msg_data => x_msg_data);
5193: --hr_utility.trace('aft calling calculate api: '||x_return_status);
5194: IF P_PA_DEBUG_MODE = 'Y' THEN
5195: pa_fp_gen_amount_utils.fp_debug
5196: (p_msg => 'Status after calling
5197: PA_FP_CALC_PLAN_PKG.calculate: '
5198: ||x_return_status,

Line 5206: IF P_PA_DEBUG_MODE = 'Y' THEN

5202: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5203: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5204: END IF;
5205:
5206: IF P_PA_DEBUG_MODE = 'Y' THEN
5207: PA_DEBUG.RESET_CURR_FUNCTION;
5208: END IF;
5209: RETURN;
5210: END IF; -- Work-based Revenue Forecast logic

Line 5207: PA_DEBUG.RESET_CURR_FUNCTION;

5203: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5204: END IF;
5205:
5206: IF P_PA_DEBUG_MODE = 'Y' THEN
5207: PA_DEBUG.RESET_CURR_FUNCTION;
5208: END IF;
5209: RETURN;
5210: END IF; -- Work-based Revenue Forecast logic
5211:

Line 5513: IF P_PA_DEBUG_MODE = 'Y' THEN

5509: l_cost_rate_override_tab(i),
5510: l_b_cost_rate_override_tab(i),
5511: '', /* bug 7693017 */
5512: l_markup_percent_tab(i)); /* Added for Bug 5166047 */
5513: IF P_PA_DEBUG_MODE = 'Y' THEN
5514: pa_fp_gen_amount_utils.fp_debug
5515: ( p_msg => 'After inserting into target budget lines',
5516: p_module_name => l_module_name,
5517: p_log_level => 5 );

Line 5562: IF p_pa_debug_mode = 'Y' THEN

5558: AND bl.resource_assignment_id = rbc.resource_assignment_id (+)
5559: AND bl.txn_currency_code = rbc.txn_currency_code (+);
5560:
5561: -- Call the maintenance api in ROLLUP mode
5562: IF p_pa_debug_mode = 'Y' THEN
5563: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5564: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
5565: 'MAINTAIN_DATA',
5566: --P_CALLED_MODE => p_called_mode,

Line 5578: IF p_pa_debug_mode = 'Y' THEN

5574: --P_CALLED_MODE => p_called_mode,
5575: X_RETURN_STATUS => x_return_status,
5576: X_MSG_COUNT => x_msg_count,
5577: X_MSG_DATA => x_msg_data );
5578: IF p_pa_debug_mode = 'Y' THEN
5579: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5580: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
5581: 'MAINTAIN_DATA: '||x_return_status,
5582: --P_CALLED_MODE => p_called_mode,

Line 5590: IF P_PA_DEBUG_MODE = 'Y' THEN

5586: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5587: END IF;
5588: -- END OF IPM: New Entity ER ------------------------------------------
5589:
5590: IF P_PA_DEBUG_MODE = 'Y' THEN
5591: PA_DEBUG.RESET_CURR_FUNCTION;
5592: END IF;
5593:
5594: EXCEPTION

Line 5591: PA_DEBUG.RESET_CURR_FUNCTION;

5587: END IF;
5588: -- END OF IPM: New Entity ER ------------------------------------------
5589:
5590: IF P_PA_DEBUG_MODE = 'Y' THEN
5591: PA_DEBUG.RESET_CURR_FUNCTION;
5592: END IF;
5593:
5594: EXCEPTION
5595: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 5614: IF P_PA_DEBUG_MODE = 'Y' THEN

5610:
5611: ROLLBACK;
5612:
5613: x_return_status := FND_API.G_RET_STS_ERROR;
5614: IF P_PA_DEBUG_MODE = 'Y' THEN
5615: pa_fp_gen_amount_utils.fp_debug
5616: ( p_msg => 'Invalid Arguments Passed',
5617: p_module_name => l_module_name,
5618: p_log_level => 5);

Line 5619: PA_DEBUG.RESET_CURR_FUNCTION;

5615: pa_fp_gen_amount_utils.fp_debug
5616: ( p_msg => 'Invalid Arguments Passed',
5617: p_module_name => l_module_name,
5618: p_log_level => 5);
5619: PA_DEBUG.RESET_CURR_FUNCTION;
5620: END IF;
5621: RAISE;
5622: WHEN OTHERS THEN
5623: rollback;

Line 5632: IF P_PA_DEBUG_MODE = 'Y' THEN

5628: ( p_pkg_name => 'PA_FP_WP_GEN_BUDGET_AMT_PUB',
5629: p_procedure_name => 'MAINTAIN_BUDGET_LINES',
5630: p_error_text => substr(sqlerrm,1,240) );
5631:
5632: IF P_PA_DEBUG_MODE = 'Y' THEN
5633: pa_fp_gen_amount_utils.fp_debug
5634: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5635: p_module_name => l_module_name,
5636: p_log_level => 5 );

Line 5637: PA_DEBUG.RESET_CURR_FUNCTION;

5633: pa_fp_gen_amount_utils.fp_debug
5634: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5635: p_module_name => l_module_name,
5636: p_log_level => 5 );
5637: PA_DEBUG.RESET_CURR_FUNCTION;
5638: END IF;
5639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5640:
5641: END MAINTAIN_BUDGET_LINES;

Line 5711: IF p_pa_debug_mode = 'Y' THEN

5707: BEGIN
5708: x_return_status := FND_API.G_RET_STS_SUCCESS;
5709: x_msg_count := 0;
5710:
5711: IF p_pa_debug_mode = 'Y' THEN
5712: PA_DEBUG.SET_CURR_FUNCTION
5713: ( p_function => 'GET_CALC_API_FLAG_PARAMS',
5714: p_debug_mode => p_pa_debug_mode );
5715: END IF;

Line 5712: PA_DEBUG.SET_CURR_FUNCTION

5708: x_return_status := FND_API.G_RET_STS_SUCCESS;
5709: x_msg_count := 0;
5710:
5711: IF p_pa_debug_mode = 'Y' THEN
5712: PA_DEBUG.SET_CURR_FUNCTION
5713: ( p_function => 'GET_CALC_API_FLAG_PARAMS',
5714: p_debug_mode => p_pa_debug_mode );
5715: END IF;
5716:

Line 5714: p_debug_mode => p_pa_debug_mode );

5710:
5711: IF p_pa_debug_mode = 'Y' THEN
5712: PA_DEBUG.SET_CURR_FUNCTION
5713: ( p_function => 'GET_CALC_API_FLAG_PARAMS',
5714: p_debug_mode => p_pa_debug_mode );
5715: END IF;
5716:
5717: /* Check that the input parameters are not null */
5718: IF p_project_id IS NULL THEN

Line 5852: IF p_pa_debug_mode = 'Y' THEN

5848: dbms_output.put_line(' l_refresh_conv_rates_flag:' || l_refresh_conv_rates_flag );
5849: dbms_output.put_line(' l_spread_required_flag:' || l_spread_required_flag );
5850: dbms_output.put_line(' l_conv_rates_required_flag:' || l_conv_rates_required_flag );
5851: dbms_output.put_line('inside calc api code api :' || x_calculate_api_code ); */
5852: IF p_pa_debug_mode = 'Y' THEN
5853: PA_DEBUG.RESET_CURR_FUNCTION;
5854: END IF;
5855: EXCEPTION
5856: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 5853: PA_DEBUG.RESET_CURR_FUNCTION;

5849: dbms_output.put_line(' l_spread_required_flag:' || l_spread_required_flag );
5850: dbms_output.put_line(' l_conv_rates_required_flag:' || l_conv_rates_required_flag );
5851: dbms_output.put_line('inside calc api code api :' || x_calculate_api_code ); */
5852: IF p_pa_debug_mode = 'Y' THEN
5853: PA_DEBUG.RESET_CURR_FUNCTION;
5854: END IF;
5855: EXCEPTION
5856: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5857: l_msg_count := FND_MSG_PUB.count_msg;

Line 5875: IF p_pa_debug_mode = 'Y' THEN

5871:
5872: ROLLBACK;
5873: x_return_status := FND_API.G_RET_STS_ERROR;
5874:
5875: IF p_pa_debug_mode = 'Y' THEN
5876: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5877: ( p_msg => 'Invalid Arguments Passed',
5878: p_module_name => l_module_name,
5879: p_log_level => 5 );

Line 5880: PA_DEBUG.RESET_CURR_FUNCTION;

5876: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5877: ( p_msg => 'Invalid Arguments Passed',
5878: p_module_name => l_module_name,
5879: p_log_level => 5 );
5880: PA_DEBUG.RESET_CURR_FUNCTION;
5881: END IF;
5882: RAISE;
5883: WHEN OTHERS THEN
5884: ROLLBACK;

Line 5893: IF p_pa_debug_mode = 'Y' THEN

5889: ( p_pkg_name => 'PA_FP_WP_GEN_BUDGET_AMT_PUB',
5890: p_procedure_name => 'GET_CALC_API_FLAG_PARAMS',
5891: p_error_text => substr(sqlerrm,1,240) );
5892:
5893: IF p_pa_debug_mode = 'Y' THEN
5894: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5895: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5896: p_module_name => l_module_name,
5897: p_log_level => 5 );

Line 5898: PA_DEBUG.RESET_CURR_FUNCTION;

5894: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5895: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5896: p_module_name => l_module_name,
5897: p_log_level => 5 );
5898: PA_DEBUG.RESET_CURR_FUNCTION;
5899: END IF;
5900: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5901:
5902: END GET_CALC_API_FLAG_PARAMS;