DBA Data[Home] [Help]

APPS.FND_OAM_DSCRAM_DMLS_PKG dependencies on FND_API

Line 67: x_return_status := FND_API.G_RET_STS_ERROR;

63: l_work_queue FND_OAM_DSCRAM_UNITS_PKG.ordered_work_queue_type := FND_OAM_DSCRAM_UNITS_PKG.ordered_work_queue_type();
64: k NUMBER;
65: BEGIN
66: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
67: x_return_status := FND_API.G_RET_STS_ERROR;
68: x_return_msg := '';
69:
70: -- bulk select all valid dmls with work to do
71: SELECT dml_id, priority, weight

Line 94: x_return_status := FND_API.G_RET_STS_SUCCESS;

90:
91: --success
92: x_work_queue := l_work_queue;
93: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
94: x_return_status := FND_API.G_RET_STS_SUCCESS;
95: EXCEPTION
96: WHEN OTHERS THEN
97: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
98: x_return_msg := 'Unit ID ('||p_unit_id||') failed to fetch dml_ids: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';

Line 97: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

93: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
94: x_return_status := FND_API.G_RET_STS_SUCCESS;
95: EXCEPTION
96: WHEN OTHERS THEN
97: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
98: x_return_msg := 'Unit ID ('||p_unit_id||') failed to fetch dml_ids: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
99: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
100: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
101: END;

Line 120: x_return_status := FND_API.G_RET_STS_ERROR;

116: l_return_status VARCHAR2(6);
117: l_return_msg VARCHAR2(2048);
118: BEGIN
119: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
120: x_return_status := FND_API.G_RET_STS_ERROR;
121: x_return_msg := '';
122:
123: --make sure the dml's in the cache, if not we need to fetch its arg list now to update the writable args
124: --and place it in the cache if its possible that we will update an arg here.

Line 133: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

129: l_arg_list,
130: l_has_writable_args,
131: l_return_status,
132: l_return_msg);
133: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
134: x_return_status := l_return_status;
135: x_return_msg := l_return_msg;
136: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
137: RETURN;

Line 138: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS AND l_has_writable_args THEN

134: x_return_status := l_return_status;
135: x_return_msg := l_return_msg;
136: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
137: RETURN;
138: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS AND l_has_writable_args THEN
139: --to allow these args to be pushed into the context, we also need to make a dml cache entry so that
140: --destroy_dml_cache_entry can get the computed value
141: l_dml_cache_entry.dml_id := p_dml_id;
142: l_dml_cache_entry.arg_list := l_arg_list;

Line 160: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

156: NULL,
157: NULL,
158: l_return_status,
159: l_return_msg);
160: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
161: x_return_status := l_return_status;
162: x_return_msg := l_return_msg;
163: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
164: RETURN;

Line 169: x_return_status := FND_API.G_RET_STS_SUCCESS;

165: END IF;
166: END IF;
167:
168: --success
169: x_return_status := FND_API.G_RET_STS_SUCCESS;
170: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
171: EXCEPTION
172: WHEN OTHERS THEN
173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

169: x_return_status := FND_API.G_RET_STS_SUCCESS;
170: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
171: EXCEPTION
172: WHEN OTHERS THEN
173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
174: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
175: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
176: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
177: END;

Line 192: x_return_status := FND_API.G_RET_STS_ERROR;

188:
189: l_return_status VARCHAR2(6);
190: l_return_msg VARCHAR2(2048);
191: BEGIN
192: x_return_status := FND_API.G_RET_STS_ERROR;
193: x_return_msg := '';
194:
195: -- if requested, roll the arg list into the context
196: IF p_update_context THEN

Line 206: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

202: --first destroy the argument list
203: FND_OAM_DSCRAM_ARGS_PKG.DESTROY_ARG_LIST(b_dml_cache(p_dml_id).arg_list,
204: l_return_status,
205: l_return_msg);
206: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
207: x_return_status := l_return_status;
208: x_return_msg := l_return_msg;
209: RETURN;
210: END IF;

Line 220: x_return_status := FND_API.G_RET_STS_SUCCESS;

216:
217: --remove the dml from the cache
218: b_dml_cache.DELETE(p_dml_id);
219:
220: x_return_status := FND_API.G_RET_STS_SUCCESS;
221: EXCEPTION
222: WHEN OTHERS THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';

Line 223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

219:
220: x_return_status := FND_API.G_RET_STS_SUCCESS;
221: EXCEPTION
222: WHEN OTHERS THEN
223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
224: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
225: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
226: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
227: END;

Line 242: x_return_status := FND_API.G_RET_STS_ERROR;

238: l_return_status VARCHAR2(6);
239: l_return_msg VARCHAR2(2048);
240: BEGIN
241: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
242: x_return_status := FND_API.G_RET_STS_ERROR;
243: x_return_msg := '';
244:
245: --make sure the dml's in the cache and get it's entry
246: IF NOT b_dml_cache.EXISTS(p_dml_id) THEN

Line 248: x_return_status := FND_API.G_RET_STS_SUCCESS;

244:
245: --make sure the dml's in the cache and get it's entry
246: IF NOT b_dml_cache.EXISTS(p_dml_id) THEN
247: --not existing is fine here
248: x_return_status := FND_API.G_RET_STS_SUCCESS;
249: fnd_oam_debug.log(1, l_ctxt, 'DML ID ('||p_dml_id||') not found in cache.');
250: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
251: RETURN;
252: END IF;

Line 264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

260:
261: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
262: EXCEPTION
263: WHEN OTHERS THEN
264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
265: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
266: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
267: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
268: END;

Line 284: x_return_status := FND_API.G_RET_STS_ERROR;

280: l_return_status VARCHAR2(6);
281: l_return_msg VARCHAR2(2048);
282: BEGIN
283: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
284: x_return_status := FND_API.G_RET_STS_ERROR;
285: x_return_msg := '';
286:
287: --loop through what's left in the cache, destroying each, ignore rolling the args into the context
288: k := b_dml_cache.FIRST;

Line 296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

292: px_arg_context,
293: FALSE,
294: l_return_status,
295: l_return_msg);
296: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
297: l_found_failure := TRUE;
298: --don't return, let it try to destroy the others first
299: x_return_status := l_return_status;
300: x_return_msg := l_return_msg;

Line 310: x_return_status := FND_API.G_RET_STS_SUCCESS;

306: --delete all members of the cache even if some failed
307: b_dml_cache.DELETE;
308:
309: IF NOT l_found_failure THEN
310: x_return_status := FND_API.G_RET_STS_SUCCESS;
311: END IF;
312: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
313: EXCEPTION
314: WHEN OTHERS THEN

Line 315: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

311: END IF;
312: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
313: EXCEPTION
314: WHEN OTHERS THEN
315: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
316: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
317: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
318: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
319: END;

Line 342: x_return_status := FND_API.G_RET_STS_ERROR;

338: l_return_status VARCHAR2(6);
339: l_return_msg VARCHAR2(2048);
340: BEGIN
341: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
342: x_return_status := FND_API.G_RET_STS_ERROR;
343: x_return_msg := '';
344:
345: --make sure the dml's in the cache
346: IF b_dml_cache.EXISTS(p_dml_id) THEN

Line 414: x_return_status := FND_API.G_RET_STS_SUCCESS;

410: --exit without committing, leave that to the parent
411:
412: --success
413: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
414: x_return_status := FND_API.G_RET_STS_SUCCESS;
415: EXCEPTION
416: WHEN OTHERS THEN
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';

Line 417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

413: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
414: x_return_status := FND_API.G_RET_STS_SUCCESS;
415: EXCEPTION
416: WHEN OTHERS THEN
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418: x_return_msg := 'Unhandled Exception: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
419: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
420: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
421: END;

Line 444: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

440: p_message,
441: p_workers_assigned,
442: x_return_status,
443: x_return_msg);
444: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
445: COMMIT;
446: fnd_oam_debug.log(1, l_ctxt, 'Committed completion of DML ('||p_dml_id||')');
447: ELSE
448: fnd_oam_debug.log(3, l_ctxt, 'Failed to complete DML ('||p_dml_id||') autonomously: status('||x_return_status||'), message('||x_return_msg||')');

Line 478: x_return_status := FND_API.G_RET_STS_ERROR;

474: l_return_status VARCHAR2(6);
475: l_return_msg VARCHAR2(2048);
476: BEGIN
477: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
478: x_return_status := FND_API.G_RET_STS_ERROR;
479: x_return_msg := '';
480:
481: --assume that the check already occured in add_dml_to_cache so proceed right to the lock
482: SELECT dml_stmt, dml_where_clause, dml_final_stmt

Line 492: x_return_status := FND_API.G_RET_STS_SUCCESS;

488: --make sure the final stmt's still null
489: IF l_final_dml_stmt IS NOT NULL THEN
490: x_final_dml_stmt := l_final_dml_stmt;
491: ROLLBACK;
492: x_return_status := FND_API.G_RET_STS_SUCCESS;
493: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
494: RETURN;
495: END IF;
496:

Line 505: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

501: p_use_splitting,
502: l_final_dml_stmt,
503: l_return_status,
504: l_return_msg);
505: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
506: x_return_status := l_return_status;
507: x_return_msg := l_return_msg;
508: --commit the stats entry, make_final just does string manipulation
509: COMMIT;

Line 517: stats_finished = FND_API.G_FALSE,

513:
514: --store this string as the final stmt
515: UPDATE fnd_oam_dscram_dmls
516: SET dml_final_stmt = l_final_dml_stmt,
517: stats_finished = FND_API.G_FALSE,
518: last_updated_by = fnd_global.user_id,
519: last_update_login = fnd_global.user_id,
520: last_update_date = SYSDATE
521: WHERE dml_id = p_dml_id;

Line 528: x_return_status := FND_API.G_RET_STS_SUCCESS;

524: COMMIT;
525:
526: --success
527: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529: x_final_dml_stmt := l_final_dml_stmt;
530: EXCEPTION
531: WHEN OTHERS THEN
532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

528: x_return_status := FND_API.G_RET_STS_SUCCESS;
529: x_final_dml_stmt := l_final_dml_stmt;
530: EXCEPTION
531: WHEN OTHERS THEN
532: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
533: x_return_msg := 'DML ID ('||p_dml_id||'), failed to generate final dml stmt: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
534: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
535: ROLLBACK;
536: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 561: x_return_status := FND_API.G_RET_STS_ERROR;

557: l_return_msg VARCHAR2(2048);
558: l_temp VARCHAR2(30);
559: BEGIN
560: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
561: x_return_status := FND_API.G_RET_STS_ERROR;
562: x_return_msg := '';
563:
564: --if the dml isn't cached, there's a chance that its stats row hasn't been created yet, query and
565: --create if necessary. This is not mt-safe but extra calls to create_entry will be discarded due to

Line 574: p_dismiss_failure => FND_API.G_TRUE,

570: FND_OAM_DSCRAM_STATS_PKG.CREATE_ENTRY_AUTONOMOUSLY(p_source_object_type => FND_OAM_DSCRAM_UTILS_PKG.G_TYPE_DML,
571: p_source_object_id => p_dml_id,
572: p_start_time => SYSDATE,
573: p_prestart_status => NULL,
574: p_dismiss_failure => FND_API.G_TRUE,
575: x_stat_id => l_stat_id);
576: END IF;
577:
578: --query out the prepared DML statement

Line 592: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

588: p_use_splitting,
589: l_final_dml_stmt,
590: l_return_status,
591: l_return_msg);
592: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
593: x_return_status := l_return_status;
594: x_return_msg := l_return_msg;
595: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
596: RETURN;

Line 622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

618: l_arg_list,
619: l_has_writable_args,
620: l_return_status,
621: l_return_msg);
622: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
623: DBMS_SQL.CLOSE_CURSOR(l_cursor_id);
624: x_return_status := l_return_status;
625: x_return_msg := l_return_msg;
626: fnd_oam_debug.log(2, l_ctxt, 'EXIT');

Line 647: x_return_status := FND_API.G_RET_STS_SUCCESS;

643: b_dml_cache(p_dml_id) := l_cache_entry;
644:
645: --success
646: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
647: x_return_status := FND_API.G_RET_STS_SUCCESS;
648: EXCEPTION
649: WHEN OTHERS THEN
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
651: x_return_msg := 'DML ID ('||p_dml_id||'), failed to add to cache: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';

Line 650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

646: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
647: x_return_status := FND_API.G_RET_STS_SUCCESS;
648: EXCEPTION
649: WHEN OTHERS THEN
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
651: x_return_msg := 'DML ID ('||p_dml_id||'), failed to add to cache: (Code('||SQLCODE||'), Message("'||SQLERRM||'"))';
652: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
653: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
654: END;

Line 675: x_return_status := FND_API.G_RET_STS_ERROR;

671: l_return_status VARCHAR2(6);
672: l_return_msg VARCHAR2(2048);
673: BEGIN
674: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
675: x_return_status := FND_API.G_RET_STS_ERROR;
676: x_return_msg := '';
677:
678: fnd_oam_debug.log(1, l_ctxt, 'DML ID: '||p_dml_id);
679:

Line 699: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

695: p_use_splitting,
696: l_return_status,
697: l_return_msg);
698: --react to the return status to skip execution if we failed
699: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
700: x_return_status := l_return_status;
701: x_return_msg := l_return_msg;
702: RAISE EXECUTE_FAILED;
703: END IF;

Line 716: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

712: p_rowid_lbound,
713: p_rowid_ubound,
714: l_return_status,
715: l_return_msg);
716: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
717: x_return_status := l_return_status;
718: x_return_msg := l_return_msg;
719: RAISE EXECUTE_FAILED;
720: END IF;

Line 762: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

758: p_rowid_ubound,
759: b_dml_cache(p_dml_id).cursor_id,
760: l_return_status,
761: l_return_msg);
762: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
763: x_return_status := l_return_status;
764: x_return_msg := l_return_msg;
765: RAISE EXECUTE_FAILED;
766: END IF;

Line 771: x_return_status := FND_API.G_RET_STS_SUCCESS;

767: END IF;
768:
769: -- Success
770: b_current_dml_id := NULL;
771: x_return_status := FND_API.G_RET_STS_SUCCESS;
772: x_rows_processed := l_rows_processed;
773: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
774: EXCEPTION
775: WHEN EXECUTE_FAILED THEN

Line 781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

777: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
778: RETURN;
779: WHEN OTHERS THEN
780: b_current_dml_id := NULL;
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782: x_return_msg := 'Unhandled Exception: [Code('||SQLCODE||'), Message("'||SQLERRM||'")]';
783: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
784: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
785: RETURN;

Line 815: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

811: l_return_status,
812: l_return_msg);
813:
814: -- if successful, complete the dml
815: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
816: --update the rows dml cache's derived attributes
817: b_dml_cache(p_dml_id).rows_processed := b_dml_cache(p_dml_id).rows_processed + l_rows_processed;
818: b_dml_cache(p_dml_id).last_execute_ret_sts := l_return_status;
819: b_dml_cache(p_dml_id).last_execute_ret_msg := l_return_msg;

Line 865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

861: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
862: EXCEPTION
863: WHEN OTHERS THEN
864: x_return_msg := 'Unhandled Exception: [Code('||SQLCODE||'), Message("'||SQLERRM||'")]';
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
867: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
868: END;
869:

Line 886: x_return_status := FND_API.G_RET_STS_ERROR;

882:
883: l_return_status VARCHAR2(6);
884: l_return_msg VARCHAR2(2048);
885: BEGIN
886: x_return_status := FND_API.G_RET_STS_ERROR;
887: x_return_msg := '';
888:
889: fnd_oam_debug.log(2, l_ctxt, 'ENTER');
890: INTERNAL_EXECUTE_DML(p_dml_id,

Line 898: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

894: p_rowid_ubound,
895: l_rows_processed,
896: l_return_status,
897: l_return_msg);
898: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
899: --update the rows dml cache's derived attributes
900: b_dml_cache(p_dml_id).rows_processed := b_dml_cache(p_dml_id).rows_processed + l_rows_processed;
901: b_dml_cache(p_dml_id).last_execute_ret_sts := l_return_status;
902: b_dml_cache(p_dml_id).last_execute_ret_msg := l_return_msg;

Line 920: x_return_status := FND_API.G_RET_STS_SUCCESS;

916: END IF;
917:
918: --success
919: x_rows_processed := l_rows_processed;
920: x_return_status := FND_API.G_RET_STS_SUCCESS;
921: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
922: EXCEPTION
923: WHEN OTHERS THEN
924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

920: x_return_status := FND_API.G_RET_STS_SUCCESS;
921: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
922: EXCEPTION
923: WHEN OTHERS THEN
924: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
925: x_return_msg := 'Unhandled Exception: [Code('||SQLCODE||'), Message("'||SQLERRM||'")]';
926: fnd_oam_debug.log(6, l_ctxt, x_return_msg);
927: fnd_oam_debug.log(2, l_ctxt, 'EXIT');
928: END;