[Home] [Help]
88:
89: EXCEPTION
90: WHEN OTHERS THEN
91: dbms_sql.close_cursor (g_cursor);
92: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Error Update_Xml_Source_Lines_Util in cursor execution');END IF;
93: l_error := SQLERRM;
94: IF (AMS_DEBUG_HIGH_ON) THEN
95:
96: AMS_UTILITY_PVT.debug_message(l_error);
92: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Error Update_Xml_Source_Lines_Util in cursor execution');END IF;
93: l_error := SQLERRM;
94: IF (AMS_DEBUG_HIGH_ON) THEN
95:
96: AMS_UTILITY_PVT.debug_message(l_error);
97: END IF;
98: --write_msg(' test5::' || l_error);
99: RAISE FND_API.G_EXC_ERROR;
100: END;
106:
107: EXCEPTION
108: WHEN FND_API.G_EXC_ERROR THEN
109: x_return_status := FND_API.G_RET_STS_ERROR;
110: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_Xml_Source_Lines_Util expected');END IF;
111: -- Standard call to get message count and if count=1, get the message
112: FND_MSG_PUB.Count_And_Get (
113: p_encoded => FND_API.G_FALSE,
114: p_count => x_msg_count,
115: p_data => x_msg_data
116: );
117: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
119: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_Xml_Source_Lines_Util unexpected');END IF;
120: -- Standard call to get message count and if count=1, get the message
121: FND_MSG_PUB.Count_And_Get (
122: p_encoded => FND_API.G_FALSE,
123: p_count => x_msg_count,
124: p_data => x_msg_data
125: );
126: WHEN OTHERS THEN
127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
128: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_Xml_Source_Lines_Util OTHERS');END IF;
129: -- Standard call to get message count and if count=1, get the message
130: FND_MSG_PUB.Count_And_Get (
131: p_encoded => FND_API.G_FALSE,
132: p_count => x_msg_count,
189:
190: EXCEPTION
191: WHEN FND_API.G_EXC_ERROR THEN
192: x_return_status := FND_API.G_RET_STS_ERROR;
193: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_B2B_Xml_Source_lines expected');END IF;
194: -- Standard call to get message count and if count=1, get the message
195: FND_MSG_PUB.Count_And_Get (
196: p_encoded => FND_API.G_FALSE,
197: p_count => x_msg_count,
198: p_data => x_msg_data
199: );
200: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
201: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
202: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_B2B_Xml_Source_lines unexpected');END IF;
203: -- Standard call to get message count and if count=1, get the message
204: FND_MSG_PUB.Count_And_Get (
205: p_encoded => FND_API.G_FALSE,
206: p_count => x_msg_count,
207: p_data => x_msg_data
208: );
209: WHEN OTHERS THEN
210: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
211: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_B2B_Xml_Source_lines OTHERS');END IF;
212: -- Standard call to get message count and if count=1, get the message
213: FND_MSG_PUB.Count_And_Get (
214: p_encoded => FND_API.G_FALSE,
215: p_count => x_msg_count,
302:
303: EXCEPTION
304: WHEN FND_API.G_EXC_ERROR THEN
305: x_return_status := FND_API.G_RET_STS_ERROR;
306: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_B2B_Xml_Source_lines expected');END IF;
307: -- Standard call to get message count and if count=1, get the message
308: FND_MSG_PUB.Count_And_Get (
309: p_encoded => FND_API.G_FALSE,
310: p_count => x_msg_count,
311: p_data => x_msg_data
312: );
313: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
315: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_B2B_Xml_Source_lines unexpected');END IF;
316: -- Standard call to get message count and if count=1, get the message
317: FND_MSG_PUB.Count_And_Get (
318: p_encoded => FND_API.G_FALSE,
319: p_count => x_msg_count,
320: p_data => x_msg_data
321: );
322: WHEN OTHERS THEN
323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
324: --IF (AMS_DEBUG_HIGH_ON) THENAMS_UTILITY_PVT.debug_message('Private API: Update_B2B_Xml_Source_lines OTHERS');END IF;
325: -- Standard call to get message count and if count=1, get the message
326: FND_MSG_PUB.Count_And_Get (
327: p_encoded => FND_API.G_FALSE,
328: p_count => x_msg_count,
404:
405: -- Debug Message
406: IF (AMS_DEBUG_HIGH_ON) THEN
407:
408: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
409: END IF;
410:
411: -- Initialize API return status to SUCCESS
412: x_return_status := FND_API.G_RET_STS_SUCCESS;
413:
414: -- Debug Message
415: IF (AMS_DEBUG_HIGH_ON) THEN
416:
417: AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
418: END IF;
419:
420: /****
421: If (l_tar_xml_element_rec.object_version_number is NULL or
419:
420: /****
421: If (l_tar_xml_element_rec.object_version_number is NULL or
422: l_tar_xml_element_rec.object_version_number = FND_API.G_MISS_NUM ) Then
423: AMS_Utility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
424: p_token_name => 'COLUMN',
425: p_token_value => 'Last_Update_Date') ;
426: raise FND_API.G_EXC_ERROR;
427: End if;
429: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL) THEN
430: -- Debug message
431: IF (AMS_DEBUG_HIGH_ON) THEN
432:
433: AMS_UTILITY_PVT.debug_message('Private API: Validate_Xml_Element');
434: END IF;
435:
436: -- Invoke validation procedures
437: Validate_xml_element(
451:
452: -- Debug Message
453: IF (AMS_DEBUG_HIGH_ON) THEN
454:
455: AMS_UTILITY_PVT.debug_message('Private API: Calling update table handler');
456: END IF;
457:
458: -- Invoke table handler(AMS_IMP_XML_ELEMENTS_PKG.Update_Row)
459: AMS_IMP_XML_ELEMENTS_PKG.Update_Row (
477: IF (AMS_DEBUG_HIGH_ON) THEN
478:
479:
480:
481: AMS_UTILITY_PVT.debug_message('Private API: Returned update table handler');
482:
483: END IF;
484: ****/
485:
563:
564: -- Debug Message
565: IF (AMS_DEBUG_HIGH_ON) THEN
566:
567: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
568: END IF;
569:
570: -- Standard call to get message count and if count is 1, get message info.
571: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
571: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
572: p_data => x_msg_data);
573:
574: EXCEPTION
575: WHEN AMS_Utility_PVT.resource_locked THEN
576: x_return_status := FND_API.g_ret_sts_error;
577: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
578:
579: WHEN FND_API.G_EXC_ERROR THEN
573:
574: EXCEPTION
575: WHEN AMS_Utility_PVT.resource_locked THEN
576: x_return_status := FND_API.g_ret_sts_error;
577: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
578:
579: WHEN FND_API.G_EXC_ERROR THEN
580: ROLLBACK TO Update_Error_Xml_Element;
581: x_return_status := FND_API.G_RET_STS_ERROR;
580: ROLLBACK TO Update_Error_Xml_Element;
581: x_return_status := FND_API.G_RET_STS_ERROR;
582: IF (AMS_DEBUG_HIGH_ON) THEN
583:
584: AMS_UTILITY_PVT.debug_message('Private API: Exception G_EXC_ERROR');
585: END IF;
586: -- Standard call to get message count and if count=1, get the message
587: FND_MSG_PUB.Count_And_Get (
588: p_encoded => FND_API.G_FALSE,
593: ROLLBACK TO Update_Error_Xml_Element;
594: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
595: IF (AMS_DEBUG_HIGH_ON) THEN
596:
597: AMS_UTILITY_PVT.debug_message('Private API: Exception G_EXC_UNEXPECTED_ERROR');
598: END IF;
599: -- Standard call to get message count and if count=1, get the message
600: FND_MSG_PUB.Count_And_Get (
601: p_encoded => FND_API.G_FALSE,
607: ROLLBACK TO Update_Error_Xml_Element;
608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
609: IF (AMS_DEBUG_HIGH_ON) THEN
610:
611: AMS_UTILITY_PVT.debug_message('Private API: Exception OTHERS');
612: END IF;
613: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
614: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
615: END IF;
674:
675: -- Debug Message
676: IF (AMS_DEBUG_HIGH_ON) THEN
677:
678: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
679: END IF;
680:
681:
682: -- Initialize API return status to SUCCESS
706: -- =========================================================================
707:
708: IF FND_GLOBAL.User_Id IS NULL
709: THEN
710: AMS_Utility_PVT.Error_Message(p_message_name => 'USER_PROFILE_MISSING');
711: RAISE FND_API.G_EXC_ERROR;
712: END IF;
713:
714: IF ( P_validation_level >= FND_API.G_VALID_LEVEL_FULL)
715: THEN
716: -- Debug message
717: IF (AMS_DEBUG_HIGH_ON) THEN
718:
719: AMS_UTILITY_PVT.debug_message('Private API: Validate_Xml_Element');
720: END IF;
721:
722: -- Invoke validation procedures
723: Validate_xml_element(
738:
739: -- Debug Message
740: IF (AMS_DEBUG_HIGH_ON) THEN
741:
742: AMS_UTILITY_PVT.debug_message( 'Private API: Calling create table handler');
743: END IF;
744:
745: -- Invoke table handler(AMS_IMP_XML_ELEMENTS_PKG.Insert_Row)
746: AMS_IMP_XML_ELEMENTS_PKG.Insert_Row(
777:
778: -- Debug Message
779: IF (AMS_DEBUG_HIGH_ON) THEN
780:
781: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
782: END IF;
783:
784: -- Standard call to get message count and if count is 1, get message info.
785: FND_MSG_PUB.Count_And_Get
787: p_data => x_msg_data
788: );
789: EXCEPTION
790:
791: WHEN AMS_Utility_PVT.resource_locked THEN
792: x_return_status := FND_API.g_ret_sts_error;
793: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
794:
795: WHEN FND_API.G_EXC_ERROR THEN
789: EXCEPTION
790:
791: WHEN AMS_Utility_PVT.resource_locked THEN
792: x_return_status := FND_API.g_ret_sts_error;
793: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
794:
795: WHEN FND_API.G_EXC_ERROR THEN
796: ROLLBACK TO CREATE_Xml_Element_PVT;
797: x_return_status := FND_API.G_RET_STS_ERROR;
898:
899: -- Debug Message
900: IF (AMS_DEBUG_HIGH_ON) THEN
901:
902: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
903: END IF;
904:
905:
906: -- Initialize API return status to SUCCESS
908:
909: -- Debug Message
910: IF (AMS_DEBUG_HIGH_ON) THEN
911:
912: AMS_UTILITY_PVT.debug_message('Private API: - Open Cursor to Select');
913: END IF;
914:
915: /*
916: OPEN c_get_Xml_Element( l_tar_xml_element_rec.imp_xml_element_id);
917:
918: FETCH c_get_Xml_Element INTO l_ref_xml_element_rec ;
919:
920: If ( c_get_Xml_Element%NOTFOUND) THEN
921: AMS_Utility_PVT.Error_Message(p_message_name => 'API_MISSING_UPDATE_TARGET',
922: p_token_name => 'INFO',
923: p_token_value => 'Xml_Element') ;
924: RAISE FND_API.G_EXC_ERROR;
925: END IF;
925: END IF;
926: -- Debug Message
927: IF (AMS_DEBUG_HIGH_ON) THEN
928:
929: AMS_UTILITY_PVT.debug_message('Private API: - Close Cursor');
930: END IF;
931: CLOSE c_get_Xml_Element;
932: */
933:
933:
934:
935: If (l_tar_xml_element_rec.object_version_number is NULL or
936: l_tar_xml_element_rec.object_version_number = FND_API.G_MISS_NUM ) Then
937: AMS_Utility_PVT.Error_Message(p_message_name => 'API_VERSION_MISSING',
938: p_token_name => 'COLUMN',
939: p_token_value => 'Last_Update_Date') ;
940: raise FND_API.G_EXC_ERROR;
941: End if;
940: raise FND_API.G_EXC_ERROR;
941: End if;
942: -- Check Whether record has been changed by someone else
943: If (l_tar_xml_element_rec.object_version_number <> l_ref_xml_element_rec.object_version_number) Then
944: AMS_Utility_PVT.Error_Message(p_message_name => 'API_RECORD_CHANGED',
945: p_token_name => 'INFO',
946: p_token_value => 'Xml_Element') ;
947: raise FND_API.G_EXC_ERROR;
948: End if;
950: THEN
951: -- Debug message
952: IF (AMS_DEBUG_HIGH_ON) THEN
953:
954: AMS_UTILITY_PVT.debug_message('Private API: Validate_Xml_Element');
955: END IF;
956:
957: -- Invoke validation procedures
958: Validate_xml_element(
973:
974: -- Debug Message
975: IF (AMS_DEBUG_HIGH_ON) THEN
976:
977: AMS_UTILITY_PVT.debug_message('Private API: Calling update table handler');
978: END IF;
979:
980: -- Invoke table handler(AMS_IMP_XML_ELEMENTS_PKG.Update_Row)
981: AMS_IMP_XML_ELEMENTS_PKG.Update_Row (
999: IF (AMS_DEBUG_HIGH_ON) THEN
1000:
1001:
1002:
1003: AMS_UTILITY_PVT.debug_message('Private API: Returned update table handler');
1004:
1005: END IF;
1006:
1007: x_object_version_number := p_xml_element_rec.object_version_number + 1;
1069:
1070: -- Debug Message
1071: IF (AMS_DEBUG_HIGH_ON) THEN
1072:
1073: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1074: END IF;
1075:
1076: -- Standard call to get message count and if count is 1, get message info.
1077: FND_MSG_PUB.Count_And_Get
1079: p_data => x_msg_data
1080: );
1081: EXCEPTION
1082:
1083: WHEN AMS_Utility_PVT.resource_locked THEN
1084: x_return_status := FND_API.g_ret_sts_error;
1085: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1086:
1087: WHEN FND_API.G_EXC_ERROR THEN
1081: EXCEPTION
1082:
1083: WHEN AMS_Utility_PVT.resource_locked THEN
1084: x_return_status := FND_API.g_ret_sts_error;
1085: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1086:
1087: WHEN FND_API.G_EXC_ERROR THEN
1088: ROLLBACK TO UPDATE_Xml_Element_PVT;
1089: x_return_status := FND_API.G_RET_STS_ERROR;
1088: ROLLBACK TO UPDATE_Xml_Element_PVT;
1089: x_return_status := FND_API.G_RET_STS_ERROR;
1090: IF (AMS_DEBUG_HIGH_ON) THEN
1091:
1092: AMS_UTILITY_PVT.debug_message('Private API: Exception G_EXC_ERROR');
1093: END IF;
1094: -- Standard call to get message count and if count=1, get the message
1095: FND_MSG_PUB.Count_And_Get (
1096: p_encoded => FND_API.G_FALSE,
1102: ROLLBACK TO UPDATE_Xml_Element_PVT;
1103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1104: IF (AMS_DEBUG_HIGH_ON) THEN
1105:
1106: AMS_UTILITY_PVT.debug_message('Private API: Exception G_EXC_UNEXPECTED_ERROR');
1107: END IF;
1108: -- Standard call to get message count and if count=1, get the message
1109: FND_MSG_PUB.Count_And_Get (
1110: p_encoded => FND_API.G_FALSE,
1116: ROLLBACK TO UPDATE_Xml_Element_PVT;
1117: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1118: IF (AMS_DEBUG_HIGH_ON) THEN
1119:
1120: AMS_UTILITY_PVT.debug_message('Private API: Exception OTHERS');
1121: END IF;
1122: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1123: THEN
1124: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1170:
1171: -- Debug Message
1172: IF (AMS_DEBUG_HIGH_ON) THEN
1173:
1174: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1175: END IF;
1176:
1177:
1178: -- Initialize API return status to SUCCESS
1183: --
1184: -- Debug Message
1185: IF (AMS_DEBUG_HIGH_ON) THEN
1186:
1187: AMS_UTILITY_PVT.debug_message( 'Private API: Calling delete table handler');
1188: END IF;
1189:
1190: -- Invoke table handler(AMS_IMP_XML_ELEMENTS_PKG.Delete_Row)
1191: AMS_IMP_XML_ELEMENTS_PKG.Delete_Row(
1203:
1204: -- Debug Message
1205: IF (AMS_DEBUG_HIGH_ON) THEN
1206:
1207: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1208: END IF;
1209:
1210: -- Standard call to get message count and if count is 1, get message info.
1211: FND_MSG_PUB.Count_And_Get
1213: p_data => x_msg_data
1214: );
1215: EXCEPTION
1216:
1217: WHEN AMS_Utility_PVT.resource_locked THEN
1218: x_return_status := FND_API.g_ret_sts_error;
1219: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1220:
1221: WHEN FND_API.G_EXC_ERROR THEN
1215: EXCEPTION
1216:
1217: WHEN AMS_Utility_PVT.resource_locked THEN
1218: x_return_status := FND_API.g_ret_sts_error;
1219: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1220:
1221: WHEN FND_API.G_EXC_ERROR THEN
1222: ROLLBACK TO DELETE_Xml_Element_PVT;
1223: x_return_status := FND_API.G_RET_STS_ERROR;
1285:
1286: -- Debug Message
1287: IF (AMS_DEBUG_HIGH_ON) THEN
1288:
1289: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1290: END IF;
1291:
1292: -- Initialize message list if p_init_msg_list is set to TRUE.
1293: IF FND_API.to_Boolean( p_init_msg_list )
1314: IF (AMS_DEBUG_HIGH_ON) THEN
1315:
1316:
1317:
1318: AMS_Utility_PVT.debug_message(l_full_name||': start');
1319:
1320: END IF;
1321: OPEN c_Xml_Element;
1322:
1339: p_count => x_msg_count,
1340: p_data => x_msg_data);
1341: IF (AMS_DEBUG_HIGH_ON) THEN
1342:
1343: AMS_Utility_PVT.debug_message(l_full_name ||': end');
1344: END IF;
1345: EXCEPTION
1346:
1347: WHEN AMS_Utility_PVT.resource_locked THEN
1343: AMS_Utility_PVT.debug_message(l_full_name ||': end');
1344: END IF;
1345: EXCEPTION
1346:
1347: WHEN AMS_Utility_PVT.resource_locked THEN
1348: x_return_status := FND_API.g_ret_sts_error;
1349: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1350:
1351: WHEN FND_API.G_EXC_ERROR THEN
1345: EXCEPTION
1346:
1347: WHEN AMS_Utility_PVT.resource_locked THEN
1348: x_return_status := FND_API.g_ret_sts_error;
1349: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1350:
1351: WHEN FND_API.G_EXC_ERROR THEN
1352: ROLLBACK TO LOCK_Xml_Element_PVT;
1353: x_return_status := FND_API.G_RET_STS_ERROR;
1393:
1394: BEGIN
1395: x_return_status := FND_API.g_ret_sts_success;
1396: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
1397: l_valid_flag := AMS_Utility_PVT.check_uniqueness(
1398: 'AMS_IMP_XML_ELEMENTS',
1399: 'IMP_XML_ELEMENT_ID = ''' || p_xml_element_rec.IMP_XML_ELEMENT_ID ||''''
1400: );
1401: -- ELSE
1398: 'AMS_IMP_XML_ELEMENTS',
1399: 'IMP_XML_ELEMENT_ID = ''' || p_xml_element_rec.IMP_XML_ELEMENT_ID ||''''
1400: );
1401: -- ELSE
1402: -- l_valid_flag := AMS_Utility_PVT.check_uniqueness(
1403: -- 'AMS_IMP_XML_ELEMENTS',
1404: -- 'IMP_XML_ELEMENT_ID = ''' || p_xml_element_rec.IMP_XML_ELEMENT_ID ||
1405: -- ''' AND IMP_XML_ELEMENT_ID <> ' || p_xml_element_rec.IMP_XML_ELEMENT_ID
1406: -- );
1406: -- );
1407: END IF;
1408:
1409: IF l_valid_flag = FND_API.g_false THEN
1410: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_IMP_XML_ELEMENT_ID_DUPLICATE');
1411: x_return_status := FND_API.g_ret_sts_error;
1412: RETURN;
1413: END IF;
1414:
1483: ELSE
1484:
1485:
1486: IF p_xml_element_rec.imp_xml_element_id IS NULL THEN
1487: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_imp_xml_element_id');
1488: x_return_status := FND_API.g_ret_sts_error;
1489: RETURN;
1490: END IF;
1491:
1490: END IF;
1491:
1492:
1493: IF p_xml_element_rec.last_updated_by IS NULL THEN
1494: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_last_updated_by');
1495: x_return_status := FND_API.g_ret_sts_error;
1496: RETURN;
1497: END IF;
1498:
1497: END IF;
1498:
1499:
1500: IF p_xml_element_rec.created_by IS NULL THEN
1501: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_created_by');
1502: x_return_status := FND_API.g_ret_sts_error;
1503: RETURN;
1504: END IF;
1505:
1504: END IF;
1505:
1506:
1507: IF p_xml_element_rec.last_update_login IS NULL THEN
1508: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_last_update_login');
1509: x_return_status := FND_API.g_ret_sts_error;
1510: RETURN;
1511: END IF;
1512:
1511: END IF;
1512:
1513:
1514: IF p_xml_element_rec.last_update_date IS NULL THEN
1515: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_last_update_date');
1516: x_return_status := FND_API.g_ret_sts_error;
1517: RETURN;
1518: END IF;
1519:
1518: END IF;
1519:
1520:
1521: IF p_xml_element_rec.creation_date IS NULL THEN
1522: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_creation_date');
1523: x_return_status := FND_API.g_ret_sts_error;
1524: RETURN;
1525: END IF;
1526:
1525: END IF;
1526:
1527:
1528: IF p_xml_element_rec.imp_xml_document_id IS NULL THEN
1529: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_xml_element_NO_imp_xml_document_id');
1530: x_return_status := FND_API.g_ret_sts_error;
1531: RETURN;
1532: END IF;
1533: END IF;
1781:
1782: -- Debug Message
1783: IF (AMS_DEBUG_HIGH_ON) THEN
1784:
1785: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1786: END IF;
1787:
1788: -- Initialize API return status to SUCCESS
1789: x_return_status := FND_API.G_RET_STS_SUCCESS;
1791:
1792: -- Debug Message
1793: IF (AMS_DEBUG_HIGH_ON) THEN
1794:
1795: AMS_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1796: END IF;
1797:
1798: -- Standard call to get message count and if count is 1, get message info.
1799: FND_MSG_PUB.Count_And_Get
1801: p_data => x_msg_data
1802: );
1803: EXCEPTION
1804:
1805: WHEN AMS_Utility_PVT.resource_locked THEN
1806: x_return_status := FND_API.g_ret_sts_error;
1807: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1808:
1809: WHEN FND_API.G_EXC_ERROR THEN
1803: EXCEPTION
1804:
1805: WHEN AMS_Utility_PVT.resource_locked THEN
1806: x_return_status := FND_API.g_ret_sts_error;
1807: AMS_Utility_PVT.Error_Message(p_message_name => 'AMS_API_RESOURCE_LOCKED');
1808:
1809: WHEN FND_API.G_EXC_ERROR THEN
1810: ROLLBACK TO VALIDATE_Xml_Element_;
1811: x_return_status := FND_API.G_RET_STS_ERROR;
1868:
1869: -- Debug Message
1870: IF (AMS_DEBUG_HIGH_ON) THEN
1871:
1872: AMS_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
1873: END IF;
1874: -- Standard call to get message count and if count is 1, get message info.
1875: FND_MSG_PUB.Count_And_Get
1876: (p_count => x_msg_count,