DBA Data[Home] [Help]

APPS.PA_FP_GEN_AMT_WRP_PKG 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_GEN_AMT_WRP_PKG AS
2: /* $Header: PAFPGAWB.pls 120.11.12010000.2 2008/09/12 22:08:49 skkoppul ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: PROCEDURE GEN_AMT_WRP(
6: errbuff OUT NOCOPY VARCHAR2,
7: retcode OUT NOCOPY VARCHAR2,

Line 94: IF P_PA_DEBUG_MODE = 'Y' THEN

90: -- Added for VALIDATE_SUPPORT_CASES API. Value not used by Concurrent Program.
91: l_warning_message VARCHAR2(2000);
92: BEGIN
93: -- hr_utility.trace_on(null,'Sharmila');
94: IF P_PA_DEBUG_MODE = 'Y' THEN
95: pa_debug.set_curr_function( p_function => 'GEN_AMT_WRP',
96: p_debug_mode => p_pa_debug_mode );
97: END IF;
98:

Line 95: pa_debug.set_curr_function( p_function => 'GEN_AMT_WRP',

91: l_warning_message VARCHAR2(2000);
92: BEGIN
93: -- hr_utility.trace_on(null,'Sharmila');
94: IF P_PA_DEBUG_MODE = 'Y' THEN
95: pa_debug.set_curr_function( p_function => 'GEN_AMT_WRP',
96: p_debug_mode => p_pa_debug_mode );
97: END IF;
98:
99: /* Getting token values for use by possible error messages. */

Line 96: p_debug_mode => p_pa_debug_mode );

92: BEGIN
93: -- hr_utility.trace_on(null,'Sharmila');
94: IF P_PA_DEBUG_MODE = 'Y' THEN
95: pa_debug.set_curr_function( p_function => 'GEN_AMT_WRP',
96: p_debug_mode => p_pa_debug_mode );
97: END IF;
98:
99: /* Getting token values for use by possible error messages. */
100: FND_MESSAGE.SET_NAME('PA','PA_FP_GEN_EXCEPTION_INFO');

Line 256: IF p_pa_debug_mode = 'Y' THEN

252: --dbms_output.put_line('After execute, l_rows is: '||l_rows);
253: -- hr_utility.trace('After execute, l_rows is: '||l_rows);
254:
255: IF (l_rows < 0) THEN
256: IF p_pa_debug_mode = 'Y' THEN
257: pa_fp_gen_amount_utils.fp_debug
258: (p_called_mode => l_called_mode,
259: p_msg =>'After dbms parse '||to_char(l_rows),
260: p_module_name => l_module_name,

Line 262: PA_DEBUG.RESET_CURR_FUNCTION;

258: (p_called_mode => l_called_mode,
259: p_msg =>'After dbms parse '||to_char(l_rows),
260: p_module_name => l_module_name,
261: p_log_level => 5);
262: PA_DEBUG.RESET_CURR_FUNCTION;
263: END IF;
264: RETURN;
265: END IF;
266:

Line 323: IF p_pa_debug_mode = 'Y' THEN

319: FOR i in 1..l_count LOOP
320: l_generation_flag := 'Y';
321: l_gen_api_call_flag := 'Y';
322:
323: IF p_pa_debug_mode = 'Y' THEN
324: pa_fp_gen_amount_utils.fp_debug
325: (p_called_mode => l_called_mode,
326: p_msg =>'Before calling
327: pa_fin_plan_pub.Create_Version',

Line 405: IF p_pa_debug_mode = 'Y' THEN

401: WHEN OTHERS THEN
402: l_generation_flag := 'N';
403: END;
404:
405: IF p_pa_debug_mode = 'Y' THEN
406: pa_fp_gen_amount_utils.fp_debug
407: (p_called_mode => l_called_mode,
408: p_msg =>'Status aft calling pa_fin_plan_pub.Create_Version:'
409: ||l_return_status,

Line 415: IF p_pa_debug_mode = 'Y' THEN

411: p_log_level => 5);
412: END IF;
413:
414: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
415: IF p_pa_debug_mode = 'Y' THEN
416: pa_fp_gen_amount_utils.fp_debug
417: (p_called_mode => l_called_mode,
418: p_msg =>'Raising invalid arg exc after create version api call',
419: p_module_name => l_module_name,

Line 428: IF p_pa_debug_mode = 'Y' THEN

424:
425: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
426: l_generation_flag := 'N';
427: l_msg_count := FND_MSG_PUB.Count_Msg;
428: IF p_pa_debug_mode = 'Y' THEN
429: pa_fp_gen_amount_utils.fp_debug
430: (p_called_mode => l_called_mode,
431: p_msg =>
432: 'Value of l_msg_count after calling create_version api: '||l_msg_count ,

Line 437: PA_DEBUG.g_err_stage := l_project_name_err_token || l_project_name ||

433: p_module_name => l_module_name,
434: p_log_level => 5);
435: END IF;
436:
437: PA_DEBUG.g_err_stage := l_project_name_err_token || l_project_name ||
438: ' ' ||l_fin_plan_type_err_token || l_plan_type_name;
439: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
440: p_write_file => 'OUT',
441: p_write_mode => 1);

Line 439: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,

435: END IF;
436:
437: PA_DEBUG.g_err_stage := l_project_name_err_token || l_project_name ||
438: ' ' ||l_fin_plan_type_err_token || l_plan_type_name;
439: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
440: p_write_file => 'OUT',
441: p_write_mode => 1);
442: IF l_msg_count > 0 THEN
443: IF l_msg_count = 1 THEN

Line 456: PA_DEBUG.g_err_stage := l_msg_data;

452: --dbms_output.put_line('x msg data in msg count 1 '||x_msg_data);
453: --dbms_output.put_line('l msg data in msg count 1: '||l_msg_data);
454: --hr_utility.trace('l msg data in msg count 1: '||l_msg_data);
455: --dbms_output.put_line('p msg index out in msg count 1: '||l_msg_index_out);
456: PA_DEBUG.g_err_stage := l_msg_data;
457: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
458: p_write_file => 'OUT',
459: p_write_mode => 1);
460: ELSE

Line 457: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,

453: --dbms_output.put_line('l msg data in msg count 1: '||l_msg_data);
454: --hr_utility.trace('l msg data in msg count 1: '||l_msg_data);
455: --dbms_output.put_line('p msg index out in msg count 1: '||l_msg_index_out);
456: PA_DEBUG.g_err_stage := l_msg_data;
457: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
458: p_write_file => 'OUT',
459: p_write_mode => 1);
460: ELSE
461: FOR j in 1 .. l_msg_count LOOP

Line 471: PA_DEBUG.g_err_stage := l_msg_data;

467: p_msg_count => l_msg_count ,
468: p_msg_data => l_msg_data_in ,
469: p_data => l_msg_data,
470: p_msg_index_out => l_msg_index_out );
471: PA_DEBUG.g_err_stage := l_msg_data;
472: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
473: p_write_file => 'OUT',
474: p_write_mode => 1);
475: --dbms_output.put_line('error # '||j||' '|| substr(l_msg_Data,1,200));

Line 472: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,

468: p_msg_data => l_msg_data_in ,
469: p_data => l_msg_data,
470: p_msg_index_out => l_msg_index_out );
471: PA_DEBUG.g_err_stage := l_msg_data;
472: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
473: p_write_file => 'OUT',
474: p_write_mode => 1);
475: --dbms_output.put_line('error # '||j||' '|| substr(l_msg_Data,1,200));
476: END LOOP;

Line 488: IF p_pa_debug_mode = 'Y' THEN

484: --hr_utility.trace('Value of plan_class_code b4 calling get_plan_version_dtls api: '||l_plan_class_code );
485: IF l_plan_class_code = 'FORECAST' AND
486: l_generation_flag = 'Y' THEN
487:
488: IF p_pa_debug_mode = 'Y' THEN
489: pa_fp_gen_amount_utils.fp_debug
490: (p_called_mode => l_called_mode,
491: p_msg => 'Before calling
492: pa_fp_gen_amount_utils.get_plan_version_dtls',

Line 510: IF p_pa_debug_mode = 'Y' THEN

506: l_gen_api_call_flag := 'N';
507: END;
508: -- dbms_output.put_line('Status after calling get_plan_version_dtls api: '||l_return_status);
509: -- hr_utility.trace('L_RETURN_Status after calling get_plan_version_dtls api: '||l_return_status);
510: IF p_pa_debug_mode = 'Y' THEN
511: pa_fp_gen_amount_utils.fp_debug
512: (p_called_mode => l_called_mode,
513: p_msg => 'Status after calling
514: pa_fp_gen_amount_utils.get_plan_version_dtls'

Line 521: IF p_pa_debug_mode = 'Y' THEN

517: p_log_level => 5);
518: END IF;
519:
520: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
521: IF p_pa_debug_mode = 'Y' THEN
522: pa_fp_gen_amount_utils.fp_debug
523: (p_called_mode => l_called_mode,
524: p_msg =>'Raising invalid arg exc after Get Plan ver dtls api call',
525: p_module_name => l_module_name,

Line 682: IF P_PA_DEBUG_MODE = 'Y' THEN

678: OR l_gen_src_plan_ver_code = 'ORIGINAL_BASELINED'
679: OR l_gen_src_plan_ver_code = 'CURRENT_APPROVED'
680: OR l_gen_src_plan_ver_code = 'ORIGINAL_APPROVED' THEN
681: /*Get the current baselined or original baselined version*/
682: IF P_PA_DEBUG_MODE = 'Y' THEN
683: pa_fp_gen_amount_utils.fp_debug
684: (p_called_mode => l_called_mode,
685: p_msg => 'Before calling pa_fp_gen_amount_utils.Get_Curr_Original_Version_Info',
686: p_module_name => l_module_name,

Line 700: IF P_PA_DEBUG_MODE = 'Y' THEN

696: x_fin_plan_version_id => l_etc_fp_ver_id,
697: x_return_status => l_return_status,
698: x_msg_count => l_msg_count,
699: x_msg_data => l_msg_data);
700: IF P_PA_DEBUG_MODE = 'Y' THEN
701: pa_fp_gen_amount_utils.fp_debug
702: (p_called_mode => l_called_mode,
703: p_msg =>'After calling pa_fp_gen_amount_utils.Get_Curr_Original_Version_Info,return status is: '
704: ||l_return_status,

Line 711: IF p_pa_debug_mode = 'Y' THEN

707: END IF;
708:
709:
710: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
711: IF p_pa_debug_mode = 'Y' THEN
712: pa_fp_gen_amount_utils.fp_debug
713: (p_called_mode => l_called_mode,
714: p_msg=>'Raising invalid arg exc aft Get Curr Original ver api call',
715: p_module_name => l_module_name,

Line 727: IF P_PA_DEBUG_MODE = 'Y' THEN

723:
724:
725: ELSIF l_gen_src_plan_ver_code = 'CURRENT_WORKING' THEN
726: /*Get the current working version*/
727: IF P_PA_DEBUG_MODE = 'Y' THEN
728: pa_fp_gen_amount_utils.fp_debug
729: (p_called_mode => l_called_mode,
730: p_msg => 'Before calling pa_fin_plan_utils.Get_Curr_Working_Version_Info',
731: p_module_name => l_module_name,

Line 743: IF P_PA_DEBUG_MODE = 'Y' THEN

739: x_fin_plan_version_id => l_etc_fp_ver_id,
740: x_return_status => l_return_status,
741: x_msg_count => l_msg_count,
742: x_msg_data => l_msg_data);
743: IF P_PA_DEBUG_MODE = 'Y' THEN
744: pa_fp_gen_amount_utils.fp_debug
745: (p_called_mode => l_called_mode,
746: p_msg =>
747: 'Aft calling pa_fin_plan_utils.Get_Curr_Working_Version_Info ret sta:'

Line 754: IF p_pa_debug_mode = 'Y' THEN

750: p_log_level => 5);
751: END IF;
752:
753: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
754: IF p_pa_debug_mode = 'Y' THEN
755: pa_fp_gen_amount_utils.fp_debug
756: (p_called_mode => l_called_mode,
757: p_msg=>'Raising invalid arg exc aft Get Curr Wkg ver api call',
758: p_module_name => l_module_name,

Line 809: IF P_PA_DEBUG_MODE = 'Y' THEN

805: l_struct_sharing_code := PA_PROJECT_STRUCTURE_UTILS.
806: get_structure_sharing_code(p_project_id=>l_proj_id);
807:
808: --hr_utility.trace('l_etc_fp_type_id : '||l_etc_fp_type_id);
809: IF P_PA_DEBUG_MODE = 'Y' THEN
810: pa_fp_gen_amount_utils.fp_debug
811: (p_called_mode => l_called_mode,
812: p_msg => 'Before calling PA_FP_GEN_FCST_AMT_PUB.GENERATE_FCST_AMT_WRP'||
813: 'l_proj_id = '||l_proj_id,

Line 913: IF p_pa_debug_mode = 'Y' THEN

909: */
910:
911: IF l_gen_api_call_flag = 'Y' THEN
912: BEGIN
913: IF p_pa_debug_mode = 'Y' THEN
914: pa_fp_gen_amount_utils.fp_debug
915: ( p_called_mode => l_called_mode,
916: p_msg => 'Before calling
917: pa_fp_gen_amount_utils.validate_support_cases',

Line 928: IF p_pa_debug_mode = 'Y' THEN

924: X_WARNING_MESSAGE => l_warning_message, /* Added for ER 4391321 */
925: X_RETURN_STATUS => l_return_status,
926: X_MSG_COUNT => l_msg_count,
927: X_MSG_DATA => l_msg_data );
928: IF p_pa_debug_mode = 'Y' THEN
929: pa_fp_gen_amount_utils.fp_debug
930: ( p_called_mode => l_called_mode,
931: p_msg => 'Status after calling
932: pa_fp_gen_amount_utils.validate_support_cases: '

Line 938: IF p_pa_debug_mode = 'Y' THEN

934: p_module_name => l_module_name,
935: p_log_level => 5 );
936: END IF;
937: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
938: IF p_pa_debug_mode = 'Y' THEN
939: pa_fp_gen_amount_utils.fp_debug
940: (p_called_mode => l_called_mode,
941: p_msg=>'Raising invalid arg exc aft validation api call',
942: p_module_name => l_module_name,

Line 980: IF P_PA_DEBUG_MODE = 'Y' THEN

976: P_WP_STRUCTURE_VERSION_ID =>l_etc_wp_struct_ver_id,
977: X_RETURN_STATUS => l_return_status,
978: X_MSG_COUNT => l_msg_count,
979: X_MSG_DATA => l_msg_data );
980: IF P_PA_DEBUG_MODE = 'Y' THEN
981: pa_fp_gen_amount_utils.fp_debug
982: (p_called_mode => l_called_mode,
983: p_msg =>
984: 'After calling PA_FP_GEN_FCST_AMT_PUB.GENERATE_FCST_AMT_WRP'||

Line 993: IF p_pa_debug_mode = 'Y' THEN

989: -- hr_utility.trace('l_return_status after GENERATE_FCST_AMT_WRP '||l_return_status);
990: -- hr_utility.trace('l_version_generation GENERATE_FCST_AMT_WRP '||l_generation_flag);
991:
992: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
993: IF p_pa_debug_mode = 'Y' THEN
994: pa_fp_gen_amount_utils.fp_debug
995: (p_called_mode => l_called_mode,
996: p_msg=>'Raising invalid arg exc aft Fcst Gen api call',
997: p_module_name => l_module_name,

Line 1015: IF P_PA_DEBUG_MODE = 'Y' THEN

1011: l_return_status := FND_API.G_RET_STS_ERROR;
1012: l_msg_count := 1;
1013: l_msg_data := substr(sqlerrm,1,240);
1014: --dbms_output.put_line('error msg :'||x_msg_data);
1015: IF P_PA_DEBUG_MODE = 'Y' THEN
1016: pa_fp_gen_amount_utils.fp_debug
1017: (p_called_mode => l_called_mode,
1018: p_msg => 'Forecast Gen Error'||l_msg_data,
1019: p_module_name => l_module_name,

Line 1031: IF p_pa_debug_mode = 'Y' THEN

1027: -- hr_utility.trace('l_gen_api_call_flag _flag after FCST GEN '||l_gen_api_call_flag);
1028: ELSIF l_plan_class_code = 'BUDGET' AND
1029: l_generation_flag = 'Y' AND
1030: l_gen_api_call_flag = 'Y' THEN
1031: IF p_pa_debug_mode = 'Y' THEN
1032: pa_fp_gen_amount_utils.fp_debug
1033: (p_called_mode => l_called_mode,
1034: p_msg =>
1035: 'Before calling PA_FP_WP_GEN_BUDGET_AMT_PUB.GENERATE_WP_BUDGET_AMT'||

Line 1069: IF p_pa_debug_mode = 'Y' THEN

1065: -- dbms_output.put_line('after budget generation l_proj_id: '||l_proj_id);
1066: -- hr_utility.trace('after budget generation l_proj_id: '||l_proj_id);
1067: -- dbms_output.put_line(': '||FND_API.G_RET_STS_SUCCESS);
1068: -- hr_utility.trace('FND API. G RET STS SUCCESS: '||FND_API.G_RET_STS_SUCCESS);
1069: IF p_pa_debug_mode = 'Y' THEN
1070: pa_fp_gen_amount_utils.fp_debug
1071: (p_called_mode => l_called_mode,
1072: p_msg => 'Status after calling
1073: PA_FP_WP_GEN_BUDGET_AMT_PUB.GENERATE_WP_BUDGET_AMT:'

Line 1079: IF p_pa_debug_mode = 'Y' THEN

1075: p_module_name => l_module_name,
1076: p_log_level => 5);
1077: END IF;
1078: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1079: IF p_pa_debug_mode = 'Y' THEN
1080: pa_fp_gen_amount_utils.fp_debug
1081: (p_called_mode => l_called_mode,
1082: p_msg=>'Raising invalid arg exc aft Bdgt Gen api call',
1083: p_module_name => l_module_name,

Line 1101: IF P_PA_DEBUG_MODE = 'Y' THEN

1097: l_return_status := FND_API.G_RET_STS_ERROR;
1098: l_msg_count := 1;
1099: l_msg_data := substr(sqlerrm,1,240);
1100: --dbms_output.put_line('error msg :'||x_msg_data);
1101: IF P_PA_DEBUG_MODE = 'Y' THEN
1102: pa_fp_gen_amount_utils.fp_debug
1103: (p_called_mode => l_called_mode,
1104: p_msg => 'Budget Gen Error'||l_msg_data,
1105: p_module_name => l_module_name,

Line 1116: IF p_pa_debug_mode = 'Y' THEN

1112: END IF;--For IF condition for BUDGET
1113:
1114: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1115: -- hr_utility.trace('INVALID EXCEPTION!!!');
1116: IF p_pa_debug_mode = 'Y' THEN
1117: pa_fp_gen_amount_utils.fp_debug
1118: (p_called_mode => l_called_mode,
1119: p_msg=>'Raising invalid arg exc aft Fcst / Bdgt Gen api call',
1120: p_module_name => l_module_name,

Line 1131: IF p_pa_debug_mode = 'Y' THEN

1127: END IF;
1128:
1129: IF l_gen_api_call_flag = 'N' THEN
1130: l_msg_count := FND_MSG_PUB.Count_Msg;
1131: IF p_pa_debug_mode = 'Y' THEN
1132: pa_fp_gen_amount_utils.fp_debug
1133: (p_called_mode => l_called_mode,
1134: p_msg =>
1135: 'Value of l_msg_count after calling Budget / Forecast Gen API'

Line 1141: PA_DEBUG.g_err_stage := l_project_name_err_token || l_project_name ||

1137: p_module_name => l_module_name,
1138: p_log_level => 5);
1139: END IF;
1140: IF l_msg_count > 0 THEN
1141: PA_DEBUG.g_err_stage := l_project_name_err_token || l_project_name ||
1142: ' ' ||l_fin_plan_type_err_token || l_plan_type_name;
1143: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
1144: p_write_file => 'OUT',
1145: p_write_mode => 1);

Line 1143: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,

1139: END IF;
1140: IF l_msg_count > 0 THEN
1141: PA_DEBUG.g_err_stage := l_project_name_err_token || l_project_name ||
1142: ' ' ||l_fin_plan_type_err_token || l_plan_type_name;
1143: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
1144: p_write_file => 'OUT',
1145: p_write_mode => 1);
1146: IF l_msg_count = 1 THEN
1147: l_msg_data_in := l_msg_data;

Line 1156: PA_DEBUG.g_err_stage := l_msg_data;

1152: p_msg_data => l_msg_data_in ,
1153: p_data => l_msg_data,
1154: p_msg_index_out => l_msg_index_out);
1155:
1156: PA_DEBUG.g_err_stage := l_msg_data;
1157: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
1158: p_write_file => 'OUT',
1159: p_write_mode => 1);
1160: --dbms_output.put_line('x msg data in msg count 1 '||x_msg_data);

Line 1157: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,

1153: p_data => l_msg_data,
1154: p_msg_index_out => l_msg_index_out);
1155:
1156: PA_DEBUG.g_err_stage := l_msg_data;
1157: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
1158: p_write_file => 'OUT',
1159: p_write_mode => 1);
1160: --dbms_output.put_line('x msg data in msg count 1 '||x_msg_data);
1161: --dbms_output.put_line('l msg data in msg count 1: '||l_msg_data);

Line 1175: PA_DEBUG.g_err_stage := l_msg_data;

1171: p_msg_data => l_msg_data_in ,
1172: p_data => l_msg_data,
1173: p_msg_index_out => l_msg_index_out );
1174:
1175: PA_DEBUG.g_err_stage := l_msg_data;
1176: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
1177: p_write_file => 'OUT',
1178: p_write_mode => 1);
1179: -- dbms_output.put_line('error # '||j||' '||substr(l_msg_Data,1,200));

Line 1176: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,

1172: p_data => l_msg_data,
1173: p_msg_index_out => l_msg_index_out );
1174:
1175: PA_DEBUG.g_err_stage := l_msg_data;
1176: PA_DEBUG.log_Message( p_message => PA_DEBUG.g_err_stage,
1177: p_write_file => 'OUT',
1178: p_write_mode => 1);
1179: -- dbms_output.put_line('error # '||j||' '||substr(l_msg_Data,1,200));
1180: END LOOP;

Line 1191: IF P_PA_DEBUG_MODE = 'Y' THEN

1187: END LOOP;
1188:
1189: DBMS_SQL.CLOSE_CURSOR(sql_cursor); -- Bug 5715252 Cursor is closed
1190:
1191: IF P_PA_DEBUG_MODE = 'Y' THEN
1192: PA_DEBUG.RESET_CURR_FUNCTION;
1193: END IF;
1194: EXCEPTION
1195: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 1192: PA_DEBUG.RESET_CURR_FUNCTION;

1188:
1189: DBMS_SQL.CLOSE_CURSOR(sql_cursor); -- Bug 5715252 Cursor is closed
1190:
1191: IF P_PA_DEBUG_MODE = 'Y' THEN
1192: PA_DEBUG.RESET_CURR_FUNCTION;
1193: END IF;
1194: EXCEPTION
1195: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN
1196: -- hr_utility.trace('Inside invalid arg Ex');

Line 1216: IF P_PA_DEBUG_MODE = 'Y' THEN

1212: -- hr_utility.trace('Outside-l_return_status'||l_return_status);
1213: l_return_status := FND_API.G_RET_STS_ERROR;
1214: -- hr_utility.trace('Outside Error-l_return_status'||l_return_status);
1215:
1216: IF P_PA_DEBUG_MODE = 'Y' THEN
1217: pa_fp_gen_amount_utils.fp_debug
1218: (p_called_mode => l_called_mode,
1219: p_msg => 'Invalid Arg Exc Error'||substr(sqlerrm, 1, 240),
1220: p_module_name => l_module_name,

Line 1222: PA_DEBUG.RESET_CURR_FUNCTION;

1218: (p_called_mode => l_called_mode,
1219: p_msg => 'Invalid Arg Exc Error'||substr(sqlerrm, 1, 240),
1220: p_module_name => l_module_name,
1221: p_log_level => 5);
1222: PA_DEBUG.RESET_CURR_FUNCTION;
1223: END IF;
1224:
1225: retcode := '2';
1226: errbuff := substr(sqlerrm,1,240);

Line 1247: IF P_PA_DEBUG_MODE = 'Y' THEN

1243: FND_MSG_PUB.add_exc_msg
1244: ( p_pkg_name => ' PA_FP_GEN_AMT_WRP_PKG',
1245: p_procedure_name => 'GEN_AMT_WRP',
1246: p_error_text => substr(sqlerrm,1,240));
1247: IF P_PA_DEBUG_MODE = 'Y' THEN
1248: pa_fp_gen_amount_utils.fp_debug
1249: (p_called_mode => l_called_mode,
1250: p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1251: p_module_name => l_module_name,

Line 1253: PA_DEBUG.RESET_CURR_FUNCTION;

1249: (p_called_mode => l_called_mode,
1250: p_msg => 'Unexpected Error'||substr(sqlerrm, 1, 240),
1251: p_module_name => l_module_name,
1252: p_log_level => 5);
1253: PA_DEBUG.RESET_CURR_FUNCTION;
1254: END IF;
1255: retcode := '2';
1256: errbuff := substr(sqlerrm,1,240);
1257: