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';
252: x_last_update_date => l_last_update_date
253: );
254: --- If any errors happen abort API
255: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
258: RAISE FND_API.G_EXC_ERROR;
259: END IF;
260:
254: --- If any errors happen abort API
255: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
256: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
257: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
258: RAISE FND_API.G_EXC_ERROR;
259: END IF;
260:
261: --- Reversing G_MISS/NULL values logic
262:
324: END IF;
325:
326: RETURN G_RET_STS_SUCCESS ;
327: EXCEPTION
328: WHEN FND_API.G_EXC_ERROR THEN
329: IF (l_debug = 'Y') THEN
330: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
331: END IF;
332: RETURN G_RET_STS_ERROR;
326: RETURN G_RET_STS_SUCCESS ;
327: EXCEPTION
328: WHEN FND_API.G_EXC_ERROR THEN
329: IF (l_debug = 'Y') THEN
330: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
331: END IF;
332: RETURN G_RET_STS_ERROR;
333:
334: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
330: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
331: END IF;
332: RETURN G_RET_STS_ERROR;
333:
334: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
335: IF (l_debug = 'Y') THEN
336: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
337: END IF;
338: RETURN G_RET_STS_UNEXP_ERROR;
332: RETURN G_RET_STS_ERROR;
333:
334: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
335: IF (l_debug = 'Y') THEN
336: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
337: END IF;
338: RETURN G_RET_STS_UNEXP_ERROR;
339:
340: WHEN OTHERS THEN
354: ----------------------------------------------
355: -- Validate_Attributes for: OKC_review_upld_header --
356: ----------------------------------------------
357: FUNCTION Validate_Attributes (
358: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
359:
360: p_review_upld_header_id IN NUMBER,
361: p_file_name IN VARCHAR2,
362: p_file_content_type IN VARCHAR2,
505: ------------------------------------------
506: -- Validate_Record for:OKC_review_upld_header --
507: ------------------------------------------
508: FUNCTION Validate_Record (
509: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
510:
511: p_review_upld_header_id IN NUMBER,
512: p_file_name IN VARCHAR2,
513: p_file_content_type IN VARCHAR2,
585: ---------------------------------------
586: -- validate_row for:OKC_review_upld_header --
587: ---------------------------------------
588: PROCEDURE validate_row(
589: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
590:
591: x_return_status OUT NOCOPY VARCHAR2,
592:
593: p_review_upld_header_id IN NUMBER,
646: x_file_description => l_file_description
647:
648: );
649: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
651: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
652: RAISE FND_API.G_EXC_ERROR;
653: END IF;
654:
648: );
649: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
651: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
652: RAISE FND_API.G_EXC_ERROR;
653: END IF;
654:
655: -- Validate all non-missing attributes (Item Level Validation)
656: l_object_version_number := p_object_version_number ;
672: Okc_Debug.Log('3200: Leaving validate_row', 2);
673: END IF;
674:
675: EXCEPTION
676: WHEN FND_API.G_EXC_ERROR THEN
677: IF (l_debug = 'Y') THEN
678: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
679: END IF;
680: x_return_status := G_RET_STS_ERROR;
674:
675: EXCEPTION
676: WHEN FND_API.G_EXC_ERROR THEN
677: IF (l_debug = 'Y') THEN
678: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
679: END IF;
680: x_return_status := G_RET_STS_ERROR;
681:
682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
678: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
679: END IF;
680: x_return_status := G_RET_STS_ERROR;
681:
682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
683: IF (l_debug = 'Y') THEN
684: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
685: END IF;
686: x_return_status := G_RET_STS_UNEXP_ERROR;
680: x_return_status := G_RET_STS_ERROR;
681:
682: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
683: IF (l_debug = 'Y') THEN
684: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
685: END IF;
686: x_return_status := G_RET_STS_UNEXP_ERROR;
687:
688: WHEN OTHERS THEN
791: -------------------------------------
792: -- Insert_Row for:OKC_review_upld_header --
793: -------------------------------------
794: PROCEDURE Insert_Row(
795: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
796: x_return_status OUT NOCOPY VARCHAR2,
797:
798: p_review_upld_header_id IN NUMBER,
799: p_file_name IN VARCHAR2,
831: x_review_upld_header_id => x_review_upld_header_id
832: );
833: --- If any errors happen abort API
834: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
836: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
837: RAISE FND_API.G_EXC_ERROR;
838: END IF;
839: ELSE
833: --- If any errors happen abort API
834: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
835: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
836: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
837: RAISE FND_API.G_EXC_ERROR;
838: END IF;
839: ELSE
840: x_review_upld_header_id := p_review_upld_header_id;
841: END IF;
862: p_file_description => p_file_description
863: );
864: --- If any errors happen abort API
865: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
866: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
867: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
868: RAISE FND_API.G_EXC_ERROR;
869: END IF;
870:
864: --- If any errors happen abort API
865: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
866: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
867: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
868: RAISE FND_API.G_EXC_ERROR;
869: END IF;
870:
871: --------------------------------------------
872: -- Call the internal Insert_Row for each child record
892: p_enable_reporting_flag => p_enable_reporting_flag,
893: p_file_description => p_file_description
894: );
895: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
897: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
898: RAISE FND_API.G_EXC_ERROR;
899: END IF;
900:
894: );
895: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
896: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
897: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
898: RAISE FND_API.G_EXC_ERROR;
899: END IF;
900:
901:
902:
904: Okc_Debug.Log('4500: Leaving Insert_Row', 2);
905: END IF;
906:
907: EXCEPTION
908: WHEN FND_API.G_EXC_ERROR THEN
909: IF (l_debug = 'Y') THEN
910: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
911: END IF;
912: x_return_status := G_RET_STS_ERROR;
906:
907: EXCEPTION
908: WHEN FND_API.G_EXC_ERROR THEN
909: IF (l_debug = 'Y') THEN
910: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
911: END IF;
912: x_return_status := G_RET_STS_ERROR;
913:
914: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
910: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
911: END IF;
912: x_return_status := G_RET_STS_ERROR;
913:
914: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
915: IF (l_debug = 'Y') THEN
916: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
917: END IF;
918: x_return_status := G_RET_STS_UNEXP_ERROR;
912: x_return_status := G_RET_STS_ERROR;
913:
914: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
915: IF (l_debug = 'Y') THEN
916: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
917: END IF;
918: x_return_status := G_RET_STS_UNEXP_ERROR;
919:
920: WHEN OTHERS THEN
1058: p_review_upld_header_id => p_review_upld_header_id,
1059: p_object_version_number => p_object_version_number
1060: );
1061: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1062: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1063: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1064: RAISE FND_API.G_EXC_ERROR;
1065: END IF;
1066:
1060: );
1061: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1062: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1063: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1064: RAISE FND_API.G_EXC_ERROR;
1065: END IF;
1066:
1067:
1068:
1070: Okc_Debug.Log('6000: Leaving Lock_Row', 2);
1071: END IF;
1072:
1073: EXCEPTION
1074: WHEN FND_API.G_EXC_ERROR THEN
1075: IF (l_debug = 'Y') THEN
1076: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1077: END IF;
1078: x_return_status := G_RET_STS_ERROR;
1072:
1073: EXCEPTION
1074: WHEN FND_API.G_EXC_ERROR THEN
1075: IF (l_debug = 'Y') THEN
1076: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1077: END IF;
1078: x_return_status := G_RET_STS_ERROR;
1079:
1080: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1076: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
1077: END IF;
1078: x_return_status := G_RET_STS_ERROR;
1079:
1080: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1081: IF (l_debug = 'Y') THEN
1082: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1083: END IF;
1084: x_return_status := G_RET_STS_UNEXP_ERROR;
1078: x_return_status := G_RET_STS_ERROR;
1079:
1080: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1081: IF (l_debug = 'Y') THEN
1082: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1083: END IF;
1084: x_return_status := G_RET_STS_UNEXP_ERROR;
1085:
1086: WHEN OTHERS THEN
1167: -------------------------------------
1168: -- Update_Row for:OKC_review_upld_header --
1169: -------------------------------------
1170: PROCEDURE Update_Row(
1171: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1172:
1173: x_return_status OUT NOCOPY VARCHAR2,
1174:
1175: p_review_upld_header_id IN NUMBER,
1210: p_review_upld_header_id => p_review_upld_header_id,
1211: p_object_version_number => p_object_version_number
1212: );
1213: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1215: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1216: RAISE FND_API.G_EXC_ERROR;
1217: END IF;
1218:
1212: );
1213: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1214: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1215: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1216: RAISE FND_API.G_EXC_ERROR;
1217: END IF;
1218:
1219:
1220: IF (l_debug = 'Y') THEN
1242: x_enable_reporting_flag => l_enable_reporting_flag,
1243: x_file_description => l_file_description
1244: );
1245: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1249: END IF;
1250:
1244: );
1245: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1246: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1247: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1248: RAISE FND_API.G_EXC_ERROR;
1249: END IF;
1250:
1251: IF (l_debug = 'Y') THEN
1252: Okc_Debug.Log('7400: Record Validation', 2);
1266: p_file_description => l_file_description
1267: );
1268: --- If any errors happen abort API
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: --- If any errors happen abort API
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('7500: Filling WHO columns', 2);
1309: p_enable_reporting_flag => p_enable_reporting_flag,
1310: p_file_description => p_file_description
1311: );
1312: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1314: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1315: RAISE FND_API.G_EXC_ERROR;
1316: END IF;
1317:
1311: );
1312: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1313: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1314: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1315: RAISE FND_API.G_EXC_ERROR;
1316: END IF;
1317:
1318:
1319: IF (l_debug = 'Y') THEN
1320: Okc_Debug.Log('7800: Leaving Update_Row', 2);
1321: END IF;
1322:
1323: EXCEPTION
1324: WHEN FND_API.G_EXC_ERROR THEN
1325: IF (l_debug = 'Y') THEN
1326: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1327: END IF;
1328: x_return_status := G_RET_STS_ERROR;
1322:
1323: EXCEPTION
1324: WHEN FND_API.G_EXC_ERROR THEN
1325: IF (l_debug = 'Y') THEN
1326: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1327: END IF;
1328: x_return_status := G_RET_STS_ERROR;
1329:
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1326: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
1327: END IF;
1328: x_return_status := G_RET_STS_ERROR;
1329:
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1331: IF (l_debug = 'Y') THEN
1332: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1333: END IF;
1334: x_return_status := G_RET_STS_UNEXP_ERROR;
1328: x_return_status := G_RET_STS_ERROR;
1329:
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1331: IF (l_debug = 'Y') THEN
1332: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1333: END IF;
1334: x_return_status := G_RET_STS_UNEXP_ERROR;
1335:
1336: WHEN OTHERS THEN
1410: p_review_upld_header_id => p_review_upld_header_id,
1411: p_object_version_number => p_object_version_number
1412: );
1413: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1414: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1415: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1416: RAISE FND_API.G_EXC_ERROR;
1417: END IF;
1418:
1412: );
1413: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1414: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1415: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1416: RAISE FND_API.G_EXC_ERROR;
1417: END IF;
1418:
1419:
1420: IF (l_debug = 'Y') THEN
1421: Okc_Debug.Log('9100: Removing _B row', 2);
1422: END IF;
1423: x_return_status := Delete_Row( p_review_upld_header_id => p_review_upld_header_id );
1424: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1426: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1427: RAISE FND_API.G_EXC_ERROR;
1428: END IF;
1429:
1423: x_return_status := Delete_Row( p_review_upld_header_id => p_review_upld_header_id );
1424: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1426: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1427: RAISE FND_API.G_EXC_ERROR;
1428: END IF;
1429:
1430:
1431: IF (l_debug = 'Y') THEN
1432: Okc_Debug.Log('9300: Leaving Delete_Row', 2);
1433: END IF;
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: IF (l_debug = 'Y') THEN
1438: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1439: END IF;
1440: x_return_status := G_RET_STS_ERROR;
1434:
1435: EXCEPTION
1436: WHEN FND_API.G_EXC_ERROR THEN
1437: IF (l_debug = 'Y') THEN
1438: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1439: END IF;
1440: x_return_status := G_RET_STS_ERROR;
1441:
1442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1438: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
1439: END IF;
1440: x_return_status := G_RET_STS_ERROR;
1441:
1442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1443: IF (l_debug = 'Y') THEN
1444: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1445: END IF;
1446: x_return_status := G_RET_STS_UNEXP_ERROR;
1440: x_return_status := G_RET_STS_ERROR;
1441:
1442: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1443: IF (l_debug = 'Y') THEN
1444: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
1445: END IF;
1446: x_return_status := G_RET_STS_UNEXP_ERROR;
1447:
1448: WHEN OTHERS THEN