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';
489: x_last_update_date => l_last_update_date
490: );
491: --- If any errors happen abort API
492: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
495: RAISE FND_API.G_EXC_ERROR;
496: END IF;
497:
491: --- If any errors happen abort API
492: IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
494: ELSIF (l_return_status = G_RET_STS_ERROR) THEN
495: RAISE FND_API.G_EXC_ERROR;
496: END IF;
497:
498: --- Reversing G_MISS/NULL values logic
499:
834: END IF;
835:
836: RETURN G_RET_STS_SUCCESS ;
837: EXCEPTION
838: WHEN FND_API.G_EXC_ERROR THEN
839: IF (l_debug = 'Y') THEN
840: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
841: END IF;
842: RETURN G_RET_STS_ERROR;
836: RETURN G_RET_STS_SUCCESS ;
837: EXCEPTION
838: WHEN FND_API.G_EXC_ERROR THEN
839: IF (l_debug = 'Y') THEN
840: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
841: END IF;
842: RETURN G_RET_STS_ERROR;
843:
844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
840: Okc_Debug.Log('900: Leaving Set_Attributes:FND_API.G_EXC_ERROR Exception', 2);
841: END IF;
842: RETURN G_RET_STS_ERROR;
843:
844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
845: IF (l_debug = 'Y') THEN
846: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
847: END IF;
848: RETURN G_RET_STS_UNEXP_ERROR;
842: RETURN G_RET_STS_ERROR;
843:
844: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
845: IF (l_debug = 'Y') THEN
846: Okc_Debug.Log('1000: Leaving Set_Attributes:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
847: END IF;
848: RETURN G_RET_STS_UNEXP_ERROR;
849:
850: WHEN OTHERS THEN
864: ----------------------------------------------
865: -- Validate_Attributes for: OKC_ARTICLE_VERSIONS --
866: ----------------------------------------------
867: FUNCTION Validate_Attributes (
868: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
869: p_import_action IN VARCHAR2 := NULL,
870: p_standard_yn IN VARCHAR2,
871:
872: p_article_version_id IN NUMBER,
1294: ------------------------------------------
1295: -- Validate_Record for:OKC_ARTICLE_VERSIONS --
1296: ------------------------------------------
1297: FUNCTION Validate_Record (
1298: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1299: p_import_action IN VARCHAR2 := NULL,
1300:
1301: p_article_version_id IN NUMBER,
1302: p_article_id IN NUMBER,
1837: ---------------------------------------
1838: -- validate_row for:OKC_ARTICLE_VERSIONS --
1839: ---------------------------------------
1840: PROCEDURE validate_row(
1841: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1842: p_import_action IN VARCHAR2 := NULL,
1843:
1844: x_return_status OUT NOCOPY VARCHAR2,
1845: x_earlier_adoption_type OUT NOCOPY VARCHAR2,
2104: x_attribute14 => l_attribute14,
2105: x_attribute15 => l_attribute15
2106: );
2107: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2109: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2110: RAISE FND_API.G_EXC_ERROR;
2111: END IF;
2112: END IF;
2106: );
2107: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2109: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2110: RAISE FND_API.G_EXC_ERROR;
2111: END IF;
2112: END IF;
2113: -- MOAC
2114: G_CURRENT_ORG_ID := mo_global.get_current_org_id();
2120: Okc_Debug.Log('2300: - attribute G_CURRENT_ORG_ID is invalid', 2);
2121: END IF;
2122: Okc_Api.Set_Message(G_APP_NAME, 'OKC_ART_NULL_ORG_ID');
2123: x_return_status := G_RET_STS_ERROR;
2124: RAISE FND_API.G_EXC_ERROR;
2125: end if;
2126:
2127: end if;
2128: /*
2196: Okc_Debug.Log('3200: Leaving validate_row', 2);
2197: END IF;
2198:
2199: EXCEPTION
2200: WHEN FND_API.G_EXC_ERROR THEN
2201: IF (l_debug = 'Y') THEN
2202: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
2203: END IF;
2204: x_return_status := G_RET_STS_ERROR;
2198:
2199: EXCEPTION
2200: WHEN FND_API.G_EXC_ERROR THEN
2201: IF (l_debug = 'Y') THEN
2202: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
2203: END IF;
2204: x_return_status := G_RET_STS_ERROR;
2205:
2206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2202: Okc_Debug.Log('3300: Leaving Validate_Row:FND_API.G_EXC_ERROR Exception', 2);
2203: END IF;
2204: x_return_status := G_RET_STS_ERROR;
2205:
2206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2207: IF (l_debug = 'Y') THEN
2208: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
2209: END IF;
2210: x_return_status := G_RET_STS_UNEXP_ERROR;
2204: x_return_status := G_RET_STS_ERROR;
2205:
2206: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2207: IF (l_debug = 'Y') THEN
2208: Okc_Debug.Log('3400: Leaving Validate_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
2209: END IF;
2210: x_return_status := G_RET_STS_UNEXP_ERROR;
2211:
2212: WHEN OTHERS THEN
2458: -------------------------------------
2459: -- Insert_Row for:OKC_ARTICLE_VERSIONS --
2460: -------------------------------------
2461: PROCEDURE Insert_Row(
2462: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2463: x_return_status OUT NOCOPY VARCHAR2,
2464:
2465: p_article_version_id IN NUMBER,
2466: p_article_id IN NUMBER,
2542: x_article_version_id => x_article_version_id
2543: );
2544: --- If any errors happen abort API
2545: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2546: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2547: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2548: RAISE FND_API.G_EXC_ERROR;
2549: END IF;
2550: ELSE
2544: --- If any errors happen abort API
2545: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2546: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2547: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2548: RAISE FND_API.G_EXC_ERROR;
2549: END IF;
2550: ELSE
2551: x_article_version_id := p_article_version_id;
2552: END IF;
2569: Okc_Debug.Log('2300: - attribute G_CURRENT_ORG_ID is invalid', 2);
2570: END IF;
2571: Okc_Api.Set_Message(G_APP_NAME, 'OKC_ART_NULL_ORG_ID');
2572: x_return_status := G_RET_STS_ERROR;
2573: RAISE FND_API.G_EXC_ERROR;
2574: end if;
2575:
2576: end if;
2577: /*
2640: x_earlier_version_number => l_article_version_number
2641: );
2642: --- If any errors happen abort API
2643: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2644: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2645: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2646: RAISE FND_API.G_EXC_ERROR;
2647: END IF;
2648:
2642: --- If any errors happen abort API
2643: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2644: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2645: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2646: RAISE FND_API.G_EXC_ERROR;
2647: END IF;
2648:
2649: --------------------------------------------
2650: -- Call the internal Insert_Row for each child record
2717: p_last_update_login => l_last_update_login,
2718: p_last_update_date => l_last_update_date
2719: );
2720: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2722: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2723: RAISE FND_API.G_EXC_ERROR;
2724: END IF;
2725:
2719: );
2720: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2722: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2723: RAISE FND_API.G_EXC_ERROR;
2724: END IF;
2725:
2726:
2727:
2729: Okc_Debug.Log('4500: Leaving Insert_Row', 2);
2730: END IF;
2731:
2732: EXCEPTION
2733: WHEN FND_API.G_EXC_ERROR THEN
2734: IF (l_debug = 'Y') THEN
2735: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
2736: END IF;
2737: x_return_status := G_RET_STS_ERROR;
2731:
2732: EXCEPTION
2733: WHEN FND_API.G_EXC_ERROR THEN
2734: IF (l_debug = 'Y') THEN
2735: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
2736: END IF;
2737: x_return_status := G_RET_STS_ERROR;
2738:
2739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2735: Okc_Debug.Log('4600: Leaving Insert_Row:FND_API.G_EXC_ERROR Exception', 2);
2736: END IF;
2737: x_return_status := G_RET_STS_ERROR;
2738:
2739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2740: IF (l_debug = 'Y') THEN
2741: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
2742: END IF;
2743: x_return_status := G_RET_STS_UNEXP_ERROR;
2737: x_return_status := G_RET_STS_ERROR;
2738:
2739: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2740: IF (l_debug = 'Y') THEN
2741: Okc_Debug.Log('4700: Leaving Insert_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
2742: END IF;
2743: x_return_status := G_RET_STS_UNEXP_ERROR;
2744:
2745: WHEN OTHERS THEN
2887: p_article_version_id => p_article_version_id,
2888: p_object_version_number => p_object_version_number
2889: );
2890: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2891: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2892: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2893: RAISE FND_API.G_EXC_ERROR;
2894: END IF;
2895:
2889: );
2890: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
2891: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2892: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
2893: RAISE FND_API.G_EXC_ERROR;
2894: END IF;
2895:
2896:
2897:
2899: Okc_Debug.Log('6000: Leaving Lock_Row', 2);
2900: END IF;
2901:
2902: EXCEPTION
2903: WHEN FND_API.G_EXC_ERROR THEN
2904: IF (l_debug = 'Y') THEN
2905: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
2906: END IF;
2907: x_return_status := G_RET_STS_ERROR;
2901:
2902: EXCEPTION
2903: WHEN FND_API.G_EXC_ERROR THEN
2904: IF (l_debug = 'Y') THEN
2905: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
2906: END IF;
2907: x_return_status := G_RET_STS_ERROR;
2908:
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2905: Okc_Debug.Log('6100: Leaving Lock_Row:FND_API.G_EXC_ERROR Exception', 2);
2906: END IF;
2907: x_return_status := G_RET_STS_ERROR;
2908:
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2910: IF (l_debug = 'Y') THEN
2911: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
2912: END IF;
2913: x_return_status := G_RET_STS_UNEXP_ERROR;
2907: x_return_status := G_RET_STS_ERROR;
2908:
2909: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2910: IF (l_debug = 'Y') THEN
2911: Okc_Debug.Log('6200: Leaving Lock_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
2912: END IF;
2913: x_return_status := G_RET_STS_UNEXP_ERROR;
2914:
2915: WHEN OTHERS THEN
3099: -------------------------------------
3100: -- Update_Row for:OKC_ARTICLE_VERSIONS --
3101: -------------------------------------
3102: PROCEDURE Update_Row(
3103: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
3104:
3105: x_return_status OUT NOCOPY VARCHAR2,
3106:
3107: p_article_version_id IN NUMBER,
3226: p_article_version_id => p_article_version_id,
3227: p_object_version_number => p_object_version_number
3228: );
3229: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3231: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3232: RAISE FND_API.G_EXC_ERROR;
3233: END IF;
3234:
3228: );
3229: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3230: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3231: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3232: RAISE FND_API.G_EXC_ERROR;
3233: END IF;
3234:
3235:
3236: IF (l_debug = 'Y') THEN
3333: x_attribute14 => l_attribute14,
3334: x_attribute15 => l_attribute15
3335: );
3336: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3337: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3338: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3335: );
3336: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3337: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3338: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3339: RAISE FND_API.G_EXC_ERROR;
3340: END IF;
3341:
3342: IF (l_debug = 'Y') THEN
3343: Okc_Debug.Log('7400: Record Validation', 2);
3353: Okc_Debug.Log('2300: - attribute G_CURRENT_ORG_ID is invalid', 2);
3354: END IF;
3355: Okc_Api.Set_Message(G_APP_NAME, 'OKC_ART_NULL_ORG_ID');
3356: x_return_status := G_RET_STS_ERROR;
3357: RAISE FND_API.G_EXC_ERROR;
3358: end if;
3359:
3360: end if;
3361: /*
3424: x_earlier_version_number => l_earlier_version_number
3425: );
3426: --- If any errors happen abort API
3427: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3429: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3430: RAISE FND_API.G_EXC_ERROR;
3431: END IF;
3432:
3426: --- If any errors happen abort API
3427: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3428: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3429: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3430: RAISE FND_API.G_EXC_ERROR;
3431: END IF;
3432:
3433: IF (l_debug = 'Y') THEN
3434: Okc_Debug.Log('7500: Filling WHO columns', 2);
3506: p_last_update_login => l_last_update_login,
3507: p_last_update_date => l_last_update_date
3508: );
3509: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3510: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3511: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3512: RAISE FND_API.G_EXC_ERROR;
3513: END IF;
3514:
3508: );
3509: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3510: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3511: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3512: RAISE FND_API.G_EXC_ERROR;
3513: END IF;
3514:
3515:
3516: IF (l_debug = 'Y') THEN
3517: Okc_Debug.Log('7800: Leaving Update_Row', 2);
3518: END IF;
3519:
3520: EXCEPTION
3521: WHEN FND_API.G_EXC_ERROR THEN
3522: IF (l_debug = 'Y') THEN
3523: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
3524: END IF;
3525: x_return_status := G_RET_STS_ERROR;
3519:
3520: EXCEPTION
3521: WHEN FND_API.G_EXC_ERROR THEN
3522: IF (l_debug = 'Y') THEN
3523: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
3524: END IF;
3525: x_return_status := G_RET_STS_ERROR;
3526:
3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3523: Okc_Debug.Log('7900: Leaving Update_Row:FND_API.G_EXC_ERROR Exception', 2);
3524: END IF;
3525: x_return_status := G_RET_STS_ERROR;
3526:
3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3528: IF (l_debug = 'Y') THEN
3529: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
3530: END IF;
3531: x_return_status := G_RET_STS_UNEXP_ERROR;
3525: x_return_status := G_RET_STS_ERROR;
3526:
3527: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3528: IF (l_debug = 'Y') THEN
3529: Okc_Debug.Log('8000: Leaving Update_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
3530: END IF;
3531: x_return_status := G_RET_STS_UNEXP_ERROR;
3532:
3533: WHEN OTHERS THEN
3606: p_article_version_id => p_article_version_id,
3607: p_object_version_number => p_object_version_number
3608: );
3609: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3611: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3612: RAISE FND_API.G_EXC_ERROR;
3613: END IF;
3614:
3608: );
3609: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3610: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3611: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3612: RAISE FND_API.G_EXC_ERROR;
3613: END IF;
3614:
3615:
3616: IF (l_debug = 'Y') THEN
3617: Okc_Debug.Log('9100: Removing _B row', 2);
3618: END IF;
3619: x_return_status := Delete_Row( p_article_version_id => p_article_version_id );
3620: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3621: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3622: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3623: RAISE FND_API.G_EXC_ERROR;
3624: END IF;
3625:
3619: x_return_status := Delete_Row( p_article_version_id => p_article_version_id );
3620: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
3621: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3622: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
3623: RAISE FND_API.G_EXC_ERROR;
3624: END IF;
3625:
3626:
3627: IF (l_debug = 'Y') THEN
3628: Okc_Debug.Log('9300: Leaving Delete_Row', 2);
3629: END IF;
3630:
3631: EXCEPTION
3632: WHEN FND_API.G_EXC_ERROR THEN
3633: IF (l_debug = 'Y') THEN
3634: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
3635: END IF;
3636: x_return_status := G_RET_STS_ERROR;
3630:
3631: EXCEPTION
3632: WHEN FND_API.G_EXC_ERROR THEN
3633: IF (l_debug = 'Y') THEN
3634: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
3635: END IF;
3636: x_return_status := G_RET_STS_ERROR;
3637:
3638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3634: Okc_Debug.Log('9400: Leaving Delete_Row:FND_API.G_EXC_ERROR Exception', 2);
3635: END IF;
3636: x_return_status := G_RET_STS_ERROR;
3637:
3638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3639: IF (l_debug = 'Y') THEN
3640: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
3641: END IF;
3642: x_return_status := G_RET_STS_UNEXP_ERROR;
3636: x_return_status := G_RET_STS_ERROR;
3637:
3638: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3639: IF (l_debug = 'Y') THEN
3640: Okc_Debug.Log('9500: Leaving Delete_Row:FND_API.G_EXC_UNEXPECTED_ERROR Exception', 2);
3641: END IF;
3642: x_return_status := G_RET_STS_UNEXP_ERROR;
3643:
3644: WHEN OTHERS THEN