73:
74: -- Initialize message list IF p_init_msg_list is set to TRUE.
75: IF FND_API.to_Boolean( p_init_msg_list )
76: THEN
77: FND_MSG_PUB.initialize;
78: END IF;
79:
80: -- Initialize API return status to success
81: x_return_status := FND_API.G_RET_STS_SUCCESS;
195: COMMIT WORK;
196: END IF;
197:
198: -- Standard call to get message count AND IF count is 1, get message info.
199: FND_MSG_PUB.Count_AND_Get
200: ( p_count => x_msg_count,
201: p_data => x_msg_data,
202: p_encoded => FND_API.G_FALSE
203: );
208:
209: ROLLBACK TO Create_Act_Category_PVT;
210: x_return_status := FND_API.G_RET_STS_ERROR ;
211:
212: FND_MSG_PUB.Count_AND_Get
213: ( p_count => x_msg_count,
214: p_data => x_msg_data,
215: p_encoded => FND_API.G_FALSE
216: );
220:
221: ROLLBACK TO Create_Act_Category_PVT;
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
223:
224: FND_MSG_PUB.Count_AND_Get
225: ( p_count => x_msg_count,
226: p_data => x_msg_data,
227: p_encoded => FND_API.G_FALSE
228: );
232:
233: ROLLBACK TO Create_Act_Category_PVT;
234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
235:
236: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
237: THEN
238: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
239: END IF;
240:
234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
235:
236: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
237: THEN
238: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
239: END IF;
240:
241: FND_MSG_PUB.Count_AND_Get
242: ( p_count => x_msg_count,
237: THEN
238: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
239: END IF;
240:
241: FND_MSG_PUB.Count_AND_Get
242: ( p_count => x_msg_count,
243: p_data => x_msg_data,
244: p_encoded => FND_API.G_FALSE
245: );
292: END IF;
293:
294: -- Initialize message list IF p_init_msg_list is set to TRUE.
295: IF FND_API.to_Boolean( p_init_msg_list ) THEN
296: FND_MSG_PUB.initialize;
297: END IF;
298:
299: -- Initialize API return status to success
300: x_return_status := FND_API.G_RET_STS_SUCCESS;
361: IF (SQL%NOTFOUND)
362: THEN
363: -- Error, check the msg level and added an error message to the
364: -- API message list
365: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
366: THEN -- MMSG
367: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
368: FND_MSG_PUB.Add;
369: END IF;
364: -- API message list
365: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
366: THEN -- MMSG
367: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
368: FND_MSG_PUB.Add;
369: END IF;
370:
371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
372: END IF;
381: COMMIT WORK;
382: END IF;
383:
384: -- Standard call to get message count AND IF count is 1, get message info.
385: FND_MSG_PUB.Count_AND_Get
386: ( p_count => x_msg_count,
387: p_data => x_msg_data,
388: p_encoded => FND_API.G_FALSE
389: );
394:
395: ROLLBACK TO Update_Act_Category_PVT;
396: x_return_status := FND_API.G_RET_STS_ERROR ;
397:
398: FND_MSG_PUB.Count_AND_Get
399: ( p_count => x_msg_count,
400: p_data => x_msg_data,
401: p_encoded => FND_API.G_FALSE
402: );
406:
407: ROLLBACK TO Update_Act_Category_PVT;
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
409:
410: FND_MSG_PUB.Count_AND_Get
411: ( p_count => x_msg_count,
412: p_data => x_msg_data,
413: p_encoded => FND_API.G_FALSE
414: );
418:
419: ROLLBACK TO Update_Act_Category_PVT;
420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
421:
422: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
423: THEN
424: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
425: END IF;
426:
420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
421:
422: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
423: THEN
424: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
425: END IF;
426:
427: FND_MSG_PUB.Count_AND_Get
428: ( p_count => x_msg_count,
423: THEN
424: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
425: END IF;
426:
427: FND_MSG_PUB.Count_AND_Get
428: ( p_count => x_msg_count,
429: p_data => x_msg_data,
430: p_encoded => FND_API.G_FALSE
431: );
480:
481: -- Initialize message list IF p_init_msg_list is set to TRUE.
482: IF FND_API.to_Boolean( p_init_msg_list )
483: THEN
484: FND_MSG_PUB.initialize;
485: END IF;
486:
487: -- Initialize API return status to success
488: x_return_status := FND_API.G_RET_STS_SUCCESS;
501: IF SQL%NOTFOUND THEN
502: --
503: -- Add error message to API message list.
504: --
505: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
506: THEN
507: FND_MESSAGE.set_name ('AMS', 'AMS_API_RECORD_NOT_FOUND');
508: FND_MSG_PUB.add;
509: END IF;
504: --
505: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
506: THEN
507: FND_MESSAGE.set_name ('AMS', 'AMS_API_RECORD_NOT_FOUND');
508: FND_MSG_PUB.add;
509: END IF;
510:
511: RAISE FND_API.G_EXC_ERROR;
512: END IF;
521: COMMIT WORK;
522: END IF;
523:
524: -- Standard call to get message count AND IF count is 1, get message info.
525: FND_MSG_PUB.Count_AND_Get
526: ( p_count => x_msg_count,
527: p_data => x_msg_data,
528: p_encoded => FND_API.G_FALSE
529: );
534:
535: ROLLBACK TO Delete_Act_Category_PVT;
536: x_return_status := FND_API.G_RET_STS_ERROR ;
537:
538: FND_MSG_PUB.Count_AND_Get
539: ( p_count => x_msg_count,
540: p_data => x_msg_data,
541: p_encoded => FND_API.G_FALSE
542: );
546:
547: ROLLBACK TO Delete_Act_Category_PVT;
548: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
549:
550: FND_MSG_PUB.Count_AND_Get
551: ( p_count => x_msg_count,
552: p_data => x_msg_data,
553: p_encoded => FND_API.G_FALSE
554: );
558:
559: ROLLBACK TO Delete_Act_Category_PVT;
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
561:
562: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
563: THEN
564: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
565: END IF;
566:
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
561:
562: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
563: THEN
564: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
565: END IF;
566:
567: FND_MSG_PUB.Count_AND_Get
568: ( p_count => x_msg_count,
563: THEN
564: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
565: END IF;
566:
567: FND_MSG_PUB.Count_AND_Get
568: ( p_count => x_msg_count,
569: p_data => x_msg_data,
570: p_encoded => FND_API.G_FALSE
571: );
624:
625: -- Initialize message list if p_init_msg_list is set to TRUE.
626: IF FND_API.to_Boolean( p_init_msg_list )
627: THEN
628: FND_MSG_PUB.initialize;
629: END IF;
630:
631: -- Initialize API return status to success
632: x_return_status := FND_API.G_RET_STS_SUCCESS;
641: IF (c_act_category%NOTFOUND) THEN
642: CLOSE c_act_category;
643: -- Error, check the msg level and added an error message to the
644: -- API message list
645: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
646: THEN -- MMSG
647:
648: FND_MESSAGE.Set_Name('AMS', 'AMS_API_RECORD_NOT_FOUND');
649: FND_MSG_PUB.Add;
645: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR)
646: THEN -- MMSG
647:
648: FND_MESSAGE.Set_Name('AMS', 'AMS_API_RECORD_NOT_FOUND');
649: FND_MSG_PUB.Add;
650: END IF;
651:
652: RAISE FND_API.G_EXC_ERROR;
653: END IF;
658: -- END of API body.
659: --
660:
661: -- Standard call to get message count AND IF count is 1, get message info.
662: FND_MSG_PUB.Count_AND_Get
663: ( p_count => x_msg_count,
664: p_data => x_msg_data,
665: p_encoded => FND_API.G_FALSE
666: );
670: WHEN FND_API.G_EXC_ERROR THEN
671:
672: x_return_status := FND_API.G_RET_STS_ERROR ;
673:
674: FND_MSG_PUB.Count_AND_Get
675: ( p_count => x_msg_count,
676: p_data => x_msg_data,
677: p_encoded => FND_API.G_FALSE
678: );
681: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
682:
683: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
684:
685: FND_MSG_PUB.Count_AND_Get
686: ( p_count => x_msg_count,
687: p_data => x_msg_data,
688: p_encoded => FND_API.G_FALSE
689: );
689: );
690:
691: WHEN AMS_Utility_PVT.resource_locked THEN
692: x_return_status := FND_API.g_ret_sts_error;
693: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
694: FND_MESSAGE.set_name('AMS', 'AMS_API_RESOURCE_LOCKED');
695: FND_MSG_PUB.add;
696: END IF;
697:
691: WHEN AMS_Utility_PVT.resource_locked THEN
692: x_return_status := FND_API.g_ret_sts_error;
693: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
694: FND_MESSAGE.set_name('AMS', 'AMS_API_RESOURCE_LOCKED');
695: FND_MSG_PUB.add;
696: END IF;
697:
698: FND_MSG_PUB.Count_AND_Get
699: ( p_count => x_msg_count,
694: FND_MESSAGE.set_name('AMS', 'AMS_API_RESOURCE_LOCKED');
695: FND_MSG_PUB.add;
696: END IF;
697:
698: FND_MSG_PUB.Count_AND_Get
699: ( p_count => x_msg_count,
700: p_data => x_msg_data,
701: p_encoded => FND_API.G_FALSE
702: );
704: WHEN OTHERS THEN
705:
706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
707:
708: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
709: THEN
710: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
711: END IF;
712:
706: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
707:
708: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
709: THEN
710: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
711: END IF;
712:
713: FND_MSG_PUB.Count_AND_Get
714: ( p_count => x_msg_count,
709: THEN
710: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
711: END IF;
712:
713: FND_MSG_PUB.Count_AND_Get
714: ( p_count => x_msg_count,
715: p_data => x_msg_data,
716: p_encoded => FND_API.G_FALSE
717: );
775: END IF;
776:
777: -- Initialize message list if p_init_msg_list is set to TRUE.
778: IF FND_API.to_Boolean( p_init_msg_list ) THEN
779: FND_MSG_PUB.initialize;
780: END IF;
781:
782:
783: -- Initialize API return status to success
839: p_act_category_rec.ACT_CATEGORY_USED_BY_ID);
840: fetch c_act_ctg_id_exists into l_dummy;
841: close c_act_ctg_id_exists;
842: IF l_dummy = 1 THEN
843: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
844: FND_MESSAGE.set_name ('AMS', 'AMS_CTG_ACT_DUP');
845: FND_MSG_PUB.add;
846: END IF;
847: x_return_status := FND_API.g_ret_sts_error;
841: close c_act_ctg_id_exists;
842: IF l_dummy = 1 THEN
843: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
844: FND_MESSAGE.set_name ('AMS', 'AMS_CTG_ACT_DUP');
845: FND_MSG_PUB.add;
846: END IF;
847: x_return_status := FND_API.g_ret_sts_error;
848: RETURN;
849: END IF;
847: x_return_status := FND_API.g_ret_sts_error;
848: RETURN;
849: END IF;
850: -------------------- finish --------------------------
851: FND_MSG_PUB.count_and_get(
852: p_encoded => FND_API.g_false,
853: p_count => x_msg_count,
854: p_data => x_msg_data
855: );
859: WHEN FND_API.G_EXC_ERROR THEN
860:
861: x_return_status := FND_API.G_RET_STS_ERROR ;
862:
863: FND_MSG_PUB.Count_AND_Get
864: ( p_count => x_msg_count,
865: p_data => x_msg_data,
866: p_encoded => FND_API.G_FALSE
867: );
870: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
871:
872: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
873:
874: FND_MSG_PUB.Count_AND_Get
875: ( p_count => x_msg_count,
876: p_data => x_msg_data,
877: p_encoded => FND_API.G_FALSE
878: );
881: WHEN OTHERS THEN
882:
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
884:
885: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
886: THEN
887: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
888: END IF;
889:
883: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
884:
885: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
886: THEN
887: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
888: END IF;
889:
890: FND_MSG_PUB.Count_AND_Get
891: ( p_count => x_msg_count,
886: THEN
887: FND_MSG_PUB.Add_Exc_Msg( G_PACKAGE_NAME,l_api_name);
888: END IF;
889:
890: FND_MSG_PUB.Count_AND_Get
891: ( p_count => x_msg_count,
892: p_data => x_msg_data,
893: p_encoded => FND_API.G_FALSE
894: );
935: IF (p_act_category_rec.ACT_CATEGORY_USED_BY_ID = FND_API.G_MISS_NUM OR
936: p_act_category_rec.ACT_CATEGORY_USED_BY_ID IS NULL)
937: THEN
938: -- missing required fields
939: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
940: THEN -- MMSG
941: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_NO_USEDBYID');
942: FND_MSG_PUB.add;
943: END IF;
938: -- missing required fields
939: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
940: THEN -- MMSG
941: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_NO_USEDBYID');
942: FND_MSG_PUB.add;
943: END IF;
944:
945: x_return_status := FND_API.G_RET_STS_ERROR;
946:
953: IF (p_act_category_rec.ARC_ACT_CATEGORY_USED_BY = FND_API.G_MISS_CHAR OR
954: p_act_category_rec.ARC_ACT_CATEGORY_USED_BY IS NULL)
955: THEN
956: -- missing required fields
957: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
958: THEN -- MMSG
959: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_NO_USEDBY');
960: FND_MSG_PUB.add;
961: END IF;
956: -- missing required fields
957: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
958: THEN -- MMSG
959: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_NO_USEDBY');
960: FND_MSG_PUB.add;
961: END IF;
962:
963: x_return_status := FND_API.G_RET_STS_ERROR;
964:
970: p_act_category_rec.CATEGORY_ID IS NULL)
971: THEN
972:
973: -- missing required fields
974: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
975: THEN -- MMSG
976: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_NO_CATEGORY_ID');
977: FND_MSG_PUB.add;
978: END IF;
973: -- missing required fields
974: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
975: THEN -- MMSG
976: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_NO_CATEGORY_ID');
977: FND_MSG_PUB.add;
978: END IF;
979:
980: x_return_status := FND_API.G_RET_STS_ERROR;
981:
991: 'ams_act_categories',
992: 'activity_category_id = ' || p_act_category_rec.activity_category_id
993: ) = FND_API.g_false
994: THEN
995: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
996: THEN
997: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_DUPLICATE_ID');
998: FND_MSG_PUB.add;
999: END IF;
994: THEN
995: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
996: THEN
997: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_DUPLICATE_ID');
998: FND_MSG_PUB.add;
999: END IF;
1000: x_return_status := FND_API.g_ret_sts_error;
1001: RETURN;
1002: END IF;
1019: ,p_pk_name => l_pk_name
1020: ,p_pk_value => l_pk_value
1021: ) = FND_API.G_FALSE
1022: THEN
1023: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1024: THEN
1025: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_EVEH_REF');
1026: FND_MSG_PUB.add;
1027: END IF;
1022: THEN
1023: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1024: THEN
1025: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_EVEH_REF');
1026: FND_MSG_PUB.add;
1027: END IF;
1028: x_return_status := FND_API.G_RET_STS_ERROR;
1029: -- If any errors happen abort API/Procedure.
1030: RETURN;
1044: ,p_pk_name => l_pk_name
1045: ,p_pk_value => l_pk_value
1046: ) = FND_API.G_FALSE
1047: THEN
1048: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1049: THEN
1050: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_EVEO_REF');
1051: FND_MSG_PUB.add;
1052: END IF;
1047: THEN
1048: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1049: THEN
1050: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_EVEO_REF');
1051: FND_MSG_PUB.add;
1052: END IF;
1053: x_return_status := FND_API.G_RET_STS_ERROR;
1054: -- If any errors happen abort API/Procedure.
1055: RETURN;
1067: l_table_name := 'AMS_EVENT_OFFERS_ALL_B';
1068: l_pk_name := 'EVENT_OFFER_ID';
1069: l_pk_value := p_act_category_rec.ACT_CATEGORY_USED_BY_ID;
1070: else
1071: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1072: THEN
1073: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_BAD_USEDBY');
1074: FND_MSG_PUB.add;
1075: END IF;
1070: else
1071: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1072: THEN
1073: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_BAD_USEDBY');
1074: FND_MSG_PUB.add;
1075: END IF;
1076: x_return_status := FND_API.G_RET_STS_ERROR;
1077: -- If any errors happen abort API/Procedure.
1078: RETURN;
1082: ,p_pk_name => l_pk_name
1083: ,p_pk_value => l_pk_value
1084: ) = FND_API.G_FALSE
1085: THEN
1086: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1087: THEN
1088: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_EVEH_REF');
1089: FND_MSG_PUB.add;
1090: END IF;
1085: THEN
1086: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1087: THEN
1088: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_EVEH_REF');
1089: FND_MSG_PUB.add;
1090: END IF;
1091: x_return_status := FND_API.G_RET_STS_ERROR;
1092: -- If any errors happen abort API/Procedure.
1093: RETURN;
1106: ,p_pk_name => l_pk_name
1107: ,p_pk_value => l_pk_value
1108: ) = FND_API.G_FALSE
1109: THEN
1110: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1111: THEN
1112: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_CAT_REF');
1113: FND_MSG_PUB.add;
1114: END IF;
1109: THEN
1110: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR)
1111: THEN
1112: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_INVALID_CAT_REF');
1113: FND_MSG_PUB.add;
1114: END IF;
1115: x_return_status := FND_API.G_RET_STS_ERROR;
1116: -- If any errors happen abort API/Procedure.
1117: RETURN;
1126: p_lookup_type => 'AMS_SYS_ARC_QUALIFIER',
1127: p_lookup_code => p_act_category_rec.arc_act_category_used_by
1128: ) = FND_API.g_false
1129: THEN
1130: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1131: THEN
1132: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_BAD_USEDBY');
1133: FND_MSG_PUB.add;
1134: END IF;
1129: THEN
1130: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1131: THEN
1132: FND_MESSAGE.set_name('AMS', 'AMS_ACT_CAT_BAD_USEDBY');
1133: FND_MSG_PUB.add;
1134: END IF;
1135:
1136: x_return_status := FND_API.g_ret_sts_error;
1137: RETURN;
1146: TO_NUMBER(p_act_category_rec.ACT_CATEGORY_USED_BY_ID));
1147: fetch c_act_ctg_id_exists into l_dummy;
1148: close c_act_ctg_id_exists;
1149: IF l_dummy = 1 THEN
1150: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1151: FND_MESSAGE.set_name ('AMS', 'AMS_CTG_ACT_DUP');
1152: FND_MSG_PUB.add;
1153: END IF;
1154: x_return_status := FND_API.g_ret_sts_error;
1148: close c_act_ctg_id_exists;
1149: IF l_dummy = 1 THEN
1150: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
1151: FND_MESSAGE.set_name ('AMS', 'AMS_CTG_ACT_DUP');
1152: FND_MSG_PUB.add;
1153: END IF;
1154: x_return_status := FND_API.g_ret_sts_error;
1155: RETURN;
1156: END IF;
1221: OPEN c_cat;
1222: FETCH c_cat INTO l_act_category_rec;
1223: IF c_cat%NOTFOUND THEN
1224: CLOSE c_cat;
1225: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1226: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1227: FND_MSG_PUB.add;
1228: END IF;
1229: RAISE FND_API.g_exc_error;
1223: IF c_cat%NOTFOUND THEN
1224: CLOSE c_cat;
1225: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1226: FND_MESSAGE.set_name('AMS', 'AMS_API_RECORD_NOT_FOUND');
1227: FND_MSG_PUB.add;
1228: END IF;
1229: RAISE FND_API.g_exc_error;
1230: END IF;
1231: CLOSE c_cat;