206: END IF;
207:
208: -- Initialize message list if p_init_msg_list is set to TRUE.
209: IF FND_API.to_Boolean( p_init_msg_list ) THEN
210: FND_MSG_PUB.initialize;
211: END IF;
212:
213: -- Call to check for required fields
214: IF not check_for_required_fields (p_resource_id =>p_resource_id,
252:
253: EXCEPTION
254: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
256: FND_MSG_PUB.Count_And_Get
257: ( p_count => x_msg_count,
258: p_data => x_msg_data
259: );
260: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
260: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
261: x_return_status := FND_API.G_RET_STS_ERROR ;
262: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
263: fnd_message.set_token('P_PARAMETER', l_parameters);
264: fnd_msg_pub.add;
265: FND_MSG_PUB.Count_And_Get
266: (p_count => x_msg_count,
267: p_data => x_msg_data
268: );
261: x_return_status := FND_API.G_RET_STS_ERROR ;
262: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
263: fnd_message.set_token('P_PARAMETER', l_parameters);
264: fnd_msg_pub.add;
265: FND_MSG_PUB.Count_And_Get
266: (p_count => x_msg_count,
267: p_data => x_msg_data
268: );
269: WHEN OTHERS THEN
270: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
271: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
272: fnd_message.set_token('ERROR_CODE',SQLCODE);
273: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
274: fnd_msg_pub.add;
275: FND_MSG_PUB.Count_And_Get
276: ( p_count => x_msg_count,
277: p_data => x_msg_data
278: );
271: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
272: fnd_message.set_token('ERROR_CODE',SQLCODE);
273: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
274: fnd_msg_pub.add;
275: FND_MSG_PUB.Count_And_Get
276: ( p_count => x_msg_count,
277: p_data => x_msg_data
278: );
279:
484: END IF;
485:
486: -- Initialize message list if p_init_msg_list is set to TRUE.
487: IF FND_API.to_Boolean( p_init_msg_list ) THEN
488: FND_MSG_PUB.initialize;
489: END IF;
490:
491: -- Call to check for required fields
492: IF not check_for_required_fields (p_resource_id =>p_resource_id,
732: x_return_status := fnd_api.g_ret_sts_error ;
733: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFT_CONSTR_FOUND');
734: --fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS_FOR_RESOURCE');
735: --fnd_message.set_token('P_RESOURCE_NAME', l_resource_name);
736: fnd_msg_pub.add;
737: fnd_msg_pub.count_and_get( p_count => x_msg_count
738: , p_data => x_msg_data );
739: end if;
740:
733: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFT_CONSTR_FOUND');
734: --fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS_FOR_RESOURCE');
735: --fnd_message.set_token('P_RESOURCE_NAME', l_resource_name);
736: fnd_msg_pub.add;
737: fnd_msg_pub.count_and_get( p_count => x_msg_count
738: , p_data => x_msg_data );
739: end if;
740:
741: -- Added sort by jawang on 06/27/2002
749: when g_exc_required_fields_null then
750: x_return_status := fnd_api.g_ret_sts_error ;
751: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
752: fnd_message.set_token('P_PARAMETER', l_parameters);
753: fnd_msg_pub.add;
754: fnd_msg_pub.count_and_get ( p_count => x_msg_count
755: , p_data => x_msg_data );
756:
757: when fnd_api.g_exc_unexpected_error then
750: x_return_status := fnd_api.g_ret_sts_error ;
751: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
752: fnd_message.set_token('P_PARAMETER', l_parameters);
753: fnd_msg_pub.add;
754: fnd_msg_pub.count_and_get ( p_count => x_msg_count
755: , p_data => x_msg_data );
756:
757: when fnd_api.g_exc_unexpected_error then
758: x_return_status := fnd_api.g_ret_sts_unexp_error;
755: , p_data => x_msg_data );
756:
757: when fnd_api.g_exc_unexpected_error then
758: x_return_status := fnd_api.g_ret_sts_unexp_error;
759: fnd_msg_pub.count_and_get ( p_count => x_msg_count
760: , p_data => x_msg_data );
761:
762: when others then
763: x_return_status := fnd_api.g_ret_sts_unexp_error ;
763: x_return_status := fnd_api.g_ret_sts_unexp_error ;
764: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
765: fnd_message.set_token('ERROR_CODE',sqlcode);
766: fnd_message.set_token('ERROR_MESSAGE',sqlerrm);
767: fnd_msg_pub.count_and_get ( p_count => x_msg_count
768: , p_data => x_msg_data );
769: END get_available_time;
770:
771:
812: END IF;
813:
814: -- Initialize message list if p_init_msg_list is set to TRUE.
815: IF FND_API.to_Boolean( p_init_msg_list ) THEN
816: FND_MSG_PUB.initialize;
817: END IF;
818:
819: -- Call to check for required fields
820: IF not check_for_required_fields (p_resource_id =>p_resource_id,
848:
849: EXCEPTION
850: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
851: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
852: FND_MSG_PUB.Count_And_Get
853: ( p_count => x_msg_count,
854: p_data => x_msg_data
855: );
856: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
856: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
857: x_return_status := FND_API.G_RET_STS_ERROR ;
858: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
859: fnd_message.set_token('P_PARAMETER', l_parameters);
860: fnd_msg_pub.add;
861: FND_MSG_PUB.Count_And_Get
862: (p_count => x_msg_count,
863: p_data => x_msg_data
864: );
857: x_return_status := FND_API.G_RET_STS_ERROR ;
858: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
859: fnd_message.set_token('P_PARAMETER', l_parameters);
860: fnd_msg_pub.add;
861: FND_MSG_PUB.Count_And_Get
862: (p_count => x_msg_count,
863: p_data => x_msg_data
864: );
865: WHEN OTHERS THEN
866: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
867: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
868: fnd_message.set_token('ERROR_CODE',SQLCODE);
869: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
870: fnd_msg_pub.add;
871: FND_MSG_PUB.Count_And_Get
872: (p_count => x_msg_count,
873: p_data => x_msg_data
874: );
867: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
868: fnd_message.set_token('ERROR_CODE',SQLCODE);
869: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
870: fnd_msg_pub.add;
871: FND_MSG_PUB.Count_And_Get
872: (p_count => x_msg_count,
873: p_data => x_msg_data
874: );
875:
987:
988: -- initialize message list if p_init_msg_list is set to true.
989: if fnd_api.to_boolean ( p_init_msg_list )
990: then
991: fnd_msg_pub.initialize;
992: end if;
993:
994: -- call to check for required fields
995: if not JTF_CALENDAR_PUB.check_for_required_fields
1263: l_return_status := FND_API.G_RET_STS_ERROR ;
1264: -- end
1265: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS');
1266: fnd_message.set_token('P_CAL_NAME', l_calendar_name);
1267: fnd_msg_pub.add;
1268: FND_MSG_PUB.Count_And_Get
1269: (p_count => x_msg_count,
1270: p_data => x_msg_data
1271: );
1264: -- end
1265: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS');
1266: fnd_message.set_token('P_CAL_NAME', l_calendar_name);
1267: fnd_msg_pub.add;
1268: FND_MSG_PUB.Count_And_Get
1269: (p_count => x_msg_count,
1270: p_data => x_msg_data
1271: );
1272: end; --2
1281: l_tbl.delete; -- to delete the record from TOR if no shift found
1282: fnd_message.set_name('JTF','JTF_CAL_RES_NO_CAL');
1283: fnd_message.set_token('P_SHIFT_DATE', l_shift_date);
1284: fnd_message.set_token('P_RES_NAME', l_resource_name);
1285: fnd_msg_pub.add;
1286:
1287: FND_MSG_PUB.Count_And_Get
1288: (p_count => x_msg_count,
1289: p_data => x_msg_data
1283: fnd_message.set_token('P_SHIFT_DATE', l_shift_date);
1284: fnd_message.set_token('P_RES_NAME', l_resource_name);
1285: fnd_msg_pub.add;
1286:
1287: FND_MSG_PUB.Count_And_Get
1288: (p_count => x_msg_count,
1289: p_data => x_msg_data
1290: );
1291: end; -- 1
1300: -- Added for bug 3270116
1301: l_return_status := FND_API.G_RET_STS_ERROR ;
1302: -- end
1303: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFT_CONSTR_FOUND');
1304: fnd_msg_pub.add;
1305:
1306: fnd_msg_pub.count_and_get( p_count => x_msg_count
1307: , p_data => x_msg_data );
1308: end if;
1302: -- end
1303: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFT_CONSTR_FOUND');
1304: fnd_msg_pub.add;
1305:
1306: fnd_msg_pub.count_and_get( p_count => x_msg_count
1307: , p_data => x_msg_data );
1308: end if;
1309:
1310: -- Added sort by jawang on 06/27/2002
1327: when g_exc_required_fields_null then
1328: x_return_status := fnd_api.g_ret_sts_error ;
1329: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
1330: fnd_message.set_token('P_PARAMETER', l_parameters);
1331: fnd_msg_pub.add;
1332: fnd_msg_pub.count_and_get ( p_count => x_msg_count
1333: , p_data => x_msg_data );
1334:
1335: when fnd_api.g_exc_unexpected_error then
1328: x_return_status := fnd_api.g_ret_sts_error ;
1329: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
1330: fnd_message.set_token('P_PARAMETER', l_parameters);
1331: fnd_msg_pub.add;
1332: fnd_msg_pub.count_and_get ( p_count => x_msg_count
1333: , p_data => x_msg_data );
1334:
1335: when fnd_api.g_exc_unexpected_error then
1336: x_return_status := fnd_api.g_ret_sts_unexp_error;
1333: , p_data => x_msg_data );
1334:
1335: when fnd_api.g_exc_unexpected_error then
1336: x_return_status := fnd_api.g_ret_sts_unexp_error;
1337: fnd_msg_pub.count_and_get ( p_count => x_msg_count
1338: , p_data => x_msg_data );
1339: when others then
1340: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1341: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
1340: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1341: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
1342: fnd_message.set_token('ERROR_CODE',sqlcode);
1343: fnd_message.set_token('ERROR_MESSAGE',sqlerrm);
1344: fnd_msg_pub.count_and_get ( p_count => x_msg_count
1345: , p_data => x_msg_data );
1346: --END;
1347: END get_resource_shifts;
1348:
1501:
1502: -- initialize message list if p_init_msg_list is set to true.
1503: if fnd_api.to_boolean ( p_init_msg_list )
1504: then
1505: fnd_msg_pub.initialize;
1506: end if;
1507:
1508: -- call to check for required fields
1509: if not JTF_CALENDAR_PUB.check_for_required_fields
1924: l_return_status := FND_API.G_RET_STS_ERROR ;
1925: -- end
1926: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS');
1927: fnd_message.set_token('P_CAL_NAME', l_calendar_name);
1928: fnd_msg_pub.add;
1929: FND_MSG_PUB.Count_And_Get
1930: (p_count => x_msg_count,
1931: p_data => x_msg_data
1932: );
1925: -- end
1926: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS');
1927: fnd_message.set_token('P_CAL_NAME', l_calendar_name);
1928: fnd_msg_pub.add;
1929: FND_MSG_PUB.Count_And_Get
1930: (p_count => x_msg_count,
1931: p_data => x_msg_data
1932: );
1933: end; --2
1942: l_tbl.delete; -- to delete the record from TOR if no shift found
1943: fnd_message.set_name('JTF','JTF_CAL_RES_NO_CAL');
1944: fnd_message.set_token('P_SHIFT_DATE', l_shift_date);
1945: fnd_message.set_token('P_RES_NAME', l_resource_name);
1946: fnd_msg_pub.add;
1947:
1948: FND_MSG_PUB.Count_And_Get
1949: (p_count => x_msg_count,
1950: p_data => x_msg_data
1944: fnd_message.set_token('P_SHIFT_DATE', l_shift_date);
1945: fnd_message.set_token('P_RES_NAME', l_resource_name);
1946: fnd_msg_pub.add;
1947:
1948: FND_MSG_PUB.Count_And_Get
1949: (p_count => x_msg_count,
1950: p_data => x_msg_data
1951: );
1952: end; -- 1
1962: -- Added for bug 3270116
1963: l_return_status := FND_API.G_RET_STS_ERROR ;
1964: -- end
1965: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFT_CONSTR_FOUND');
1966: fnd_msg_pub.add;
1967:
1968: fnd_msg_pub.count_and_get( p_count => x_msg_count
1969: , p_data => x_msg_data );
1970: end if;
1964: -- end
1965: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFT_CONSTR_FOUND');
1966: fnd_msg_pub.add;
1967:
1968: fnd_msg_pub.count_and_get( p_count => x_msg_count
1969: , p_data => x_msg_data );
1970: end if;
1971:
1972: -- Added sort by jawang on 06/27/2002
1990: when g_exc_required_fields_null then
1991: x_return_status := fnd_api.g_ret_sts_error ;
1992: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
1993: fnd_message.set_token('P_PARAMETER', l_parameters);
1994: fnd_msg_pub.add;
1995: fnd_msg_pub.count_and_get ( p_count => x_msg_count
1996: , p_data => x_msg_data );
1997:
1998: when fnd_api.g_exc_unexpected_error then
1991: x_return_status := fnd_api.g_ret_sts_error ;
1992: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
1993: fnd_message.set_token('P_PARAMETER', l_parameters);
1994: fnd_msg_pub.add;
1995: fnd_msg_pub.count_and_get ( p_count => x_msg_count
1996: , p_data => x_msg_data );
1997:
1998: when fnd_api.g_exc_unexpected_error then
1999: x_return_status := fnd_api.g_ret_sts_unexp_error;
1996: , p_data => x_msg_data );
1997:
1998: when fnd_api.g_exc_unexpected_error then
1999: x_return_status := fnd_api.g_ret_sts_unexp_error;
2000: fnd_msg_pub.count_and_get ( p_count => x_msg_count
2001: , p_data => x_msg_data );
2002: when others then
2003: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2004: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
2003: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2004: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
2005: fnd_message.set_token('ERROR_CODE',sqlcode);
2006: fnd_message.set_token('ERROR_MESSAGE',sqlerrm);
2007: fnd_msg_pub.count_and_get ( p_count => x_msg_count
2008: , p_data => x_msg_data );
2009: --END;
2010: END get_resource_shifts;
2011:
2173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2174: END IF;
2175: -- Initialize message list if p_init_msg_list is set to TRUE.
2176: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2177: FND_MSG_PUB.initialize;
2178: END IF;
2179: -- Call to check for required fields
2180: IF not check_for_required_fields (p_resource_id =>p_resource_id,
2181: p_resource_type =>p_resource_type,
2404: when no_data_found then
2405: x_return_status := FND_API.G_RET_STS_ERROR ;
2406: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS');
2407: fnd_message.set_token('P_CAL_NAME', l_calendar_name);
2408: fnd_msg_pub.add;
2409: FND_MSG_PUB.Count_And_Get
2410: (p_count => x_msg_count,
2411: p_data => x_msg_data
2412: );
2405: x_return_status := FND_API.G_RET_STS_ERROR ;
2406: fnd_message.set_name('JTF','JTF_CAL_NO_SHIFTS');
2407: fnd_message.set_token('P_CAL_NAME', l_calendar_name);
2408: fnd_msg_pub.add;
2409: FND_MSG_PUB.Count_And_Get
2410: (p_count => x_msg_count,
2411: p_data => x_msg_data
2412: );
2413: end; --(2)
2417: x_return_status := FND_API.G_RET_STS_ERROR ;
2418: fnd_message.set_name('JTF','JTF_CAL_RES_NO_CAL');
2419: fnd_message.set_token('P_RES_NAME', l_resource_name);
2420: fnd_message.set_token('P_SHIFT_DATE', l_shift_date);
2421: fnd_msg_pub.add;
2422: FND_MSG_PUB.Count_And_Get
2423: (p_count => x_msg_count,
2424: p_data => x_msg_data
2425: );
2418: fnd_message.set_name('JTF','JTF_CAL_RES_NO_CAL');
2419: fnd_message.set_token('P_RES_NAME', l_resource_name);
2420: fnd_message.set_token('P_SHIFT_DATE', l_shift_date);
2421: fnd_msg_pub.add;
2422: FND_MSG_PUB.Count_And_Get
2423: (p_count => x_msg_count,
2424: p_data => x_msg_data
2425: );
2426: end; --(1)
2441:
2442: EXCEPTION
2443: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2444: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2445: FND_MSG_PUB.Count_And_Get
2446: ( p_count => x_msg_count,
2447: p_data => x_msg_data
2448: );
2449: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
2449: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
2450: x_return_status := FND_API.G_RET_STS_ERROR ;
2451: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
2452: fnd_message.set_token('P_PARAMETER', l_parameters);
2453: fnd_msg_pub.add;
2454: FND_MSG_PUB.Count_And_Get
2455: (p_count => x_msg_count,
2456: p_data => x_msg_data
2457: );
2450: x_return_status := FND_API.G_RET_STS_ERROR ;
2451: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
2452: fnd_message.set_token('P_PARAMETER', l_parameters);
2453: fnd_msg_pub.add;
2454: FND_MSG_PUB.Count_And_Get
2455: (p_count => x_msg_count,
2456: p_data => x_msg_data
2457: );
2458: WHEN OTHERS THEN
2459: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2460: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
2461: fnd_message.set_token('ERROR_CODE',SQLCODE);
2462: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
2463: fnd_msg_pub.add;
2464: FND_MSG_PUB.Count_And_Get
2465: (p_count => x_msg_count,
2466: p_data => x_msg_data
2467: );
2460: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
2461: fnd_message.set_token('ERROR_CODE',SQLCODE);
2462: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
2463: fnd_msg_pub.add;
2464: FND_MSG_PUB.Count_And_Get
2465: (p_count => x_msg_count,
2466: p_data => x_msg_data
2467: );
2468:
2522: END IF;
2523:
2524: -- Initialize message list if p_init_msg_list is set to TRUE.
2525: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2526: FND_MSG_PUB.initialize;
2527: END IF;
2528:
2529: -- Initialize API return status to success
2530: x_return_status := FND_API.G_RET_STS_SUCCESS;
2543:
2544: EXCEPTION
2545: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2546: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2547: FND_MSG_PUB.Count_And_Get
2548: ( p_count => x_msg_count,
2549: p_data => x_msg_data
2550: );
2551: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
2551: WHEN G_EXC_REQUIRED_FIELDS_NULL THEN
2552: x_return_status := FND_API.G_RET_STS_ERROR ;
2553: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
2554: fnd_message.set_token('P_PARAMETER', l_parameters);
2555: fnd_msg_pub.add;
2556: FND_MSG_PUB.Count_And_Get
2557: (p_count => x_msg_count,
2558: p_data => x_msg_data
2559: );
2552: x_return_status := FND_API.G_RET_STS_ERROR ;
2553: fnd_message.set_name('JTF','JTF_CAL_REQUIRED_PARAMETERS');
2554: fnd_message.set_token('P_PARAMETER', l_parameters);
2555: fnd_msg_pub.add;
2556: FND_MSG_PUB.Count_And_Get
2557: (p_count => x_msg_count,
2558: p_data => x_msg_data
2559: );
2560: WHEN OTHERS THEN
2561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2562: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
2563: fnd_message.set_token('ERROR_CODE',SQLCODE);
2564: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
2565: fnd_msg_pub.add;
2566: FND_MSG_PUB.Count_And_Get
2567: ( p_count => x_msg_count,
2568: p_data => x_msg_data
2569: );
2562: fnd_message.set_name('JTF','JTF_CAL_UNEXPECTED_ERROR');
2563: fnd_message.set_token('ERROR_CODE',SQLCODE);
2564: fnd_message.set_token('ERROR_MESSAGE', SQLERRM);
2565: fnd_msg_pub.add;
2566: FND_MSG_PUB.Count_And_Get
2567: ( p_count => x_msg_count,
2568: p_data => x_msg_data
2569: );
2570: