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.13.12010000.3 2009/02/01 08:22:48 jsundara 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 454: IF P_PA_DEBUG_MODE = 'Y' THEN

450: l_remove_record_flag_tab PA_PLSQL_DATATYPES.Char1TabTyp;
451: l_remove_records_flag VARCHAR2(1);
452:
453: BEGIN
454: IF P_PA_DEBUG_MODE = 'Y' THEN
455: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',
456: p_debug_mode => p_pa_debug_mode );
457: END IF;
458: --hr_utility.trace_on(null,'mftest');

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

451: l_remove_records_flag VARCHAR2(1);
452:
453: BEGIN
454: IF P_PA_DEBUG_MODE = 'Y' THEN
455: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',
456: p_debug_mode => p_pa_debug_mode );
457: END IF;
458: --hr_utility.trace_on(null,'mftest');
459: --hr_utility.trace('==BEGIN==');

Line 456: p_debug_mode => p_pa_debug_mode );

452:
453: BEGIN
454: IF P_PA_DEBUG_MODE = 'Y' THEN
455: pa_debug.set_curr_function( p_function => 'GENERATE_WP_BUDGET_AMT',
456: p_debug_mode => p_pa_debug_mode );
457: END IF;
458: --hr_utility.trace_on(null,'mftest');
459: --hr_utility.trace('==BEGIN==');
460:

Line 490: IF P_PA_DEBUG_MODE = 'Y' THEN

486: p_msg_name => 'PA_FP_INV_PARAM_PASSED');
487: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
488: END IF;
489:
490: IF P_PA_DEBUG_MODE = 'Y' THEN
491: pa_fp_gen_amount_utils.fp_debug
492: ( p_called_mode => p_called_mode,
493: p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
494: p_module_name => l_module_name,

Line 505: IF P_PA_DEBUG_MODE = 'Y' THEN

501: X_FP_COLS_REC => l_fp_cols_rec_target,
502: X_RETURN_STATUS => x_return_status,
503: X_MSG_COUNT => x_msg_count,
504: X_MSG_DATA => x_msg_data );
505: IF P_PA_DEBUG_MODE = 'Y' THEN
506: pa_fp_gen_amount_utils.fp_debug
507: ( p_called_mode => p_called_mode,
508: p_msg => 'Status after calling
509: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '

Line 671: IF P_PA_DEBUG_MODE = 'Y' THEN

667: OR l_gen_src_plan_ver_code = 'ORIGINAL_BASELINED'
668: OR l_gen_src_plan_ver_code = 'CURRENT_APPROVED'
669: OR l_gen_src_plan_ver_code = 'ORIGINAL_APPROVED' THEN
670: /*Get the current baselined or original baselined version*/
671: IF P_PA_DEBUG_MODE = 'Y' THEN
672: pa_fp_gen_amount_utils.fp_debug
673: ( p_called_mode => p_called_mode,
674: p_msg => 'Before calling
675: pa_fp_gen_amount_utils.Get_Curr_Original_Version_Info',

Line 689: IF P_PA_DEBUG_MODE = 'Y' THEN

685: x_fin_plan_version_id => l_source_id,
686: x_return_status => x_return_status,
687: x_msg_count => x_msg_count,
688: x_msg_data => x_msg_data );
689: IF P_PA_DEBUG_MODE = 'Y' THEN
690: pa_fp_gen_amount_utils.fp_debug
691: ( p_called_mode => p_called_mode,
692: p_msg => 'Status after calling
693: pa_fp_gen_amount_utils.Get_Curr_Original_Version_Info'

Line 704: IF P_PA_DEBUG_MODE = 'Y' THEN

700: END IF;
701:
702: ELSIF l_gen_src_plan_ver_code = 'CURRENT_WORKING' THEN
703: /*Get the current working version*/
704: IF P_PA_DEBUG_MODE = 'Y' THEN
705: pa_fp_gen_amount_utils.fp_debug
706: ( p_called_mode => p_called_mode,
707: p_msg => 'Before calling
708: pa_fin_plan_utils.Get_Curr_Working_Version_Info',

Line 721: IF P_PA_DEBUG_MODE = 'Y' THEN

717: x_fin_plan_version_id => l_source_id,
718: x_return_status => x_return_status,
719: x_msg_count => x_msg_count,
720: x_msg_data => x_msg_data );
721: IF P_PA_DEBUG_MODE = 'Y' THEN
722: pa_fp_gen_amount_utils.fp_debug
723: ( p_called_mode => p_called_mode,
724: p_msg => 'Status after calling
725: pa_fin_plan_utils.Get_Curr_Working_Version_Info'

Line 771: IF P_PA_DEBUG_MODE = 'Y' THEN

767: END IF; -- context-based l_source_id, l_wp_id logic.
768:
769:
770: /*Calling the UTIL API to get the source info l_fp_cols_rec_source*/
771: IF P_PA_DEBUG_MODE = 'Y' THEN
772: pa_fp_gen_amount_utils.fp_debug
773: ( p_called_mode => p_called_mode,
774: p_msg => 'Before calling
775: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',

Line 786: IF P_PA_DEBUG_MODE = 'Y' THEN

782: X_FP_COLS_REC => l_fp_cols_rec_source,
783: X_RETURN_STATUS => x_return_status,
784: X_MSG_COUNT => x_msg_count,
785: X_MSG_DATA => x_msg_data );
786: IF P_PA_DEBUG_MODE = 'Y' THEN
787: pa_fp_gen_amount_utils.fp_debug
788: ( p_called_mode => p_called_mode,
789: p_msg => 'Status after calling
790: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '

Line 851: IF p_pa_debug_mode = 'Y' THEN

847: -- after calls to CREATE_RES_ASG and UPDATE_RES_ASG so that planning dates
848: -- from the source are honored when possible, since resources created by
849: -- the Copy Actuals API use task/project-level default dates.
850: IF l_calling_context = lc_ForecastGeneration THEN
851: IF p_pa_debug_mode = 'Y' THEN
852: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
853: P_CALLED_MODE => P_CALLED_MODE,
854: P_MSG => 'Before calling pa_fp_copy_actuals_pub.copy_actuals',
855: P_MODULE_NAME => l_module_name);

Line 867: IF p_pa_debug_mode = 'Y' THEN

863: P_COMMIT_FLAG => 'N',
864: X_RETURN_STATUS => X_RETURN_STATUS,
865: X_MSG_COUNT => X_MSG_COUNT,
866: X_MSG_DATA => X_MSG_DATA);
867: IF p_pa_debug_mode = 'Y' THEN
868: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
869: P_CALLED_MODE => P_CALLED_MODE,
870: P_MSG => 'After calling pa_fp_copy_actuals_pub.copy_actuals:'
871: ||x_return_status,

Line 948: IF P_PA_DEBUG_MODE = 'Y' THEN

944: l_VENDOR_ID_tab
945: FROM PA_RESOURCE_ASSIGNMENTS ra
946: WHERE ra.budget_version_id = l_source_id;
947: IF l_TXN_SOURCE_ID_tab.count = 0 THEN
948: IF P_PA_DEBUG_MODE = 'Y' THEN
949: PA_DEBUG.RESET_CURR_FUNCTION;
950: END IF;
951: RETURN;
952: END IF;

Line 949: PA_DEBUG.RESET_CURR_FUNCTION;

945: FROM PA_RESOURCE_ASSIGNMENTS ra
946: WHERE ra.budget_version_id = l_source_id;
947: IF l_TXN_SOURCE_ID_tab.count = 0 THEN
948: IF P_PA_DEBUG_MODE = 'Y' THEN
949: PA_DEBUG.RESET_CURR_FUNCTION;
950: END IF;
951: RETURN;
952: END IF;
953:

Line 960: IF P_PA_DEBUG_MODE = 'Y' THEN

956: l_EVENT_CLASSIFICATION_tab(j):= null;
957: l_SYS_LINK_FUNCTION_tab(j) := null;
958: END LOOP;
959:
960: IF P_PA_DEBUG_MODE = 'Y' THEN
961: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
962: P_MSG => 'Before calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS',
963: P_MODULE_NAME => l_module_name);
964: END IF;

Line 1017: IF P_PA_DEBUG_MODE = 'Y' THEN

1013: X_TXN_ACCUM_HEADER_ID_TAB =>l_map_txn_accum_header_id_tab,
1014: X_RETURN_STATUS => x_return_status,
1015: X_MSG_COUNT => x_msg_count,
1016: X_MSG_DATA => x_msg_data );
1017: IF P_PA_DEBUG_MODE = 'Y' THEN
1018: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1019: P_MSG => 'After calling PA_RLMI_RBS_MAP_PUB.MAP_RLMI_RBS: '||
1020: x_return_status,
1021: P_MODULE_NAME => l_module_name);

Line 1035: IF P_PA_DEBUG_MODE = 'Y' THEN

1031: p_msg_name => 'PA_INVALID_MAPPING_ERR');
1032: RAISE PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1033: END IF;
1034: --@@
1035: IF P_PA_DEBUG_MODE = 'Y' THEN
1036: tmp_rlm_tab.delete;
1037: select distinct resource_list_member_id,txn_task_id
1038: bulk collect into tmp_rlm_tab, tmp_task_tab
1039: from PA_RES_LIST_MAP_TMP4;

Line 1052: IF P_PA_DEBUG_MODE = 'Y' THEN

1048: --dbms_output.put_line('@@rlm in tmp4:'||tmp_rlm_tab(i));
1049: select 'Y' into tmp_flag from PA_RESource_list_members
1050: where resource_list_member_id = tmp_rlm_tab(i);
1051: --dbms_output.put_line('@@exist in rlm? '||tmp_flag);
1052: IF P_PA_DEBUG_MODE = 'Y' THEN
1053: pa_fp_gen_amount_utils.fp_debug
1054: (p_called_mode => p_called_mode,
1055: p_msg => 'after res mapping, @@rlm in tmp4:'||tmp_rlm_tab(i)||
1056: '@@exist in rlm?'||tmp_flag,

Line 1063: IF P_PA_DEBUG_MODE = 'Y' THEN

1059: END IF;
1060: exception
1061: when no_data_found then
1062: --dbms_output.put_line('@@exist in rlm? '||'N');
1063: IF P_PA_DEBUG_MODE = 'Y' THEN
1064: pa_fp_gen_amount_utils.fp_debug
1065: (p_called_mode => p_called_mode,
1066: p_msg => 'after res mapping, @@rlm in tmp4:'||tmp_rlm_tab(i)||
1067: '@@exist in rlm?'||'N',

Line 1159: IF P_PA_DEBUG_MODE = 'Y' THEN

1155: RESOURCE_LIST_MEMBER_ID
1156: FROM PA_RESOURCE_ASSIGNMENTS ra
1157: WHERE ra.budget_version_id = l_source_id;
1158: IF sql%rowcount = 0 THEN
1159: IF P_PA_DEBUG_MODE = 'Y' THEN
1160: PA_DEBUG.RESET_CURR_FUNCTION;
1161: END IF;
1162: RETURN;
1163: END IF;

Line 1160: PA_DEBUG.RESET_CURR_FUNCTION;

1156: FROM PA_RESOURCE_ASSIGNMENTS ra
1157: WHERE ra.budget_version_id = l_source_id;
1158: IF sql%rowcount = 0 THEN
1159: IF P_PA_DEBUG_MODE = 'Y' THEN
1160: PA_DEBUG.RESET_CURR_FUNCTION;
1161: END IF;
1162: RETURN;
1163: END IF;
1164: END IF;

Line 1166: IF P_PA_DEBUG_MODE = 'Y' THEN

1162: RETURN;
1163: END IF;
1164: END IF;
1165:
1166: IF P_PA_DEBUG_MODE = 'Y' THEN
1167: pa_fp_gen_amount_utils.fp_debug
1168: ( p_called_mode => p_called_mode,
1169: p_msg => 'Before calling
1170: pa_fp_gen_budget_amt_pub.create_res_asg',

Line 1187: IF P_PA_DEBUG_MODE = 'Y' THEN

1183: X_MSG_DATA => x_msg_data );
1184:
1185: -- select count(*) into l_count1 from PA_RES_LIST_MAP_TMP4;
1186: -- dbms_output.put_line('after calling cre res asg api, tmp4 has: '||l_count1);
1187: IF P_PA_DEBUG_MODE = 'Y' THEN
1188: pa_fp_gen_amount_utils.fp_debug
1189: ( p_called_mode => p_called_mode,
1190: p_msg => 'Status after calling
1191: pa_fp_gen_budget_amt_pub.create_res_asg: '

Line 1200: IF P_PA_DEBUG_MODE = 'Y' THEN

1196: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1197: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
1198: END IF;
1199: /*
1200: IF P_PA_DEBUG_MODE = 'Y' THEN
1201: tmp_rlm_tab.delete;
1202: tmp_task_tab.delete;
1203: tmp_ra_tab.delete;
1204: select resource_list_member_id, task_id, resource_assignment_id

Line 1230: IF P_PA_DEBUG_MODE = 'Y' THEN

1226: -- budget_version_id = p_budget_version_id;
1227: -- dbms_output.put_line('before calling upd res asg api: res assign has: '||l_count);
1228:
1229: /*Calling UPDATE_RES_ASG API to update resource_assignment_id in tmp4 for target budget version*/
1230: IF P_PA_DEBUG_MODE = 'Y' THEN
1231: pa_fp_gen_amount_utils.fp_debug
1232: ( p_called_mode => p_called_mode,
1233: p_msg => 'Before calling
1234: PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_RES_ASG',

Line 1256: IF P_PA_DEBUG_MODE = 'Y' THEN

1252:
1253: -- select count(*) into l_count from pa_resource_assignments where
1254: -- budget_version_id = p_budget_version_id;
1255: -- dbms_output.put_line('after calling upd res asg api: res assign has: '||l_count);
1256: IF P_PA_DEBUG_MODE = 'Y' THEN
1257: pa_fp_gen_amount_utils.fp_debug
1258: ( p_called_mode => p_called_mode,
1259: p_msg => 'Status after calling
1260: PA_FP_GEN_BUDGET_AMT_PUB.UPDATE_RES_ASG: '

Line 1295: IF P_PA_DEBUG_MODE = 'Y' THEN

1291:
1292: END IF;
1293:
1294: /*
1295: IF P_PA_DEBUG_MODE = 'Y' THEN
1296: tmp_rlm_tab.delete;
1297: tmp_task_tab.delete;
1298: tmp_ra_tab.delete;
1299: select distinct resource_list_member_id,txn_task_id,txn_resource_assignment_id

Line 1393: IF P_PA_DEBUG_MODE = 'Y' THEN

1389: IF l_fp_cols_rec_source.X_TIME_PHASED_CODE =
1390: l_fp_cols_rec_target.X_TIME_PHASED_CODE
1391: THEN
1392: /*API to populating from Source budget lines table to Target budget lines table*/
1393: IF P_PA_DEBUG_MODE = 'Y' THEN
1394: pa_fp_gen_amount_utils.fp_debug
1395: ( p_called_mode => p_called_mode,
1396: p_msg => 'Before calling
1397: PA_FP_WP_GEN_BUDGET_AMT_PUB.MAINTAIN_BUDGET_LINES',

Line 1411: IF P_PA_DEBUG_MODE = 'Y' THEN

1407: P_RETAIN_MANUAL_FLAG => P_RETAIN_MANUAL_FLAG,
1408: X_RETURN_STATUS => x_return_Status,
1409: X_MSG_COUNT => x_msg_count,
1410: X_MSG_DATA => x_msg_data );
1411: IF P_PA_DEBUG_MODE = 'Y' THEN
1412: pa_fp_gen_amount_utils.fp_debug
1413: ( p_called_mode => p_called_mode,
1414: p_msg => 'Status after calling
1415: PA_FP_WP_GEN_BUDGET_AMT_PUB.MAINTAIN_BUDGET_LINES: '

Line 1431: IF P_PA_DEBUG_MODE = 'Y' THEN

1427:
1428: IF l_calling_context = lc_ForecastGeneration AND
1429: l_fp_cols_rec_target.x_version_type = 'REVENUE' AND
1430: l_rev_gen_method = 'T' THEN
1431: IF P_PA_DEBUG_MODE = 'Y' THEN
1432: PA_DEBUG.RESET_CURR_FUNCTION;
1433: END IF;
1434: RETURN;
1435: END IF;

Line 1432: PA_DEBUG.RESET_CURR_FUNCTION;

1428: IF l_calling_context = lc_ForecastGeneration AND
1429: l_fp_cols_rec_target.x_version_type = 'REVENUE' AND
1430: l_rev_gen_method = 'T' THEN
1431: IF P_PA_DEBUG_MODE = 'Y' THEN
1432: PA_DEBUG.RESET_CURR_FUNCTION;
1433: END IF;
1434: RETURN;
1435: END IF;
1436:

Line 1501: IF p_pa_debug_mode = 'Y' THEN

1497: /* Bug Fix (Internal testing): We need to sync up the planning dates
1498: * before leaving this flow since it is not handled by the forecast
1499: * generation flow, and is normally handled by the Calculate API in
1500: * the budget generation flow. */
1501: IF p_pa_debug_mode = 'Y' THEN
1502: pa_fp_gen_amount_utils.fp_debug
1503: ( p_msg => 'Before calling
1504: pa_fp_maintain_actual_pub.sync_up_planning_dates',
1505: p_module_name => l_module_name,

Line 1513: IF p_pa_debug_mode = 'Y' THEN

1509: ( P_BUDGET_VERSION_ID => p_budget_version_id,
1510: X_RETURN_STATUS => x_return_Status,
1511: X_MSG_COUNT => x_msg_count,
1512: X_MSG_DATA => x_msg_data );
1513: IF p_pa_debug_mode = 'Y' THEN
1514: pa_fp_gen_amount_utils.fp_debug
1515: ( p_msg => 'Status after calling
1516: pa_fp_maintain_actual_pub.sync_up_planning_dates'
1517: ||x_return_status,

Line 1522: IF P_PA_DEBUG_MODE = 'Y' THEN

1518: p_module_name => l_module_name,
1519: p_log_level => 5 );
1520: END IF;
1521:
1522: IF P_PA_DEBUG_MODE = 'Y' THEN
1523: PA_DEBUG.RESET_CURR_FUNCTION;
1524: END IF;
1525: RETURN;
1526: END IF; /*end bug: 3804791 and 3831190*/

Line 1523: PA_DEBUG.RESET_CURR_FUNCTION;

1519: p_log_level => 5 );
1520: END IF;
1521:
1522: IF P_PA_DEBUG_MODE = 'Y' THEN
1523: PA_DEBUG.RESET_CURR_FUNCTION;
1524: END IF;
1525: RETURN;
1526: END IF; /*end bug: 3804791 and 3831190*/
1527: /**times phases or res list for source and target are different**/

Line 1596: IF P_PA_DEBUG_MODE = 'Y' THEN

1592:
1593: /* API to get pro-rated amounts for the first source period, which may
1594: * be passed by during source data collection if the target's actual through
1595: * date falls between the start and end dates of the first source period. */
1596: IF P_PA_DEBUG_MODE = 'Y' THEN
1597: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1598: ( p_called_mode => p_called_mode,
1599: p_msg => 'Before calling ' ||
1600: 'PA_FP_GEN_PUB.PRORATE_UNALIGNED_PERIOD_AMTS',

Line 1620: IF P_PA_DEBUG_MODE = 'Y' THEN

1616: X_PROJ_REVENUE => l_prorated_proj_revenue,
1617: X_RETURN_STATUS => x_return_Status,
1618: X_MSG_COUNT => x_msg_count,
1619: X_MSG_DATA => x_msg_data );
1620: IF P_PA_DEBUG_MODE = 'Y' THEN
1621: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1622: ( p_called_mode => p_called_mode,
1623: p_msg => 'Status after calling ' ||
1624: 'PA_FP_GEN_PUB.PRORATE_UNALIGNED_PERIOD_AMTS: ' ||

Line 1839: IF P_PA_DEBUG_MODE = 'Y' THEN

1835: l_target_version_type = 'REVENUE' AND
1836: l_rev_gen_method = 'E' THEN
1837: /*Revenue is only based on billing events, which is handled seperately*/
1838: l_dummy := 1;
1839: IF P_PA_DEBUG_MODE = 'Y' THEN
1840: PA_DEBUG.RESET_CURR_FUNCTION;
1841: END IF;
1842: RETURN;
1843: ELSIF l_source_version_type = 'COST' AND

Line 1840: PA_DEBUG.RESET_CURR_FUNCTION;

1836: l_rev_gen_method = 'E' THEN
1837: /*Revenue is only based on billing events, which is handled seperately*/
1838: l_dummy := 1;
1839: IF P_PA_DEBUG_MODE = 'Y' THEN
1840: PA_DEBUG.RESET_CURR_FUNCTION;
1841: END IF;
1842: RETURN;
1843: ELSIF l_source_version_type = 'COST' AND
1844: l_target_version_type = 'ALL' AND

Line 1920: IF P_PA_DEBUG_MODE = 'Y' THEN

1916: l_target_version_type = 'REVENUE' AND
1917: l_rev_gen_method = 'C' THEN
1918: /*This is invalid operation, had been handled at the beginning of process*/
1919: l_dummy := 1;
1920: IF P_PA_DEBUG_MODE = 'Y' THEN
1921: PA_DEBUG.RESET_CURR_FUNCTION;
1922: END IF;
1923: RETURN;
1924: ELSIF l_source_version_type = 'REVENUE' AND

Line 1921: PA_DEBUG.RESET_CURR_FUNCTION;

1917: l_rev_gen_method = 'C' THEN
1918: /*This is invalid operation, had been handled at the beginning of process*/
1919: l_dummy := 1;
1920: IF P_PA_DEBUG_MODE = 'Y' THEN
1921: PA_DEBUG.RESET_CURR_FUNCTION;
1922: END IF;
1923: RETURN;
1924: ELSIF l_source_version_type = 'REVENUE' AND
1925: l_target_version_type = 'REVENUE' AND

Line 1929: IF P_PA_DEBUG_MODE = 'Y' THEN

1925: l_target_version_type = 'REVENUE' AND
1926: l_rev_gen_method = 'E' THEN
1927: /*Revenue is only based on billing events, which is handled seperately*/
1928: l_dummy := 1;
1929: IF P_PA_DEBUG_MODE = 'Y' THEN
1930: PA_DEBUG.RESET_CURR_FUNCTION;
1931: END IF;
1932: RETURN;
1933: ELSIF l_source_version_type = 'REVENUE' AND

Line 1930: PA_DEBUG.RESET_CURR_FUNCTION;

1926: l_rev_gen_method = 'E' THEN
1927: /*Revenue is only based on billing events, which is handled seperately*/
1928: l_dummy := 1;
1929: IF P_PA_DEBUG_MODE = 'Y' THEN
1930: PA_DEBUG.RESET_CURR_FUNCTION;
1931: END IF;
1932: RETURN;
1933: ELSIF l_source_version_type = 'REVENUE' AND
1934: l_target_version_type = 'ALL' AND

Line 1949: IF P_PA_DEBUG_MODE = 'Y' THEN

1945: l_target_version_type = 'ALL' AND
1946: l_rev_gen_method = 'C' THEN
1947: /*This is invalid operation, had been handled at the beginning of process*/
1948: l_dummy := 1;
1949: IF P_PA_DEBUG_MODE = 'Y' THEN
1950: PA_DEBUG.RESET_CURR_FUNCTION;
1951: END IF;
1952: RETURN;
1953: ELSIF l_source_version_type = 'REVENUE' AND

Line 1950: PA_DEBUG.RESET_CURR_FUNCTION;

1946: l_rev_gen_method = 'C' THEN
1947: /*This is invalid operation, had been handled at the beginning of process*/
1948: l_dummy := 1;
1949: IF P_PA_DEBUG_MODE = 'Y' THEN
1950: PA_DEBUG.RESET_CURR_FUNCTION;
1951: END IF;
1952: RETURN;
1953: ELSIF l_source_version_type = 'REVENUE' AND
1954: l_target_version_type = 'ALL' AND

Line 2030: IF P_PA_DEBUG_MODE = 'Y' THEN

2026: l_target_version_type = 'REVENUE' AND
2027: l_rev_gen_method = 'E' THEN
2028: /*Revenue is only based on billing events, which is handled seperately*/
2029: l_dummy := 1;
2030: IF P_PA_DEBUG_MODE = 'Y' THEN
2031: PA_DEBUG.RESET_CURR_FUNCTION;
2032: END IF;
2033: RETURN;
2034: ELSIF l_source_version_type = 'ALL' AND

Line 2031: PA_DEBUG.RESET_CURR_FUNCTION;

2027: l_rev_gen_method = 'E' THEN
2028: /*Revenue is only based on billing events, which is handled seperately*/
2029: l_dummy := 1;
2030: IF P_PA_DEBUG_MODE = 'Y' THEN
2031: PA_DEBUG.RESET_CURR_FUNCTION;
2032: END IF;
2033: RETURN;
2034: ELSIF l_source_version_type = 'ALL' AND
2035: l_target_version_type = 'ALL' AND

Line 2532: IF P_PA_DEBUG_MODE = 'Y' THEN

2528: VALUES(
2529: l_tgt_res_asg_id_tab(i),
2530: l_txn_currency_code_tab(i),
2531: l_src_quantity_tab(i));
2532: IF P_PA_DEBUG_MODE = 'Y' THEN
2533: PA_DEBUG.RESET_CURR_FUNCTION;
2534: END IF;
2535: RETURN;
2536: END IF;

Line 2533: PA_DEBUG.RESET_CURR_FUNCTION;

2529: l_tgt_res_asg_id_tab(i),
2530: l_txn_currency_code_tab(i),
2531: l_src_quantity_tab(i));
2532: IF P_PA_DEBUG_MODE = 'Y' THEN
2533: PA_DEBUG.RESET_CURR_FUNCTION;
2534: END IF;
2535: RETURN;
2536: END IF;
2537:

Line 2539: IF p_pa_debug_mode = 'Y' THEN

2535: RETURN;
2536: END IF;
2537:
2538: /* Get the api code for the Calculate API call. */
2539: IF p_pa_debug_mode = 'Y' THEN
2540: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2541: ( p_called_mode => p_called_mode,
2542: p_msg => 'Before calling ' ||
2543: 'PA_FP_WP_GEN_BUDGET_AMT_PUB.GET_CALC_API_FLAG_PARAMS',

Line 2556: IF p_pa_debug_mode = 'Y' THEN

2552: X_CALCULATE_API_CODE => l_calculate_api_code,
2553: X_RETURN_STATUS => x_return_status,
2554: X_MSG_COUNT => x_msg_count,
2555: X_MSG_DATA => x_msg_data );
2556: IF p_pa_debug_mode = 'Y' THEN
2557: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
2558: ( p_called_mode => p_called_mode,
2559: p_msg => 'Status after calling ' ||
2560: 'PA_FP_WP_GEN_BUDGET_AMT_PUB.GET_CALC_API_FLAG_PARAMS: ' ||

Line 2603: IF P_PA_DEBUG_MODE = 'Y' THEN

2599: END IF; */
2600:
2601: --hr_utility.trace('bef calling calculate api:'||x_return_status);
2602: /*Calling the calculate API*/
2603: IF P_PA_DEBUG_MODE = 'Y' THEN
2604: pa_fp_gen_amount_utils.fp_debug
2605: (p_called_mode => p_called_mode,
2606: p_msg => 'Before calling
2607: PA_FP_CALC_PLAN_PKG.calculate',

Line 2648: IF P_PA_DEBUG_MODE = 'Y' THEN

2644: x_msg_count => x_msg_count,
2645: x_msg_data => x_msg_data);
2646: --hr_utility.trace('aft calling calculate api: '||x_return_status);
2647:
2648: IF P_PA_DEBUG_MODE = 'Y' THEN
2649: pa_fp_gen_amount_utils.fp_debug
2650: (p_called_mode => p_called_mode,
2651: p_msg => 'Status after calling
2652: PA_FP_CALC_PLAN_PKG.calculate: '

Line 2663: IF P_PA_DEBUG_MODE = 'Y' THEN

2659: END IF;
2660: IF p_commit_flag = 'Y' THEN
2661: COMMIT;
2662: END IF;
2663: IF P_PA_DEBUG_MODE = 'Y' THEN
2664: PA_DEBUG.RESET_CURR_FUNCTION;
2665: END IF;
2666: EXCEPTION
2667: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2664: PA_DEBUG.RESET_CURR_FUNCTION;

2660: IF p_commit_flag = 'Y' THEN
2661: COMMIT;
2662: END IF;
2663: IF P_PA_DEBUG_MODE = 'Y' THEN
2664: PA_DEBUG.RESET_CURR_FUNCTION;
2665: END IF;
2666: EXCEPTION
2667: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2668:

Line 2688: IF P_PA_DEBUG_MODE = 'Y' THEN

2684: ROLLBACK;
2685:
2686: x_return_status := FND_API.G_RET_STS_ERROR;
2687:
2688: IF P_PA_DEBUG_MODE = 'Y' THEN
2689: pa_fp_gen_amount_utils.fp_debug
2690: ( p_called_mode => p_called_mode,
2691: p_msg => 'Invalid Arguments Passed',
2692: p_module_name => l_module_name,

Line 2694: PA_DEBUG.RESET_CURR_FUNCTION;

2690: ( p_called_mode => p_called_mode,
2691: p_msg => 'Invalid Arguments Passed',
2692: p_module_name => l_module_name,
2693: p_log_level => 5 );
2694: PA_DEBUG.RESET_CURR_FUNCTION;
2695: END IF;
2696: RAISE;
2697:
2698: WHEN OTHERS THEN

Line 2708: IF P_PA_DEBUG_MODE = 'Y' THEN

2704: FND_MSG_PUB.add_exc_msg
2705: ( p_pkg_name => 'PA_FP_WP_GEN_BUDGET_AMT_PUB',
2706: p_procedure_name => 'GENERATE_WP_BUDGET_AMT',
2707: p_error_text => substr(sqlerrm,1,240));
2708: IF P_PA_DEBUG_MODE = 'Y' THEN
2709: pa_fp_gen_amount_utils.fp_debug
2710: ( p_called_mode => p_called_mode,
2711: p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2712: p_module_name => l_module_name,

Line 2714: PA_DEBUG.RESET_CURR_FUNCTION;

2710: ( p_called_mode => p_called_mode,
2711: p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
2712: p_module_name => l_module_name,
2713: p_log_level => 5);
2714: PA_DEBUG.RESET_CURR_FUNCTION;
2715: END IF;
2716: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2717:
2718: END GENERATE_WP_BUDGET_AMT;

Line 3375: IF P_PA_DEBUG_MODE = 'Y' THEN

3371: l_remove_record_flag_tab PA_PLSQL_DATATYPES.Char1TabTyp;
3372: l_remove_records_flag VARCHAR2(1);
3373:
3374: BEGIN
3375: IF P_PA_DEBUG_MODE = 'Y' THEN
3376: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',
3377: p_debug_mode => p_pa_debug_mode );
3378: END IF;
3379:

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

3372: l_remove_records_flag VARCHAR2(1);
3373:
3374: BEGIN
3375: IF P_PA_DEBUG_MODE = 'Y' THEN
3376: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',
3377: p_debug_mode => p_pa_debug_mode );
3378: END IF;
3379:
3380: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3377: p_debug_mode => p_pa_debug_mode );

3373:
3374: BEGIN
3375: IF P_PA_DEBUG_MODE = 'Y' THEN
3376: pa_debug.set_curr_function( p_function => 'MAINTAIN_BUDGET_LINES',
3377: p_debug_mode => p_pa_debug_mode );
3378: END IF;
3379:
3380: x_return_status := FND_API.G_RET_STS_SUCCESS;
3381: x_msg_count := 0;

Line 3397: IF P_PA_DEBUG_MODE = 'Y' THEN

3393: ELSE
3394: l_calling_context := lc_BudgetGeneration;
3395: END IF;
3396:
3397: IF P_PA_DEBUG_MODE = 'Y' THEN
3398: pa_fp_gen_amount_utils.fp_debug
3399: ( p_msg => 'Before calling
3400: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
3401: p_module_name => l_module_name,

Line 3411: IF P_PA_DEBUG_MODE = 'Y' THEN

3407: X_FP_COLS_REC => l_fp_cols_rec_source,
3408: X_RETURN_STATUS => x_return_status,
3409: X_MSG_COUNT => x_msg_count,
3410: X_MSG_DATA => x_msg_data );
3411: IF P_PA_DEBUG_MODE = 'Y' THEN
3412: pa_fp_gen_amount_utils.fp_debug
3413: ( p_msg => 'Status after calling
3414: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
3415: ||x_return_status,

Line 3423: IF P_PA_DEBUG_MODE = 'Y' THEN

3419: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3420: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
3421: END IF;
3422:
3423: IF P_PA_DEBUG_MODE = 'Y' THEN
3424: pa_fp_gen_amount_utils.fp_debug
3425: ( p_msg => 'Before calling
3426: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS',
3427: p_module_name => l_module_name,

Line 3437: IF P_PA_DEBUG_MODE = 'Y' THEN

3433: X_FP_COLS_REC => l_fp_cols_rec_target,
3434: X_RETURN_STATUS => x_return_status,
3435: X_MSG_COUNT => x_msg_count,
3436: X_MSG_DATA => x_msg_data );
3437: IF P_PA_DEBUG_MODE = 'Y' THEN
3438: pa_fp_gen_amount_utils.fp_debug
3439: ( p_msg => 'Status after calling
3440: PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS: '
3441: ||x_return_status,

Line 3464: IF p_pa_debug_mode = 'Y' THEN

3460: ELSIF l_gen_src_code = lc_FinancialPlanSrcCode THEN
3461: l_fp_src_plan_ver_id := p_source_bv_id;
3462: END IF;
3463:
3464: IF p_pa_debug_mode = 'Y' THEN
3465: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
3466: ( p_msg => 'Before calling ' ||
3467: 'PA_FP_FCST_GEN_AMT_UTILS.COMPARE_ETC_SRC_TARGET_FP_OPT',
3468: p_module_name => l_module_name,

Line 3480: IF p_pa_debug_mode = 'Y' THEN

3476: X_SAME_PLANNING_OPTION_FLAG => l_same_planning_options_flag,
3477: X_RETURN_STATUS => x_return_status,
3478: X_MSG_COUNT => x_msg_count,
3479: X_MSG_DATA => x_msg_data );
3480: IF p_pa_debug_mode = 'Y' THEN
3481: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
3482: ( p_msg => 'Status after calling ' ||
3483: 'PA_FP_FCST_GEN_AMT_UTILS.COMPARE_ETC_SRC_TARGET_FP_OPT: ' ||
3484: x_return_status,

Line 3630: IF p_pa_debug_mode = 'Y' THEN

3626:
3627: IF l_fp_cols_rec_target.x_gen_ret_manual_line_flag = 'N' THEN
3628:
3629: -- Call the maintenance api in COPY mode
3630: IF p_pa_debug_mode = 'Y' THEN
3631: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3632: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3633: 'MAINTAIN_DATA',
3634: --P_CALLED_MODE => p_called_mode,

Line 3648: IF p_pa_debug_mode = 'Y' THEN

3644: --P_CALLED_MODE => p_called_mode,
3645: X_RETURN_STATUS => x_return_status,
3646: X_MSG_COUNT => x_msg_count,
3647: X_MSG_DATA => x_msg_data );
3648: IF p_pa_debug_mode = 'Y' THEN
3649: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3650: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3651: 'MAINTAIN_DATA: '||x_return_status,
3652: --P_CALLED_MODE => p_called_mode,

Line 3679: IF p_pa_debug_mode = 'Y' THEN

3675: SELECT DISTINCT txn_resource_assignment_id
3676: FROM pa_res_list_map_tmp4;
3677:
3678: -- Call the maintenance api in COPY mode
3679: IF p_pa_debug_mode = 'Y' THEN
3680: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3681: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3682: 'MAINTAIN_DATA',
3683: --P_CALLED_MODE => p_called_mode,

Line 3697: IF p_pa_debug_mode = 'Y' THEN

3693: --P_CALLED_MODE => p_called_mode,
3694: X_RETURN_STATUS => x_return_status,
3695: X_MSG_COUNT => x_msg_count,
3696: X_MSG_DATA => x_msg_data );
3697: IF p_pa_debug_mode = 'Y' THEN
3698: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3699: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3700: 'MAINTAIN_DATA: '||x_return_status,
3701: --P_CALLED_MODE => p_called_mode,

Line 3749: IF p_pa_debug_mode = 'Y' THEN

3745: l_count := SQL%ROWCOUNT;
3746:
3747: IF l_count > 0 THEN
3748: -- CALL the maintenance api in INSERT mode
3749: IF p_pa_debug_mode = 'Y' THEN
3750: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3751: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
3752: 'MAINTAIN_DATA',
3753: --P_CALLED_MODE => p_called_mode,

Line 3765: IF p_pa_debug_mode = 'Y' THEN

3761: --P_CALLED_MODE => p_called_mode,
3762: X_RETURN_STATUS => x_return_status,
3763: X_MSG_COUNT => x_msg_count,
3764: X_MSG_DATA => x_msg_data );
3765: IF p_pa_debug_mode = 'Y' THEN
3766: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
3767: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
3768: 'MAINTAIN_DATA: '||x_return_status,
3769: --P_CALLED_MODE => p_called_mode,

Line 3974: IF P_PA_DEBUG_MODE = 'Y' THEN

3970: END IF; -- context-based data fetching
3971:
3972: -- Stop processing if no budget line data is fetched.
3973: IF l_tgt_res_asg_id_tab.count <= 0 THEN
3974: IF P_PA_DEBUG_MODE = 'Y' THEN
3975: PA_DEBUG.RESET_CURR_FUNCTION;
3976: END IF;
3977: RETURN;
3978: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 3975: PA_DEBUG.RESET_CURR_FUNCTION;

3971:
3972: -- Stop processing if no budget line data is fetched.
3973: IF l_tgt_res_asg_id_tab.count <= 0 THEN
3974: IF P_PA_DEBUG_MODE = 'Y' THEN
3975: PA_DEBUG.RESET_CURR_FUNCTION;
3976: END IF;
3977: RETURN;
3978: END IF; -- l_tgt_res_asg_id_tab.count <= 0
3979:

Line 4110: IF P_PA_DEBUG_MODE = 'Y' THEN

4106: l_markup_percent_tab := l_tmp_markup_percent_tab; -- Added for Bug 5166047
4107:
4108: -- Stop processing if no data remains (ie. all the tasks were non-billable).
4109: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4110: IF P_PA_DEBUG_MODE = 'Y' THEN
4111: PA_DEBUG.RESET_CURR_FUNCTION;
4112: END IF;
4113: RETURN;
4114: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 4111: PA_DEBUG.RESET_CURR_FUNCTION;

4107:
4108: -- Stop processing if no data remains (ie. all the tasks were non-billable).
4109: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4110: IF P_PA_DEBUG_MODE = 'Y' THEN
4111: PA_DEBUG.RESET_CURR_FUNCTION;
4112: END IF;
4113: RETURN;
4114: END IF; -- l_tgt_res_asg_id_tab.count <= 0
4115:

Line 4190: IF P_PA_DEBUG_MODE = 'Y' THEN

4186: l_target_version_type = 'REVENUE' AND
4187: l_rev_gen_method = 'E' THEN
4188: /*Revenue is only based on billing events, which is handled seperately*/
4189: l_dummy := 1;
4190: IF P_PA_DEBUG_MODE = 'Y' THEN
4191: PA_DEBUG.RESET_CURR_FUNCTION;
4192: END IF;
4193: RETURN;
4194: ELSIF l_source_version_type = 'COST' AND

Line 4191: PA_DEBUG.RESET_CURR_FUNCTION;

4187: l_rev_gen_method = 'E' THEN
4188: /*Revenue is only based on billing events, which is handled seperately*/
4189: l_dummy := 1;
4190: IF P_PA_DEBUG_MODE = 'Y' THEN
4191: PA_DEBUG.RESET_CURR_FUNCTION;
4192: END IF;
4193: RETURN;
4194: ELSIF l_source_version_type = 'COST' AND
4195: l_target_version_type = 'ALL' AND

Line 4278: IF P_PA_DEBUG_MODE = 'Y' THEN

4274: l_target_version_type = 'REVENUE' AND
4275: l_rev_gen_method = 'C' THEN
4276: /*This is invalid operation, had been handled at the beginning of process*/
4277: l_dummy := 1;
4278: IF P_PA_DEBUG_MODE = 'Y' THEN
4279: PA_DEBUG.RESET_CURR_FUNCTION;
4280: END IF;
4281: RETURN;
4282: ELSIF l_source_version_type = 'REVENUE' AND

Line 4279: PA_DEBUG.RESET_CURR_FUNCTION;

4275: l_rev_gen_method = 'C' THEN
4276: /*This is invalid operation, had been handled at the beginning of process*/
4277: l_dummy := 1;
4278: IF P_PA_DEBUG_MODE = 'Y' THEN
4279: PA_DEBUG.RESET_CURR_FUNCTION;
4280: END IF;
4281: RETURN;
4282: ELSIF l_source_version_type = 'REVENUE' AND
4283: l_target_version_type = 'REVENUE' AND

Line 4287: IF P_PA_DEBUG_MODE = 'Y' THEN

4283: l_target_version_type = 'REVENUE' AND
4284: l_rev_gen_method = 'E' THEN
4285: /*Revenue is only based on billing events, which is handled seperately*/
4286: l_dummy := 1;
4287: IF P_PA_DEBUG_MODE = 'Y' THEN
4288: PA_DEBUG.RESET_CURR_FUNCTION;
4289: END IF;
4290: RETURN;
4291: ELSIF l_source_version_type = 'REVENUE' AND

Line 4288: PA_DEBUG.RESET_CURR_FUNCTION;

4284: l_rev_gen_method = 'E' THEN
4285: /*Revenue is only based on billing events, which is handled seperately*/
4286: l_dummy := 1;
4287: IF P_PA_DEBUG_MODE = 'Y' THEN
4288: PA_DEBUG.RESET_CURR_FUNCTION;
4289: END IF;
4290: RETURN;
4291: ELSIF l_source_version_type = 'REVENUE' AND
4292: l_target_version_type = 'ALL' AND

Line 4309: IF P_PA_DEBUG_MODE = 'Y' THEN

4305: l_target_version_type = 'ALL' AND
4306: l_rev_gen_method = 'C' THEN
4307: /*This is invalid operation, had been handled at the beginning of process*/
4308: l_dummy := 1;
4309: IF P_PA_DEBUG_MODE = 'Y' THEN
4310: PA_DEBUG.RESET_CURR_FUNCTION;
4311: END IF;
4312: RETURN;
4313: ELSIF l_source_version_type = 'REVENUE' AND

Line 4310: PA_DEBUG.RESET_CURR_FUNCTION;

4306: l_rev_gen_method = 'C' THEN
4307: /*This is invalid operation, had been handled at the beginning of process*/
4308: l_dummy := 1;
4309: IF P_PA_DEBUG_MODE = 'Y' THEN
4310: PA_DEBUG.RESET_CURR_FUNCTION;
4311: END IF;
4312: RETURN;
4313: ELSIF l_source_version_type = 'REVENUE' AND
4314: l_target_version_type = 'ALL' AND

Line 4397: IF P_PA_DEBUG_MODE = 'Y' THEN

4393: l_target_version_type = 'REVENUE' AND
4394: l_rev_gen_method = 'E' THEN
4395: /*Revenue is only based on billing events, which is handled seperately*/
4396: l_dummy := 1;
4397: IF P_PA_DEBUG_MODE = 'Y' THEN
4398: PA_DEBUG.RESET_CURR_FUNCTION;
4399: END IF;
4400: RETURN;
4401: ELSIF l_source_version_type = 'ALL' AND

Line 4398: PA_DEBUG.RESET_CURR_FUNCTION;

4394: l_rev_gen_method = 'E' THEN
4395: /*Revenue is only based on billing events, which is handled seperately*/
4396: l_dummy := 1;
4397: IF P_PA_DEBUG_MODE = 'Y' THEN
4398: PA_DEBUG.RESET_CURR_FUNCTION;
4399: END IF;
4400: RETURN;
4401: ELSIF l_source_version_type = 'ALL' AND
4402: l_target_version_type = 'ALL' AND

Line 4746: IF P_PA_DEBUG_MODE = 'Y' THEN

4742: l_markup_percent_tab := l_tmp_markup_percent_tab; -- Added for Bug 5166047
4743:
4744: -- Stop processing if no data remains (ie. all records removed).
4745: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4746: IF P_PA_DEBUG_MODE = 'Y' THEN
4747: PA_DEBUG.RESET_CURR_FUNCTION;
4748: END IF;
4749: RETURN;
4750: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 4747: PA_DEBUG.RESET_CURR_FUNCTION;

4743:
4744: -- Stop processing if no data remains (ie. all records removed).
4745: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4746: IF P_PA_DEBUG_MODE = 'Y' THEN
4747: PA_DEBUG.RESET_CURR_FUNCTION;
4748: END IF;
4749: RETURN;
4750: END IF; -- l_tgt_res_asg_id_tab.count <= 0
4751:

Line 4987: IF P_PA_DEBUG_MODE = 'Y' THEN

4983: -- Note that l_tgt_res_asg_id_tab.count should be greater than 0
4984: -- at this point, since we checked this condition earlier. However,
4985: -- to be on the safe side, check once more to avoid unecessary work.
4986: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4987: IF P_PA_DEBUG_MODE = 'Y' THEN
4988: PA_DEBUG.RESET_CURR_FUNCTION;
4989: END IF;
4990: RETURN;
4991: END IF; -- l_tgt_res_asg_id_tab.count <= 0

Line 4988: PA_DEBUG.RESET_CURR_FUNCTION;

4984: -- at this point, since we checked this condition earlier. However,
4985: -- to be on the safe side, check once more to avoid unecessary work.
4986: IF l_tgt_res_asg_id_tab.count <= 0 THEN
4987: IF P_PA_DEBUG_MODE = 'Y' THEN
4988: PA_DEBUG.RESET_CURR_FUNCTION;
4989: END IF;
4990: RETURN;
4991: END IF; -- l_tgt_res_asg_id_tab.count <= 0
4992:

Line 5080: IF P_PA_DEBUG_MODE = 'Y' THEN

5076: -- processing ETC lines, which should not exist at this point.
5077: l_source_context := 'BUDGET_LINE';
5078:
5079: --Calling the calculate API
5080: IF P_PA_DEBUG_MODE = 'Y' THEN
5081: pa_fp_gen_amount_utils.fp_debug
5082: (p_msg => 'Before calling
5083: PA_FP_CALC_PLAN_PKG.calculate',
5084: p_module_name => l_module_name,

Line 5115: IF P_PA_DEBUG_MODE = 'Y' THEN

5111: x_return_status => x_return_status,
5112: x_msg_count => x_msg_count,
5113: x_msg_data => x_msg_data);
5114: --hr_utility.trace('aft calling calculate api: '||x_return_status);
5115: IF P_PA_DEBUG_MODE = 'Y' THEN
5116: pa_fp_gen_amount_utils.fp_debug
5117: (p_msg => 'Status after calling
5118: PA_FP_CALC_PLAN_PKG.calculate: '
5119: ||x_return_status,

Line 5127: IF P_PA_DEBUG_MODE = 'Y' THEN

5123: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5124: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5125: END IF;
5126:
5127: IF P_PA_DEBUG_MODE = 'Y' THEN
5128: PA_DEBUG.RESET_CURR_FUNCTION;
5129: END IF;
5130: RETURN;
5131: END IF; -- Work-based Revenue Forecast logic

Line 5128: PA_DEBUG.RESET_CURR_FUNCTION;

5124: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5125: END IF;
5126:
5127: IF P_PA_DEBUG_MODE = 'Y' THEN
5128: PA_DEBUG.RESET_CURR_FUNCTION;
5129: END IF;
5130: RETURN;
5131: END IF; -- Work-based Revenue Forecast logic
5132:

Line 5434: IF P_PA_DEBUG_MODE = 'Y' THEN

5430: l_cost_rate_override_tab(i),
5431: l_b_cost_rate_override_tab(i),
5432: '', /* bug 7693017 */
5433: l_markup_percent_tab(i)); /* Added for Bug 5166047 */
5434: IF P_PA_DEBUG_MODE = 'Y' THEN
5435: pa_fp_gen_amount_utils.fp_debug
5436: ( p_msg => 'After inserting into target budget lines',
5437: p_module_name => l_module_name,
5438: p_log_level => 5 );

Line 5483: IF p_pa_debug_mode = 'Y' THEN

5479: AND bl.resource_assignment_id = rbc.resource_assignment_id (+)
5480: AND bl.txn_currency_code = rbc.txn_currency_code (+);
5481:
5482: -- Call the maintenance api in ROLLUP mode
5483: IF p_pa_debug_mode = 'Y' THEN
5484: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5485: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
5486: 'MAINTAIN_DATA',
5487: --P_CALLED_MODE => p_called_mode,

Line 5499: IF p_pa_debug_mode = 'Y' THEN

5495: --P_CALLED_MODE => p_called_mode,
5496: X_RETURN_STATUS => x_return_status,
5497: X_MSG_COUNT => x_msg_count,
5498: X_MSG_DATA => x_msg_data );
5499: IF p_pa_debug_mode = 'Y' THEN
5500: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
5501: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
5502: 'MAINTAIN_DATA: '||x_return_status,
5503: --P_CALLED_MODE => p_called_mode,

Line 5511: IF P_PA_DEBUG_MODE = 'Y' THEN

5507: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
5508: END IF;
5509: -- END OF IPM: New Entity ER ------------------------------------------
5510:
5511: IF P_PA_DEBUG_MODE = 'Y' THEN
5512: PA_DEBUG.RESET_CURR_FUNCTION;
5513: END IF;
5514:
5515: EXCEPTION

Line 5512: PA_DEBUG.RESET_CURR_FUNCTION;

5508: END IF;
5509: -- END OF IPM: New Entity ER ------------------------------------------
5510:
5511: IF P_PA_DEBUG_MODE = 'Y' THEN
5512: PA_DEBUG.RESET_CURR_FUNCTION;
5513: END IF;
5514:
5515: EXCEPTION
5516: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 5535: IF P_PA_DEBUG_MODE = 'Y' THEN

5531:
5532: ROLLBACK;
5533:
5534: x_return_status := FND_API.G_RET_STS_ERROR;
5535: IF P_PA_DEBUG_MODE = 'Y' THEN
5536: pa_fp_gen_amount_utils.fp_debug
5537: ( p_msg => 'Invalid Arguments Passed',
5538: p_module_name => l_module_name,
5539: p_log_level => 5);

Line 5540: PA_DEBUG.RESET_CURR_FUNCTION;

5536: pa_fp_gen_amount_utils.fp_debug
5537: ( p_msg => 'Invalid Arguments Passed',
5538: p_module_name => l_module_name,
5539: p_log_level => 5);
5540: PA_DEBUG.RESET_CURR_FUNCTION;
5541: END IF;
5542: RAISE;
5543: WHEN OTHERS THEN
5544: rollback;

Line 5553: IF P_PA_DEBUG_MODE = 'Y' THEN

5549: ( p_pkg_name => 'PA_FP_WP_GEN_BUDGET_AMT_PUB',
5550: p_procedure_name => 'MAINTAIN_BUDGET_LINES',
5551: p_error_text => substr(sqlerrm,1,240) );
5552:
5553: IF P_PA_DEBUG_MODE = 'Y' THEN
5554: pa_fp_gen_amount_utils.fp_debug
5555: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5556: p_module_name => l_module_name,
5557: p_log_level => 5 );

Line 5558: PA_DEBUG.RESET_CURR_FUNCTION;

5554: pa_fp_gen_amount_utils.fp_debug
5555: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5556: p_module_name => l_module_name,
5557: p_log_level => 5 );
5558: PA_DEBUG.RESET_CURR_FUNCTION;
5559: END IF;
5560: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5561:
5562: END MAINTAIN_BUDGET_LINES;

Line 5632: IF p_pa_debug_mode = 'Y' THEN

5628: BEGIN
5629: x_return_status := FND_API.G_RET_STS_SUCCESS;
5630: x_msg_count := 0;
5631:
5632: IF p_pa_debug_mode = 'Y' THEN
5633: PA_DEBUG.SET_CURR_FUNCTION
5634: ( p_function => 'GET_CALC_API_FLAG_PARAMS',
5635: p_debug_mode => p_pa_debug_mode );
5636: END IF;

Line 5633: PA_DEBUG.SET_CURR_FUNCTION

5629: x_return_status := FND_API.G_RET_STS_SUCCESS;
5630: x_msg_count := 0;
5631:
5632: IF p_pa_debug_mode = 'Y' THEN
5633: PA_DEBUG.SET_CURR_FUNCTION
5634: ( p_function => 'GET_CALC_API_FLAG_PARAMS',
5635: p_debug_mode => p_pa_debug_mode );
5636: END IF;
5637:

Line 5635: p_debug_mode => p_pa_debug_mode );

5631:
5632: IF p_pa_debug_mode = 'Y' THEN
5633: PA_DEBUG.SET_CURR_FUNCTION
5634: ( p_function => 'GET_CALC_API_FLAG_PARAMS',
5635: p_debug_mode => p_pa_debug_mode );
5636: END IF;
5637:
5638: /* Check that the input parameters are not null */
5639: IF p_project_id IS NULL THEN

Line 5773: IF p_pa_debug_mode = 'Y' THEN

5769: dbms_output.put_line(' l_refresh_conv_rates_flag:' || l_refresh_conv_rates_flag );
5770: dbms_output.put_line(' l_spread_required_flag:' || l_spread_required_flag );
5771: dbms_output.put_line(' l_conv_rates_required_flag:' || l_conv_rates_required_flag );
5772: dbms_output.put_line('inside calc api code api :' || x_calculate_api_code ); */
5773: IF p_pa_debug_mode = 'Y' THEN
5774: PA_DEBUG.RESET_CURR_FUNCTION;
5775: END IF;
5776: EXCEPTION
5777: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 5774: PA_DEBUG.RESET_CURR_FUNCTION;

5770: dbms_output.put_line(' l_spread_required_flag:' || l_spread_required_flag );
5771: dbms_output.put_line(' l_conv_rates_required_flag:' || l_conv_rates_required_flag );
5772: dbms_output.put_line('inside calc api code api :' || x_calculate_api_code ); */
5773: IF p_pa_debug_mode = 'Y' THEN
5774: PA_DEBUG.RESET_CURR_FUNCTION;
5775: END IF;
5776: EXCEPTION
5777: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
5778: l_msg_count := FND_MSG_PUB.count_msg;

Line 5796: IF p_pa_debug_mode = 'Y' THEN

5792:
5793: ROLLBACK;
5794: x_return_status := FND_API.G_RET_STS_ERROR;
5795:
5796: IF p_pa_debug_mode = 'Y' THEN
5797: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5798: ( p_msg => 'Invalid Arguments Passed',
5799: p_module_name => l_module_name,
5800: p_log_level => 5 );

Line 5801: PA_DEBUG.RESET_CURR_FUNCTION;

5797: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5798: ( p_msg => 'Invalid Arguments Passed',
5799: p_module_name => l_module_name,
5800: p_log_level => 5 );
5801: PA_DEBUG.RESET_CURR_FUNCTION;
5802: END IF;
5803: RAISE;
5804: WHEN OTHERS THEN
5805: ROLLBACK;

Line 5814: IF p_pa_debug_mode = 'Y' THEN

5810: ( p_pkg_name => 'PA_FP_WP_GEN_BUDGET_AMT_PUB',
5811: p_procedure_name => 'GET_CALC_API_FLAG_PARAMS',
5812: p_error_text => substr(sqlerrm,1,240) );
5813:
5814: IF p_pa_debug_mode = 'Y' THEN
5815: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5816: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5817: p_module_name => l_module_name,
5818: p_log_level => 5 );

Line 5819: PA_DEBUG.RESET_CURR_FUNCTION;

5815: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
5816: ( p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
5817: p_module_name => l_module_name,
5818: p_log_level => 5 );
5819: PA_DEBUG.RESET_CURR_FUNCTION;
5820: END IF;
5821: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5822:
5823: END GET_CALC_API_FLAG_PARAMS;