31:
32: ------------------------------------------------------------------------------
33: -- GLOBAL CONSTANTS
34: ------------------------------------------------------------------------------
35: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
36: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
37: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
32: ------------------------------------------------------------------------------
33: -- GLOBAL CONSTANTS
34: ------------------------------------------------------------------------------
35: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
36: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
37: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
33: -- GLOBAL CONSTANTS
34: ------------------------------------------------------------------------------
35: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
36: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
37: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
41: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
34: ------------------------------------------------------------------------------
35: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
36: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
37: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
41: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
42: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
35: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
36: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
37: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
41: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
42: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
43: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
37: G_MISS_NUM CONSTANT NUMBER := FND_API.G_MISS_NUM;
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
41: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
42: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
43: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
44:
45: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
38: G_MISS_CHAR CONSTANT VARCHAR2(1) := FND_API.G_MISS_CHAR;
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
41: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
42: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
43: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
44:
45: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
46: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
39: G_MISS_DATE CONSTANT DATE := FND_API.G_MISS_DATE;
40:
41: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
42: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
43: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
44:
45: G_UNEXPECTED_ERROR CONSTANT VARCHAR2(200) := 'OKC_UNEXPECTED_ERROR';
46: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
47: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
251: x_language => l_language
252: );
253: --- If any errors happen abort API
254: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
256: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
257: RAISE FND_API.G_EXC_ERROR;
258: END IF;
259:
253: --- If any errors happen abort API
254: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
255: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
256: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
257: RAISE FND_API.G_EXC_ERROR;
258: END IF;
259:
260: --- Reversing G_MISS/NULL values logic
261:
314: END IF;
315:
316: RETURN G_RET_STS_SUCCESS ;
317: EXCEPTION
318: WHEN FND_API.G_EXC_ERROR THEN
319: IF (l_debug = 'Y') THEN
320: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
321: END IF;
322: RETURN G_RET_STS_ERROR;
316: RETURN G_RET_STS_SUCCESS ;
317: EXCEPTION
318: WHEN FND_API.G_EXC_ERROR THEN
319: IF (l_debug = 'Y') THEN
320: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
321: END IF;
322: RETURN G_RET_STS_ERROR;
323:
324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
320: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
321: END IF;
322: RETURN G_RET_STS_ERROR;
323:
324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
325: IF (l_debug = 'Y') THEN
326: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
327: END IF;
328: RETURN G_RET_STS_UNEXP_ERROR;
322: RETURN G_RET_STS_ERROR;
323:
324: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
325: IF (l_debug = 'Y') THEN
326: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
327: END IF;
328: RETURN G_RET_STS_UNEXP_ERROR;
329:
330: WHEN OTHERS THEN
344: ----------------------------------------------
345: -- Validate_Attributes for: OKC_REVIEW_VAR_VALUES --
346: ----------------------------------------------
347: FUNCTION Validate_Attributes (
348: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
349:
350: p_REVIEW_VAR_VALUES_id IN NUMBER,
351: p_REVIEW_UPLD_TERMS_id IN NUMBER,
352: p_variable_name IN VARCHAR2,
546: ------------------------------------------
547: -- Validate_Record for:OKC_REVIEW_VAR_VALUES --
548: ------------------------------------------
549: FUNCTION Validate_Record (
550: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
551:
552: p_REVIEW_VAR_VALUES_id IN NUMBER,
553: p_REVIEW_UPLD_TERMS_id IN NUMBER,
554: p_variable_name IN VARCHAR2,
623: ---------------------------------------
624: -- validate_row for:OKC_REVIEW_VAR_VALUES --
625: ---------------------------------------
626: PROCEDURE validate_row(
627: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
628:
629: x_return_status OUT NOCOPY VARCHAR2,
630:
631: p_REVIEW_VAR_VALUES_id IN NUMBER,
679: x_variable_value => l_variable_value,
680: x_attribute_value_set_id => l_attribute_value_set_id
681: );
682: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
684: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
685: RAISE FND_API.G_EXC_ERROR;
686: END IF;
687:
681: );
682: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
683: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
684: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
685: RAISE FND_API.G_EXC_ERROR;
686: END IF;
687:
688: -- Validate all non-missing attributes (Item Level Validation)
689: l_object_version_number := p_object_version_number ;
703: Okc_Debug.Log('3200: Leaving validate_row', 2);
704: END IF;
705:
706: EXCEPTION
707: WHEN FND_API.G_EXC_ERROR THEN
708: IF (l_debug = 'Y') THEN
709: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
710: END IF;
711: x_return_status := G_RET_STS_ERROR;
705:
706: EXCEPTION
707: WHEN FND_API.G_EXC_ERROR THEN
708: IF (l_debug = 'Y') THEN
709: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
710: END IF;
711: x_return_status := G_RET_STS_ERROR;
712:
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
709: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
710: END IF;
711: x_return_status := G_RET_STS_ERROR;
712:
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714: IF (l_debug = 'Y') THEN
715: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
716: END IF;
717: x_return_status := G_RET_STS_UNEXP_ERROR;
711: x_return_status := G_RET_STS_ERROR;
712:
713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
714: IF (l_debug = 'Y') THEN
715: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
716: END IF;
717: x_return_status := G_RET_STS_UNEXP_ERROR;
718:
719: WHEN OTHERS THEN
820: -------------------------------------
821: -- Insert_Row for:OKC_REVIEW_VAR_VALUES --
822: -------------------------------------
823: PROCEDURE Insert_Row(
824: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
825: x_return_status OUT NOCOPY VARCHAR2,
826:
827: p_REVIEW_VAR_VALUES_id IN NUMBER,
828: p_REVIEW_UPLD_TERMS_id IN NUMBER,
860: x_REVIEW_UPLD_TERMS_id => x_REVIEW_UPLD_TERMS_id
861: );
862: --- If any errors happen abort API
863: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
866: RAISE FND_API.G_EXC_ERROR;
867: END IF;
868: ELSE
862: --- If any errors happen abort API
863: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
866: RAISE FND_API.G_EXC_ERROR;
867: END IF;
868: ELSE
869: x_REVIEW_UPLD_TERMS_id := p_REVIEW_UPLD_TERMS_id;
870: END IF;
890: p_attribute_value_set_id => p_attribute_value_set_id
891: );
892: --- If any errors happen abort API
893: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
895: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
896: RAISE FND_API.G_EXC_ERROR;
897: END IF;
898:
892: --- If any errors happen abort API
893: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
894: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
895: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
896: RAISE FND_API.G_EXC_ERROR;
897: END IF;
898:
899: --------------------------------------------
900: -- Call the internal Insert_Row for each child record
922:
923:
924:
925: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
926: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
927: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
928: RAISE FND_API.G_EXC_ERROR;
929: END IF;
930:
924:
925: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
926: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
927: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
928: RAISE FND_API.G_EXC_ERROR;
929: END IF;
930:
931:
932:
934: Okc_Debug.Log('4500: Leaving Insert_Row', 2);
935: END IF;
936:
937: EXCEPTION
938: WHEN FND_API.G_EXC_ERROR THEN
939: IF (l_debug = 'Y') THEN
940: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
941: END IF;
942: x_return_status := G_RET_STS_ERROR;
936:
937: EXCEPTION
938: WHEN FND_API.G_EXC_ERROR THEN
939: IF (l_debug = 'Y') THEN
940: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
941: END IF;
942: x_return_status := G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
940: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
941: END IF;
942: x_return_status := G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945: IF (l_debug = 'Y') THEN
946: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
947: END IF;
948: x_return_status := G_RET_STS_UNEXP_ERROR;
942: x_return_status := G_RET_STS_ERROR;
943:
944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
945: IF (l_debug = 'Y') THEN
946: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
947: END IF;
948: x_return_status := G_RET_STS_UNEXP_ERROR;
949:
950: WHEN OTHERS THEN
1088: p_REVIEW_UPLD_TERMS_id => p_REVIEW_UPLD_TERMS_id,
1089: p_object_version_number => p_object_version_number
1090: );
1091: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096:
1090: );
1091: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1092: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1093: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1094: RAISE FND_API.G_EXC_ERROR;
1095: END IF;
1096:
1097:
1098:
1100: Okc_Debug.Log('6000: Leaving Lock_Row', 2);
1101: END IF;
1102:
1103: EXCEPTION
1104: WHEN FND_API.G_EXC_ERROR THEN
1105: IF (l_debug = 'Y') THEN
1106: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1107: END IF;
1108: x_return_status := G_RET_STS_ERROR;
1102:
1103: EXCEPTION
1104: WHEN FND_API.G_EXC_ERROR THEN
1105: IF (l_debug = 'Y') THEN
1106: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1107: END IF;
1108: x_return_status := G_RET_STS_ERROR;
1109:
1110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1106: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1107: END IF;
1108: x_return_status := G_RET_STS_ERROR;
1109:
1110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1111: IF (l_debug = 'Y') THEN
1112: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1113: END IF;
1114: x_return_status := G_RET_STS_UNEXP_ERROR;
1108: x_return_status := G_RET_STS_ERROR;
1109:
1110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1111: IF (l_debug = 'Y') THEN
1112: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1113: END IF;
1114: x_return_status := G_RET_STS_UNEXP_ERROR;
1115:
1116: WHEN OTHERS THEN
1194: -------------------------------------
1195: -- Update_Row for:OKC_REVIEW_VAR_VALUES --
1196: -------------------------------------
1197: PROCEDURE Update_Row(
1198: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1199:
1200: x_return_status OUT NOCOPY VARCHAR2,
1201:
1202: p_REVIEW_UPLD_TERMS_id IN NUMBER,
1236: p_REVIEW_UPLD_TERMS_id => p_REVIEW_UPLD_TERMS_id,
1237: p_object_version_number => p_object_version_number
1238: );
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: );
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:
1246: IF (l_debug = 'Y') THEN
1266: x_variable_value => l_variable_value,
1267: x_attribute_value_set_id => l_attribute_value_set_id
1268: );
1269: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1271: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1272: RAISE FND_API.G_EXC_ERROR;
1273: END IF;
1274:
1268: );
1269: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1270: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1271: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1272: RAISE FND_API.G_EXC_ERROR;
1273: END IF;
1274:
1275: IF (l_debug = 'Y') THEN
1276: Okc_Debug.Log('7400: Record Validation', 2);
1289: p_attribute_value_set_id => l_attribute_value_set_id
1290: );
1291: --- If any errors happen abort API
1292: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1294: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1295: RAISE FND_API.G_EXC_ERROR;
1296: END IF;
1297:
1291: --- If any errors happen abort API
1292: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1294: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1295: RAISE FND_API.G_EXC_ERROR;
1296: END IF;
1297:
1298: IF (l_debug = 'Y') THEN
1299: Okc_Debug.Log('7500: Filling WHO columns', 2);
1331: p_last_update_login => l_last_update_login,
1332: p_last_update_date => l_last_update_date
1333: );
1334: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1337: RAISE FND_API.G_EXC_ERROR;
1338: END IF;
1339:
1333: );
1334: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1335: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1336: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1337: RAISE FND_API.G_EXC_ERROR;
1338: END IF;
1339:
1340:
1341: IF (l_debug = 'Y') THEN
1342: Okc_Debug.Log('7800: Leaving Update_Row', 2);
1343: END IF;
1344:
1345: EXCEPTION
1346: WHEN FND_API.G_EXC_ERROR THEN
1347: IF (l_debug = 'Y') THEN
1348: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1349: END IF;
1350: x_return_status := G_RET_STS_ERROR;
1344:
1345: EXCEPTION
1346: WHEN FND_API.G_EXC_ERROR THEN
1347: IF (l_debug = 'Y') THEN
1348: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1349: END IF;
1350: x_return_status := G_RET_STS_ERROR;
1351:
1352: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1348: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1349: END IF;
1350: x_return_status := G_RET_STS_ERROR;
1351:
1352: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1353: IF (l_debug = 'Y') THEN
1354: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1355: END IF;
1356: x_return_status := G_RET_STS_UNEXP_ERROR;
1350: x_return_status := G_RET_STS_ERROR;
1351:
1352: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1353: IF (l_debug = 'Y') THEN
1354: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1355: END IF;
1356: x_return_status := G_RET_STS_UNEXP_ERROR;
1357:
1358: WHEN OTHERS THEN
1433: p_REVIEW_UPLD_TERMS_id => p_REVIEW_UPLD_TERMS_id,
1434: p_object_version_number => p_object_version_number
1435: );
1436: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1437: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1438: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1439: RAISE FND_API.G_EXC_ERROR;
1440: END IF;
1441:
1435: );
1436: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1437: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1438: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1439: RAISE FND_API.G_EXC_ERROR;
1440: END IF;
1441:
1442:
1443: IF (l_debug = 'Y') THEN
1444: Okc_Debug.Log('9100: Removing _B row', 2);
1445: END IF;
1446: x_return_status := Delete_Row( p_REVIEW_UPLD_TERMS_id => p_REVIEW_UPLD_TERMS_id );
1447: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1448: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1449: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1450: RAISE FND_API.G_EXC_ERROR;
1451: END IF;
1452:
1446: x_return_status := Delete_Row( p_REVIEW_UPLD_TERMS_id => p_REVIEW_UPLD_TERMS_id );
1447: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1448: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1449: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1450: RAISE FND_API.G_EXC_ERROR;
1451: END IF;
1452:
1453:
1454: IF (l_debug = 'Y') THEN
1455: Okc_Debug.Log('9300: Leaving Delete_Row', 2);
1456: END IF;
1457:
1458: EXCEPTION
1459: WHEN FND_API.G_EXC_ERROR THEN
1460: IF (l_debug = 'Y') THEN
1461: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1462: END IF;
1463: x_return_status := G_RET_STS_ERROR;
1457:
1458: EXCEPTION
1459: WHEN FND_API.G_EXC_ERROR THEN
1460: IF (l_debug = 'Y') THEN
1461: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1462: END IF;
1463: x_return_status := G_RET_STS_ERROR;
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1461: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1462: END IF;
1463: x_return_status := G_RET_STS_ERROR;
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1466: IF (l_debug = 'Y') THEN
1467: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1468: END IF;
1469: x_return_status := G_RET_STS_UNEXP_ERROR;
1463: x_return_status := G_RET_STS_ERROR;
1464:
1465: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1466: IF (l_debug = 'Y') THEN
1467: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1468: END IF;
1469: x_return_status := G_RET_STS_UNEXP_ERROR;
1470:
1471: WHEN OTHERS THEN