DBA Data[Home] [Help]

APPS.M4U_XML_EXTN_UTILS dependencies on FND_MESSAGE

Line 70: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_UNEXP_ERR');

66: cln_debug_pub.add('Unexpected error occured in - ' || a_proc,6);
67: cln_debug_pub.add('Exception - ' || SQLCODE || ' - ' || SQLERRM,6);
68: END IF;
69:
70: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_UNEXP_ERR');
71: FND_MESSAGE.SET_TOKEN('API',a_proc);
72: FND_MESSAGE.SET_TOKEN('ERR',SQLCODE||'-'||SQLERRM);
73: FND_MESSAGE.SET_TOKEN('ACTION',a_actn);
74: x_ret_msg := FND_MESSAGE.GET;

Line 71: FND_MESSAGE.SET_TOKEN('API',a_proc);

67: cln_debug_pub.add('Exception - ' || SQLCODE || ' - ' || SQLERRM,6);
68: END IF;
69:
70: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_UNEXP_ERR');
71: FND_MESSAGE.SET_TOKEN('API',a_proc);
72: FND_MESSAGE.SET_TOKEN('ERR',SQLCODE||'-'||SQLERRM);
73: FND_MESSAGE.SET_TOKEN('ACTION',a_actn);
74: x_ret_msg := FND_MESSAGE.GET;
75: x_ret_sts := g_unexp_err_code;

Line 72: FND_MESSAGE.SET_TOKEN('ERR',SQLCODE||'-'||SQLERRM);

68: END IF;
69:
70: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_UNEXP_ERR');
71: FND_MESSAGE.SET_TOKEN('API',a_proc);
72: FND_MESSAGE.SET_TOKEN('ERR',SQLCODE||'-'||SQLERRM);
73: FND_MESSAGE.SET_TOKEN('ACTION',a_actn);
74: x_ret_msg := FND_MESSAGE.GET;
75: x_ret_sts := g_unexp_err_code;
76:

Line 73: FND_MESSAGE.SET_TOKEN('ACTION',a_actn);

69:
70: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_UNEXP_ERR');
71: FND_MESSAGE.SET_TOKEN('API',a_proc);
72: FND_MESSAGE.SET_TOKEN('ERR',SQLCODE||'-'||SQLERRM);
73: FND_MESSAGE.SET_TOKEN('ACTION',a_actn);
74: x_ret_msg := FND_MESSAGE.GET;
75: x_ret_sts := g_unexp_err_code;
76:
77: EXCEPTION

Line 74: x_ret_msg := FND_MESSAGE.GET;

70: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_UNEXP_ERR');
71: FND_MESSAGE.SET_TOKEN('API',a_proc);
72: FND_MESSAGE.SET_TOKEN('ERR',SQLCODE||'-'||SQLERRM);
73: FND_MESSAGE.SET_TOKEN('ACTION',a_actn);
74: x_ret_msg := FND_MESSAGE.GET;
75: x_ret_sts := g_unexp_err_code;
76:
77: EXCEPTION
78: WHEN OTHERS THEN

Line 240: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');

236: WHEN OTHERS THEN
237: -- Exception has occured during DTD validation
238: -- Create translatable user message
239: -- Embed DTD error within
240: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
241: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','DTD');
242: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
243: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
244:

Line 241: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','DTD');

237: -- Exception has occured during DTD validation
238: -- Create translatable user message
239: -- Embed DTD error within
240: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
241: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','DTD');
242: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
243: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
244:
245: -- return failure and DTD errors

Line 242: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);

238: -- Create translatable user message
239: -- Embed DTD error within
240: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
241: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','DTD');
242: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
243: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
244:
245: -- return failure and DTD errors
246: x_ret_msg := FND_MESSAGE.GET;

Line 243: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);

239: -- Embed DTD error within
240: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
241: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','DTD');
242: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
243: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
244:
245: -- return failure and DTD errors
246: x_ret_msg := FND_MESSAGE.GET;
247: x_ret_sts := g_err_code;

Line 246: x_ret_msg := FND_MESSAGE.GET;

242: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
243: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
244:
245: -- return failure and DTD errors
246: x_ret_msg := FND_MESSAGE.GET;
247: x_ret_sts := g_err_code;
248:
249: END;
250:

Line 297: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');

293: x_ret_msg := NULL;
294: x_ret_sts := g_success_code;
295: ELSE
296: -- Return=failure, return translatable user message
297: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
298: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','XSD');
299: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
300: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
301:

Line 298: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','XSD');

294: x_ret_sts := g_success_code;
295: ELSE
296: -- Return=failure, return translatable user message
297: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
298: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','XSD');
299: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
300: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
301:
302: x_ret_msg := FND_MESSAGE.GET;

Line 299: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);

295: ELSE
296: -- Return=failure, return translatable user message
297: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
298: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','XSD');
299: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
300: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
301:
302: x_ret_msg := FND_MESSAGE.GET;
303: x_ret_sts := g_err_code;

Line 300: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);

296: -- Return=failure, return translatable user message
297: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
298: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','XSD');
299: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
300: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
301:
302: x_ret_msg := FND_MESSAGE.GET;
303: x_ret_sts := g_err_code;
304:

Line 302: x_ret_msg := FND_MESSAGE.GET;

298: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','XSD');
299: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
300: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
301:
302: x_ret_msg := FND_MESSAGE.GET;
303: x_ret_sts := g_err_code;
304:
305: END IF;
306: -- Done, bye

Line 367: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');

363:
364: EXCEPTION
365: WHEN OTHERS THEN
366: -- creates and return translatable error
367: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
368: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','NONE');
369: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
370: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
371:

Line 368: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','NONE');

364: EXCEPTION
365: WHEN OTHERS THEN
366: -- creates and return translatable error
367: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
368: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','NONE');
369: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
370: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
371:
372: x_ret_msg := FND_MESSAGE.GET;

Line 369: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);

365: WHEN OTHERS THEN
366: -- creates and return translatable error
367: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
368: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','NONE');
369: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
370: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
371:
372: x_ret_msg := FND_MESSAGE.GET;
373: x_ret_sts := g_err_code;

Line 370: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);

366: -- creates and return translatable error
367: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_VALDTN_ERR');
368: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','NONE');
369: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
370: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
371:
372: x_ret_msg := FND_MESSAGE.GET;
373: x_ret_sts := g_err_code;
374: END;

Line 372: x_ret_msg := FND_MESSAGE.GET;

368: FND_MESSAGE.SET_TOKEN('VALIDATION_TYPE','NONE');
369: FND_MESSAGE.SET_TOKEN('ERRCODE',SQLCODE);
370: FND_MESSAGE.SET_TOKEN('ERRMESG',SQLERRM);
371:
372: x_ret_msg := FND_MESSAGE.GET;
373: x_ret_sts := g_err_code;
374: END;
375:
376: -- Done, bye

Line 434: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');

430: ELSIF g_hdr_rec.valdtn_typ = c_valdtn_none THEN
431:
432: no_validation(a_xml,x_valdtn_sts,x_valdtn_msg);
433: ELSE
434: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
435: FND_MESSAGE.SET_TOKEN('PARAM','M4U_XML_EXTENSIONS.VALIDATION_TYPE');
436: FND_MESSAGE.SET_TOKEN('VALUE',g_hdr_rec.valdtn_typ);
437: x_api_ret_msg := FND_MESSAGE.GET;
438: END IF;

Line 435: FND_MESSAGE.SET_TOKEN('PARAM','M4U_XML_EXTENSIONS.VALIDATION_TYPE');

431:
432: no_validation(a_xml,x_valdtn_sts,x_valdtn_msg);
433: ELSE
434: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
435: FND_MESSAGE.SET_TOKEN('PARAM','M4U_XML_EXTENSIONS.VALIDATION_TYPE');
436: FND_MESSAGE.SET_TOKEN('VALUE',g_hdr_rec.valdtn_typ);
437: x_api_ret_msg := FND_MESSAGE.GET;
438: END IF;
439:

Line 436: FND_MESSAGE.SET_TOKEN('VALUE',g_hdr_rec.valdtn_typ);

432: no_validation(a_xml,x_valdtn_sts,x_valdtn_msg);
433: ELSE
434: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
435: FND_MESSAGE.SET_TOKEN('PARAM','M4U_XML_EXTENSIONS.VALIDATION_TYPE');
436: FND_MESSAGE.SET_TOKEN('VALUE',g_hdr_rec.valdtn_typ);
437: x_api_ret_msg := FND_MESSAGE.GET;
438: END IF;
439:
440: IF g_log_lvl <= 2 THEN

Line 437: x_api_ret_msg := FND_MESSAGE.GET;

433: ELSE
434: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
435: FND_MESSAGE.SET_TOKEN('PARAM','M4U_XML_EXTENSIONS.VALIDATION_TYPE');
436: FND_MESSAGE.SET_TOKEN('VALUE',g_hdr_rec.valdtn_typ);
437: x_api_ret_msg := FND_MESSAGE.GET;
438: END IF;
439:
440: IF g_log_lvl <= 2 THEN
441: cln_debug_pub.add('Exiting m4u_xml_extn_utils.validate - Normal',2);

Line 547: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');

543: x_ret_sts := g_success_code;
544: ELSE
545: -- neither tp specific nor default mapping found
546: -- return failue
547: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
548: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
549: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
550: x_ret_msg := FND_MESSAGE.GET;
551: x_ret_sts := g_err_code;

Line 548: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);

544: ELSE
545: -- neither tp specific nor default mapping found
546: -- return failue
547: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
548: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
549: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
550: x_ret_msg := FND_MESSAGE.GET;
551: x_ret_sts := g_err_code;
552: END IF;

Line 549: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);

545: -- neither tp specific nor default mapping found
546: -- return failue
547: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
548: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
549: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
550: x_ret_msg := FND_MESSAGE.GET;
551: x_ret_sts := g_err_code;
552: END IF;
553:

Line 550: x_ret_msg := FND_MESSAGE.GET;

546: -- return failue
547: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
548: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
549: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
550: x_ret_msg := FND_MESSAGE.GET;
551: x_ret_sts := g_err_code;
552: END IF;
553:
554: IF g_log_lvl <= 2 THEN

Line 649: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');

645: END IF;
646:
647: -- Error, no mapping found
648: IF g_elmnt_count <= 0 THEN
649: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
650: FND_MESSAGE.SET_TOKEN('EXTN_NAME',g_hdr_rec.extn_name);
651: FND_MESSAGE.SET_TOKEN('TP_ID',g_hdr_rec.tp_id);
652: x_ret_msg := FND_MESSAGE.GET;
653: x_ret_sts := g_err_code;

Line 650: FND_MESSAGE.SET_TOKEN('EXTN_NAME',g_hdr_rec.extn_name);

646:
647: -- Error, no mapping found
648: IF g_elmnt_count <= 0 THEN
649: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
650: FND_MESSAGE.SET_TOKEN('EXTN_NAME',g_hdr_rec.extn_name);
651: FND_MESSAGE.SET_TOKEN('TP_ID',g_hdr_rec.tp_id);
652: x_ret_msg := FND_MESSAGE.GET;
653: x_ret_sts := g_err_code;
654: ELSE

Line 651: FND_MESSAGE.SET_TOKEN('TP_ID',g_hdr_rec.tp_id);

647: -- Error, no mapping found
648: IF g_elmnt_count <= 0 THEN
649: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
650: FND_MESSAGE.SET_TOKEN('EXTN_NAME',g_hdr_rec.extn_name);
651: FND_MESSAGE.SET_TOKEN('TP_ID',g_hdr_rec.tp_id);
652: x_ret_msg := FND_MESSAGE.GET;
653: x_ret_sts := g_err_code;
654: ELSE
655: x_ret_msg := NULL;

Line 652: x_ret_msg := FND_MESSAGE.GET;

648: IF g_elmnt_count <= 0 THEN
649: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_NO_MAP');
650: FND_MESSAGE.SET_TOKEN('EXTN_NAME',g_hdr_rec.extn_name);
651: FND_MESSAGE.SET_TOKEN('TP_ID',g_hdr_rec.tp_id);
652: x_ret_msg := FND_MESSAGE.GET;
653: x_ret_sts := g_err_code;
654: ELSE
655: x_ret_msg := NULL;
656: x_ret_sts := g_success_code;

Line 1556: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');

1552: BEGIN
1553: l_tmp_val := g_glb_var_tab(a_bind_rec.src_var);
1554: EXCEPTION
1555: WHEN NO_DATA_FOUND THEN
1556: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1557: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
1558: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.src_var);
1559: x_ret_msg := FND_MESSAGE.GET;
1560: x_ret_sts := g_err_code;

Line 1557: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');

1553: l_tmp_val := g_glb_var_tab(a_bind_rec.src_var);
1554: EXCEPTION
1555: WHEN NO_DATA_FOUND THEN
1556: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1557: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
1558: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.src_var);
1559: x_ret_msg := FND_MESSAGE.GET;
1560: x_ret_sts := g_err_code;
1561: IF g_log_lvl <= 1 THEN

Line 1558: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.src_var);

1554: EXCEPTION
1555: WHEN NO_DATA_FOUND THEN
1556: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1557: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
1558: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.src_var);
1559: x_ret_msg := FND_MESSAGE.GET;
1560: x_ret_sts := g_err_code;
1561: IF g_log_lvl <= 1 THEN
1562: cln_debug_pub.add('Fetch global variable error',1);

Line 1559: x_ret_msg := FND_MESSAGE.GET;

1555: WHEN NO_DATA_FOUND THEN
1556: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1557: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
1558: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.src_var);
1559: x_ret_msg := FND_MESSAGE.GET;
1560: x_ret_sts := g_err_code;
1561: IF g_log_lvl <= 1 THEN
1562: cln_debug_pub.add('Fetch global variable error',1);
1563: END IF;

Line 1589: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');

1585: -- Constants can be directly used in sequels
1586: IF g_log_lvl <= 6 THEN
1587: cln_debug_pub.add('Mapping type not-found',6);
1588: END IF;
1589: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1590: FND_MESSAGE.SET_TOKEN('PARAM','Bind-variable mapping type');
1591: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.typ);
1592: x_ret_msg := FND_MESSAGE.GET;
1593: x_ret_sts := g_err_code;

Line 1590: FND_MESSAGE.SET_TOKEN('PARAM','Bind-variable mapping type');

1586: IF g_log_lvl <= 6 THEN
1587: cln_debug_pub.add('Mapping type not-found',6);
1588: END IF;
1589: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1590: FND_MESSAGE.SET_TOKEN('PARAM','Bind-variable mapping type');
1591: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.typ);
1592: x_ret_msg := FND_MESSAGE.GET;
1593: x_ret_sts := g_err_code;
1594: RAISE FND_API.G_EXC_ERROR;

Line 1591: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.typ);

1587: cln_debug_pub.add('Mapping type not-found',6);
1588: END IF;
1589: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1590: FND_MESSAGE.SET_TOKEN('PARAM','Bind-variable mapping type');
1591: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.typ);
1592: x_ret_msg := FND_MESSAGE.GET;
1593: x_ret_sts := g_err_code;
1594: RAISE FND_API.G_EXC_ERROR;
1595:

Line 1592: x_ret_msg := FND_MESSAGE.GET;

1588: END IF;
1589: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
1590: FND_MESSAGE.SET_TOKEN('PARAM','Bind-variable mapping type');
1591: FND_MESSAGE.SET_TOKEN('VALUE',a_bind_rec.typ);
1592: x_ret_msg := FND_MESSAGE.GET;
1593: x_ret_sts := g_err_code;
1594: RAISE FND_API.G_EXC_ERROR;
1595:
1596: END IF;