DBA Data[Home] [Help]

APPS.PA_PURGE_PUB dependencies on FND_API

Line 57: l_return_status := FND_API.G_RET_STS_SUCCESS;

53: -- in them . So,this save point would be lost anyway.
54:
55: errbuf := NULL ;
56: retcode := 0;
57: l_return_status := FND_API.G_RET_STS_SUCCESS;
58: pa_debug.set_err_stack('PA_PURGE_PUB.START_PROCESS');
59: FND_MSG_PUB.initialize;
60:
61: pa_debug.set_process('PLSQL','LOG',p_debug_mode);

Line 83: l_return_status := FND_API.G_RET_STS_ERROR;

79: pa_debug.write_file('START_PROCESS :' || pa_debug.g_err_stage);
80: pa_debug.write('PA_PURGE_PUB.START_PROCESS',pa_debug.g_err_stage,l_debug_level3);
81: END IF;
82:
83: l_return_status := FND_API.G_RET_STS_ERROR;
84: PA_UTILS.ADD_MESSAGE
85: (p_app_short_name => 'PA',
86: p_msg_name => 'PA_INV_PARAM_PASSED');
87: RAISE Invalid_Arg_Exc_Pjr;

Line 120: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

116: pa_debug.write_file('START_PROCESS :' || pa_debug.g_err_stage);
117: pa_debug.write('PA_PURGE_PUB.START_PROCESS',pa_debug.g_err_stage,l_debug_level3);
118: END IF;
119:
120: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
121: l_local_error_flag := 'Y'; -- 5201806
122: END IF ;
123: END IF; -- 5171235
124:

Line 154: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

150: pa_debug.write_file('START_PROCESS :' || pa_debug.g_err_stage);
151: pa_debug.write('PA_PURGE_PUB.START_PROCESS',pa_debug.g_err_stage,l_debug_level3);
152: END IF;
153:
154: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
155: l_local_error_flag := 'Y'; -- 5201806
156: END IF ;
157: END IF; -- 5171235
158:

Line 190: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

186: pa_debug.write_file('START_PROCESS :' || pa_debug.g_err_stage);
187: pa_debug.write('PA_PURGE_PUB.START_PROCESS',pa_debug.g_err_stage,l_debug_level3);
188: END IF;
189:
190: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
191: l_local_error_flag := 'Y'; -- 5201806
192: END IF ;
193:
194: END IF;

Line 227: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

223: pa_debug.write_file('START_PROCESS :' || pa_debug.g_err_stage);
224: pa_debug.write('PA_PURGE_PUB.START_PROCESS',pa_debug.g_err_stage,l_debug_level3);
225: END IF;
226:
227: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
228: l_local_error_flag := 'Y';
229: END IF ;
230: END IF;
231:

Line 263: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

259: pa_debug.write_file('START_PROCESS :' || pa_debug.g_err_stage);
260: pa_debug.write('PA_PURGE_PUB.START_PROCESS',pa_debug.g_err_stage,l_debug_level3);
261: END IF;
262:
263: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
264: l_local_error_flag := 'Y';
265: END IF ;
266: END IF;
267:

Line 276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

272: ,x_msg_count => l_msg_count
273: ,x_msg_data => l_msg_data
274: );
275:
276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
277: --RAISE FND_API.G_EXC_ERROR; -- 5201806
278: l_local_error_flag := 'Y'; -- 5201806
279: END IF;
280:

Line 277: --RAISE FND_API.G_EXC_ERROR; -- 5201806

273: ,x_msg_data => l_msg_data
274: );
275:
276: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
277: --RAISE FND_API.G_EXC_ERROR; -- 5201806
278: l_local_error_flag := 'Y'; -- 5201806
279: END IF;
280:
281: COMMIT;

Line 284: RAISE FND_API.G_EXC_ERROR;

280:
281: COMMIT;
282:
283: IF l_local_error_flag = 'Y' THEN -- 5201806
284: RAISE FND_API.G_EXC_ERROR;
285: END IF;
286:
287: IF p_debug_mode = 'Y' THEN
288: pa_debug.g_err_stage:= 'Successfully Exiting START_PROCESS ';

Line 298: l_return_status := FND_API.G_RET_STS_ERROR;

294: END IF;
295:
296: EXCEPTION
297: WHEN Invalid_Arg_Exc_Pjr THEN
298: l_return_status := FND_API.G_RET_STS_ERROR;
299: l_msg_count := FND_MSG_PUB.count_msg;
300: retcode := '-1';
301:
302: IF p_debug_mode = 'Y' THEN

Line 311: -- (p_encoded => FND_API.G_TRUE, -- 5201806 : It should have been FALSE

307:
308: -- 5201806 : Commented not needed
309: --IF l_msg_count >= 1 THEN
310: -- PA_INTERFACE_UTILS_PUB.get_messages
311: -- (p_encoded => FND_API.G_TRUE, -- 5201806 : It should have been FALSE
312: -- p_msg_index => 1,
313: -- p_msg_count => l_msg_count,
314: -- p_msg_data => l_msg_data,
315: -- p_data => l_data,

Line 323: (p_encoded => FND_API.G_FALSE,

319: -- END IF;
320:
321: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806
322: PA_INTERFACE_UTILS_PUB.get_messages
323: (p_encoded => FND_API.G_FALSE,
324: p_msg_index => 1,
325: p_msg_count => l_msg_count,
326: p_msg_data => l_msg_data,
327: p_data => l_data,

Line 344: WHEN FND_API.G_EXC_ERROR THEN

340: pa_debug.reset_curr_function;
341: END IF ;
342: -- No raise as per FD
343:
344: WHEN FND_API.G_EXC_ERROR THEN
345: l_return_status := FND_API.G_RET_STS_ERROR;
346: l_msg_count := FND_MSG_PUB.count_msg;
347: retcode := '-1';
348:

Line 345: l_return_status := FND_API.G_RET_STS_ERROR;

341: END IF ;
342: -- No raise as per FD
343:
344: WHEN FND_API.G_EXC_ERROR THEN
345: l_return_status := FND_API.G_RET_STS_ERROR;
346: l_msg_count := FND_MSG_PUB.count_msg;
347: retcode := '-1';
348:
349: IF p_debug_mode = 'Y' THEN

Line 358: -- (p_encoded => FND_API.G_TRUE, -- 5201806 : It should have been FALSE

354:
355: -- 5201806 : Commented not needed
356: --IF l_msg_count >= 1 THEN
357: -- PA_INTERFACE_UTILS_PUB.get_messages
358: -- (p_encoded => FND_API.G_TRUE, -- 5201806 : It should have been FALSE
359: -- p_msg_index => 1,
360: -- p_msg_count => l_msg_count,
361: -- p_msg_data => l_msg_data,
362: -- p_data => l_data,

Line 370: (p_encoded => FND_API.G_FALSE,

366: -- END IF;
367:
368: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806
369: PA_INTERFACE_UTILS_PUB.get_messages
370: (p_encoded => FND_API.G_FALSE,
371: p_msg_index => 1,
372: p_msg_count => l_msg_count,
373: p_msg_data => l_msg_data,
374: p_data => l_data,

Line 393: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

389: END IF ;
390: -- No raise as per FD
391:
392: WHEN OTHERS THEN
393: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
394: retcode := '-1';
395: errbuf := SUBSTRB(SQLERRM,1,240);
396:
397: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_PURGE_PUB'

Line 403: (p_encoded => FND_API.G_FALSE,

399: ,p_error_text => errbuf);
400:
401: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806
402: PA_INTERFACE_UTILS_PUB.get_messages
403: (p_encoded => FND_API.G_FALSE,
404: p_msg_index => 1,
405: p_msg_count => l_msg_count,
406: p_msg_data => l_msg_data,
407: p_data => l_data,

Line 496: x_return_status := FND_API.G_RET_STS_SUCCESS ;

492: -- FROM dba_objects
493: -- WHERE object_name= l_table_name AND OBJECT_TYPE = 'TABLE';
494: BEGIN
495:
496: x_return_status := FND_API.G_RET_STS_SUCCESS ;
497: x_msg_count := 0;
498: x_msg_data := NULL;
499:
500: IF p_debug_mode = 'Y' THEN

Line 736: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

732: x_msg_count => x_msg_count,
733: x_msg_data => x_msg_data
734: );
735:
736: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
737: --RAISE FND_API.G_EXC_ERROR;
738: l_local_error_flag := 'Y'; -- 5201806
739: END IF;
740:

Line 737: --RAISE FND_API.G_EXC_ERROR;

733: x_msg_data => x_msg_data
734: );
735:
736: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
737: --RAISE FND_API.G_EXC_ERROR;
738: l_local_error_flag := 'Y'; -- 5201806
739: END IF;
740:
741:

Line 752: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

748: x_msg_count => x_msg_count,
749: x_msg_data => x_msg_data
750: );
751:
752: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
753: --RAISE FND_API.G_EXC_ERROR;
754: l_local_error_flag := 'Y'; -- 5201806
755: END IF;
756:

Line 753: --RAISE FND_API.G_EXC_ERROR;

749: x_msg_data => x_msg_data
750: );
751:
752: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
753: --RAISE FND_API.G_EXC_ERROR;
754: l_local_error_flag := 'Y'; -- 5201806
755: END IF;
756:
757: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 767: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

763: x_msg_count => x_msg_count,
764: x_msg_data => x_msg_data
765: );
766:
767: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
768: --RAISE FND_API.G_EXC_ERROR;
769: l_local_error_flag := 'Y'; -- 5201806
770: END IF;
771:

Line 768: --RAISE FND_API.G_EXC_ERROR;

764: x_msg_data => x_msg_data
765: );
766:
767: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
768: --RAISE FND_API.G_EXC_ERROR;
769: l_local_error_flag := 'Y'; -- 5201806
770: END IF;
771:
772: IF l_local_error_flag = 'Y' THEN -- 5201806

Line 773: RAISE FND_API.G_EXC_ERROR;

769: l_local_error_flag := 'Y'; -- 5201806
770: END IF;
771:
772: IF l_local_error_flag = 'Y' THEN -- 5201806
773: RAISE FND_API.G_EXC_ERROR;
774: END IF;
775:
776: IF p_debug_mode = 'Y' THEN
777: pa_debug.g_err_stage:= 'Successfully inserted Log details pertaining to PA_FI_AMOUNT_DETAILS';

Line 785: WHEN FND_API.G_EXC_ERROR THEN

781: pa_debug.reset_curr_function;
782: END IF;
783:
784: EXCEPTION
785: WHEN FND_API.G_EXC_ERROR THEN
786: x_return_status := Fnd_Api.G_RET_STS_ERROR;
787: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
788:
789: IF c_get_forecast_item_ids%ISOPEN THEN

Line 786: x_return_status := Fnd_Api.G_RET_STS_ERROR;

782: END IF;
783:
784: EXCEPTION
785: WHEN FND_API.G_EXC_ERROR THEN
786: x_return_status := Fnd_Api.G_RET_STS_ERROR;
787: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
788:
789: IF c_get_forecast_item_ids%ISOPEN THEN
790: CLOSE c_get_forecast_item_ids;

Line 797: -- ( p_encoded => Fnd_Api.G_TRUE

793: -- 5201806 : Commented not needed...
794: -- IF l_msg_count >= 1 AND x_msg_data IS NULL
795: -- THEN
796: -- Pa_Interface_Utils_Pub.get_messages
797: -- ( p_encoded => Fnd_Api.G_TRUE
798: -- , p_msg_index => 1
799: -- , p_msg_count => l_msg_count
800: -- , p_msg_data => l_msg_data
801: -- , p_data => l_data

Line 813: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

809: IF p_debug_mode = 'Y' THEN
810: Pa_Debug.reset_curr_function;
811: END IF;
812: WHEN OTHERS THEN
813: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
814: x_msg_count := 1;
815: x_msg_data := SUBSTRB(SQLERRM,1,240);
816:
817: IF c_get_forecast_item_ids%ISOPEN THEN

Line 915: x_return_status := FND_API.G_RET_STS_SUCCESS ;

911: --bug#10238573 end
912: ;
913:
914: BEGIN
915: x_return_status := FND_API.G_RET_STS_SUCCESS ;
916: x_msg_count := 0;
917: x_msg_data := NULL;
918:
919: IF p_debug_mode = 'Y' THEN

Line 1037: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1033: x_msg_count => x_msg_count,
1034: x_msg_data => x_msg_data
1035: );
1036:
1037: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1038: --RAISE FND_API.G_EXC_ERROR;
1039: l_local_error_flag := 'Y'; -- 5201806
1040: END IF;
1041:

Line 1038: --RAISE FND_API.G_EXC_ERROR;

1034: x_msg_data => x_msg_data
1035: );
1036:
1037: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1038: --RAISE FND_API.G_EXC_ERROR;
1039: l_local_error_flag := 'Y'; -- 5201806
1040: END IF;
1041:
1042:

Line 1053: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1049: x_msg_count => x_msg_count,
1050: x_msg_data => x_msg_data
1051: );
1052:
1053: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1054: --RAISE FND_API.G_EXC_ERROR;
1055: l_local_error_flag := 'Y'; -- 5201806
1056: END IF;
1057:

Line 1054: --RAISE FND_API.G_EXC_ERROR;

1050: x_msg_data => x_msg_data
1051: );
1052:
1053: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1054: --RAISE FND_API.G_EXC_ERROR;
1055: l_local_error_flag := 'Y'; -- 5201806
1056: END IF;
1057:
1058: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 1068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1064: x_msg_count => x_msg_count,
1065: x_msg_data => x_msg_data
1066: );
1067:
1068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: --RAISE FND_API.G_EXC_ERROR;
1070: l_local_error_flag := 'Y'; -- 5201806
1071: END IF;
1072:

Line 1069: --RAISE FND_API.G_EXC_ERROR;

1065: x_msg_data => x_msg_data
1066: );
1067:
1068: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1069: --RAISE FND_API.G_EXC_ERROR;
1070: l_local_error_flag := 'Y'; -- 5201806
1071: END IF;
1072:
1073: IF l_local_error_flag = 'Y' THEN -- 5201806

Line 1074: RAISE FND_API.G_EXC_ERROR;

1070: l_local_error_flag := 'Y'; -- 5201806
1071: END IF;
1072:
1073: IF l_local_error_flag = 'Y' THEN -- 5201806
1074: RAISE FND_API.G_EXC_ERROR;
1075: END IF;
1076:
1077:
1078: IF p_debug_mode = 'Y' THEN

Line 1087: WHEN FND_API.G_EXC_ERROR THEN

1083: pa_debug.reset_curr_function;
1084: END IF;
1085:
1086: EXCEPTION
1087: WHEN FND_API.G_EXC_ERROR THEN
1088: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1089: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1090:
1091: IF c_purge_wf_details%ISOPEN THEN

Line 1088: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1084: END IF;
1085:
1086: EXCEPTION
1087: WHEN FND_API.G_EXC_ERROR THEN
1088: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1089: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1090:
1091: IF c_purge_wf_details%ISOPEN THEN
1092: Close c_purge_wf_details;

Line 1099: -- ( p_encoded => Fnd_Api.G_TRUE

1095: -- 5201806 : Commented not needed...
1096: -- IF l_msg_count >= 1 AND x_msg_data IS NULL
1097: -- THEN
1098: -- Pa_Interface_Utils_Pub.get_messages
1099: -- ( p_encoded => Fnd_Api.G_TRUE
1100: -- , p_msg_index => 1
1101: -- , p_msg_count => l_msg_count
1102: -- , p_msg_data => l_msg_data
1103: -- , p_data => l_data

Line 1116: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1112: Pa_Debug.reset_curr_function;
1113: END IF;
1114:
1115: WHEN OTHERS THEN
1116: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1117: x_msg_count := 1;
1118: x_msg_data := SUBSTRB(SQLERRM,1,240);
1119:
1120: IF c_purge_wf_details%ISOPEN THEN

Line 1196: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1192: --mass assignment flows populate this table using request_id = -1.
1193:
1194: BEGIN
1195:
1196: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1197: x_msg_count := 0;
1198: x_msg_data := NULL;
1199:
1200: IF p_debug_mode = 'Y' THEN

Line 1253: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1249: x_msg_count => x_msg_count,
1250: x_msg_data => x_msg_data
1251: );
1252:
1253: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1254: --RAISE FND_API.G_EXC_ERROR;
1255: l_local_error_flag := 'Y'; -- 5201806
1256: END IF;
1257:

Line 1254: --RAISE FND_API.G_EXC_ERROR;

1250: x_msg_data => x_msg_data
1251: );
1252:
1253: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1254: --RAISE FND_API.G_EXC_ERROR;
1255: l_local_error_flag := 'Y'; -- 5201806
1256: END IF;
1257:
1258: IF l_local_error_flag = 'Y' THEN -- 5201806

Line 1259: RAISE FND_API.G_EXC_ERROR;

1255: l_local_error_flag := 'Y'; -- 5201806
1256: END IF;
1257:
1258: IF l_local_error_flag = 'Y' THEN -- 5201806
1259: RAISE FND_API.G_EXC_ERROR;
1260: END IF;
1261:
1262: IF p_debug_mode = 'Y' THEN
1263: pa_debug.g_err_stage:= 'Successfully inserted Log details pertaining to pa_reporting_exceptions';

Line 1270: WHEN FND_API.G_EXC_ERROR THEN

1266: pa_debug.write('PA_PURGE_PUB',pa_debug.g_err_stage,l_debug_level3);
1267: Pa_Debug.reset_curr_function;
1268: END IF;
1269: EXCEPTION
1270: WHEN FND_API.G_EXC_ERROR THEN
1271: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1272: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1273:
1274: IF c_get_request_id%ISOPEN THEN

Line 1271: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1267: Pa_Debug.reset_curr_function;
1268: END IF;
1269: EXCEPTION
1270: WHEN FND_API.G_EXC_ERROR THEN
1271: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1272: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1273:
1274: IF c_get_request_id%ISOPEN THEN
1275: CLOSE c_get_request_id;

Line 1282: -- ( p_encoded => Fnd_Api.G_TRUE

1278: -- 5201806 : Commented not needed...
1279: -- IF l_msg_count >= 1 AND x_msg_data IS NULL
1280: -- THEN
1281: -- Pa_Interface_Utils_Pub.get_messages
1282: -- ( p_encoded => Fnd_Api.G_TRUE
1283: -- , p_msg_index => 1
1284: -- , p_msg_count => l_msg_count
1285: -- , p_msg_data => l_msg_data
1286: -- , p_data => l_data

Line 1299: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1295: IF p_debug_mode = 'Y' THEN
1296: Pa_Debug.reset_curr_function;
1297: END IF;
1298: WHEN OTHERS THEN
1299: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1300: x_msg_count := 1;
1301: x_msg_data := SUBSTRB(SQLERRM,1,240);
1302:
1303: IF c_get_request_id%ISOPEN THEN

Line 1413: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1409: AND (TRUNC(SYSDATE) BETWEEN per.effective_start_date AND per.effective_end_date)
1410: AND fm.menu_name IN ('PA_PRM_RES_AUTH', 'PA_PRM_PROJ_AUTH', 'PA_PRM_RES_PRMRY_CONTACT', 'PA_PRM_UTL_AUTH');
1411:
1412: BEGIN
1413: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1414: x_msg_count := 0;
1415: x_msg_data := NULL;
1416:
1417: IF p_debug_mode = 'Y' THEN

Line 1458: IF (l_return_status IS NULL OR l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

1454: ,p_role_name => 'PA_PRM_UTL_AUTH'
1455: ,x_return_status => l_return_status);
1456: END IF;
1457:
1458: IF (l_return_status IS NULL OR l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1459: l_grants_deleted := l_grants_deleted + 1;
1460: END IF;
1461:
1462: EXCEPTION

Line 1492: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1488: x_msg_count => x_msg_count,
1489: x_msg_data => x_msg_data
1490: );
1491:
1492: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1493: l_local_error_flag := 'Y';
1494: END IF;
1495:
1496: IF l_local_error_flag = 'Y' THEN

Line 1497: RAISE FND_API.G_EXC_ERROR;

1493: l_local_error_flag := 'Y';
1494: END IF;
1495:
1496: IF l_local_error_flag = 'Y' THEN
1497: RAISE FND_API.G_EXC_ERROR;
1498: END IF;
1499:
1500: IF p_debug_mode = 'Y' THEN
1501: pa_debug.g_err_stage:= 'Successfully inserted Log details pertaining to PURGE_ORG_AUTHORITY';

Line 1509: WHEN FND_API.G_EXC_ERROR THEN

1505: Pa_Debug.reset_curr_function;
1506: END IF;
1507:
1508: EXCEPTION
1509: WHEN FND_API.G_EXC_ERROR THEN
1510:
1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1512: x_msg_count := Fnd_Msg_Pub.count_msg;
1513:

Line 1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1507:
1508: EXCEPTION
1509: WHEN FND_API.G_EXC_ERROR THEN
1510:
1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1512: x_msg_count := Fnd_Msg_Pub.count_msg;
1513:
1514: IF c_purge_org_authority%ISOPEN THEN
1515: CLOSE c_purge_org_authority;

Line 1524: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1520: END IF;
1521:
1522: WHEN OTHERS THEN
1523:
1524: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1525: x_msg_count := 1;
1526: x_msg_data := SUBSTRB(SQLERRM,1,240);
1527:
1528: IF c_purge_org_authority%ISOPEN THEN

Line 1597: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1593: l_local_error_flag VARCHAR2(1) :='N';
1594:
1595: BEGIN
1596:
1597: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1598: x_msg_count := 0;
1599: x_msg_data := NULL;
1600:
1601: IF p_debug_mode = 'Y' THEN

Line 1698: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1694: x_msg_count => x_msg_count,
1695: x_msg_data => x_msg_data
1696: );
1697:
1698: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1699: l_local_error_flag := 'Y';
1700: END IF;
1701:
1702: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 1712: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1708: x_msg_count => x_msg_count,
1709: x_msg_data => x_msg_data
1710: );
1711:
1712: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1713: l_local_error_flag := 'Y';
1714: END IF;
1715:
1716: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 1726: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1722: x_msg_count => x_msg_count,
1723: x_msg_data => x_msg_data
1724: );
1725:
1726: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1727: l_local_error_flag := 'Y';
1728: END IF;
1729:
1730: IF l_local_error_flag = 'Y' THEN

Line 1731: RAISE FND_API.G_EXC_ERROR;

1727: l_local_error_flag := 'Y';
1728: END IF;
1729:
1730: IF l_local_error_flag = 'Y' THEN
1731: RAISE FND_API.G_EXC_ERROR;
1732: END IF;
1733:
1734:
1735: IF p_debug_mode = 'Y' THEN

Line 1744: WHEN FND_API.G_EXC_ERROR THEN

1740: pa_debug.reset_curr_function;
1741: END IF;
1742:
1743: EXCEPTION
1744: WHEN FND_API.G_EXC_ERROR THEN
1745: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1746: x_msg_count := Fnd_Msg_Pub.count_msg;
1747:
1748: IF p_debug_mode = 'Y' THEN

Line 1745: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1741: END IF;
1742:
1743: EXCEPTION
1744: WHEN FND_API.G_EXC_ERROR THEN
1745: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1746: x_msg_count := Fnd_Msg_Pub.count_msg;
1747:
1748: IF p_debug_mode = 'Y' THEN
1749: Pa_Debug.reset_curr_function;

Line 1753: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1749: Pa_Debug.reset_curr_function;
1750: END IF;
1751:
1752: WHEN OTHERS THEN
1753: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1754: x_msg_count := 1;
1755: x_msg_data := SUBSTRB(SQLERRM,1,240);
1756:
1757: Fnd_Msg_Pub.add_exc_msg

Line 1814: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1810: l_debug_mode VARCHAR2(1); -- 5201806
1811:
1812: BEGIN
1813:
1814: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1815: x_msg_count := 0;
1816: x_msg_data := NULL;
1817: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N'); -- 5201806
1818:

Line 1854: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1850: Pa_Debug.reset_curr_function;
1851:
1852: EXCEPTION
1853: WHEN OTHERS THEN
1854: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1855: x_msg_count := 1;
1856: x_msg_data := SUBSTRB(SQLERRM,1,240);
1857:
1858: IF c_purge_details%ISOPEN THEN

Line 1914: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1910: l_debug_mode VARCHAR2(1);
1911: l_debug_level3 NUMBER := 3;
1912: BEGIN
1913:
1914: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1915: x_msg_count := 0;
1916: x_msg_data := NULL;
1917:
1918: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

Line 1964: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1960: END IF;
1961:
1962: EXCEPTION
1963: WHEN OTHERS THEN
1964: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1965: x_msg_count := 1;
1966: x_msg_data := SUBSTRB(SQLERRM,1,240);
1967:
1968: Fnd_Msg_Pub.add_exc_msg