59: END IF;
60:
61: -- Initialize message list if p_init_msg_list is set to TRUE.
62: IF FND_API.to_Boolean( p_init_msg_list ) THEN
63: FND_MSG_PUB.initialize;
64: END IF;
65:
66: IF (lc_proc_level >= lc_debug_level) THEN
67: FND_LOG.STRING(lc_proc_level, lc_mod_name || '.BEGIN',
232: COMMIT WORK;
233: END IF;
234:
235: -- Standard call to get message count and IF count is get message info.
236: FND_MSG_PUB.Count_And_Get
237: (p_count => x_msg_count,
238: p_data => x_msg_data );
239:
240: IF (lc_proc_level >= lc_debug_level) THEN
256: 'Adding message CSD_RSC_ASSOCIATION_EXISTS to FND_MSG stack');
257: end if;
258: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_ASSOCIATION_EXISTS');
259: FND_MESSAGE.SET_TOKEN('SERVICE_CODE_ID',p_ro_service_code_rec.service_code_id);
260: FND_MSG_PUB.Add;
261:
262: FND_MSG_PUB.Count_And_Get
263: (p_count => x_msg_count,
264: p_data => x_msg_data );
258: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_ASSOCIATION_EXISTS');
259: FND_MESSAGE.SET_TOKEN('SERVICE_CODE_ID',p_ro_service_code_rec.service_code_id);
260: FND_MSG_PUB.Add;
261:
262: FND_MSG_PUB.Count_And_Get
263: (p_count => x_msg_count,
264: p_data => x_msg_data );
265:
266: -- save message in debug log
274: ROLLBACK TO Create_RO_Service_Code;
275:
276: x_return_status := FND_API.G_RET_STS_ERROR;
277:
278: FND_MSG_PUB.Count_And_Get
279: (p_count => x_msg_count,
280: p_data => x_msg_data );
281:
282: -- save message in debug log
289: ROLLBACK TO Create_RO_Service_Code;
290:
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
292:
293: IF FND_MSG_PUB.Check_Msg_Level
294: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
295: THEN
296: if (lc_stat_level >= lc_debug_level) then
297: FND_LOG.STRING(lc_stat_level, lc_mod_name,
290:
291: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
292:
293: IF FND_MSG_PUB.Check_Msg_Level
294: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
295: THEN
296: if (lc_stat_level >= lc_debug_level) then
297: FND_LOG.STRING(lc_stat_level, lc_mod_name,
298: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
294: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
295: THEN
296: if (lc_stat_level >= lc_debug_level) then
297: FND_LOG.STRING(lc_stat_level, lc_mod_name,
298: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
299: end if;
300: FND_MSG_PUB.Add_Exc_Msg
301: (G_PKG_NAME ,
302: lc_api_name );
296: if (lc_stat_level >= lc_debug_level) then
297: FND_LOG.STRING(lc_stat_level, lc_mod_name,
298: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
299: end if;
300: FND_MSG_PUB.Add_Exc_Msg
301: (G_PKG_NAME ,
302: lc_api_name );
303: END IF;
304:
301: (G_PKG_NAME ,
302: lc_api_name );
303: END IF;
304:
305: FND_MSG_PUB.Count_And_Get
306: ( p_count => x_msg_count,
307: p_data => x_msg_data );
308:
309: -- save message in debug log
317:
318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
319:
320: -- save message in fnd stack
321: IF FND_MSG_PUB.Check_Msg_Level
322: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
323: THEN
324: if (lc_stat_level >= lc_debug_level) then
325: FND_LOG.STRING(lc_stat_level, lc_mod_name,
318: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
319:
320: -- save message in fnd stack
321: IF FND_MSG_PUB.Check_Msg_Level
322: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
323: THEN
324: if (lc_stat_level >= lc_debug_level) then
325: FND_LOG.STRING(lc_stat_level, lc_mod_name,
326: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
322: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
323: THEN
324: if (lc_stat_level >= lc_debug_level) then
325: FND_LOG.STRING(lc_stat_level, lc_mod_name,
326: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
327: end if;
328: FND_MSG_PUB.Add_Exc_Msg
329: (G_PKG_NAME ,
330: lc_api_name );
324: if (lc_stat_level >= lc_debug_level) then
325: FND_LOG.STRING(lc_stat_level, lc_mod_name,
326: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
327: end if;
328: FND_MSG_PUB.Add_Exc_Msg
329: (G_PKG_NAME ,
330: lc_api_name );
331: END IF;
332:
329: (G_PKG_NAME ,
330: lc_api_name );
331: END IF;
332:
333: FND_MSG_PUB.Count_And_Get
334: (p_count => x_msg_count,
335: p_data => x_msg_data );
336:
337: -- save message in debug log
408: END IF;
409:
410: -- Initialize message list if p_init_msg_list is set to TRUE.
411: IF FND_API.to_Boolean( p_init_msg_list ) THEN
412: FND_MSG_PUB.initialize;
413: END IF;
414:
415: IF (lc_proc_level >= lc_debug_level) THEN
416: FND_LOG.STRING(lc_proc_level, lc_mod_name || '.BEGIN',
626: COMMIT WORK;
627: END IF;
628:
629: -- Standard call to get message count and IF count is get message info.
630: FND_MSG_PUB.Count_And_Get
631: (p_count => x_msg_count,
632: p_data => x_msg_data );
633:
634: IF (lc_proc_level >= lc_debug_level) THEN
649: end if;
650: FND_MESSAGE.SET_NAME('CSD','CSD_API_MISSING_PARAM');
651: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
652: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','REPAIR_LINE_ID');
653: FND_MSG_PUB.Add;
654:
655: FND_MSG_PUB.Count_And_Get
656: (p_count => x_msg_count,
657: p_data => x_msg_data );
651: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
652: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','REPAIR_LINE_ID');
653: FND_MSG_PUB.Add;
654:
655: FND_MSG_PUB.Count_And_Get
656: (p_count => x_msg_count,
657: p_data => x_msg_data );
658:
659: -- save message in debug log
674: end if;
675: FND_MESSAGE.SET_NAME('CSD','CSD_API_MISSING_PARAM');
676: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
677: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','SERVICE_CODE_ID');
678: FND_MSG_PUB.Add;
679:
680: FND_MSG_PUB.Count_And_Get
681: (p_count => x_msg_count,
682: p_data => x_msg_data );
676: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
677: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','SERVICE_CODE_ID');
678: FND_MSG_PUB.Add;
679:
680: FND_MSG_PUB.Count_And_Get
681: (p_count => x_msg_count,
682: p_data => x_msg_data );
683:
684: -- save message in debug log
700: end if;
701: FND_MESSAGE.SET_NAME('CSD','CSD_API_MISSING_PARAM');
702: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
703: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','SOURCE_TYPE_CODE');
704: FND_MSG_PUB.Add;
705:
706: FND_MSG_PUB.Count_And_Get
707: (p_count => x_msg_count,
708: p_data => x_msg_data );
702: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
703: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','SOURCE_TYPE_CODE');
704: FND_MSG_PUB.Add;
705:
706: FND_MSG_PUB.Count_And_Get
707: (p_count => x_msg_count,
708: p_data => x_msg_data );
709:
710: -- save message in debug log
726: end if;
727: FND_MESSAGE.SET_NAME('CSD','CSD_API_MISSING_PARAM');
728: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
729: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','APPLICABLE_FLAG');
730: FND_MSG_PUB.Add;
731:
732: FND_MSG_PUB.Count_And_Get
733: (p_count => x_msg_count,
734: p_data => x_msg_data );
728: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
729: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','APPLICABLE_FLAG');
730: FND_MSG_PUB.Add;
731:
732: FND_MSG_PUB.Count_And_Get
733: (p_count => x_msg_count,
734: p_data => x_msg_data );
735:
736: -- save message in debug log
752: end if;
753: FND_MESSAGE.SET_NAME('CSD','CSD_API_MISSING_PARAM');
754: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
755: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','APPLIED_TO_EST_FLAG');
756: FND_MSG_PUB.Add;
757:
758: FND_MSG_PUB.Count_And_Get
759: (p_count => x_msg_count,
760: p_data => x_msg_data );
754: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
755: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','APPLIED_TO_EST_FLAG');
756: FND_MSG_PUB.Add;
757:
758: FND_MSG_PUB.Count_And_Get
759: (p_count => x_msg_count,
760: p_data => x_msg_data );
761:
762: -- save message in debug log
778: end if;
779: FND_MESSAGE.SET_NAME('CSD','CSD_API_MISSING_PARAM');
780: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
781: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','APPLIED_TO_WORK_FLAG');
782: FND_MSG_PUB.Add;
783:
784: FND_MSG_PUB.Count_And_Get
785: (p_count => x_msg_count,
786: p_data => x_msg_data );
780: FND_MESSAGE.SET_TOKEN('API_NAME',lc_api_name);
781: FND_MESSAGE.SET_TOKEN('MISSING_PARAM','APPLIED_TO_WORK_FLAG');
782: FND_MSG_PUB.Add;
783:
784: FND_MSG_PUB.Count_And_Get
785: (p_count => x_msg_count,
786: p_data => x_msg_data );
787:
788: -- save message in debug log
803: 'Adding message CSD_RSC_INVALID_ID to FND_MSG stack');
804: end if;
805: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_INVALID_ID');
806: FND_MESSAGE.SET_TOKEN('RO_SERVICE_CODE_ID',p_ro_service_code_rec.ro_service_code_id);
807: FND_MSG_PUB.Add;
808:
809: FND_MSG_PUB.Count_And_Get
810: (p_count => x_msg_count,
811: p_data => x_msg_data );
805: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_INVALID_ID');
806: FND_MESSAGE.SET_TOKEN('RO_SERVICE_CODE_ID',p_ro_service_code_rec.ro_service_code_id);
807: FND_MSG_PUB.Add;
808:
809: FND_MSG_PUB.Count_And_Get
810: (p_count => x_msg_count,
811: p_data => x_msg_data );
812:
813: -- save message in debug log
828: 'Adding message CSD_RSC_GET_OVN_ERROR to FND_MSG stack');
829: end if;
830: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_GET_OVN_ERROR');
831: FND_MESSAGE.SET_TOKEN('RO_SERVICE_CODE_ID',p_ro_service_code_rec.ro_service_code_id);
832: FND_MSG_PUB.Add;
833:
834: FND_MSG_PUB.Count_And_Get
835: (p_count => x_msg_count,
836: p_data => x_msg_data );
830: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_GET_OVN_ERROR');
831: FND_MESSAGE.SET_TOKEN('RO_SERVICE_CODE_ID',p_ro_service_code_rec.ro_service_code_id);
832: FND_MSG_PUB.Add;
833:
834: FND_MSG_PUB.Count_And_Get
835: (p_count => x_msg_count,
836: p_data => x_msg_data );
837:
838: -- save message in debug log
853: 'Adding message CSD_RSC_OVN_MISMATCH to FND_MSG stack');
854: end if;
855: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_OVN_MISMATCH');
856: FND_MESSAGE.SET_TOKEN('RO_SERVICE_CODE_ID',p_ro_service_code_rec.ro_service_code_id);
857: FND_MSG_PUB.Add;
858:
859: FND_MSG_PUB.Count_And_Get
860: (p_count => x_msg_count,
861: p_data => x_msg_data );
855: FND_MESSAGE.SET_NAME('CSD','CSD_RSC_OVN_MISMATCH');
856: FND_MESSAGE.SET_TOKEN('RO_SERVICE_CODE_ID',p_ro_service_code_rec.ro_service_code_id);
857: FND_MSG_PUB.Add;
858:
859: FND_MSG_PUB.Count_And_Get
860: (p_count => x_msg_count,
861: p_data => x_msg_data );
862:
863: -- save message in debug log
870: ROLLBACK TO Update_RO_Service_Code;
871:
872: x_return_status := FND_API.G_RET_STS_ERROR;
873:
874: FND_MSG_PUB.Count_And_Get
875: (p_count => x_msg_count,
876: p_data => x_msg_data );
877:
878: -- save message in debug log
885: ROLLBACK TO Update_RO_Service_Code;
886:
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888:
889: IF FND_MSG_PUB.Check_Msg_Level
890: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
891: THEN
892: if (lc_stat_level >= lc_debug_level) then
893: FND_LOG.STRING(lc_stat_level, lc_mod_name,
886:
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888:
889: IF FND_MSG_PUB.Check_Msg_Level
890: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
891: THEN
892: if (lc_stat_level >= lc_debug_level) then
893: FND_LOG.STRING(lc_stat_level, lc_mod_name,
894: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
890: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
891: THEN
892: if (lc_stat_level >= lc_debug_level) then
893: FND_LOG.STRING(lc_stat_level, lc_mod_name,
894: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
895: end if;
896: FND_MSG_PUB.Add_Exc_Msg
897: (G_PKG_NAME ,
898: lc_api_name );
892: if (lc_stat_level >= lc_debug_level) then
893: FND_LOG.STRING(lc_stat_level, lc_mod_name,
894: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
895: end if;
896: FND_MSG_PUB.Add_Exc_Msg
897: (G_PKG_NAME ,
898: lc_api_name );
899: END IF;
900:
897: (G_PKG_NAME ,
898: lc_api_name );
899: END IF;
900:
901: FND_MSG_PUB.Count_And_Get
902: ( p_count => x_msg_count,
903: p_data => x_msg_data );
904:
905: -- save message in debug log
913:
914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
915:
916: -- save message in fnd stack
917: IF FND_MSG_PUB.Check_Msg_Level
918: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
919: THEN
920: if (lc_stat_level >= lc_debug_level) then
921: FND_LOG.STRING(lc_stat_level, lc_mod_name,
914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
915:
916: -- save message in fnd stack
917: IF FND_MSG_PUB.Check_Msg_Level
918: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
919: THEN
920: if (lc_stat_level >= lc_debug_level) then
921: FND_LOG.STRING(lc_stat_level, lc_mod_name,
922: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
918: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
919: THEN
920: if (lc_stat_level >= lc_debug_level) then
921: FND_LOG.STRING(lc_stat_level, lc_mod_name,
922: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
923: end if;
924: FND_MSG_PUB.Add_Exc_Msg
925: (G_PKG_NAME ,
926: lc_api_name );
920: if (lc_stat_level >= lc_debug_level) then
921: FND_LOG.STRING(lc_stat_level, lc_mod_name,
922: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
923: end if;
924: FND_MSG_PUB.Add_Exc_Msg
925: (G_PKG_NAME ,
926: lc_api_name );
927: END IF;
928:
925: (G_PKG_NAME ,
926: lc_api_name );
927: END IF;
928:
929: FND_MSG_PUB.Count_And_Get
930: (p_count => x_msg_count,
931: p_data => x_msg_data );
932:
933: -- save message in debug log
989: END IF;
990:
991: -- Initialize message list if p_init_msg_list is set to TRUE.
992: IF FND_API.to_Boolean( p_init_msg_list ) THEN
993: FND_MSG_PUB.initialize;
994: END IF;
995:
996: IF (lc_proc_level >= lc_debug_level) THEN
997: FND_LOG.STRING(lc_proc_level, lc_mod_name || '.BEGIN',
1050: COMMIT WORK;
1051: END IF;
1052:
1053: -- Standard call to get message count and IF count is get message info.
1054: FND_MSG_PUB.Count_And_Get
1055: (p_count => x_msg_count,
1056: p_data => x_msg_data );
1057:
1058: IF (lc_proc_level >= lc_debug_level) THEN
1065: ROLLBACK TO Delete_RO_Service_Code;
1066:
1067: x_return_status := FND_API.G_RET_STS_ERROR;
1068:
1069: FND_MSG_PUB.Count_And_Get
1070: (p_count => x_msg_count,
1071: p_data => x_msg_data );
1072:
1073: -- save message in debug log
1080: ROLLBACK TO Delete_RO_Service_Code;
1081:
1082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1083:
1084: IF FND_MSG_PUB.Check_Msg_Level
1085: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1086: THEN
1087: if (lc_stat_level >= lc_debug_level) then
1088: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1081:
1082: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1083:
1084: IF FND_MSG_PUB.Check_Msg_Level
1085: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1086: THEN
1087: if (lc_stat_level >= lc_debug_level) then
1088: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1089: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1085: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1086: THEN
1087: if (lc_stat_level >= lc_debug_level) then
1088: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1089: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1090: end if;
1091: FND_MSG_PUB.Add_Exc_Msg
1092: (G_PKG_NAME ,
1093: lc_api_name );
1087: if (lc_stat_level >= lc_debug_level) then
1088: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1089: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1090: end if;
1091: FND_MSG_PUB.Add_Exc_Msg
1092: (G_PKG_NAME ,
1093: lc_api_name );
1094: END IF;
1095:
1092: (G_PKG_NAME ,
1093: lc_api_name );
1094: END IF;
1095:
1096: FND_MSG_PUB.Count_And_Get
1097: ( p_count => x_msg_count,
1098: p_data => x_msg_data );
1099:
1100: -- save message in debug log
1108:
1109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1110:
1111: -- save message in fnd stack
1112: IF FND_MSG_PUB.Check_Msg_Level
1113: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1114: THEN
1115: if (lc_stat_level >= lc_debug_level) then
1116: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1110:
1111: -- save message in fnd stack
1112: IF FND_MSG_PUB.Check_Msg_Level
1113: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1114: THEN
1115: if (lc_stat_level >= lc_debug_level) then
1116: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1117: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1113: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1114: THEN
1115: if (lc_stat_level >= lc_debug_level) then
1116: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1117: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1118: end if;
1119: FND_MSG_PUB.Add_Exc_Msg
1120: (G_PKG_NAME ,
1121: lc_api_name );
1115: if (lc_stat_level >= lc_debug_level) then
1116: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1117: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1118: end if;
1119: FND_MSG_PUB.Add_Exc_Msg
1120: (G_PKG_NAME ,
1121: lc_api_name );
1122: END IF;
1123:
1120: (G_PKG_NAME ,
1121: lc_api_name );
1122: END IF;
1123:
1124: FND_MSG_PUB.Count_And_Get
1125: (p_count => x_msg_count,
1126: p_data => x_msg_data );
1127:
1128: -- save message in debug log
1183: END IF;
1184:
1185: -- Initialize message list if p_init_msg_list is set to TRUE.
1186: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1187: FND_MSG_PUB.initialize;
1188: END IF;
1189:
1190: IF (lc_proc_level >= lc_debug_level) THEN
1191: FND_LOG.STRING(lc_proc_level, lc_mod_name || '.BEGIN',
1285: COMMIT WORK;
1286: END IF;
1287:
1288: -- Standard call to get message count and IF count is get message info.
1289: FND_MSG_PUB.Count_And_Get
1290: (p_count => x_msg_count,
1291: p_data => x_msg_data );
1292:
1293: IF (lc_proc_level >= lc_debug_level) THEN
1300: ROLLBACK TO Lock_RO_Service_Code;
1301:
1302: x_return_status := FND_API.G_RET_STS_ERROR;
1303:
1304: FND_MSG_PUB.Count_And_Get
1305: (p_count => x_msg_count,
1306: p_data => x_msg_data );
1307:
1308: -- save message in debug log
1315: ROLLBACK TO Lock_RO_Service_Code;
1316:
1317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1318:
1319: IF FND_MSG_PUB.Check_Msg_Level
1320: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1321: THEN
1322: if (lc_stat_level >= lc_debug_level) then
1323: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1316:
1317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1318:
1319: IF FND_MSG_PUB.Check_Msg_Level
1320: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1321: THEN
1322: if (lc_stat_level >= lc_debug_level) then
1323: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1324: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1320: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1321: THEN
1322: if (lc_stat_level >= lc_debug_level) then
1323: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1324: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1325: end if;
1326: FND_MSG_PUB.Add_Exc_Msg
1327: (G_PKG_NAME ,
1328: lc_api_name );
1322: if (lc_stat_level >= lc_debug_level) then
1323: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1324: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1325: end if;
1326: FND_MSG_PUB.Add_Exc_Msg
1327: (G_PKG_NAME ,
1328: lc_api_name );
1329: END IF;
1330:
1327: (G_PKG_NAME ,
1328: lc_api_name );
1329: END IF;
1330:
1331: FND_MSG_PUB.Count_And_Get
1332: ( p_count => x_msg_count,
1333: p_data => x_msg_data );
1334:
1335: -- save message in debug log
1343:
1344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1345:
1346: -- save message in fnd stack
1347: IF FND_MSG_PUB.Check_Msg_Level
1348: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1349: THEN
1350: if (lc_stat_level >= lc_debug_level) then
1351: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1345:
1346: -- save message in fnd stack
1347: IF FND_MSG_PUB.Check_Msg_Level
1348: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1349: THEN
1350: if (lc_stat_level >= lc_debug_level) then
1351: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1352: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1348: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1349: THEN
1350: if (lc_stat_level >= lc_debug_level) then
1351: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1352: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1353: end if;
1354: FND_MSG_PUB.Add_Exc_Msg
1355: (G_PKG_NAME ,
1356: lc_api_name );
1350: if (lc_stat_level >= lc_debug_level) then
1351: FND_LOG.STRING(lc_stat_level, lc_mod_name,
1352: 'Adding message using FND_MSG_PUB.Add_Exc_Msg to FND_MSG stack');
1353: end if;
1354: FND_MSG_PUB.Add_Exc_Msg
1355: (G_PKG_NAME ,
1356: lc_api_name );
1357: END IF;
1358:
1355: (G_PKG_NAME ,
1356: lc_api_name );
1357: END IF;
1358:
1359: FND_MSG_PUB.Count_And_Get
1360: (p_count => x_msg_count,
1361: p_data => x_msg_data );
1362:
1363: -- save message in debug log