[Home] [Help]
32: G_PKG_NAME CONSTANT VARCHAR2(30):='AMS_ListEntry_PVT';
33: G_FILE_NAME CONSTANT VARCHAR2(12):='amsvlseb.pls';
34:
35:
36: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
37: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
38: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
39: -- Start of comments
40: -- NAME
33: G_FILE_NAME CONSTANT VARCHAR2(12):='amsvlseb.pls';
34:
35:
36: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
37: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
38: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
39: -- Start of comments
40: -- NAME
41: -- Default_ListEntry
34:
35:
36: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
37: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
38: AMS_DEBUG_MEDIUM_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
39: -- Start of comments
40: -- NAME
41: -- Default_ListEntry
42: --
87: --
88: -- Initialize message list if p_init_msg_list is set to TRUE.
89: --
90: IF FND_API.To_Boolean (p_init_msg_list) THEN
91: FND_MSG_PUB.Initialize;
92: END IF;
93:
94: --
95: -- Initialize API return status to success.
224:
225: IF(l_source_system_count > 0 )THEN
226: -- Error, check the msg level and added an error message to the
227: -- API message list
228: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
229: THEN -- MMSG
230: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_SYSID_DUPE');
231: FND_MSG_PUB.Add;
232: END IF;
227: -- API message list
228: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
229: THEN -- MMSG
230: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_SYSID_DUPE');
231: FND_MSG_PUB.Add;
232: END IF;
233:
234: -- If any errors happen abort API/Procedure.
235: RAISE FND_API.G_EXC_ERROR;
243:
244: IF ( l_pin_count <> 0 )THEN
245: -- Error, check the msg level and added an error message to the
246: -- API message list
247: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
248: THEN -- MMSG
249: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_PINCODE_DUPE');
250: FND_MSG_PUB.Add;
251: END IF;
246: -- API message list
247: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
248: THEN -- MMSG
249: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_PINCODE_DUPE');
250: FND_MSG_PUB.Add;
251: END IF;
252:
253: x_return_status := FND_API.G_RET_STS_ERROR;
254: -- If any errors happen abort API/Procedure.
296: 'party_id',
297: p_entry_rec.party_id
298: ) = FND_API.g_false
299: THEN
300: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
301: THEN
302: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_PARTY_INVALID');
303: FND_MSG_PUB.add;
304: END IF;
299: THEN
300: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
301: THEN
302: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_PARTY_INVALID');
303: FND_MSG_PUB.add;
304: END IF;
305:
306: x_return_status := FND_API.g_ret_sts_error;
307: RETURN;
315: 'party_id',
316: p_entry_rec.parent_party_id
317: ) = FND_API.g_false
318: THEN
319: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
320: THEN
321: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_PAR_PARTY_INVALID');
322: FND_MSG_PUB.add;
323: END IF;
318: THEN
319: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
320: THEN
321: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_PAR_PARTY_INVALID');
322: FND_MSG_PUB.add;
323: END IF;
324:
325: x_return_status := FND_API.g_ret_sts_error;
326: RETURN;
334: 'list_header_id',
335: p_entry_rec.list_header_id
336: ) = FND_API.g_false
337: THEN
338: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
339: THEN
340: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ID_MISSING');
341: FND_MSG_PUB.add;
342: END IF;
337: THEN
338: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
339: THEN
340: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ID_MISSING');
341: FND_MSG_PUB.add;
342: END IF;
343:
344: x_return_status := FND_API.g_ret_sts_error;
345: RETURN;
355: IF ( AMS_UTILITY_PVT.Check_FK_Exists('AMS_CELLS_ALL_B',
356: 'CELL_CODE',
357: p_entry_rec.CELL_CODE)= FND_API.G_FALSE)
358: THEN
359: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
360: THEN -- MMSG
361: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_CELLCODE_INVALID');
362: FND_MESSAGE.set_token('CELLCODE',p_entry_rec.CELL_CODE);
363: FND_MSG_PUB.Add;
359: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
360: THEN -- MMSG
361: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_CELLCODE_INVALID');
362: FND_MESSAGE.set_token('CELLCODE',p_entry_rec.CELL_CODE);
363: FND_MSG_PUB.Add;
364: END IF;
365:
366: x_return_status := FND_API.G_RET_STS_ERROR;
367: -- If any errors happen abort API/Procedure.
420: AND p_entry_rec.enabled_flag IS NOT NULL
421: THEN
422: IF AMS_Utility_PVT.is_Y_or_N(p_entry_rec.enabled_flag) = FND_API.g_false
423: THEN
424: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
425: THEN
426: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_ENABLED_FLAG');
427: FND_MSG_PUB.add;
428: END IF;
423: THEN
424: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
425: THEN
426: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_ENABLED_FLAG');
427: FND_MSG_PUB.add;
428: END IF;
429:
430: x_return_status := FND_API.g_ret_sts_error;
431: RETURN;
440: AND p_entry_rec.PART_OF_CONTROL_GROUP_FLAG IS NOT NULL
441: THEN
442: IF AMS_Utility_PVT.is_Y_or_N(p_entry_rec.PART_OF_CONTROL_GROUP_FLAG) = FND_API.g_false
443: THEN
444: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
445: THEN
446: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_CONTROL_FLAG');
447: FND_MSG_PUB.add;
448: END IF;
443: THEN
444: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
445: THEN
446: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_CONTROL_FLAG');
447: FND_MSG_PUB.add;
448: END IF;
449:
450: x_return_status := FND_API.g_ret_sts_error;
451: RETURN;
457: AND p_entry_rec.MARKED_AS_RANDOM_FLAG IS NOT NULL
458: THEN
459: IF AMS_Utility_PVT.is_Y_or_N(p_entry_rec.MARKED_AS_RANDOM_FLAG) = FND_API.g_false
460: THEN
461: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
462: THEN
463: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_RANDOM_FLAG');
464: FND_MSG_PUB.add;
465: END IF;
460: THEN
461: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
462: THEN
463: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_RANDOM_FLAG');
464: FND_MSG_PUB.add;
465: END IF;
466:
467: x_return_status := FND_API.g_ret_sts_error;
468: RETURN;
474: AND p_entry_rec.MARKED_AS_DUPLICATE_FLAG IS NOT NULL
475: THEN
476: IF AMS_Utility_PVT.is_Y_or_N(p_entry_rec.MARKED_AS_DUPLICATE_FLAG) = FND_API.g_false
477: THEN
478: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
479: THEN
480: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_DUPE_FLAG');
481: FND_MSG_PUB.add;
482: END IF;
477: THEN
478: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
479: THEN
480: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_DUPE_FLAG');
481: FND_MSG_PUB.add;
482: END IF;
483:
484: x_return_status := FND_API.g_ret_sts_error;
485: RETURN;
491: AND p_entry_rec.MANUALLY_ENTERED_FLAG IS NOT NULL
492: THEN
493: IF AMS_Utility_PVT.is_Y_or_N(p_entry_rec.MANUALLY_ENTERED_FLAG) = FND_API.g_false
494: THEN
495: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
496: THEN
497: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_MANUAL_FLAG');
498: FND_MSG_PUB.add;
499: END IF;
494: THEN
495: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
496: THEN
497: FND_MESSAGE.set_name('AMS', 'AMS_LIST_ENT_BAD_MANUAL_FLAG');
498: FND_MSG_PUB.add;
499: END IF;
500:
501: x_return_status := FND_API.g_ret_sts_error;
502: RETURN;
536:
537: IF p_entry_rec.list_header_id IS NULL
538: THEN
539: -- missing required fields
540: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
541: THEN -- MMSG
542: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ENT_HEADER_MISSING');
543: FND_MSG_PUB.Add;
544: END IF;
539: -- missing required fields
540: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
541: THEN -- MMSG
542: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ENT_HEADER_MISSING');
543: FND_MSG_PUB.Add;
544: END IF;
545: x_return_status := FND_API.G_RET_STS_ERROR;
546: -- If any errors happen abort API/Procedure.
547: return;
550:
551: IF p_entry_rec.list_entry_source_system_ID IS NULL
552: THEN
553: -- missing required fields
554: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
555: THEN -- MMSG
556: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ENT_SYSID_MISSING');
557: FND_MSG_PUB.Add;
558: END IF;
553: -- missing required fields
554: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
555: THEN -- MMSG
556: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ENT_SYSID_MISSING');
557: FND_MSG_PUB.Add;
558: END IF;
559: x_return_status := FND_API.G_RET_STS_ERROR;
560: -- If any errors happen abort API/Procedure.
561: return;
563:
564: IF p_entry_rec.list_entry_source_system_type IS NULL
565: THEN
566: -- missing required fields
567: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
568: THEN -- MMSG
569: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ENT_SYSTYPE_MISSING');
570: FND_MSG_PUB.Add;
571: END IF;
566: -- missing required fields
567: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
568: THEN -- MMSG
569: FND_MESSAGE.Set_Name('AMS', 'AMS_LIST_ENT_SYSTYPE_MISSING');
570: FND_MSG_PUB.Add;
571: END IF;
572: x_return_status := FND_API.G_RET_STS_ERROR;
573: -- If any errors happen abort API/Procedure.
574: return;
640: -- Debug Message
641: IF (AMS_DEBUG_HIGH_ON) THEN
642: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
643: FND_MESSAGE.Set_Token('ROW', 'AMS_listentry_PVT.Validate_Entry: Start', TRUE);
644: FND_MSG_PUB.Add;
645: END IF;
646:
647: -- Initialize API return status to success
648: x_return_status := FND_API.G_RET_STS_SUCCESS;
675: END IF;
676:
677: -- Success Message
678: -- MMSG
679: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
680: THEN
681: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
682: FND_MESSAGE.Set_Token('ROW', 'AMS_listentry_PVT.Validate_ListEntry', TRUE);
683: FND_MSG_PUB.Add;
679: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
680: THEN
681: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
682: FND_MESSAGE.Set_Token('ROW', 'AMS_listentry_PVT.Validate_ListEntry', TRUE);
683: FND_MSG_PUB.Add;
684: END IF;
685:
686:
687: IF (AMS_DEBUG_HIGH_ON) THEN
686:
687: IF (AMS_DEBUG_HIGH_ON) THEN
688: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
689: FND_MESSAGE.Set_Token('ROW', 'AMS_listentry_PVT.Validate_ListEntry: END', TRUE);
690: FND_MSG_PUB.Add;
691: END IF;
692:
693:
694: -- Standard call to get message count AND IF count is 1, get message info.
691: END IF;
692:
693:
694: -- Standard call to get message count AND IF count is 1, get message info.
695: FND_MSG_PUB.Count_AND_Get
696: ( p_count => x_msg_count,
697: p_data => x_msg_data,
698: p_encoded => FND_API.G_FALSE
699: );
705: WHEN FND_API.G_EXC_ERROR THEN
706:
707: x_return_status := FND_API.G_RET_STS_ERROR ;
708:
709: FND_MSG_PUB.Count_AND_Get
710: ( p_count => x_msg_count,
711: p_data => x_msg_data,
712: p_encoded => FND_API.G_FALSE
713: );
716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
717:
718: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
719:
720: FND_MSG_PUB.Count_AND_Get
721: ( p_count => x_msg_count,
722: p_data => x_msg_data,
723: p_encoded => FND_API.G_FALSE
724: );
727: WHEN OTHERS THEN
728:
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730:
731: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
732: THEN
733: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
734: END IF;
735:
729: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
730:
731: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
732: THEN
733: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
734: END IF;
735:
736: FND_MSG_PUB.Count_AND_Get
737: ( p_count => x_msg_count,
732: THEN
733: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
734: END IF;
735:
736: FND_MSG_PUB.Count_AND_Get
737: ( p_count => x_msg_count,
738: p_data => x_msg_data,
739: p_encoded => FND_API.G_FALSE
740: );
830:
831:
832: -- Initialize message list IF p_init_msg_list is set to TRUE.
833: IF FND_API.to_Boolean( p_init_msg_list ) THEN
834: FND_MSG_PUB.initialize;
835: END IF;
836:
837: -- Debug Message
838: IF (AMS_DEBUG_HIGH_ON) THEN
837: -- Debug Message
838: IF (AMS_DEBUG_HIGH_ON) THEN
839: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
840: FND_MESSAGE.Set_Token('ROW', 'AMS_ListEntry_PVT.Create_ListEntry: Start', TRUE);
841: FND_MSG_PUB.Add;
842: END IF;
843:
844: -- Initialize API return status to success
845: x_return_status := FND_API.G_RET_STS_SUCCESS;
1657: END IF;
1658:
1659: -- Success Message
1660: -- MMSG
1661: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1662: THEN
1663: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
1664: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Create_ListEntry', TRUE);
1665: FND_MSG_PUB.Add;
1661: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
1662: THEN
1663: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
1664: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Create_ListEntry', TRUE);
1665: FND_MSG_PUB.Add;
1666: END IF;
1667:
1668:
1669: IF (AMS_DEBUG_HIGH_ON) THEN
1668:
1669: IF (AMS_DEBUG_HIGH_ON) THEN
1670: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
1671: FND_MESSAGE.Set_Token('ROW','AMS_List_Entry_PVT.Create_ListEntry: END', TRUE);
1672: FND_MSG_PUB.Add;
1673: END IF;
1674:
1675:
1676: -- Standard call to get message count AND IF count is 1, get message info.
1673: END IF;
1674:
1675:
1676: -- Standard call to get message count AND IF count is 1, get message info.
1677: FND_MSG_PUB.Count_AND_Get
1678: ( p_count => x_msg_count,
1679: p_data => x_msg_data,
1680: p_encoded => FND_API.G_FALSE
1681: );
1688:
1689: ROLLBACK TO Create_ListEntry_PVT;
1690: x_return_status := FND_API.G_RET_STS_ERROR ;
1691:
1692: FND_MSG_PUB.Count_AND_Get
1693: ( p_count => x_msg_count,
1694: p_data => x_msg_data,
1695: p_encoded => FND_API.G_FALSE
1696: );
1701: ROLLBACK TO Create_ListEntry_PVT;
1702: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1703:
1704:
1705: FND_MSG_PUB.Count_AND_Get
1706: ( p_count => x_msg_count,
1707: p_data => x_msg_data,
1708: p_encoded => FND_API.G_FALSE
1709: );
1712:
1713: ROLLBACK TO Create_ListEntry_PVT;
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1715:
1716: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1717: THEN
1718: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1719: END IF;
1720:
1714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1715:
1716: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
1717: THEN
1718: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1719: END IF;
1720:
1721: FND_MSG_PUB.Count_AND_Get
1722: ( p_count => x_msg_count,
1717: THEN
1718: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1719: END IF;
1720:
1721: FND_MSG_PUB.Count_AND_Get
1722: ( p_count => x_msg_count,
1723: p_data => x_msg_data,
1724: p_encoded => FND_API.G_FALSE
1725: );
1778: END IF;
1779:
1780: -- Initialize message list IF p_init_msg_list is set to TRUE.
1781: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1782: FND_MSG_PUB.initialize;
1783: END IF;
1784:
1785: -- Debug Message
1786: IF (AMS_DEBUG_HIGH_ON) THEN
1785: -- Debug Message
1786: IF (AMS_DEBUG_HIGH_ON) THEN
1787: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
1788: FND_MESSAGE.Set_Token('ROW','AMS_List_Header_PVT.Update_list_entry: Start', TRUE);
1789: FND_MSG_PUB.Add;
1790: END IF;
1791:
1792:
1793:
2179:
2180: if (SQL%NOTFOUND) then
2181: -- Error, check the msg level and added an error message to the
2182: -- API message list
2183: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2184: THEN -- MMSG
2185: FND_MESSAGE.set_name('AMS', 'API_UNEXP_ERROR_IN_PROCESSING');
2186: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_List_Entry API', TRUE);
2187: FND_MSG_PUB.Add;
2183: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2184: THEN -- MMSG
2185: FND_MESSAGE.set_name('AMS', 'API_UNEXP_ERROR_IN_PROCESSING');
2186: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_List_Entry API', TRUE);
2187: FND_MSG_PUB.Add;
2188: END IF;
2189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2190: end if;
2191:
2197:
2198:
2199: -- Success Message
2200: -- MMSG
2201: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2202: THEN
2203: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
2204: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_ListEntry', TRUE);
2205: FND_MSG_PUB.Add;
2201: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2202: THEN
2203: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
2204: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_ListEntry', TRUE);
2205: FND_MSG_PUB.Add;
2206: END IF;
2207:
2208:
2209: IF (AMS_DEBUG_HIGH_ON) THEN
2208:
2209: IF (AMS_DEBUG_HIGH_ON) THEN
2210: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
2211: FND_MESSAGE.Set_Token('ROW','AMS_List_Entry_PVT.Update_ListEntry: END', TRUE);
2212: FND_MSG_PUB.Add;
2213: END IF;
2214:
2215:
2216: -- Standard call to get message count AND IF count is 1, get message info.
2213: END IF;
2214:
2215:
2216: -- Standard call to get message count AND IF count is 1, get message info.
2217: FND_MSG_PUB.Count_AND_Get
2218: ( p_count => x_msg_count,
2219: p_data => x_msg_data,
2220: p_encoded => FND_API.G_FALSE
2221: );
2228:
2229: ROLLBACK TO Update_ListEntry_PVT;
2230: x_return_status := FND_API.G_RET_STS_ERROR ;
2231:
2232: FND_MSG_PUB.Count_AND_Get
2233: ( p_count => x_msg_count,
2234: p_data => x_msg_data,
2235: p_encoded => FND_API.G_FALSE
2236: );
2240:
2241: ROLLBACK TO Update_ListEntry_PVT;
2242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2243:
2244: FND_MSG_PUB.Count_AND_Get
2245: ( p_count => x_msg_count,
2246: p_data => x_msg_data,
2247: p_encoded => FND_API.G_FALSE
2248: );
2252:
2253: ROLLBACK TO Update_ListEntry_PVT;
2254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2255:
2256: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2257: THEN
2258: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2259: END IF;
2260:
2254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2255:
2256: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2257: THEN
2258: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2259: END IF;
2260:
2261: FND_MSG_PUB.Count_AND_Get
2262: ( p_count => x_msg_count,
2257: THEN
2258: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2259: END IF;
2260:
2261: FND_MSG_PUB.Count_AND_Get
2262: ( p_count => x_msg_count,
2263: p_data => x_msg_data,
2264: p_encoded => FND_API.G_FALSE
2265: );
2319:
2320:
2321: -- Initialize message list IF p_init_msg_list is set to TRUE.
2322: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2323: FND_MSG_PUB.initialize;
2324: END IF;
2325:
2326: -- Debug Message
2327: IF (AMS_DEBUG_HIGH_ON) THEN
2326: -- Debug Message
2327: IF (AMS_DEBUG_HIGH_ON) THEN
2328: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
2329: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Delete_ListEntry: Start', TRUE);
2330: FND_MSG_PUB.Add;
2331: END IF;
2332:
2333: -- Initialize API return status to success
2334: x_return_status := FND_API.G_RET_STS_SUCCESS;
2344:
2345: IF (AMS_DEBUG_LOW_ON) THEN
2346: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
2347: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT - DELETE FROM ams_list_entries', TRUE);
2348: FND_MSG_PUB.Add;
2349: END IF;
2350:
2351:
2352: -- Delete header data
2357:
2358: if (SQL%NOTFOUND) then
2359: -- Error, check the msg level and added an error message to the
2360: -- API message list
2361: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2362: THEN -- MMSG
2363: FND_MESSAGE.set_name('AMS', 'API_UNEXP_ERROR_IN_PROCESSING');
2364: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Delete_ListEntry API', TRUE);
2365: FND_MSG_PUB.Add;
2361: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2362: THEN -- MMSG
2363: FND_MESSAGE.set_name('AMS', 'API_UNEXP_ERROR_IN_PROCESSING');
2364: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Delete_ListEntry API', TRUE);
2365: FND_MSG_PUB.Add;
2366: END IF;
2367: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2368: end if;
2369:
2378: END IF;
2379:
2380: -- Success Message
2381: -- MMSG
2382: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2383: THEN
2384: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
2385: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Delete_List_Entry', TRUE);
2386: FND_MSG_PUB.Add;
2382: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2383: THEN
2384: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
2385: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Delete_List_Entry', TRUE);
2386: FND_MSG_PUB.Add;
2387: END IF;
2388:
2389:
2390: IF (AMS_DEBUG_HIGH_ON) THEN
2389:
2390: IF (AMS_DEBUG_HIGH_ON) THEN
2391: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
2392: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Delete_List_Entry: END', TRUE);
2393: FND_MSG_PUB.Add;
2394: END IF;
2395:
2396:
2397: -- Standard call to get message count AND IF count is 1, get message info.
2394: END IF;
2395:
2396:
2397: -- Standard call to get message count AND IF count is 1, get message info.
2398: FND_MSG_PUB.Count_AND_Get
2399: ( p_count => x_msg_count,
2400: p_data => x_msg_data,
2401: p_encoded => FND_API.G_FALSE
2402: );
2409:
2410: ROLLBACK TO Delete_ListEntry_PVT;
2411: x_return_status := FND_API.G_RET_STS_ERROR ;
2412:
2413: FND_MSG_PUB.Count_AND_Get
2414: ( p_count => x_msg_count,
2415: p_data => x_msg_data,
2416: p_encoded => FND_API.G_FALSE
2417: );
2420:
2421: ROLLBACK TO Delete_ListEntry_PVT;
2422: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2423:
2424: FND_MSG_PUB.Count_AND_Get
2425: ( p_count => x_msg_count,
2426: p_data => x_msg_data,
2427: p_encoded => FND_API.G_FALSE
2428: );
2432:
2433: ROLLBACK TO Delete_ListEntry_PVT;
2434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2435:
2436: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2437: THEN
2438: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2439: END IF;
2440:
2434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2435:
2436: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2437: THEN
2438: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2439: END IF;
2440:
2441: FND_MSG_PUB.Count_AND_Get
2442: ( p_count => x_msg_count,
2437: THEN
2438: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2439: END IF;
2440:
2441: FND_MSG_PUB.Count_AND_Get
2442: ( p_count => x_msg_count,
2443: p_data => x_msg_data,
2444: p_encoded => FND_API.G_FALSE
2445: );
2500: END IF;
2501:
2502: -- Initialize message list if p_init_msg_list is set to TRUE.
2503: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2504: FND_MSG_PUB.initialize;
2505: END IF;
2506:
2507: -- Debug Message
2508: IF (AMS_DEBUG_HIGH_ON) THEN
2507: -- Debug Message
2508: IF (AMS_DEBUG_HIGH_ON) THEN
2509: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
2510: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Lock_ListEntry: Start', TRUE);
2511: FND_MSG_PUB.Add;
2512: END IF;
2513:
2514: -- Initialize API return status to success
2515: x_return_status := FND_API.G_RET_STS_SUCCESS;
2518: OPEN c_entry;
2519: FETCH c_entry INTO l_entry_id;
2520: IF (c_entry%NOTFOUND) THEN
2521: CLOSE c_entry;
2522: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2523: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2524: FND_MSG_PUB.add;
2525: END IF;
2526: RAISE FND_API.g_exc_error;
2520: IF (c_entry%NOTFOUND) THEN
2521: CLOSE c_entry;
2522: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2523: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
2524: FND_MSG_PUB.add;
2525: END IF;
2526: RAISE FND_API.g_exc_error;
2527: END IF;
2528: CLOSE c_entry;
2529:
2530:
2531: -- Success Message
2532: -- MMSG
2533: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2534: THEN
2535: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
2536: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Lock_ListEntry', TRUE);
2537: FND_MSG_PUB.Add;
2533: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
2534: THEN
2535: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
2536: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Lock_ListEntry', TRUE);
2537: FND_MSG_PUB.Add;
2538: END IF;
2539:
2540:
2541: IF (AMS_DEBUG_HIGH_ON) THEN
2540:
2541: IF (AMS_DEBUG_HIGH_ON) THEN
2542: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
2543: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Lock_ListEntry: END', TRUE);
2544: FND_MSG_PUB.Add;
2545: END IF;
2546:
2547: -- Standard call to get message count AND IF count is 1, get message info.
2548: FND_MSG_PUB.Count_AND_Get
2544: FND_MSG_PUB.Add;
2545: END IF;
2546:
2547: -- Standard call to get message count AND IF count is 1, get message info.
2548: FND_MSG_PUB.Count_AND_Get
2549: ( p_count => x_msg_count,
2550: p_data => x_msg_data,
2551: p_encoded => FND_API.G_FALSE
2552: );
2558: WHEN FND_API.G_EXC_ERROR THEN
2559:
2560: x_return_status := FND_API.G_RET_STS_ERROR ;
2561:
2562: FND_MSG_PUB.Count_AND_Get
2563: ( p_count => x_msg_count,
2564: p_data => x_msg_data,
2565: p_encoded => FND_API.G_FALSE
2566: );
2569: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2570:
2571: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2572:
2573: FND_MSG_PUB.Count_AND_Get
2574: ( p_count => x_msg_count,
2575: p_data => x_msg_data,
2576: p_encoded => FND_API.G_FALSE
2577: );
2579: WHEN AMS_Utility_PVT.RESOURCE_LOCKED THEN
2580:
2581: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2582:
2583: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2584: THEN -- MMSG
2585: FND_MESSAGE.SET_NAME('AMS','API_RESOURCE_LOCKED');
2586: FND_MSG_PUB.Add;
2587: END IF;
2582:
2583: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
2584: THEN -- MMSG
2585: FND_MESSAGE.SET_NAME('AMS','API_RESOURCE_LOCKED');
2586: FND_MSG_PUB.Add;
2587: END IF;
2588:
2589: FND_MSG_PUB.Count_AND_Get
2590: ( p_count => x_msg_count,
2585: FND_MESSAGE.SET_NAME('AMS','API_RESOURCE_LOCKED');
2586: FND_MSG_PUB.Add;
2587: END IF;
2588:
2589: FND_MSG_PUB.Count_AND_Get
2590: ( p_count => x_msg_count,
2591: p_data => x_msg_data,
2592: p_encoded => FND_API.G_FALSE
2593: );
2595: WHEN OTHERS THEN
2596:
2597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2598:
2599: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2600: THEN
2601: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2602: END IF;
2603:
2597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2598:
2599: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
2600: THEN
2601: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2602: END IF;
2603:
2604: FND_MSG_PUB.Count_AND_Get
2605: ( p_count => x_msg_count,
2600: THEN
2601: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2602: END IF;
2603:
2604: FND_MSG_PUB.Count_AND_Get
2605: ( p_count => x_msg_count,
2606: p_data => x_msg_data,
2607: p_encoded => FND_API.G_FALSE
2608: );
3125: OPEN c_entry;
3126: FETCH c_entry INTO l_entry_rec;
3127: IF c_entry%NOTFOUND THEN
3128: CLOSE c_entry;
3129: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3130: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3131: FND_MSG_PUB.add;
3132: END IF;
3133: RAISE FND_API.g_exc_error;
3127: IF c_entry%NOTFOUND THEN
3128: CLOSE c_entry;
3129: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3130: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
3131: FND_MSG_PUB.add;
3132: END IF;
3133: RAISE FND_API.g_exc_error;
3134: END IF;
3135: CLOSE c_entry;
4757:
4758:
4759: -- Initialize message list IF p_init_msg_list is set to TRUE.
4760: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4761: FND_MSG_PUB.initialize;
4762: END IF;
4763:
4764: -- Debug Message
4765: IF (AMS_DEBUG_HIGH_ON) THEN
4764: -- Debug Message
4765: IF (AMS_DEBUG_HIGH_ON) THEN
4766: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
4767: FND_MESSAGE.Set_Token('ROW', 'AMS_ListEntry_PVT.Update_ListEntry_Source_Code: Start', TRUE);
4768: FND_MSG_PUB.Add;
4769: END IF;
4770:
4771: -- Initialize API return status to success
4772: x_return_status := FND_API.G_RET_STS_SUCCESS;
4816: end if;
4817: end if;
4818:
4819: -- MMSG
4820: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4821: THEN
4822: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
4823: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_ListEntry_Source_Code', TRUE);
4824: FND_MSG_PUB.Add;
4820: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_SUCCESS)
4821: THEN
4822: FND_MESSAGE.Set_Name('AMS', 'API_SUCCESS');
4823: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_ListEntry_Source_Code', TRUE);
4824: FND_MSG_PUB.Add;
4825: END IF;
4826:
4827:
4828: IF (AMS_DEBUG_HIGH_ON) THEN
4827:
4828: IF (AMS_DEBUG_HIGH_ON) THEN
4829: FND_MESSAGE.set_name('AMS', 'API_DEBUG_MESSAGE');
4830: FND_MESSAGE.Set_Token('ROW', 'AMS_List_Entry_PVT.Update_ListEntry_Source_Code: END', TRUE);
4831: FND_MSG_PUB.Add;
4832: END IF;
4833:
4834: -- Standard call to get message count AND IF count is 1, get message info.
4835: FND_MSG_PUB.Count_AND_Get
4831: FND_MSG_PUB.Add;
4832: END IF;
4833:
4834: -- Standard call to get message count AND IF count is 1, get message info.
4835: FND_MSG_PUB.Count_AND_Get
4836: ( p_count => x_msg_count,
4837: p_data => x_msg_data,
4838: p_encoded => FND_API.G_FALSE
4839: );
4845: WHEN FND_API.G_EXC_ERROR THEN
4846:
4847: x_return_status := FND_API.G_RET_STS_ERROR ;
4848:
4849: FND_MSG_PUB.Count_AND_Get
4850: ( p_count => x_msg_count,
4851: p_data => x_msg_data,
4852: p_encoded => FND_API.G_FALSE
4853: );
4856: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4857:
4858: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4859:
4860: FND_MSG_PUB.Count_AND_Get
4861: ( p_count => x_msg_count,
4862: p_data => x_msg_data,
4863: p_encoded => FND_API.G_FALSE
4864: );
4866: WHEN AMS_Utility_PVT.RESOURCE_LOCKED THEN
4867:
4868: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4869:
4870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4871: THEN -- MMSG
4872: FND_MESSAGE.SET_NAME('AMS','API_RESOURCE_LOCKED');
4873: FND_MSG_PUB.Add;
4874: END IF;
4869:
4870: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
4871: THEN -- MMSG
4872: FND_MESSAGE.SET_NAME('AMS','API_RESOURCE_LOCKED');
4873: FND_MSG_PUB.Add;
4874: END IF;
4875:
4876: FND_MSG_PUB.Count_AND_Get
4877: ( p_count => x_msg_count,
4872: FND_MESSAGE.SET_NAME('AMS','API_RESOURCE_LOCKED');
4873: FND_MSG_PUB.Add;
4874: END IF;
4875:
4876: FND_MSG_PUB.Count_AND_Get
4877: ( p_count => x_msg_count,
4878: p_data => x_msg_data,
4879: p_encoded => FND_API.G_FALSE
4880: );
4882: WHEN OTHERS THEN
4883:
4884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4885:
4886: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4887: THEN
4888: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4889: END IF;
4890:
4884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4885:
4886: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
4887: THEN
4888: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4889: END IF;
4890:
4891: FND_MSG_PUB.Count_AND_Get
4892: ( p_count => x_msg_count,
4887: THEN
4888: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4889: END IF;
4890:
4891: FND_MSG_PUB.Count_AND_Get
4892: ( p_count => x_msg_count,
4893: p_data => x_msg_data,
4894: p_encoded => FND_API.G_FALSE
4895: );