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 897: x_return_status := FND_API.G_RET_STS_SUCCESS ;

893: WHERE wi.item_type IN ('PACANDID','PACOPR','PARADVWF','PARAPTEM','PARFIGEN','PAROVCNT','PAWFGPF','PAYPRJNT','PARMATRX')
894: );
895:
896: BEGIN
897: x_return_status := FND_API.G_RET_STS_SUCCESS ;
898: x_msg_count := 0;
899: x_msg_data := NULL;
900:
901: IF p_debug_mode = 'Y' THEN

Line 1018: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1014: x_msg_count => x_msg_count,
1015: x_msg_data => x_msg_data
1016: );
1017:
1018: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1019: --RAISE FND_API.G_EXC_ERROR;
1020: l_local_error_flag := 'Y'; -- 5201806
1021: END IF;
1022:

Line 1019: --RAISE FND_API.G_EXC_ERROR;

1015: x_msg_data => x_msg_data
1016: );
1017:
1018: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1019: --RAISE FND_API.G_EXC_ERROR;
1020: l_local_error_flag := 'Y'; -- 5201806
1021: END IF;
1022:
1023:

Line 1034: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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

Line 1035: --RAISE FND_API.G_EXC_ERROR;

1031: x_msg_data => x_msg_data
1032: );
1033:
1034: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1035: --RAISE FND_API.G_EXC_ERROR;
1036: l_local_error_flag := 'Y'; -- 5201806
1037: END IF;
1038:
1039: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 1049: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1045: x_msg_count => x_msg_count,
1046: x_msg_data => x_msg_data
1047: );
1048:
1049: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1050: --RAISE FND_API.G_EXC_ERROR;
1051: l_local_error_flag := 'Y'; -- 5201806
1052: END IF;
1053:

Line 1050: --RAISE FND_API.G_EXC_ERROR;

1046: x_msg_data => x_msg_data
1047: );
1048:
1049: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1050: --RAISE FND_API.G_EXC_ERROR;
1051: l_local_error_flag := 'Y'; -- 5201806
1052: END IF;
1053:
1054: IF l_local_error_flag = 'Y' THEN -- 5201806

Line 1055: RAISE FND_API.G_EXC_ERROR;

1051: l_local_error_flag := 'Y'; -- 5201806
1052: END IF;
1053:
1054: IF l_local_error_flag = 'Y' THEN -- 5201806
1055: RAISE FND_API.G_EXC_ERROR;
1056: END IF;
1057:
1058:
1059: IF p_debug_mode = 'Y' THEN

Line 1068: WHEN FND_API.G_EXC_ERROR THEN

1064: pa_debug.reset_curr_function;
1065: END IF;
1066:
1067: EXCEPTION
1068: WHEN FND_API.G_EXC_ERROR THEN
1069: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1070: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1071:
1072: IF c_purge_wf_details%ISOPEN THEN

Line 1069: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1065: END IF;
1066:
1067: EXCEPTION
1068: WHEN FND_API.G_EXC_ERROR THEN
1069: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1070: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1071:
1072: IF c_purge_wf_details%ISOPEN THEN
1073: Close c_purge_wf_details;

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

1076: -- 5201806 : Commented not needed...
1077: -- IF l_msg_count >= 1 AND x_msg_data IS NULL
1078: -- THEN
1079: -- Pa_Interface_Utils_Pub.get_messages
1080: -- ( p_encoded => Fnd_Api.G_TRUE
1081: -- , p_msg_index => 1
1082: -- , p_msg_count => l_msg_count
1083: -- , p_msg_data => l_msg_data
1084: -- , p_data => l_data

Line 1097: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1093: Pa_Debug.reset_curr_function;
1094: END IF;
1095:
1096: WHEN OTHERS THEN
1097: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1098: x_msg_count := 1;
1099: x_msg_data := SUBSTRB(SQLERRM,1,240);
1100:
1101: IF c_purge_wf_details%ISOPEN THEN

Line 1177: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1173: --mass assignment flows populate this table using request_id = -1.
1174:
1175: BEGIN
1176:
1177: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1178: x_msg_count := 0;
1179: x_msg_data := NULL;
1180:
1181: IF p_debug_mode = 'Y' THEN

Line 1234: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1230: x_msg_count => x_msg_count,
1231: x_msg_data => x_msg_data
1232: );
1233:
1234: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1235: --RAISE FND_API.G_EXC_ERROR;
1236: l_local_error_flag := 'Y'; -- 5201806
1237: END IF;
1238:

Line 1235: --RAISE FND_API.G_EXC_ERROR;

1231: x_msg_data => x_msg_data
1232: );
1233:
1234: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1235: --RAISE FND_API.G_EXC_ERROR;
1236: l_local_error_flag := 'Y'; -- 5201806
1237: END IF;
1238:
1239: IF l_local_error_flag = 'Y' THEN -- 5201806

Line 1240: RAISE FND_API.G_EXC_ERROR;

1236: l_local_error_flag := 'Y'; -- 5201806
1237: END IF;
1238:
1239: IF l_local_error_flag = 'Y' THEN -- 5201806
1240: RAISE FND_API.G_EXC_ERROR;
1241: END IF;
1242:
1243: IF p_debug_mode = 'Y' THEN
1244: pa_debug.g_err_stage:= 'Successfully inserted Log details pertaining to pa_reporting_exceptions';

Line 1251: WHEN FND_API.G_EXC_ERROR THEN

1247: pa_debug.write('PA_PURGE_PUB',pa_debug.g_err_stage,l_debug_level3);
1248: Pa_Debug.reset_curr_function;
1249: END IF;
1250: EXCEPTION
1251: WHEN FND_API.G_EXC_ERROR THEN
1252: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1253: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1254:
1255: IF c_get_request_id%ISOPEN THEN

Line 1252: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1248: Pa_Debug.reset_curr_function;
1249: END IF;
1250: EXCEPTION
1251: WHEN FND_API.G_EXC_ERROR THEN
1252: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1253: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1254:
1255: IF c_get_request_id%ISOPEN THEN
1256: CLOSE c_get_request_id;

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

1259: -- 5201806 : Commented not needed...
1260: -- IF l_msg_count >= 1 AND x_msg_data IS NULL
1261: -- THEN
1262: -- Pa_Interface_Utils_Pub.get_messages
1263: -- ( p_encoded => Fnd_Api.G_TRUE
1264: -- , p_msg_index => 1
1265: -- , p_msg_count => l_msg_count
1266: -- , p_msg_data => l_msg_data
1267: -- , p_data => l_data

Line 1280: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1276: IF p_debug_mode = 'Y' THEN
1277: Pa_Debug.reset_curr_function;
1278: END IF;
1279: WHEN OTHERS THEN
1280: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1281: x_msg_count := 1;
1282: x_msg_data := SUBSTRB(SQLERRM,1,240);
1283:
1284: IF c_get_request_id%ISOPEN THEN

Line 1394: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1390: AND (TRUNC(SYSDATE) BETWEEN per.effective_start_date AND per.effective_end_date)
1391: AND fm.menu_name IN ('PA_PRM_RES_AUTH', 'PA_PRM_PROJ_AUTH', 'PA_PRM_RES_PRMRY_CONTACT', 'PA_PRM_UTL_AUTH');
1392:
1393: BEGIN
1394: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1395: x_msg_count := 0;
1396: x_msg_data := NULL;
1397:
1398: IF p_debug_mode = 'Y' THEN

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

1435: ,p_role_name => 'PA_PRM_UTL_AUTH'
1436: ,x_return_status => l_return_status);
1437: END IF;
1438:
1439: IF (l_return_status IS NULL OR l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
1440: l_grants_deleted := l_grants_deleted + 1;
1441: END IF;
1442:
1443: EXCEPTION

Line 1473: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1469: x_msg_count => x_msg_count,
1470: x_msg_data => x_msg_data
1471: );
1472:
1473: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1474: l_local_error_flag := 'Y';
1475: END IF;
1476:
1477: IF l_local_error_flag = 'Y' THEN

Line 1478: RAISE FND_API.G_EXC_ERROR;

1474: l_local_error_flag := 'Y';
1475: END IF;
1476:
1477: IF l_local_error_flag = 'Y' THEN
1478: RAISE FND_API.G_EXC_ERROR;
1479: END IF;
1480:
1481: IF p_debug_mode = 'Y' THEN
1482: pa_debug.g_err_stage:= 'Successfully inserted Log details pertaining to PURGE_ORG_AUTHORITY';

Line 1490: WHEN FND_API.G_EXC_ERROR THEN

1486: Pa_Debug.reset_curr_function;
1487: END IF;
1488:
1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491:
1492: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1493: x_msg_count := Fnd_Msg_Pub.count_msg;
1494:

Line 1492: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1488:
1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491:
1492: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1493: x_msg_count := Fnd_Msg_Pub.count_msg;
1494:
1495: IF c_purge_org_authority%ISOPEN THEN
1496: CLOSE c_purge_org_authority;

Line 1505: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1501: END IF;
1502:
1503: WHEN OTHERS THEN
1504:
1505: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1506: x_msg_count := 1;
1507: x_msg_data := SUBSTRB(SQLERRM,1,240);
1508:
1509: IF c_purge_org_authority%ISOPEN THEN

Line 1578: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1574: l_local_error_flag VARCHAR2(1) :='N';
1575:
1576: BEGIN
1577:
1578: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1579: x_msg_count := 0;
1580: x_msg_data := NULL;
1581:
1582: IF p_debug_mode = 'Y' THEN

Line 1679: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1675: x_msg_count => x_msg_count,
1676: x_msg_data => x_msg_data
1677: );
1678:
1679: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1680: l_local_error_flag := 'Y';
1681: END IF;
1682:
1683: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 1693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1689: x_msg_count => x_msg_count,
1690: x_msg_data => x_msg_data
1691: );
1692:
1693: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1694: l_local_error_flag := 'Y';
1695: END IF;
1696:
1697: PA_PURGE_PUB.INSERT_PURGE_LOG

Line 1707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1703: x_msg_count => x_msg_count,
1704: x_msg_data => x_msg_data
1705: );
1706:
1707: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1708: l_local_error_flag := 'Y';
1709: END IF;
1710:
1711: IF l_local_error_flag = 'Y' THEN

Line 1712: RAISE FND_API.G_EXC_ERROR;

1708: l_local_error_flag := 'Y';
1709: END IF;
1710:
1711: IF l_local_error_flag = 'Y' THEN
1712: RAISE FND_API.G_EXC_ERROR;
1713: END IF;
1714:
1715:
1716: IF p_debug_mode = 'Y' THEN

Line 1725: WHEN FND_API.G_EXC_ERROR THEN

1721: pa_debug.reset_curr_function;
1722: END IF;
1723:
1724: EXCEPTION
1725: WHEN FND_API.G_EXC_ERROR THEN
1726: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1727: x_msg_count := Fnd_Msg_Pub.count_msg;
1728:
1729: IF p_debug_mode = 'Y' THEN

Line 1726: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1722: END IF;
1723:
1724: EXCEPTION
1725: WHEN FND_API.G_EXC_ERROR THEN
1726: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1727: x_msg_count := Fnd_Msg_Pub.count_msg;
1728:
1729: IF p_debug_mode = 'Y' THEN
1730: Pa_Debug.reset_curr_function;

Line 1734: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1730: Pa_Debug.reset_curr_function;
1731: END IF;
1732:
1733: WHEN OTHERS THEN
1734: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1735: x_msg_count := 1;
1736: x_msg_data := SUBSTRB(SQLERRM,1,240);
1737:
1738: Fnd_Msg_Pub.add_exc_msg

Line 1795: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1791: l_debug_mode VARCHAR2(1); -- 5201806
1792:
1793: BEGIN
1794:
1795: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1796: x_msg_count := 0;
1797: x_msg_data := NULL;
1798: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N'); -- 5201806
1799:

Line 1835: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1831: Pa_Debug.reset_curr_function;
1832:
1833: EXCEPTION
1834: WHEN OTHERS THEN
1835: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1836: x_msg_count := 1;
1837: x_msg_data := SUBSTRB(SQLERRM,1,240);
1838:
1839: IF c_purge_details%ISOPEN THEN

Line 1895: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1891: l_debug_mode VARCHAR2(1);
1892: l_debug_level3 NUMBER := 3;
1893: BEGIN
1894:
1895: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1896: x_msg_count := 0;
1897: x_msg_data := NULL;
1898:
1899: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');

Line 1945: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1941: END IF;
1942:
1943: EXCEPTION
1944: WHEN OTHERS THEN
1945: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1946: x_msg_count := 1;
1947: x_msg_data := SUBSTRB(SQLERRM,1,240);
1948:
1949: Fnd_Msg_Pub.add_exc_msg