DBA Data[Home] [Help]

APPS.PA_FP_COPY_ACTUALS_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_COPY_ACTUALS_PUB as
2: /* $Header: PAFPCAPB.pls 120.10.12020000.4 2013/05/23 07:28:09 bpottipa ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: /**This procedure is called to copy actuals to budget version lines**/
6: PROCEDURE COPY_ACTUALS
7: (P_PROJECT_ID IN PA_PROJ_FP_OPTIONS.PROJECT_ID%TYPE,

Line 571: IF P_PA_DEBUG_MODE = 'Y' THEN

567: l_fin_plan_type_id PA_PROJ_FP_OPTIONS.fin_plan_type_id%TYPE;
568:
569: l_etc_start_date DATE;
570: BEGIN
571: IF P_PA_DEBUG_MODE = 'Y' THEN
572: pa_debug.set_curr_function( p_function => 'COPY_ACTUALS',
573: p_debug_mode => p_pa_debug_mode );
574: END IF;
575:

Line 572: pa_debug.set_curr_function( p_function => 'COPY_ACTUALS',

568:
569: l_etc_start_date DATE;
570: BEGIN
571: IF P_PA_DEBUG_MODE = 'Y' THEN
572: pa_debug.set_curr_function( p_function => 'COPY_ACTUALS',
573: p_debug_mode => p_pa_debug_mode );
574: END IF;
575:
576: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 573: p_debug_mode => p_pa_debug_mode );

569: l_etc_start_date DATE;
570: BEGIN
571: IF P_PA_DEBUG_MODE = 'Y' THEN
572: pa_debug.set_curr_function( p_function => 'COPY_ACTUALS',
573: p_debug_mode => p_pa_debug_mode );
574: END IF;
575:
576: x_return_status := FND_API.G_RET_STS_SUCCESS;
577: x_msg_count := 0;

Line 666: IF P_PA_DEBUG_MODE = 'Y' THEN

662: ELSE
663: l_record_type := l_record_type||'N';
664: END IF;
665: l_record_type := l_record_type||'N';
666: IF P_PA_DEBUG_MODE = 'Y' THEN
667: pa_fp_gen_amount_utils.fp_debug
668: (p_msg => 'Before calling pji_fm_xbs_accum_tmp1',
669: p_module_name => l_module_name,
670: p_log_level => 5);

Line 702: IF P_PA_DEBUG_MODE = 'Y' THEN

698:
699: --hr_utility.trace('after entering get_sum:'||x_return_status);
700: --delete from get_sum_test;
701: --insert into get_sum_test (select * from pji_fm_xbs_accum_tmp1);
702: IF P_PA_DEBUG_MODE = 'Y' THEN
703: pa_fp_gen_amount_utils.fp_debug
704: (p_msg => 'After calling pji_fm_xbs_accum_tmp1,return status is: '||x_return_status,
705: p_module_name => l_module_name,
706: p_log_level => 5);

Line 714: IF P_PA_DEBUG_MODE = 'Y' THEN

710: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
711: END IF;
712:
713: IF l_count = 0 THEN
714: IF P_PA_DEBUG_MODE = 'Y' THEN
715: pa_fp_gen_amount_utils.fp_debug
716: (p_msg => 'no actual data as of '||
717: to_char(p_end_date,'dd-mon-rrrr'),
718: p_module_name => l_module_name,

Line 720: PA_DEBUG.RESET_CURR_FUNCTION;

716: (p_msg => 'no actual data as of '||
717: to_char(p_end_date,'dd-mon-rrrr'),
718: p_module_name => l_module_name,
719: p_log_level => 5);
720: PA_DEBUG.RESET_CURR_FUNCTION;
721: END IF;
722: RETURN;
723: END IF;
724:

Line 780: IF P_PA_DEBUG_MODE = 'Y' THEN

776: FROM PJI_FM_XBS_ACCUM_TMP1);
777: -- select count(*) into l_count from pa_resource_assignments where
778: -- budget_version_id = p_budget_version_id;
779: --dbms_output.put_line('before calling cre res asg api: res_assign has: '||l_count);
780: IF P_PA_DEBUG_MODE = 'Y' THEN
781: pa_fp_gen_amount_utils.fp_debug
782: (p_msg => 'Before calling pa_fp_copy_actuals_pub.create_res_asg',
783: p_module_name => l_module_name,
784: p_log_level => 5);

Line 794: IF P_PA_DEBUG_MODE = 'Y' THEN

790: X_RETURN_STATUS => x_return_status,
791: X_MSG_COUNT => x_msg_count,
792: X_MSG_DATA => x_msg_data );
793: --dbms_output.put_line('Status after calling cre res asg api: '||x_return_status);
794: IF P_PA_DEBUG_MODE = 'Y' THEN
795: pa_fp_gen_amount_utils.fp_debug
796: (p_msg => 'After calling create_res_asg,return status is: '||x_return_status,
797: p_module_name => l_module_name,
798: p_log_level => 5);

Line 807: IF P_PA_DEBUG_MODE = 'Y' THEN

803:
804: /**Calling update_res_asg to populate the newly created resource_assignment_id back to
805: *pa_fp_planning_res_tmp1. Then this value needs to populated back to pji_fm_xbs_accum_tmp1
806: **/
807: IF P_PA_DEBUG_MODE = 'Y' THEN
808: pa_fp_gen_amount_utils.fp_debug
809: (p_msg => 'Before calling update_res_asg',
810: p_module_name => l_module_name,
811: p_log_level => 5);

Line 821: IF P_PA_DEBUG_MODE = 'Y' THEN

817: X_RETURN_STATUS => x_return_status,
818: X_MSG_COUNT => x_msg_count,
819: X_MSG_DATA => x_msg_data);
820: --dbms_output.put_line('Status after calling upd res asg api: '||x_return_status);
821: IF P_PA_DEBUG_MODE = 'Y' THEN
822: pa_fp_gen_amount_utils.fp_debug
823: (p_msg => 'After calling update_res_asg,return status is: '||x_return_status,
824: p_module_name => l_module_name,
825: p_log_level => 5);

Line 851: IF P_PA_DEBUG_MODE = 'Y' THEN

847: l_txn_currency_code_tab;
848: CLOSE distinct_ra_curr_cursor;
849: --dbms_output.put_line('Closing distinct_ra_curr_cursor');
850: IF l_res_asg_id_tab.count = 0 THEN
851: IF P_PA_DEBUG_MODE = 'Y' THEN
852: PA_DEBUG.RESET_CURR_FUNCTION;
853: END IF;
854: RETURN;
855: END IF;

Line 852: PA_DEBUG.RESET_CURR_FUNCTION;

848: CLOSE distinct_ra_curr_cursor;
849: --dbms_output.put_line('Closing distinct_ra_curr_cursor');
850: IF l_res_asg_id_tab.count = 0 THEN
851: IF P_PA_DEBUG_MODE = 'Y' THEN
852: PA_DEBUG.RESET_CURR_FUNCTION;
853: END IF;
854: RETURN;
855: END IF;
856:

Line 1045: IF P_PA_DEBUG_MODE = 'Y' THEN

1041: END IF; */
1042:
1043: END LOOP;
1044:
1045: IF P_PA_DEBUG_MODE = 'Y' THEN
1046: pa_fp_gen_amount_utils.fp_debug
1047: (p_msg => 'Before calling PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_RA',
1048: p_module_name => l_module_name,
1049: p_log_level => 5);

Line 1066: IF P_PA_DEBUG_MODE = 'Y' THEN

1062: X_RETURN_STATUS => x_return_Status,
1063: X_MSG_COUNT => x_msg_count,
1064: X_MSG_DATA => x_msg_data );
1065: --dbms_output.put_line('Status after calling MAINTAIN_ACTUAL_AMT_RA api: '||x_return_status);
1066: IF P_PA_DEBUG_MODE = 'Y' THEN
1067: pa_fp_gen_amount_utils.fp_debug
1068: (p_msg => 'After calling PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_RA,
1069: return status is: '||x_return_status,
1070: p_module_name => l_module_name,

Line 1082: IF p_pa_debug_mode = 'Y' THEN

1078:
1079: /* the planning start date and end date in pa_resource assignments table
1080: * should be synched up with the budget lines after copying the actual
1081: * data for all the planning resources. */
1082: IF p_pa_debug_mode = 'Y' THEN
1083: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1084: ( p_msg => 'Before calling PA_FP_MAINTAIN_ACTUAL_PUB.' ||
1085: 'SYNC_UP_PLANNING_DATES',
1086: p_module_name => l_module_name,

Line 1097: IF p_pa_debug_mode = 'Y' THEN

1093: X_RETURN_STATUS => x_return_Status,
1094: X_MSG_COUNT => x_msg_count,
1095: X_MSG_DATA => x_msg_data );
1096: --dbms_output.put_line('Status after calling SYNC_UP_PLANNING_DATES api: '||x_return_status);
1097: IF p_pa_debug_mode = 'Y' THEN
1098: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG
1099: ( p_msg => 'Aft calling PA_FP_MAINTAIN_ACTUAL_PUB.' ||
1100: 'SYNC_UP_PLANNING_DATES return status ' ||
1101: x_return_status,

Line 1137: IF p_pa_debug_mode = 'Y' THEN

1133: WHERE tmp.resource_assignment_id = rbc.resource_assignment_id
1134: AND tmp.txn_currency_code = rbc.txn_currency_code );
1135:
1136: -- Call the maintenance api in ROLLUP mode
1137: IF p_pa_debug_mode = 'Y' THEN
1138: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1139: P_MSG => 'Before calling PA_RES_ASG_CURRENCY_PUB.' ||
1140: 'MAINTAIN_DATA',
1141: --P_CALLED_MODE => p_called_mode,

Line 1154: IF p_pa_debug_mode = 'Y' THEN

1150: X_RETURN_STATUS => x_return_status,
1151:
1152: X_MSG_COUNT => x_msg_count,
1153: X_MSG_DATA => x_msg_data );
1154: IF p_pa_debug_mode = 'Y' THEN
1155: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
1156: P_MSG => 'After calling PA_RES_ASG_CURRENCY_PUB.' ||
1157: 'MAINTAIN_DATA: '||x_return_status,
1158: --P_CALLED_MODE => p_called_mode,

Line 1171: IF P_PA_DEBUG_MODE = 'Y' THEN

1167:
1168: IF P_COMMIT_FLAG = 'Y' THEN
1169: COMMIT;
1170: END IF;
1171: IF P_PA_DEBUG_MODE = 'Y' THEN
1172: PA_DEBUG.RESET_CURR_FUNCTION;
1173: END IF;
1174: EXCEPTION
1175: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1172: PA_DEBUG.RESET_CURR_FUNCTION;

1168: IF P_COMMIT_FLAG = 'Y' THEN
1169: COMMIT;
1170: END IF;
1171: IF P_PA_DEBUG_MODE = 'Y' THEN
1172: PA_DEBUG.RESET_CURR_FUNCTION;
1173: END IF;
1174: EXCEPTION
1175: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1176: l_msg_count := FND_MSG_PUB.count_msg;

Line 1194: IF P_PA_DEBUG_MODE = 'Y' THEN

1190:
1191: ROLLBACK;
1192:
1193: x_return_status := FND_API.G_RET_STS_ERROR;
1194: IF P_PA_DEBUG_MODE = 'Y' THEN
1195: pa_fp_gen_amount_utils.fp_debug
1196: (p_msg => 'Invalid Arguments Passed',
1197: p_module_name => l_module_name,
1198: p_log_level => 5);

Line 1199: PA_DEBUG.RESET_CURR_FUNCTION;

1195: pa_fp_gen_amount_utils.fp_debug
1196: (p_msg => 'Invalid Arguments Passed',
1197: p_module_name => l_module_name,
1198: p_log_level => 5);
1199: PA_DEBUG.RESET_CURR_FUNCTION;
1200: END IF;
1201: RAISE;
1202: WHEN OTHERS THEN
1203: rollback;

Line 1213: IF P_PA_DEBUG_MODE = 'Y' THEN

1209: ( p_pkg_name => 'PA_FP_COPY_ACTUALS_PUB',
1210: p_procedure_name => 'COPY_ACTUALS',
1211: p_error_text => substr(sqlerrm,1,240));
1212:
1213: IF P_PA_DEBUG_MODE = 'Y' THEN
1214: pa_fp_gen_amount_utils.fp_debug
1215: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1216: p_module_name => l_module_name,
1217: p_log_level => 5);

Line 1218: PA_DEBUG.RESET_CURR_FUNCTION;

1214: pa_fp_gen_amount_utils.fp_debug
1215: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1216: p_module_name => l_module_name,
1217: p_log_level => 5);
1218: PA_DEBUG.RESET_CURR_FUNCTION;
1219: END IF;
1220: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1221:
1222: END COPY_ACTUALS;

Line 1488: IF P_PA_DEBUG_MODE = 'Y' THEN

1484: l_Cbs_Enabled VARCHAR2(1) := 'N'; -- bug#16200605
1485: l_cbs_ele_ids PA_PLSQL_DATATYPES.IdTabTyp; -- bug#16200605
1486: l_cbs_id_tab pa_plsql_datatypes.IdTabTyp; --bug#16791711
1487: BEGIN
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.set_curr_function( p_function => 'CREATE_RES_ASG',
1490: p_debug_mode => p_pa_debug_mode );
1491: END IF;
1492:

Line 1489: pa_debug.set_curr_function( p_function => 'CREATE_RES_ASG',

1485: l_cbs_ele_ids PA_PLSQL_DATATYPES.IdTabTyp; -- bug#16200605
1486: l_cbs_id_tab pa_plsql_datatypes.IdTabTyp; --bug#16791711
1487: BEGIN
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.set_curr_function( p_function => 'CREATE_RES_ASG',
1490: p_debug_mode => p_pa_debug_mode );
1491: END IF;
1492:
1493: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1490: p_debug_mode => p_pa_debug_mode );

1486: l_cbs_id_tab pa_plsql_datatypes.IdTabTyp; --bug#16791711
1487: BEGIN
1488: IF P_PA_DEBUG_MODE = 'Y' THEN
1489: pa_debug.set_curr_function( p_function => 'CREATE_RES_ASG',
1490: p_debug_mode => p_pa_debug_mode );
1491: END IF;
1492:
1493: x_return_status := FND_API.G_RET_STS_SUCCESS;
1494: x_msg_count := 0;

Line 1499: IF P_PA_DEBUG_MODE = 'Y' THEN

1495:
1496: l_Cbs_Enabled := PA_ALTERNATE_TASK_PVT.Is_Cbs_Enabled(p_Project_Id => P_PROJECT_ID); -- bug#16200605
1497:
1498: IF (P_FP_COLS_REC.X_BUDGET_VERSION_ID IS NULL) THEN
1499: IF P_PA_DEBUG_MODE = 'Y' THEN
1500: pa_fp_gen_amount_utils.fp_debug
1501: (p_msg => 'Before calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTL',
1502: p_module_name => l_module_name,
1503: p_log_level => 5);

Line 1512: IF P_PA_DEBUG_MODE = 'Y' THEN

1508: X_FP_COLS_REC => l_fp_cols_rec,
1509: X_RETURN_STATUS => x_return_status,
1510: X_MSG_COUNT => x_msg_count,
1511: X_MSG_DATA => x_msg_data);
1512: IF P_PA_DEBUG_MODE = 'Y' THEN
1513: pa_fp_gen_amount_utils.fp_debug
1514: (p_msg => 'After calling PA_FP_GEN_AMOUNT_UTILS.GET_PLAN_VERSION_DTLS,
1515: return status:'||x_return_status,
1516: p_module_name => l_module_name,

Line 1605: IF P_PA_DEBUG_MODE = 'Y' THEN

1601: CLOSE topTask_res_asg_cur;
1602: END IF;
1603: -- hr_utility.trace('in create res asg tab count '||l_task_id_tab.count);
1604: IF (l_task_id_tab.count = 0 ) THEN
1605: IF P_PA_DEBUG_MODE = 'Y' THEN
1606: PA_DEBUG.RESET_CURR_FUNCTION;
1607: END IF;
1608: RETURN;
1609: END IF;

Line 1606: PA_DEBUG.RESET_CURR_FUNCTION;

1602: END IF;
1603: -- hr_utility.trace('in create res asg tab count '||l_task_id_tab.count);
1604: IF (l_task_id_tab.count = 0 ) THEN
1605: IF P_PA_DEBUG_MODE = 'Y' THEN
1606: PA_DEBUG.RESET_CURR_FUNCTION;
1607: END IF;
1608: RETURN;
1609: END IF;
1610:

Line 1684: IF P_PA_DEBUG_MODE = 'Y' THEN

1680: CLOSE topTask_res_asg_cur_cbs;
1681: END IF;
1682: -- hr_utility.trace('in create res asg tab count '||l_task_id_tab.count);
1683: IF (l_task_id_tab.count = 0 ) THEN
1684: IF P_PA_DEBUG_MODE = 'Y' THEN
1685: PA_DEBUG.RESET_CURR_FUNCTION;
1686: END IF;
1687: RETURN;
1688: END IF;

Line 1685: PA_DEBUG.RESET_CURR_FUNCTION;

1681: END IF;
1682: -- hr_utility.trace('in create res asg tab count '||l_task_id_tab.count);
1683: IF (l_task_id_tab.count = 0 ) THEN
1684: IF P_PA_DEBUG_MODE = 'Y' THEN
1685: PA_DEBUG.RESET_CURR_FUNCTION;
1686: END IF;
1687: RETURN;
1688: END IF;
1689:

Line 1731: IF P_PA_DEBUG_MODE = 'Y' THEN

1727: );
1728: END IF;
1729: */
1730:
1731: IF P_PA_DEBUG_MODE = 'Y' THEN
1732: pa_fp_gen_amount_utils.fp_debug
1733: (p_msg => 'Before calling update_res_defaults',
1734: p_module_name => l_module_name,
1735: p_log_level => 5);

Line 1743: IF P_PA_DEBUG_MODE = 'Y' THEN

1739: P_BUDGET_VERSION_ID => P_BUDGET_VERSION_ID,
1740: X_RETURN_STATUS => x_return_status,
1741: X_MSG_COUNT => x_msg_count,
1742: X_MSG_DATA => x_msg_data );
1743: IF P_PA_DEBUG_MODE = 'Y' THEN
1744: pa_fp_gen_amount_utils.fp_debug
1745: (p_msg => 'Before calling update_res_defaults',
1746: p_module_name => l_module_name,
1747: p_log_level => 5);

Line 1764: IF P_PA_DEBUG_MODE = 'Y' THEN

1760: WHERE SP_FIXED_DATE IS NULL
1761: AND SPREAD_CURVE_ID = l_spread_curve_id
1762: AND BUDGET_VERSION_ID = P_BUDGET_VERSION_ID;
1763:
1764: IF P_PA_DEBUG_MODE = 'Y' THEN
1765: PA_DEBUG.RESET_CURR_FUNCTION;
1766: END IF;
1767: EXCEPTION
1768: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1765: PA_DEBUG.RESET_CURR_FUNCTION;

1761: AND SPREAD_CURVE_ID = l_spread_curve_id
1762: AND BUDGET_VERSION_ID = P_BUDGET_VERSION_ID;
1763:
1764: IF P_PA_DEBUG_MODE = 'Y' THEN
1765: PA_DEBUG.RESET_CURR_FUNCTION;
1766: END IF;
1767: EXCEPTION
1768: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1769: l_msg_count := FND_MSG_PUB.count_msg;

Line 1787: IF P_PA_DEBUG_MODE = 'Y' THEN

1783:
1784: ROLLBACK;
1785:
1786: x_return_status := FND_API.G_RET_STS_ERROR;
1787: IF P_PA_DEBUG_MODE = 'Y' THEN
1788: pa_fp_gen_amount_utils.fp_debug
1789: (p_msg => 'Invalid Arguments Passed',
1790: p_module_name => l_module_name,
1791: p_log_level => 5);

Line 1792: PA_DEBUG.RESET_CURR_FUNCTION;

1788: pa_fp_gen_amount_utils.fp_debug
1789: (p_msg => 'Invalid Arguments Passed',
1790: p_module_name => l_module_name,
1791: p_log_level => 5);
1792: PA_DEBUG.RESET_CURR_FUNCTION;
1793: END IF;
1794: RAISE;
1795: WHEN OTHERS THEN
1796: rollback;

Line 1806: IF P_PA_DEBUG_MODE = 'Y' THEN

1802: ( p_pkg_name => 'PA_FP_COPY_ACTUALS_PUB',
1803: p_procedure_name => 'CREATE_RES_ASG',
1804: p_error_text => substr(sqlerrm,1,240));
1805:
1806: IF P_PA_DEBUG_MODE = 'Y' THEN
1807: pa_fp_gen_amount_utils.fp_debug
1808: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1809: p_module_name => l_module_name,
1810: p_log_level => 5);

Line 1811: PA_DEBUG.RESET_CURR_FUNCTION;

1807: pa_fp_gen_amount_utils.fp_debug
1808: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1809: p_module_name => l_module_name,
1810: p_log_level => 5);
1811: PA_DEBUG.RESET_CURR_FUNCTION;
1812: END IF;
1813: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1814: END CREATE_RES_ASG;
1815:

Line 1837: IF P_PA_DEBUG_MODE = 'Y' THEN

1833: l_msg_index_out NUMBER;
1834:
1835: l_proj_struct_sharing_code PA_PROJECTS_ALL.STRUCTURE_SHARING_CODE%TYPE;
1836: BEGIN
1837: IF P_PA_DEBUG_MODE = 'Y' THEN
1838: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG',
1839: p_debug_mode => p_pa_debug_mode );
1840: END IF;
1841:

Line 1838: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG',

1834:
1835: l_proj_struct_sharing_code PA_PROJECTS_ALL.STRUCTURE_SHARING_CODE%TYPE;
1836: BEGIN
1837: IF P_PA_DEBUG_MODE = 'Y' THEN
1838: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG',
1839: p_debug_mode => p_pa_debug_mode );
1840: END IF;
1841:
1842: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1839: p_debug_mode => p_pa_debug_mode );

1835: l_proj_struct_sharing_code PA_PROJECTS_ALL.STRUCTURE_SHARING_CODE%TYPE;
1836: BEGIN
1837: IF P_PA_DEBUG_MODE = 'Y' THEN
1838: pa_debug.set_curr_function( p_function => 'UPDATE_RES_ASG',
1839: p_debug_mode => p_pa_debug_mode );
1840: END IF;
1841:
1842: x_return_status := FND_API.G_RET_STS_SUCCESS;
1843: x_msg_count := 0;

Line 1933: IF P_PA_DEBUG_MODE = 'Y' THEN

1929: WHERE nvl(tmp1.task_id,0) = 0;
1930:
1931: END IF;
1932:
1933: IF P_PA_DEBUG_MODE = 'Y' THEN
1934: PA_DEBUG.RESET_CURR_FUNCTION;
1935: END IF;
1936: EXCEPTION
1937: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1934: PA_DEBUG.RESET_CURR_FUNCTION;

1930:
1931: END IF;
1932:
1933: IF P_PA_DEBUG_MODE = 'Y' THEN
1934: PA_DEBUG.RESET_CURR_FUNCTION;
1935: END IF;
1936: EXCEPTION
1937: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1938: l_msg_count := FND_MSG_PUB.count_msg;

Line 1957: IF P_PA_DEBUG_MODE = 'Y' THEN

1953: ROLLBACK;
1954:
1955: x_return_status := FND_API.G_RET_STS_ERROR;
1956:
1957: IF P_PA_DEBUG_MODE = 'Y' THEN
1958: pa_fp_gen_amount_utils.fp_debug
1959: (p_msg => 'Invalid Arguments Passed',
1960: p_module_name => l_module_name,
1961: p_log_level => 5);

Line 1962: PA_DEBUG.RESET_CURR_FUNCTION;

1958: pa_fp_gen_amount_utils.fp_debug
1959: (p_msg => 'Invalid Arguments Passed',
1960: p_module_name => l_module_name,
1961: p_log_level => 5);
1962: PA_DEBUG.RESET_CURR_FUNCTION;
1963: END IF;
1964: RAISE;
1965: WHEN OTHERS THEN
1966: rollback;

Line 1976: IF P_PA_DEBUG_MODE = 'Y' THEN

1972: ( p_pkg_name => 'PA_FP_COPY_ACTUALS_PUB',
1973: p_procedure_name => 'UPDATE_RES_ASG',
1974: p_error_text => substr(sqlerrm,1,240));
1975:
1976: IF P_PA_DEBUG_MODE = 'Y' THEN
1977: pa_fp_gen_amount_utils.fp_debug
1978: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1979: p_module_name => l_module_name,
1980: p_log_level => 5);

Line 1981: PA_DEBUG.RESET_CURR_FUNCTION;

1977: pa_fp_gen_amount_utils.fp_debug
1978: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1979: p_module_name => l_module_name,
1980: p_log_level => 5);
1981: PA_DEBUG.RESET_CURR_FUNCTION;
1982: END IF;
1983: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1984: END UPDATE_RES_ASG;
1985:

Line 2383: IF p_pa_debug_mode = 'Y' THEN

2379: FND_MSG_PUB.initialize;
2380: X_MSG_COUNT := 0;
2381: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2382:
2383: IF p_pa_debug_mode = 'Y' THEN
2384: pa_debug.set_curr_function( p_function => 'COLLECT_ACTUALS'
2385: ,p_debug_mode => p_pa_debug_mode);
2386: END IF;
2387:

Line 2384: pa_debug.set_curr_function( p_function => 'COLLECT_ACTUALS'

2380: X_MSG_COUNT := 0;
2381: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2382:
2383: IF p_pa_debug_mode = 'Y' THEN
2384: pa_debug.set_curr_function( p_function => 'COLLECT_ACTUALS'
2385: ,p_debug_mode => p_pa_debug_mode);
2386: END IF;
2387:
2388: /* Begining of acquiring lock */

Line 2385: ,p_debug_mode => p_pa_debug_mode);

2381: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
2382:
2383: IF p_pa_debug_mode = 'Y' THEN
2384: pa_debug.set_curr_function( p_function => 'COLLECT_ACTUALS'
2385: ,p_debug_mode => p_pa_debug_mode);
2386: END IF;
2387:
2388: /* Begining of acquiring lock */
2389: -- acquire version lock

Line 2394: IF p_pa_debug_mode = 'Y' THEN

2390: select record_version_number
2391: into l_record_version_number
2392: from pa_budget_versions
2393: where budget_version_id = p_budget_version_id;
2394: IF p_pa_debug_mode = 'Y' THEN
2395: pa_fp_gen_amount_utils.fp_debug
2396: (p_msg => 'Before calling pa_fin_plan_pvt.lock_unlock_version',
2397: p_module_name => l_module_name);
2398: END IF;

Line 2408: IF p_pa_debug_mode = 'Y' THEN

2404: p_person_id => NULL,
2405: x_return_status => x_return_status,
2406: x_msg_count => x_msg_count,
2407: x_msg_data => x_msg_data);
2408: IF p_pa_debug_mode = 'Y' THEN
2409: pa_fp_gen_amount_utils.fp_debug
2410: (p_msg => 'Status after calling pa_fin_plan_pvt.lock_unlock_version:'
2411: ||x_return_status,
2412: p_module_name => l_module_name);

Line 2415: IF p_pa_debug_mode = 'Y' THEN

2411: ||x_return_status,
2412: p_module_name => l_module_name);
2413: END IF;
2414: if x_return_status <> fnd_api.g_ret_sts_success then
2415: IF p_pa_debug_mode = 'Y' THEN
2416: pa_debug.reset_curr_function;
2417: END IF;
2418: RETURN;
2419: END IF;

Line 2416: pa_debug.reset_curr_function;

2412: p_module_name => l_module_name);
2413: END IF;
2414: if x_return_status <> fnd_api.g_ret_sts_success then
2415: IF p_pa_debug_mode = 'Y' THEN
2416: pa_debug.reset_curr_function;
2417: END IF;
2418: RETURN;
2419: END IF;
2420:

Line 2428: IF p_pa_debug_mode = 'Y' THEN

2424:
2425: --acquire lock for collect_actual
2426: -- using copy_actuals api to acquire lock for collect_acutuals
2427: -- as the underlying table are same in both cases.
2428: IF p_pa_debug_mode = 'Y' THEN
2429: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
2430: P_MSG => 'Before calling PA_FP_COPY_FROM_PKG.'
2431: ||'ACQUIRE_LOCKS_FOR_COPY_ACTUAL',
2432: P_MODULE_NAME => l_module_name);

Line 2443: IF p_pa_debug_mode = 'Y' THEN

2439: X_MSG_DATA => X_MSG_DATA);
2440: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2441: --If can't acquire lock, customized message is thrown from within
2442: -- the API, so we should suppress exception error
2443: IF p_pa_debug_mode = 'Y' THEN
2444: PA_DEBUG.Reset_Curr_Function;
2445: END IF;
2446: RETURN;
2447: END IF;

Line 2444: PA_DEBUG.Reset_Curr_Function;

2440: IF X_RETURN_STATUS <> FND_API.G_RET_STS_SUCCESS THEN
2441: --If can't acquire lock, customized message is thrown from within
2442: -- the API, so we should suppress exception error
2443: IF p_pa_debug_mode = 'Y' THEN
2444: PA_DEBUG.Reset_Curr_Function;
2445: END IF;
2446: RETURN;
2447: END IF;
2448:

Line 2449: IF p_pa_debug_mode = 'Y' THEN

2445: END IF;
2446: RETURN;
2447: END IF;
2448:
2449: IF p_pa_debug_mode = 'Y' THEN
2450: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
2451: P_MSG => 'After calling PA_FP_COPY_FROM_PKG.'
2452: ||'ACQUIRE_LOCKS_FOR_COPY_ACTUAL: '
2453: ||x_return_status,

Line 2471: if p_pa_debug_mode = 'Y' then

2467: end if;
2468: /* Validation - End */
2469:
2470: /* Calling utility api to get plan version details - Begin */
2471: if p_pa_debug_mode = 'Y' then
2472: pa_fp_gen_amount_utils.fp_debug
2473: (p_msg => 'Before calling
2474: pa_fp_gen_amount_utils.get_plan_version_dtls(p_budget_version_id)',
2475: p_module_name => l_module_name,

Line 2487: if p_pa_debug_mode = 'Y' then

2483: x_msg_data => x_msg_data);
2484: if x_return_status <> fnd_api.g_ret_sts_success then
2485: raise pa_fp_constants_pkg.invalid_arg_exc;
2486: end if;
2487: if p_pa_debug_mode = 'Y' then
2488: pa_fp_gen_amount_utils.fp_debug
2489: (p_msg => 'Status after calling
2490: pa_fp_gen_amount_utils.get_plan_version_dtls(p_budget_version_id): '
2491: ||x_return_status,

Line 2553: IF P_PA_DEBUG_MODE = 'Y' THEN

2549: l_record_type := l_record_type||'N';
2550: END IF;
2551: l_record_type := l_record_type||'N';
2552:
2553: IF P_PA_DEBUG_MODE = 'Y' THEN
2554: pa_fp_gen_amount_utils.fp_debug
2555: (p_msg => 'Before calling pji_fm_xbs_accum_tmp1',
2556: p_module_name => l_module_name,
2557: p_log_level => 5);

Line 2573: IF P_PA_DEBUG_MODE = 'Y' THEN

2569: x_msg_code => x_msg_data);
2570:
2571: select count(*) into l_count from pji_fm_xbs_accum_tmp1;
2572:
2573: IF P_PA_DEBUG_MODE = 'Y' THEN
2574: pa_fp_gen_amount_utils.fp_debug
2575: (p_msg => 'After calling pji_fm_xbs_accum_tmp1,return status is: '||x_return_status,
2576: p_module_name => l_module_name,
2577: p_log_level => 5);

Line 2585: IF P_PA_DEBUG_MODE = 'Y' THEN

2581: raise PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc;
2582: END IF;
2583:
2584: IF l_count = 0 THEN
2585: IF P_PA_DEBUG_MODE = 'Y' THEN
2586: pa_fp_gen_amount_utils.fp_debug
2587: (p_msg => 'no actual data ',
2588: p_module_name => l_module_name,
2589: p_log_level => 5);

Line 2590: PA_DEBUG.RESET_CURR_FUNCTION;

2586: pa_fp_gen_amount_utils.fp_debug
2587: (p_msg => 'no actual data ',
2588: p_module_name => l_module_name,
2589: p_log_level => 5);
2590: PA_DEBUG.RESET_CURR_FUNCTION;
2591: END IF;
2592: RETURN;
2593: END IF;
2594:

Line 2887: IF P_PA_DEBUG_MODE = 'Y' THEN

2883: l_amt_dtls_tbl(j).project_func_burdened_cost := null;
2884: END IF;
2885: END LOOP;
2886:
2887: IF P_PA_DEBUG_MODE = 'Y' THEN
2888: pa_fp_gen_amount_utils.fp_debug
2889: (p_msg => 'Before calling PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_RA',
2890: p_module_name => l_module_name,
2891: p_log_level => 5);

Line 2906: IF P_PA_DEBUG_MODE = 'Y' THEN

2902: P_CALLING_CONTEXT => 'FP_GEN_FCST_COPY_ACTUAL',
2903: X_RETURN_STATUS => x_return_Status,
2904: X_MSG_COUNT => x_msg_count,
2905: X_MSG_DATA => x_msg_data );
2906: IF P_PA_DEBUG_MODE = 'Y' THEN
2907: pa_fp_gen_amount_utils.fp_debug
2908: (p_msg => 'After calling PA_FP_MAINTAIN_ACTUAL_PUB.MAINTAIN_ACTUAL_AMT_RA,
2909: return status is: '||x_return_status,
2910: p_module_name => l_module_name,

Line 2933: IF p_pa_debug_mode = 'Y' THEN

2929: ,x_msg_count => x_msg_count
2930: ,x_msg_data => l_msg_data
2931: );
2932:
2933: IF p_pa_debug_mode = 'Y' THEN
2934: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
2935: P_MSG => 'Before calling PA_FP_GEN_FCST_AMT_PUB1.' ||
2936: 'MAINTAIN_BUDGET_VERSION',
2937: P_MODULE_NAME => l_module_name);

Line 2948: IF p_pa_debug_mode = 'Y' THEN

2944: X_RETURN_STATUS => x_return_status,
2945: X_MSG_COUNT => x_msg_count,
2946: X_MSG_DATA => x_msg_data );
2947:
2948: IF p_pa_debug_mode = 'Y' THEN
2949: PA_FP_GEN_AMOUNT_UTILS.FP_DEBUG(
2950: P_MSG => 'After calling PA_FP_GEN_FCST_AMT_PUB1.' ||
2951: 'MAINTAIN_BUDGET_VERSION: '||x_return_status,
2952: P_MODULE_NAME => l_module_name);

Line 2961: IF P_PA_DEBUG_MODE = 'Y' THEN

2957: /*---------------------------------------------------------------
2958: Rollup amounts - End
2959: -----------------------------------------------------------------*/
2960:
2961: IF P_PA_DEBUG_MODE = 'Y' THEN
2962: PA_DEBUG.RESET_CURR_FUNCTION;
2963: END IF;
2964: EXCEPTION
2965: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 2962: PA_DEBUG.RESET_CURR_FUNCTION;

2958: Rollup amounts - End
2959: -----------------------------------------------------------------*/
2960:
2961: IF P_PA_DEBUG_MODE = 'Y' THEN
2962: PA_DEBUG.RESET_CURR_FUNCTION;
2963: END IF;
2964: EXCEPTION
2965: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
2966: l_msg_count := FND_MSG_PUB.count_msg;

Line 2985: IF P_PA_DEBUG_MODE = 'Y' THEN

2981: ROLLBACK;
2982:
2983: x_return_status := FND_API.G_RET_STS_ERROR;
2984:
2985: IF P_PA_DEBUG_MODE = 'Y' THEN
2986: pa_fp_gen_amount_utils.fp_debug
2987: (p_msg => 'Invalid Arguments Passed',
2988: p_module_name => l_module_name,
2989: p_log_level => 5);

Line 2990: PA_DEBUG.RESET_CURR_FUNCTION;

2986: pa_fp_gen_amount_utils.fp_debug
2987: (p_msg => 'Invalid Arguments Passed',
2988: p_module_name => l_module_name,
2989: p_log_level => 5);
2990: PA_DEBUG.RESET_CURR_FUNCTION;
2991: END IF;
2992: RAISE;
2993: WHEN OTHERS THEN
2994: rollback;

Line 3003: IF P_PA_DEBUG_MODE = 'Y' THEN

2999: ( p_pkg_name => 'PA_FP_COPY_ACTUALS_PUB',
3000: p_procedure_name => 'COLLECT_ACTUALS',
3001: p_error_text => substr(sqlerrm,1,240));
3002:
3003: IF P_PA_DEBUG_MODE = 'Y' THEN
3004: pa_fp_gen_amount_utils.fp_debug
3005: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3006: p_module_name => l_module_name,
3007: p_log_level => 5);

Line 3008: PA_DEBUG.RESET_CURR_FUNCTION;

3004: pa_fp_gen_amount_utils.fp_debug
3005: (p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
3006: p_module_name => l_module_name,
3007: p_log_level => 5);
3008: PA_DEBUG.RESET_CURR_FUNCTION;
3009: END IF;
3010: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3011:
3012: END COLLECT_ACTUALS;