32:
33: ------------------------------------------------------------------------------
34: -- GLOBAL CONSTANTS
35: ------------------------------------------------------------------------------
36: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
37: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
38: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
33: ------------------------------------------------------------------------------
34: -- GLOBAL CONSTANTS
35: ------------------------------------------------------------------------------
36: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
37: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
38: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
34: -- GLOBAL CONSTANTS
35: ------------------------------------------------------------------------------
36: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
37: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
38: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
42: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
35: ------------------------------------------------------------------------------
36: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
37: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
38: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
42: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
43: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
36: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
37: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
38: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
42: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
43: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
44: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
38: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
42: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
43: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
44: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
45:
46: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
39: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
42: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
43: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
44: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
45:
46: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
47: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
40: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
41:
42: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
43: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
44: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
45:
46: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
47: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
48: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
218: x_last_update_date => l_last_update_date
219: );
220: --- If any errors happen abort API
221: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
224: RAISE FND_API.G_EXC_ERROR;
225: END IF;
226:
220: --- If any errors happen abort API
221: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
224: RAISE FND_API.G_EXC_ERROR;
225: END IF;
226:
227: --- Reversing G_MISS/NULL values logic
228:
240: END IF;
241:
242: RETURN G_RET_STS_SUCCESS ;
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: IF (l_debug = 'Y') THEN
246: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
247: END IF;
248: RETURN G_RET_STS_ERROR;
242: RETURN G_RET_STS_SUCCESS ;
243: EXCEPTION
244: WHEN FND_API.G_EXC_ERROR THEN
245: IF (l_debug = 'Y') THEN
246: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
247: END IF;
248: RETURN G_RET_STS_ERROR;
249:
250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
246: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
247: END IF;
248: RETURN G_RET_STS_ERROR;
249:
250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
251: IF (l_debug = 'Y') THEN
252: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
253: END IF;
254: RETURN G_RET_STS_UNEXP_ERROR;
248: RETURN G_RET_STS_ERROR;
249:
250: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
251: IF (l_debug = 'Y') THEN
252: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
253: END IF;
254: RETURN G_RET_STS_UNEXP_ERROR;
255:
256: WHEN OTHERS THEN
270: ----------------------------------------------
271: -- Validate_Attributes for: OKC_ARTICLE_RELATNS_ALL --
272: ----------------------------------------------
273: FUNCTION Validate_Attributes (
274: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
275:
276: p_source_article_id IN NUMBER,
277: p_target_article_id IN NUMBER,
278: p_org_id IN NUMBER,
525: ------------------------------------------
526: -- Validate_Record for:OKC_ARTICLE_RELATNS_ALL --
527: ------------------------------------------
528: FUNCTION Validate_Record (
529: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
530:
531: p_source_article_id IN NUMBER,
532: p_target_article_id IN NUMBER,
533: p_org_id IN NUMBER,
640: ---------------------------------------
641: -- validate_row for:OKC_ARTICLE_RELATNS_ALL --
642: ---------------------------------------
643: PROCEDURE validate_row(
644: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
645:
646: x_return_status OUT NOCOPY VARCHAR2,
647:
648: p_source_article_id IN NUMBER,
676: p_object_version_number => p_object_version_number,
677: x_relationship_type => l_relationship_type
678: );
679: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
680: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
681: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
682: RAISE FND_API.G_EXC_ERROR;
683: END IF;
684:
678: );
679: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
680: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
681: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
682: RAISE FND_API.G_EXC_ERROR;
683: END IF;
684:
685: -- Validate all non-missing attributes (Item Level Validation)
686: x_return_status := Validate_Record(
695: Okc_Debug.Log('3200: Leaving validate_row', 2);
696: END IF;
697:
698: EXCEPTION
699: WHEN FND_API.G_EXC_ERROR THEN
700: IF (l_debug = 'Y') THEN
701: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
702: END IF;
703: x_return_status := G_RET_STS_ERROR;
697:
698: EXCEPTION
699: WHEN FND_API.G_EXC_ERROR THEN
700: IF (l_debug = 'Y') THEN
701: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
702: END IF;
703: x_return_status := G_RET_STS_ERROR;
704:
705: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
701: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
702: END IF;
703: x_return_status := G_RET_STS_ERROR;
704:
705: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
706: IF (l_debug = 'Y') THEN
707: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
708: END IF;
709: x_return_status := G_RET_STS_UNEXP_ERROR;
703: x_return_status := G_RET_STS_ERROR;
704:
705: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
706: IF (l_debug = 'Y') THEN
707: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
708: END IF;
709: x_return_status := G_RET_STS_UNEXP_ERROR;
710:
711: WHEN OTHERS THEN
799: -------------------------------------
800: -- Insert_Row for:OKC_ARTICLE_RELATNS_ALL --
801: -------------------------------------
802: PROCEDURE Insert_Row(
803: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
804: x_return_status OUT NOCOPY VARCHAR2,
805:
806: p_source_article_id IN NUMBER,
807: p_target_article_id IN NUMBER,
833: --- Setting item attributes
834: -- Set primary key value
835: IF( p_source_article_id IS NULL OR p_target_article_id IS NULL OR p_org_id IS NULL ) THEN
836: x_return_status := G_RET_STS_UNEXP_ERROR;
837: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
838: ELSE
839: x_source_article_id := p_source_article_id;
840: x_target_article_id := p_target_article_id;
841: x_org_id := p_org_id;
859: );
860: --dbms_output.put_line('All the xs: '||x_source_article_id ||'*'||x_target_article_id);
861: --- If any errors happen abort API
862: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
864: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
865: RAISE FND_API.G_EXC_ERROR;
866: END IF;
867:
861: --- If any errors happen abort API
862: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
863: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
864: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
865: RAISE FND_API.G_EXC_ERROR;
866: END IF;
867:
868: --------------------------------------------
869: -- Call the internal Insert_Row for each child record
884: p_last_update_login => l_last_update_login,
885: p_last_update_date => l_last_update_date
886: );
887: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
888: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
889: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
890: RAISE FND_API.G_EXC_ERROR;
891: END IF;
892:
886: );
887: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
888: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
889: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
890: RAISE FND_API.G_EXC_ERROR;
891: END IF;
892:
893:
894:
896: Okc_Debug.Log('4500: Leaving Insert_Row', 2);
897: END IF;
898:
899: EXCEPTION
900: WHEN FND_API.G_EXC_ERROR THEN
901: IF (l_debug = 'Y') THEN
902: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
903: END IF;
904: x_return_status := G_RET_STS_ERROR;
898:
899: EXCEPTION
900: WHEN FND_API.G_EXC_ERROR THEN
901: IF (l_debug = 'Y') THEN
902: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
903: END IF;
904: x_return_status := G_RET_STS_ERROR;
905:
906: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
902: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
903: END IF;
904: x_return_status := G_RET_STS_ERROR;
905:
906: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
907: IF (l_debug = 'Y') THEN
908: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
909: END IF;
910: x_return_status := G_RET_STS_UNEXP_ERROR;
904: x_return_status := G_RET_STS_ERROR;
905:
906: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
907: IF (l_debug = 'Y') THEN
908: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
909: END IF;
910: x_return_status := G_RET_STS_UNEXP_ERROR;
911:
912: WHEN OTHERS THEN
1061: p_org_id => p_org_id,
1062: p_object_version_number => p_object_version_number
1063: );
1064: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1065: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1066: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1067: RAISE FND_API.G_EXC_ERROR;
1068: END IF;
1069:
1063: );
1064: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1065: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1066: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1067: RAISE FND_API.G_EXC_ERROR;
1068: END IF;
1069:
1070:
1071:
1073: Okc_Debug.Log('6000: Leaving Lock_Row', 2);
1074: END IF;
1075:
1076: EXCEPTION
1077: WHEN FND_API.G_EXC_ERROR THEN
1078: IF (l_debug = 'Y') THEN
1079: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1080: END IF;
1081: x_return_status := G_RET_STS_ERROR;
1075:
1076: EXCEPTION
1077: WHEN FND_API.G_EXC_ERROR THEN
1078: IF (l_debug = 'Y') THEN
1079: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1080: END IF;
1081: x_return_status := G_RET_STS_ERROR;
1082:
1083: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1079: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1080: END IF;
1081: x_return_status := G_RET_STS_ERROR;
1082:
1083: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1084: IF (l_debug = 'Y') THEN
1085: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1086: END IF;
1087: x_return_status := G_RET_STS_UNEXP_ERROR;
1081: x_return_status := G_RET_STS_ERROR;
1082:
1083: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1084: IF (l_debug = 'Y') THEN
1085: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1086: END IF;
1087: x_return_status := G_RET_STS_UNEXP_ERROR;
1088:
1089: WHEN OTHERS THEN
1161: -------------------------------------
1162: -- Update_Row for:OKC_ARTICLE_RELATNS_ALL --
1163: -------------------------------------
1164: PROCEDURE Update_Row(
1165: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1166:
1167: x_return_status OUT NOCOPY VARCHAR2,
1168:
1169: p_source_article_id IN NUMBER,
1198: p_org_id => p_org_id,
1199: p_object_version_number => p_object_version_number
1200: );
1201: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1203: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1204: RAISE FND_API.G_EXC_ERROR;
1205: END IF;
1206:
1200: );
1201: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1203: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1204: RAISE FND_API.G_EXC_ERROR;
1205: END IF;
1206:
1207:
1208: IF (l_debug = 'Y') THEN
1217: p_object_version_number => p_object_version_number,
1218: x_relationship_type => l_relationship_type
1219: );
1220: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1222: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1223: RAISE FND_API.G_EXC_ERROR;
1224: END IF;
1225:
1219: );
1220: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1221: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1222: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1223: RAISE FND_API.G_EXC_ERROR;
1224: END IF;
1225:
1226: IF (l_debug = 'Y') THEN
1227: Okc_Debug.Log('7400: Record Validation', 2);
1236: p_relationship_type => l_relationship_type
1237: );
1238: --- If any errors happen abort API
1239: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1241: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1242: RAISE FND_API.G_EXC_ERROR;
1243: END IF;
1244:
1238: --- If any errors happen abort API
1239: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1240: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1241: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1242: RAISE FND_API.G_EXC_ERROR;
1243: END IF;
1244:
1245: IF (l_debug = 'Y') THEN
1246: Okc_Debug.Log('7500: Filling WHO columns', 2);
1275: p_last_update_login => l_last_update_login,
1276: p_last_update_date => l_last_update_date
1277: );
1278: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1279: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1280: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1281: RAISE FND_API.G_EXC_ERROR;
1282: END IF;
1283:
1277: );
1278: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1279: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1280: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1281: RAISE FND_API.G_EXC_ERROR;
1282: END IF;
1283:
1284:
1285: IF (l_debug = 'Y') THEN
1286: Okc_Debug.Log('7800: Leaving Update_Row', 2);
1287: END IF;
1288:
1289: EXCEPTION
1290: WHEN FND_API.G_EXC_ERROR THEN
1291: IF (l_debug = 'Y') THEN
1292: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1293: END IF;
1294: x_return_status := G_RET_STS_ERROR;
1288:
1289: EXCEPTION
1290: WHEN FND_API.G_EXC_ERROR THEN
1291: IF (l_debug = 'Y') THEN
1292: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1293: END IF;
1294: x_return_status := G_RET_STS_ERROR;
1295:
1296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1292: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1293: END IF;
1294: x_return_status := G_RET_STS_ERROR;
1295:
1296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1297: IF (l_debug = 'Y') THEN
1298: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1299: END IF;
1300: x_return_status := G_RET_STS_UNEXP_ERROR;
1294: x_return_status := G_RET_STS_ERROR;
1295:
1296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1297: IF (l_debug = 'Y') THEN
1298: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1299: END IF;
1300: x_return_status := G_RET_STS_UNEXP_ERROR;
1301:
1302: WHEN OTHERS THEN
1385: p_org_id => p_org_id,
1386: p_object_version_number => p_object_version_number
1387: );
1388: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1390: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1391: RAISE FND_API.G_EXC_ERROR;
1392: END IF;
1393:
1387: );
1388: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1389: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1390: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1391: RAISE FND_API.G_EXC_ERROR;
1392: END IF;
1393:
1394:
1395: IF (l_debug = 'Y') THEN
1396: Okc_Debug.Log('9100: Removing _B row', 2);
1397: END IF;
1398: x_return_status := Delete_Row( p_source_article_id => p_source_article_id,p_target_article_id => p_target_article_id,p_org_id => p_org_id );
1399: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1401: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1402: RAISE FND_API.G_EXC_ERROR;
1403: END IF;
1404:
1398: x_return_status := Delete_Row( p_source_article_id => p_source_article_id,p_target_article_id => p_target_article_id,p_org_id => p_org_id );
1399: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1400: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1401: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1402: RAISE FND_API.G_EXC_ERROR;
1403: END IF;
1404:
1405:
1406: IF (l_debug = 'Y') THEN
1407: Okc_Debug.Log('9300: Leaving Delete_Row', 2);
1408: END IF;
1409:
1410: EXCEPTION
1411: WHEN FND_API.G_EXC_ERROR THEN
1412: IF (l_debug = 'Y') THEN
1413: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1414: END IF;
1415: x_return_status := G_RET_STS_ERROR;
1409:
1410: EXCEPTION
1411: WHEN FND_API.G_EXC_ERROR THEN
1412: IF (l_debug = 'Y') THEN
1413: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1414: END IF;
1415: x_return_status := G_RET_STS_ERROR;
1416:
1417: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1413: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1414: END IF;
1415: x_return_status := G_RET_STS_ERROR;
1416:
1417: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1418: IF (l_debug = 'Y') THEN
1419: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1420: END IF;
1421: x_return_status := G_RET_STS_UNEXP_ERROR;
1415: x_return_status := G_RET_STS_ERROR;
1416:
1417: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1418: IF (l_debug = 'Y') THEN
1419: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1420: END IF;
1421: x_return_status := G_RET_STS_UNEXP_ERROR;
1422:
1423: WHEN OTHERS THEN