[Home] [Help]
54: PROCEDURE add_language IS
55: BEGIN
56:
57: IF (l_debug = 'Y') THEN
58: okc_debug.Set_Indentation('OKC_CAT_PVT');
59: okc_debug.log('500: Entered add_language', 2);
60: END IF;
61:
62: DELETE FROM OKC_K_ARTICLES_TL T
55: BEGIN
56:
57: IF (l_debug = 'Y') THEN
58: okc_debug.Set_Indentation('OKC_CAT_PVT');
59: okc_debug.log('500: Entered add_language', 2);
60: END IF;
61:
62: DELETE FROM OKC_K_ARTICLES_TL T
63: WHERE NOT EXISTS (
251: );
252:
253:
254: IF (l_debug = 'Y') THEN
255: okc_debug.log('600: Leaving add_language ', 2);
256: okc_debug.Reset_Indentation;
257: END IF;
258:
259: END add_language;
252:
253:
254: IF (l_debug = 'Y') THEN
255: okc_debug.log('600: Leaving add_language ', 2);
256: okc_debug.Reset_Indentation;
257: END IF;
258:
259: END add_language;
260:
304: l_cat_rec cat_rec_type;
305: BEGIN
306:
307: IF (l_debug = 'Y') THEN
308: okc_debug.Set_Indentation('OKC_CAT_PVT');
309: okc_debug.log('700: Entered get_rec', 2);
310: END IF;
311:
312: x_no_data_found := TRUE;
305: BEGIN
306:
307: IF (l_debug = 'Y') THEN
308: okc_debug.Set_Indentation('OKC_CAT_PVT');
309: okc_debug.log('700: Entered get_rec', 2);
310: END IF;
311:
312: x_no_data_found := TRUE;
313: -- Get current database values
347: x_no_data_found := okc_k_articles_b_pk_csr%NOTFOUND;
348: CLOSE okc_k_articles_b_pk_csr;
349:
350: IF (l_debug = 'Y') THEN
351: okc_debug.log('800: Leaving get_rec ', 2);
352: okc_debug.Reset_Indentation;
353: END IF;
354:
355: RETURN(l_cat_rec);
348: CLOSE okc_k_articles_b_pk_csr;
349:
350: IF (l_debug = 'Y') THEN
351: okc_debug.log('800: Leaving get_rec ', 2);
352: okc_debug.Reset_Indentation;
353: END IF;
354:
355: RETURN(l_cat_rec);
356:
397: l_okc_k_articles_tl_rec okc_k_articles_tl_rec_type;
398: BEGIN
399:
400: IF (l_debug = 'Y') THEN
401: okc_debug.Set_Indentation('OKC_CAT_PVT');
402: okc_debug.log('900: Entered get_rec', 2);
403: END IF;
404:
405: x_no_data_found := TRUE;
398: BEGIN
399:
400: IF (l_debug = 'Y') THEN
401: okc_debug.Set_Indentation('OKC_CAT_PVT');
402: okc_debug.log('900: Entered get_rec', 2);
403: END IF;
404:
405: x_no_data_found := TRUE;
406: -- Get current database values
425: x_no_data_found := okc_k_articles_tl_pk_csr%NOTFOUND;
426: CLOSE okc_k_articles_tl_pk_csr;
427:
428: IF (l_debug = 'Y') THEN
429: okc_debug.log('900: Leaving Get_Rec ', 2);
430: okc_debug.Reset_Indentation;
431: END IF;
432:
433: RETURN(l_okc_k_articles_tl_rec);
426: CLOSE okc_k_articles_tl_pk_csr;
427:
428: IF (l_debug = 'Y') THEN
429: okc_debug.log('900: Leaving Get_Rec ', 2);
430: okc_debug.Reset_Indentation;
431: END IF;
432:
433: RETURN(l_okc_k_articles_tl_rec);
434: END get_rec;
494: l_catv_rec catv_rec_type;
495: BEGIN
496:
497: IF (l_debug = 'Y') THEN
498: okc_debug.Set_Indentation('OKC_CAT_PVT');
499: okc_debug.log('1000: Entered get_rec', 2);
500: END IF;
501:
502: x_no_data_found := TRUE;
495: BEGIN
496:
497: IF (l_debug = 'Y') THEN
498: okc_debug.Set_Indentation('OKC_CAT_PVT');
499: okc_debug.log('1000: Entered get_rec', 2);
500: END IF;
501:
502: x_no_data_found := TRUE;
503: -- Get current database values
543: x_no_data_found := okc_catv_pk_csr%NOTFOUND;
544: CLOSE okc_catv_pk_csr;
545:
546: IF (l_debug = 'Y') THEN
547: okc_debug.log('1000: Leaving Get_Rec ', 2);
548: okc_debug.Reset_Indentation;
549: END IF;
550:
551: RETURN(l_catv_rec);
544: CLOSE okc_catv_pk_csr;
545:
546: IF (l_debug = 'Y') THEN
547: okc_debug.log('1000: Leaving Get_Rec ', 2);
548: okc_debug.Reset_Indentation;
549: END IF;
550:
551: RETURN(l_catv_rec);
552:
571: l_catv_rec catv_rec_type := p_catv_rec;
572: BEGIN
573:
574: IF (l_debug = 'Y') THEN
575: okc_debug.Set_Indentation('OKC_CAT_PVT');
576: okc_debug.log('1100: Entered null_out_defaults', 2);
577: END IF;
578:
579: IF (l_catv_rec.chr_id = OKC_API.G_MISS_NUM) THEN
572: BEGIN
573:
574: IF (l_debug = 'Y') THEN
575: okc_debug.Set_Indentation('OKC_CAT_PVT');
576: okc_debug.log('1100: Entered null_out_defaults', 2);
577: END IF;
578:
579: IF (l_catv_rec.chr_id = OKC_API.G_MISS_NUM) THEN
580: l_catv_rec.chr_id := NULL;
686: l_catv_rec.last_update_login := NULL;
687: END IF;
688:
689: IF (l_debug = 'Y') THEN
690: okc_debug.log('1200: Leaving null_out_defaults ', 2);
691: okc_debug.Reset_Indentation;
692: END IF;
693:
694: RETURN(l_catv_rec);
687: END IF;
688:
689: IF (l_debug = 'Y') THEN
690: okc_debug.log('1200: Leaving null_out_defaults ', 2);
691: okc_debug.Reset_Indentation;
692: END IF;
693:
694: RETURN(l_catv_rec);
695: END null_out_defaults;
711: l_dummy_var varchar2(1) := '?';
712: begin
713:
714: IF (l_debug = 'Y') THEN
715: okc_debug.Set_Indentation('OKC_CAT_PVT');
716: okc_debug.log('1300: Entered validate_sbt_code', 2);
717: END IF;
718:
719: x_return_status := OKC_API.G_RET_STS_SUCCESS;
712: begin
713:
714: IF (l_debug = 'Y') THEN
715: okc_debug.Set_Indentation('OKC_CAT_PVT');
716: okc_debug.log('1300: Entered validate_sbt_code', 2);
717: END IF;
718:
719: x_return_status := OKC_API.G_RET_STS_SUCCESS;
720: if (p_catv_rec.sbt_code is NULL or p_catv_rec.sbt_code = OKC_API.G_MISS_CHAR) then
726: x_return_status := OKC_API.G_RET_STS_ERROR;
727: end if;
728:
729: IF (l_debug = 'Y') THEN
730: okc_debug.log('1400: Leaving validate_sbt_code', 2);
731: okc_debug.Reset_Indentation;
732: END IF;
733:
734: exception
727: end if;
728:
729: IF (l_debug = 'Y') THEN
730: okc_debug.log('1400: Leaving validate_sbt_code', 2);
731: okc_debug.Reset_Indentation;
732: END IF;
733:
734: exception
735: when OTHERS then
734: exception
735: when OTHERS then
736:
737: IF (l_debug = 'Y') THEN
738: okc_debug.log('1500: Leaving validate_sbt_code:OTHERS Exception', 2);
739: okc_debug.Reset_Indentation;
740: END IF;
741:
742: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
735: when OTHERS then
736:
737: IF (l_debug = 'Y') THEN
738: okc_debug.log('1500: Leaving validate_sbt_code:OTHERS Exception', 2);
739: okc_debug.Reset_Indentation;
740: END IF;
741:
742: OKC_API.SET_MESSAGE(p_app_name => g_app_name,
743: p_msg_name => g_unexpected_error,
761: p_catv_rec IN catv_rec_TYPE) is
762: begin
763:
764: IF (l_debug = 'Y') THEN
765: okc_debug.Set_Indentation('OKC_CAT_PVT');
766: okc_debug.log('1600: Entered validate_cat_type', 2);
767: END IF;
768:
769: if (P_catv_rec.cat_type in ('STA','NSD',OKC_API.G_MISS_CHAR)) then
762: begin
763:
764: IF (l_debug = 'Y') THEN
765: okc_debug.Set_Indentation('OKC_CAT_PVT');
766: okc_debug.log('1600: Entered validate_cat_type', 2);
767: END IF;
768:
769: if (P_catv_rec.cat_type in ('STA','NSD',OKC_API.G_MISS_CHAR)) then
770: x_return_status := OKC_API.G_RET_STS_SUCCESS;
778: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'CAT_TYPE');
779: x_return_status := OKC_API.G_RET_STS_ERROR;
780:
781: IF (l_debug = 'Y') THEN
782: okc_debug.log('1700: Leaving validate_cat_type', 2);
783: okc_debug.Reset_Indentation;
784: END IF;
785:
786: end validate_cat_type;
779: x_return_status := OKC_API.G_RET_STS_ERROR;
780:
781: IF (l_debug = 'Y') THEN
782: okc_debug.log('1700: Leaving validate_cat_type', 2);
783: okc_debug.Reset_Indentation;
784: END IF;
785:
786: end validate_cat_type;
787:
797: p_catv_rec IN catv_rec_TYPE) is
798: begin
799:
800: IF (l_debug = 'Y') THEN
801: okc_debug.Set_Indentation('OKC_CAT_PVT');
802: okc_debug.log('1800: Entered validate_fulltext_yn', 2);
803: END IF;
804:
805: if (P_catv_rec.fulltext_yn in ('Y','N',OKC_API.G_MISS_CHAR)
798: begin
799:
800: IF (l_debug = 'Y') THEN
801: okc_debug.Set_Indentation('OKC_CAT_PVT');
802: okc_debug.log('1800: Entered validate_fulltext_yn', 2);
803: END IF;
804:
805: if (P_catv_rec.fulltext_yn in ('Y','N',OKC_API.G_MISS_CHAR)
806: or P_catv_rec.fulltext_yn is NULL) then
810: x_return_status := OKC_API.G_RET_STS_ERROR;
811: end if;
812:
813: IF (l_debug = 'Y') THEN
814: okc_debug.log('1900: Leaving validate_fulltext_yn', 2);
815: okc_debug.Reset_Indentation;
816: END IF;
817:
818: end validate_fulltext_yn;
811: end if;
812:
813: IF (l_debug = 'Y') THEN
814: okc_debug.log('1900: Leaving validate_fulltext_yn', 2);
815: okc_debug.Reset_Indentation;
816: END IF;
817:
818: end validate_fulltext_yn;
819:
836: where id = p_catv_rec.dnz_chr_id;
837: begin
838:
839: IF (l_debug = 'Y') THEN
840: okc_debug.Set_Indentation('OKC_CAT_PVT');
841: okc_debug.log('2000: Entered validate_dnz_chr_id', 2);
842: END IF;
843:
844: x_return_status := OKC_API.G_RET_STS_SUCCESS;
837: begin
838:
839: IF (l_debug = 'Y') THEN
840: okc_debug.Set_Indentation('OKC_CAT_PVT');
841: okc_debug.log('2000: Entered validate_dnz_chr_id', 2);
842: END IF;
843:
844: x_return_status := OKC_API.G_RET_STS_SUCCESS;
845: if (p_catv_rec.dnz_chr_id = OKC_API.G_MISS_NUM) then
862: return;
863: end if;
864:
865: IF (l_debug = 'Y') THEN
866: okc_debug.log('2100: Leaving validate_dnz_chr_id', 2);
867: okc_debug.Reset_Indentation;
868: END IF;
869:
870: exception
863: end if;
864:
865: IF (l_debug = 'Y') THEN
866: okc_debug.log('2100: Leaving validate_dnz_chr_id', 2);
867: okc_debug.Reset_Indentation;
868: END IF;
869:
870: exception
871: when OTHERS then
870: exception
871: when OTHERS then
872:
873: IF (l_debug = 'Y') THEN
874: okc_debug.log('2200: Leaving validate_dnz_chr_id:OTHERS Exception', 2);
875: okc_debug.Reset_Indentation;
876: END IF;
877:
878: OKC_API.set_message(p_app_name => g_app_name,
871: when OTHERS then
872:
873: IF (l_debug = 'Y') THEN
874: okc_debug.log('2200: Leaving validate_dnz_chr_id:OTHERS Exception', 2);
875: okc_debug.Reset_Indentation;
876: END IF;
877:
878: OKC_API.set_message(p_app_name => g_app_name,
879: p_msg_name => g_unexpected_error,
902: where id = p_catv_rec.cat_id;
903: begin
904:
905: IF (l_debug = 'Y') THEN
906: okc_debug.Set_Indentation('OKC_CAT_PVT');
907: okc_debug.log('2300: Entered validate_cat_id', 2);
908: END IF;
909:
910: x_return_status := OKC_API.G_RET_STS_SUCCESS;
903: begin
904:
905: IF (l_debug = 'Y') THEN
906: okc_debug.Set_Indentation('OKC_CAT_PVT');
907: okc_debug.log('2300: Entered validate_cat_id', 2);
908: END IF;
909:
910: x_return_status := OKC_API.G_RET_STS_SUCCESS;
911: if (p_catv_rec.cat_id = OKC_API.G_MISS_NUM or p_catv_rec.cat_id is NULL) then
919: x_return_status := OKC_API.G_RET_STS_ERROR;
920: end if;
921:
922: IF (l_debug = 'Y') THEN
923: okc_debug.log('2400: Leaving validate_cat_id', 2);
924: okc_debug.Reset_Indentation;
925: END IF;
926:
927: exception
920: end if;
921:
922: IF (l_debug = 'Y') THEN
923: okc_debug.log('2400: Leaving validate_cat_id', 2);
924: okc_debug.Reset_Indentation;
925: END IF;
926:
927: exception
928: when OTHERS then
927: exception
928: when OTHERS then
929:
930: IF (l_debug = 'Y') THEN
931: okc_debug.log('2500: Leaving validate_cat_id:OTHERS Exception', 2);
932: okc_debug.Reset_Indentation;
933: END IF;
934:
935: if l_cat_csr%ISOPEN then
928: when OTHERS then
929:
930: IF (l_debug = 'Y') THEN
931: okc_debug.log('2500: Leaving validate_cat_id:OTHERS Exception', 2);
932: okc_debug.Reset_Indentation;
933: END IF;
934:
935: if l_cat_csr%ISOPEN then
936: close l_cat_csr;
962: where id = p_catv_rec.cle_id;
963: begin
964:
965: IF (l_debug = 'Y') THEN
966: okc_debug.Set_Indentation('OKC_CAT_PVT');
967: okc_debug.log('2600: Entered validate_cle_id', 2);
968: END IF;
969:
970: x_return_status := OKC_API.G_RET_STS_SUCCESS;
963: begin
964:
965: IF (l_debug = 'Y') THEN
966: okc_debug.Set_Indentation('OKC_CAT_PVT');
967: okc_debug.log('2600: Entered validate_cle_id', 2);
968: END IF;
969:
970: x_return_status := OKC_API.G_RET_STS_SUCCESS;
971: if (p_catv_rec.cle_id = OKC_API.G_MISS_NUM or p_catv_rec.cle_id is NULL) then
979: x_return_status := OKC_API.G_RET_STS_ERROR;
980: end if;
981:
982: IF (l_debug = 'Y') THEN
983: okc_debug.log('2700: Leaving validate_cle_id', 2);
984: okc_debug.Reset_Indentation;
985: END IF;
986:
987: exception
980: end if;
981:
982: IF (l_debug = 'Y') THEN
983: okc_debug.log('2700: Leaving validate_cle_id', 2);
984: okc_debug.Reset_Indentation;
985: END IF;
986:
987: exception
988: when OTHERS then
987: exception
988: when OTHERS then
989:
990: IF (l_debug = 'Y') THEN
991: okc_debug.log('2800: Leaving validate_cle_id:OTHERS Exception', 2);
992: okc_debug.Reset_Indentation;
993: END IF;
994:
995: if l_cle_csr%ISOPEN then
988: when OTHERS then
989:
990: IF (l_debug = 'Y') THEN
991: okc_debug.log('2800: Leaving validate_cle_id:OTHERS Exception', 2);
992: okc_debug.Reset_Indentation;
993: END IF;
994:
995: if l_cle_csr%ISOPEN then
996: close l_cle_csr;
1022: where id = p_catv_rec.chr_id;
1023: begin
1024:
1025: IF (l_debug = 'Y') THEN
1026: okc_debug.Set_Indentation('OKC_CAT_PVT');
1027: okc_debug.log('2900: Entered validate_chr_id', 2);
1028: END IF;
1029:
1030: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1023: begin
1024:
1025: IF (l_debug = 'Y') THEN
1026: okc_debug.Set_Indentation('OKC_CAT_PVT');
1027: okc_debug.log('2900: Entered validate_chr_id', 2);
1028: END IF;
1029:
1030: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1031: if (p_catv_rec.chr_id = OKC_API.G_MISS_NUM or p_catv_rec.chr_id is NULL) then
1039: x_return_status := OKC_API.G_RET_STS_ERROR;
1040: end if;
1041:
1042: IF (l_debug = 'Y') THEN
1043: okc_debug.log('3000: Leaving validate_chr_id', 2);
1044: okc_debug.Reset_Indentation;
1045: END IF;
1046:
1047: exception
1040: end if;
1041:
1042: IF (l_debug = 'Y') THEN
1043: okc_debug.log('3000: Leaving validate_chr_id', 2);
1044: okc_debug.Reset_Indentation;
1045: END IF;
1046:
1047: exception
1048: when OTHERS then
1047: exception
1048: when OTHERS then
1049:
1050: IF (l_debug = 'Y') THEN
1051: okc_debug.log('3100: Leaving validate_chr_id:OTHERS Exception', 2);
1052: okc_debug.Reset_Indentation;
1053: END IF;
1054:
1055: if l_chr_csr%ISOPEN then
1048: when OTHERS then
1049:
1050: IF (l_debug = 'Y') THEN
1051: okc_debug.log('3100: Leaving validate_chr_id:OTHERS Exception', 2);
1052: okc_debug.Reset_Indentation;
1053: END IF;
1054:
1055: if l_chr_csr%ISOPEN then
1056: close l_chr_csr;
1076: /*-------------Commented in favor of hand code------
1077: BEGIN
1078:
1079: IF (l_debug = 'Y') THEN
1080: okc_debug.Set_Indentation('OKC_CAT_PVT');
1081: okc_debug.log('3200: Entered Validate_Attributes', 2);
1082: END IF;
1083:
1084: IF p_catv_rec.id = OKC_API.G_MISS_NUM OR
1077: BEGIN
1078:
1079: IF (l_debug = 'Y') THEN
1080: okc_debug.Set_Indentation('OKC_CAT_PVT');
1081: okc_debug.log('3200: Entered Validate_Attributes', 2);
1082: END IF;
1083:
1084: IF p_catv_rec.id = OKC_API.G_MISS_NUM OR
1085: p_catv_rec.id IS NULL
1103: l_return_status := OKC_API.G_RET_STS_ERROR;
1104: END IF;
1105:
1106: IF (l_debug = 'Y') THEN
1107: okc_debug.log('3300: Leaving Validate_Attributes ', 2);
1108: okc_debug.Reset_Indentation;
1109: END IF;
1110:
1111: RETURN(l_return_status);
1104: END IF;
1105:
1106: IF (l_debug = 'Y') THEN
1107: okc_debug.log('3300: Leaving Validate_Attributes ', 2);
1108: okc_debug.Reset_Indentation;
1109: END IF;
1110:
1111: RETURN(l_return_status);
1112:
1181: end if;
1182: return x_return_status;
1183:
1184: IF (l_debug = 'Y') THEN
1185: okc_debug.log('3400: Leaving Validate_Attributes ', 2);
1186: okc_debug.Reset_Indentation;
1187: END IF;
1188:
1189: exception
1182: return x_return_status;
1183:
1184: IF (l_debug = 'Y') THEN
1185: okc_debug.log('3400: Leaving Validate_Attributes ', 2);
1186: okc_debug.Reset_Indentation;
1187: END IF;
1188:
1189: exception
1190: when OTHERS then
1218: l_dummy_var VARCHAR2(1) := '?';
1219: BEGIN
1220:
1221: IF (l_debug = 'Y') THEN
1222: okc_debug.Set_Indentation('OKC_CAT_PVT');
1223: okc_debug.log('3500: Entered Validate_Record', 2);
1224: END IF;
1225:
1226: if (p_catv_rec.CAT_TYPE) = 'STA' then
1219: BEGIN
1220:
1221: IF (l_debug = 'Y') THEN
1222: okc_debug.Set_Indentation('OKC_CAT_PVT');
1223: okc_debug.log('3500: Entered Validate_Record', 2);
1224: END IF;
1225:
1226: if (p_catv_rec.CAT_TYPE) = 'STA' then
1227: -- fulltext_yn should have a value
1286: end if;
1287: RETURN (l_return_status);
1288:
1289: IF (l_debug = 'Y') THEN
1290: okc_debug.log('3600: Leaving Validate_Record', 2);
1291: okc_debug.Reset_Indentation;
1292: END IF;
1293:
1294: exception
1287: RETURN (l_return_status);
1288:
1289: IF (l_debug = 'Y') THEN
1290: okc_debug.log('3600: Leaving Validate_Record', 2);
1291: okc_debug.Reset_Indentation;
1292: END IF;
1293:
1294: exception
1295: when OTHERS then
1294: exception
1295: when OTHERS then
1296:
1297: IF (l_debug = 'Y') THEN
1298: okc_debug.log('3700: Leaving Validate_Record:OTHERS Exception', 2);
1299: okc_debug.Reset_Indentation;
1300: END IF;
1301:
1302: if std_art_csr%ISOPEN then
1295: when OTHERS then
1296:
1297: IF (l_debug = 'Y') THEN
1298: okc_debug.log('3700: Leaving Validate_Record:OTHERS Exception', 2);
1299: okc_debug.Reset_Indentation;
1300: END IF;
1301:
1302: if std_art_csr%ISOPEN then
1303: close std_art_csr;
1465: l_okc_k_articles_tl_rec okc_k_articles_tl_rec_type;
1466: BEGIN
1467:
1468: IF (l_debug = 'Y') THEN
1469: okc_debug.Set_Indentation('OKC_CAT_PVT');
1470: okc_debug.log('3800: Entered validate_row', 2);
1471: END IF;
1472:
1473: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1466: BEGIN
1467:
1468: IF (l_debug = 'Y') THEN
1469: okc_debug.Set_Indentation('OKC_CAT_PVT');
1470: okc_debug.log('3800: Entered validate_row', 2);
1471: END IF;
1472:
1473: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1474: G_PKG_NAME,
1498: END IF;
1499: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1500:
1501: IF (l_debug = 'Y') THEN
1502: okc_debug.log('3900: Leaving validate_row', 2);
1503: okc_debug.Reset_Indentation;
1504: END IF;
1505:
1506: EXCEPTION
1499: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1500:
1501: IF (l_debug = 'Y') THEN
1502: okc_debug.log('3900: Leaving validate_row', 2);
1503: okc_debug.Reset_Indentation;
1504: END IF;
1505:
1506: EXCEPTION
1507: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1506: EXCEPTION
1507: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1508:
1509: IF (l_debug = 'Y') THEN
1510: okc_debug.log('4000: Leaving validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1511: okc_debug.Reset_Indentation;
1512: END IF;
1513:
1514: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1507: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1508:
1509: IF (l_debug = 'Y') THEN
1510: okc_debug.log('4000: Leaving validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1511: okc_debug.Reset_Indentation;
1512: END IF;
1513:
1514: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1515: (
1522: );
1523: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1524:
1525: IF (l_debug = 'Y') THEN
1526: okc_debug.log('4100: Leaving validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1527: okc_debug.Reset_Indentation;
1528: END IF;
1529:
1530: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1523: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1524:
1525: IF (l_debug = 'Y') THEN
1526: okc_debug.log('4100: Leaving validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1527: okc_debug.Reset_Indentation;
1528: END IF;
1529:
1530: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1531: (
1538: );
1539: WHEN OTHERS THEN
1540:
1541: IF (l_debug = 'Y') THEN
1542: okc_debug.log('4200: Leaving validate_row:OTHERS Exception', 2);
1543: okc_debug.Reset_Indentation;
1544: END IF;
1545:
1546: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1539: WHEN OTHERS THEN
1540:
1541: IF (l_debug = 'Y') THEN
1542: okc_debug.log('4200: Leaving validate_row:OTHERS Exception', 2);
1543: okc_debug.Reset_Indentation;
1544: END IF;
1545:
1546: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1547: (
1571: i NUMBER := 0;
1572: BEGIN
1573:
1574: IF (l_debug = 'Y') THEN
1575: okc_debug.Set_Indentation('OKC_CAT_PVT');
1576: okc_debug.log('4300: Entered validate_row', 2);
1577: END IF;
1578:
1579: OKC_API.init_msg_list(p_init_msg_list);
1572: BEGIN
1573:
1574: IF (l_debug = 'Y') THEN
1575: okc_debug.Set_Indentation('OKC_CAT_PVT');
1576: okc_debug.log('4300: Entered validate_row', 2);
1577: END IF;
1578:
1579: OKC_API.init_msg_list(p_init_msg_list);
1580: -- Make sure PL/SQL table has records in it before passing
1593: END LOOP;
1594: END IF;
1595:
1596: IF (l_debug = 'Y') THEN
1597: okc_debug.log('4400: Leaving validate_row', 2);
1598: okc_debug.Reset_Indentation;
1599: END IF;
1600:
1601: EXCEPTION
1594: END IF;
1595:
1596: IF (l_debug = 'Y') THEN
1597: okc_debug.log('4400: Leaving validate_row', 2);
1598: okc_debug.Reset_Indentation;
1599: END IF;
1600:
1601: EXCEPTION
1602: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1601: EXCEPTION
1602: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1603:
1604: IF (l_debug = 'Y') THEN
1605: okc_debug.log('4500: Leaving validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1606: okc_debug.Reset_Indentation;
1607: END IF;
1608:
1609: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1602: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1603:
1604: IF (l_debug = 'Y') THEN
1605: okc_debug.log('4500: Leaving validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1606: okc_debug.Reset_Indentation;
1607: END IF;
1608:
1609: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1610: (
1617: );
1618: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1619:
1620: IF (l_debug = 'Y') THEN
1621: okc_debug.log('4600: Leaving validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1622: okc_debug.Reset_Indentation;
1623: END IF;
1624:
1625: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1618: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1619:
1620: IF (l_debug = 'Y') THEN
1621: okc_debug.log('4600: Leaving validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1622: okc_debug.Reset_Indentation;
1623: END IF;
1624:
1625: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1626: (
1633: );
1634: WHEN OTHERS THEN
1635:
1636: IF (l_debug = 'Y') THEN
1637: okc_debug.log('4700: Leaving validate_row:OTHERS Exception', 2);
1638: okc_debug.Reset_Indentation;
1639: END IF;
1640:
1641: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1634: WHEN OTHERS THEN
1635:
1636: IF (l_debug = 'Y') THEN
1637: okc_debug.log('4700: Leaving validate_row:OTHERS Exception', 2);
1638: okc_debug.Reset_Indentation;
1639: END IF;
1640:
1641: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1642: (
1685: END Set_Attributes;
1686: BEGIN
1687:
1688: IF (l_debug = 'Y') THEN
1689: okc_debug.Set_Indentation('OKC_CAT_PVT');
1690: okc_debug.log('4800: Entered insert_row', 2);
1691: END IF;
1692:
1693: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1686: BEGIN
1687:
1688: IF (l_debug = 'Y') THEN
1689: okc_debug.Set_Indentation('OKC_CAT_PVT');
1690: okc_debug.log('4800: Entered insert_row', 2);
1691: END IF;
1692:
1693: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1694: p_init_msg_list,
1777: x_cat_rec := l_cat_rec;
1778: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1779:
1780: IF (l_debug = 'Y') THEN
1781: okc_debug.log('4900: Leaving insert_row', 2);
1782: okc_debug.Reset_Indentation;
1783: END IF;
1784:
1785: EXCEPTION
1778: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1779:
1780: IF (l_debug = 'Y') THEN
1781: okc_debug.log('4900: Leaving insert_row', 2);
1782: okc_debug.Reset_Indentation;
1783: END IF;
1784:
1785: EXCEPTION
1786: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1785: EXCEPTION
1786: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1787:
1788: IF (l_debug = 'Y') THEN
1789: okc_debug.log('5000: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1790: okc_debug.Reset_Indentation;
1791: END IF;
1792:
1793: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1786: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1787:
1788: IF (l_debug = 'Y') THEN
1789: okc_debug.log('5000: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1790: okc_debug.Reset_Indentation;
1791: END IF;
1792:
1793: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1794: (
1801: );
1802: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1803:
1804: IF (l_debug = 'Y') THEN
1805: okc_debug.log('5100: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1806: okc_debug.Reset_Indentation;
1807: END IF;
1808:
1809: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1802: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1803:
1804: IF (l_debug = 'Y') THEN
1805: okc_debug.log('5100: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1806: okc_debug.Reset_Indentation;
1807: END IF;
1808:
1809: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1810: (
1817: );
1818: WHEN OTHERS THEN
1819:
1820: IF (l_debug = 'Y') THEN
1821: okc_debug.log('5200: Leaving insert_row:OTHERS Exception', 2);
1822: okc_debug.Reset_Indentation;
1823: END IF;
1824:
1825: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1818: WHEN OTHERS THEN
1819:
1820: IF (l_debug = 'Y') THEN
1821: okc_debug.log('5200: Leaving insert_row:OTHERS Exception', 2);
1822: okc_debug.Reset_Indentation;
1823: END IF;
1824:
1825: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1826: (
1871: END Set_Attributes;
1872: BEGIN
1873:
1874: IF (l_debug = 'Y') THEN
1875: okc_debug.Set_Indentation('OKC_CAT_PVT');
1876: okc_debug.log('5300: Entered insert_row', 2);
1877: END IF;
1878:
1879: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1872: BEGIN
1873:
1874: IF (l_debug = 'Y') THEN
1875: okc_debug.Set_Indentation('OKC_CAT_PVT');
1876: okc_debug.log('5300: Entered insert_row', 2);
1877: END IF;
1878:
1879: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1880: p_init_msg_list,
1934: x_okc_k_articles_tl_rec := l_okc_k_articles_tl_rec;
1935: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1936:
1937: IF (l_debug = 'Y') THEN
1938: okc_debug.log('5400: Leaving insert_row', 2);
1939: okc_debug.Reset_Indentation;
1940: END IF;
1941:
1942: EXCEPTION
1935: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1936:
1937: IF (l_debug = 'Y') THEN
1938: okc_debug.log('5400: Leaving insert_row', 2);
1939: okc_debug.Reset_Indentation;
1940: END IF;
1941:
1942: EXCEPTION
1943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1942: EXCEPTION
1943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1944:
1945: IF (l_debug = 'Y') THEN
1946: okc_debug.log('5500: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1947: okc_debug.Reset_Indentation;
1948: END IF;
1949:
1950: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1944:
1945: IF (l_debug = 'Y') THEN
1946: okc_debug.log('5500: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1947: okc_debug.Reset_Indentation;
1948: END IF;
1949:
1950: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1951: (
1958: );
1959: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1960:
1961: IF (l_debug = 'Y') THEN
1962: okc_debug.log('5600: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1963: okc_debug.Reset_Indentation;
1964: END IF;
1965:
1966: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1959: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1960:
1961: IF (l_debug = 'Y') THEN
1962: okc_debug.log('5600: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1963: okc_debug.Reset_Indentation;
1964: END IF;
1965:
1966: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1967: (
1974: );
1975: WHEN OTHERS THEN
1976:
1977: IF (l_debug = 'Y') THEN
1978: okc_debug.log('5700: Leaving insert_row:OTHERS Exception', 2);
1979: okc_debug.Reset_Indentation;
1980: END IF;
1981:
1982: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1975: WHEN OTHERS THEN
1976:
1977: IF (l_debug = 'Y') THEN
1978: okc_debug.log('5700: Leaving insert_row:OTHERS Exception', 2);
1979: okc_debug.Reset_Indentation;
1980: END IF;
1981:
1982: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1983: (
2020: l_catv_rec catv_rec_type := p_catv_rec;
2021: BEGIN
2022:
2023: IF (l_debug = 'Y') THEN
2024: okc_debug.Set_Indentation('OKC_CAT_PVT');
2025: okc_debug.log('5800: Entered fill_who_columns', 2);
2026: END IF;
2027:
2028: l_catv_rec.CREATION_DATE := SYSDATE;
2021: BEGIN
2022:
2023: IF (l_debug = 'Y') THEN
2024: okc_debug.Set_Indentation('OKC_CAT_PVT');
2025: okc_debug.log('5800: Entered fill_who_columns', 2);
2026: END IF;
2027:
2028: l_catv_rec.CREATION_DATE := SYSDATE;
2029: l_catv_rec.CREATED_BY := FND_GLOBAL.USER_ID;
2031: l_catv_rec.LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
2032: l_catv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
2033:
2034: IF (l_debug = 'Y') THEN
2035: okc_debug.log('5900: Leaving fill_who_columns ', 2);
2036: okc_debug.Reset_Indentation;
2037: END IF;
2038:
2039: RETURN(l_catv_rec);
2032: l_catv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
2033:
2034: IF (l_debug = 'Y') THEN
2035: okc_debug.log('5900: Leaving fill_who_columns ', 2);
2036: okc_debug.Reset_Indentation;
2037: END IF;
2038:
2039: RETURN(l_catv_rec);
2040:
2062: END Set_Attributes;
2063: BEGIN
2064:
2065: IF (l_debug = 'Y') THEN
2066: okc_debug.Set_Indentation('OKC_CAT_PVT');
2067: okc_debug.log('6000: Entered insert_row', 2);
2068: END IF;
2069:
2070: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2063: BEGIN
2064:
2065: IF (l_debug = 'Y') THEN
2066: okc_debug.Set_Indentation('OKC_CAT_PVT');
2067: okc_debug.log('6000: Entered insert_row', 2);
2068: END IF;
2069:
2070: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2071: G_PKG_NAME,
2147: x_catv_rec := l_def_catv_rec;
2148: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2149:
2150: IF (l_debug = 'Y') THEN
2151: okc_debug.log('6050: Leaving insert_row', 2);
2152: okc_debug.Reset_Indentation;
2153: END IF;
2154:
2155: EXCEPTION
2148: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2149:
2150: IF (l_debug = 'Y') THEN
2151: okc_debug.log('6050: Leaving insert_row', 2);
2152: okc_debug.Reset_Indentation;
2153: END IF;
2154:
2155: EXCEPTION
2156: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2155: EXCEPTION
2156: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2157:
2158: IF (l_debug = 'Y') THEN
2159: okc_debug.log('6100: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2160: okc_debug.Reset_Indentation;
2161: END IF;
2162:
2163: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2156: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2157:
2158: IF (l_debug = 'Y') THEN
2159: okc_debug.log('6100: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2160: okc_debug.Reset_Indentation;
2161: END IF;
2162:
2163: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2164: (
2171: );
2172: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2173:
2174: IF (l_debug = 'Y') THEN
2175: okc_debug.log('6200: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2176: okc_debug.Reset_Indentation;
2177: END IF;
2178:
2179: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2172: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2173:
2174: IF (l_debug = 'Y') THEN
2175: okc_debug.log('6200: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2176: okc_debug.Reset_Indentation;
2177: END IF;
2178:
2179: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2180: (
2187: );
2188: WHEN OTHERS THEN
2189:
2190: IF (l_debug = 'Y') THEN
2191: okc_debug.log('6300: Leaving insert_row:OTHERS Exception', 2);
2192: okc_debug.Reset_Indentation;
2193: END IF;
2194:
2195: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2188: WHEN OTHERS THEN
2189:
2190: IF (l_debug = 'Y') THEN
2191: okc_debug.log('6300: Leaving insert_row:OTHERS Exception', 2);
2192: okc_debug.Reset_Indentation;
2193: END IF;
2194:
2195: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2196: (
2221: i NUMBER := 0;
2222: BEGIN
2223:
2224: IF (l_debug = 'Y') THEN
2225: okc_debug.Set_Indentation('OKC_CAT_PVT');
2226: okc_debug.log('6500: Entered insert_row', 2);
2227: END IF;
2228:
2229: OKC_API.init_msg_list(p_init_msg_list);
2222: BEGIN
2223:
2224: IF (l_debug = 'Y') THEN
2225: okc_debug.Set_Indentation('OKC_CAT_PVT');
2226: okc_debug.log('6500: Entered insert_row', 2);
2227: END IF;
2228:
2229: OKC_API.init_msg_list(p_init_msg_list);
2230: -- Make sure PL/SQL table has records in it before passing
2244: END LOOP;
2245: END IF;
2246:
2247: IF (l_debug = 'Y') THEN
2248: okc_debug.log('6550: Leaving insert_row', 2);
2249: okc_debug.Reset_Indentation;
2250: END IF;
2251:
2252: EXCEPTION
2245: END IF;
2246:
2247: IF (l_debug = 'Y') THEN
2248: okc_debug.log('6550: Leaving insert_row', 2);
2249: okc_debug.Reset_Indentation;
2250: END IF;
2251:
2252: EXCEPTION
2253: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2252: EXCEPTION
2253: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2254:
2255: IF (l_debug = 'Y') THEN
2256: okc_debug.log('6600: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2257: okc_debug.Reset_Indentation;
2258: END IF;
2259:
2260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2253: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2254:
2255: IF (l_debug = 'Y') THEN
2256: okc_debug.log('6600: Leaving insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2257: okc_debug.Reset_Indentation;
2258: END IF;
2259:
2260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2261: (
2268: );
2269: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2270:
2271: IF (l_debug = 'Y') THEN
2272: okc_debug.log('6700: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2273: okc_debug.Reset_Indentation;
2274: END IF;
2275:
2276: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2269: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2270:
2271: IF (l_debug = 'Y') THEN
2272: okc_debug.log('6700: Leaving insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2273: okc_debug.Reset_Indentation;
2274: END IF;
2275:
2276: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2277: (
2284: );
2285: WHEN OTHERS THEN
2286:
2287: IF (l_debug = 'Y') THEN
2288: okc_debug.log('6800: Leaving insert_row:OTHERS Exception', 2);
2289: okc_debug.Reset_Indentation;
2290: END IF;
2291:
2292: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2285: WHEN OTHERS THEN
2286:
2287: IF (l_debug = 'Y') THEN
2288: okc_debug.log('6800: Leaving insert_row:OTHERS Exception', 2);
2289: okc_debug.Reset_Indentation;
2290: END IF;
2291:
2292: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2293: (
2336: lc_row_notfound BOOLEAN := FALSE;
2337: BEGIN
2338:
2339: IF (l_debug = 'Y') THEN
2340: okc_debug.Set_Indentation('OKC_CAT_PVT');
2341: okc_debug.log('7000: Entered lock_row', 2);
2342: END IF;
2343:
2344: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2337: BEGIN
2338:
2339: IF (l_debug = 'Y') THEN
2340: okc_debug.Set_Indentation('OKC_CAT_PVT');
2341: okc_debug.log('7000: Entered lock_row', 2);
2342: END IF;
2343:
2344: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2345: p_init_msg_list,
2360: EXCEPTION
2361: WHEN E_Resource_Busy THEN
2362:
2363: IF (l_debug = 'Y') THEN
2364: okc_debug.log('7100: Leaving lock_row:E_Resource_Busy Exception', 2);
2365: okc_debug.Reset_Indentation;
2366: END IF;
2367:
2368: IF (lock_csr%ISOPEN) THEN
2361: WHEN E_Resource_Busy THEN
2362:
2363: IF (l_debug = 'Y') THEN
2364: okc_debug.log('7100: Leaving lock_row:E_Resource_Busy Exception', 2);
2365: okc_debug.Reset_Indentation;
2366: END IF;
2367:
2368: IF (lock_csr%ISOPEN) THEN
2369: CLOSE lock_csr;
2393: END IF;
2394: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2395:
2396: IF (l_debug = 'Y') THEN
2397: okc_debug.log('7150: Leaving lock_row', 2);
2398: okc_debug.Reset_Indentation;
2399: END IF;
2400:
2401: EXCEPTION
2394: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2395:
2396: IF (l_debug = 'Y') THEN
2397: okc_debug.log('7150: Leaving lock_row', 2);
2398: okc_debug.Reset_Indentation;
2399: END IF;
2400:
2401: EXCEPTION
2402: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2401: EXCEPTION
2402: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2403:
2404: IF (l_debug = 'Y') THEN
2405: okc_debug.log('7200: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2406: okc_debug.Reset_Indentation;
2407: END IF;
2408:
2409: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2402: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2403:
2404: IF (l_debug = 'Y') THEN
2405: okc_debug.log('7200: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2406: okc_debug.Reset_Indentation;
2407: END IF;
2408:
2409: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2410: (
2417: );
2418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2419:
2420: IF (l_debug = 'Y') THEN
2421: okc_debug.log('7300: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2422: okc_debug.Reset_Indentation;
2423: END IF;
2424:
2425: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2418: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2419:
2420: IF (l_debug = 'Y') THEN
2421: okc_debug.log('7300: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2422: okc_debug.Reset_Indentation;
2423: END IF;
2424:
2425: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2426: (
2433: );
2434: WHEN OTHERS THEN
2435:
2436: IF (l_debug = 'Y') THEN
2437: okc_debug.log('7400: Leaving lock_row:OTHERS Exception', 2);
2438: okc_debug.Reset_Indentation;
2439: END IF;
2440:
2441: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2434: WHEN OTHERS THEN
2435:
2436: IF (l_debug = 'Y') THEN
2437: okc_debug.log('7400: Leaving lock_row:OTHERS Exception', 2);
2438: okc_debug.Reset_Indentation;
2439: END IF;
2440:
2441: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2442: (
2475: lc_row_notfound BOOLEAN := FALSE;
2476: BEGIN
2477:
2478: IF (l_debug = 'Y') THEN
2479: okc_debug.Set_Indentation('OKC_CAT_PVT');
2480: okc_debug.log('8000: Entered lock_row', 2);
2481: END IF;
2482:
2483: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2476: BEGIN
2477:
2478: IF (l_debug = 'Y') THEN
2479: okc_debug.Set_Indentation('OKC_CAT_PVT');
2480: okc_debug.log('8000: Entered lock_row', 2);
2481: END IF;
2482:
2483: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2484: p_init_msg_list,
2496: l_row_notfound := lock_csr%NOTFOUND;
2497: CLOSE lock_csr;
2498:
2499: IF (l_debug = 'Y') THEN
2500: okc_debug.log('8100: Leaving lock_row', 2);
2501: okc_debug.Reset_Indentation;
2502: END IF;
2503:
2504: EXCEPTION
2497: CLOSE lock_csr;
2498:
2499: IF (l_debug = 'Y') THEN
2500: okc_debug.log('8100: Leaving lock_row', 2);
2501: okc_debug.Reset_Indentation;
2502: END IF;
2503:
2504: EXCEPTION
2505: WHEN E_Resource_Busy THEN
2504: EXCEPTION
2505: WHEN E_Resource_Busy THEN
2506:
2507: IF (l_debug = 'Y') THEN
2508: okc_debug.log('8200: Leaving lock_row:E_Resource_Busy Exception', 2);
2509: okc_debug.Reset_Indentation;
2510: END IF;
2511:
2512: IF (lock_csr%ISOPEN) THEN
2505: WHEN E_Resource_Busy THEN
2506:
2507: IF (l_debug = 'Y') THEN
2508: okc_debug.log('8200: Leaving lock_row:E_Resource_Busy Exception', 2);
2509: okc_debug.Reset_Indentation;
2510: END IF;
2511:
2512: IF (lock_csr%ISOPEN) THEN
2513: CLOSE lock_csr;
2522: END IF;
2523: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2524:
2525: IF (l_debug = 'Y') THEN
2526: okc_debug.log('8300: Leaving lock_row', 2);
2527: okc_debug.Reset_Indentation;
2528: END IF;
2529:
2530: EXCEPTION
2523: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2524:
2525: IF (l_debug = 'Y') THEN
2526: okc_debug.log('8300: Leaving lock_row', 2);
2527: okc_debug.Reset_Indentation;
2528: END IF;
2529:
2530: EXCEPTION
2531: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2530: EXCEPTION
2531: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2532:
2533: IF (l_debug = 'Y') THEN
2534: okc_debug.log('8400: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2535: okc_debug.Reset_Indentation;
2536: END IF;
2537:
2538: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2531: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2532:
2533: IF (l_debug = 'Y') THEN
2534: okc_debug.log('8400: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2535: okc_debug.Reset_Indentation;
2536: END IF;
2537:
2538: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2539: (
2546: );
2547: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2548:
2549: IF (l_debug = 'Y') THEN
2550: okc_debug.log('8500: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2551: okc_debug.Reset_Indentation;
2552: END IF;
2553:
2554: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2547: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2548:
2549: IF (l_debug = 'Y') THEN
2550: okc_debug.log('8500: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2551: okc_debug.Reset_Indentation;
2552: END IF;
2553:
2554: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2555: (
2562: );
2563: WHEN OTHERS THEN
2564:
2565: IF (l_debug = 'Y') THEN
2566: okc_debug.log('8600: Leaving lock_row:OTHERS Exception', 2);
2567: okc_debug.Reset_Indentation;
2568: END IF;
2569:
2570: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2563: WHEN OTHERS THEN
2564:
2565: IF (l_debug = 'Y') THEN
2566: okc_debug.log('8600: Leaving lock_row:OTHERS Exception', 2);
2567: okc_debug.Reset_Indentation;
2568: END IF;
2569:
2570: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2571: (
2596: l_okc_k_articles_tl_rec okc_k_articles_tl_rec_type;
2597: BEGIN
2598:
2599: IF (l_debug = 'Y') THEN
2600: okc_debug.Set_Indentation('OKC_CAT_PVT');
2601: okc_debug.log('8700: Entered lock_row', 2);
2602: END IF;
2603:
2604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2597: BEGIN
2598:
2599: IF (l_debug = 'Y') THEN
2600: okc_debug.Set_Indentation('OKC_CAT_PVT');
2601: okc_debug.log('8700: Entered lock_row', 2);
2602: END IF;
2603:
2604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2605: G_PKG_NAME,
2647: END IF;
2648: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2649:
2650: IF (l_debug = 'Y') THEN
2651: okc_debug.log('8800: Leaving lock_row', 2);
2652: okc_debug.Reset_Indentation;
2653: END IF;
2654:
2655: EXCEPTION
2648: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2649:
2650: IF (l_debug = 'Y') THEN
2651: okc_debug.log('8800: Leaving lock_row', 2);
2652: okc_debug.Reset_Indentation;
2653: END IF;
2654:
2655: EXCEPTION
2656: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2655: EXCEPTION
2656: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2657:
2658: IF (l_debug = 'Y') THEN
2659: okc_debug.log('8900: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2660: okc_debug.Reset_Indentation;
2661: END IF;
2662:
2663: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2656: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2657:
2658: IF (l_debug = 'Y') THEN
2659: okc_debug.log('8900: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2660: okc_debug.Reset_Indentation;
2661: END IF;
2662:
2663: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2664: (
2671: );
2672: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2673:
2674: IF (l_debug = 'Y') THEN
2675: okc_debug.log('9000: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2676: okc_debug.Reset_Indentation;
2677: END IF;
2678:
2679: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2672: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2673:
2674: IF (l_debug = 'Y') THEN
2675: okc_debug.log('9000: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2676: okc_debug.Reset_Indentation;
2677: END IF;
2678:
2679: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2680: (
2687: );
2688: WHEN OTHERS THEN
2689:
2690: IF (l_debug = 'Y') THEN
2691: okc_debug.log('9100: Leaving lock_row:OTHERS Exception', 2);
2692: okc_debug.Reset_Indentation;
2693: END IF;
2694:
2695: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2688: WHEN OTHERS THEN
2689:
2690: IF (l_debug = 'Y') THEN
2691: okc_debug.log('9100: Leaving lock_row:OTHERS Exception', 2);
2692: okc_debug.Reset_Indentation;
2693: END IF;
2694:
2695: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2696: (
2720: i NUMBER := 0;
2721: BEGIN
2722:
2723: IF (l_debug = 'Y') THEN
2724: okc_debug.Set_Indentation('OKC_CAT_PVT');
2725: okc_debug.log('9400: Entered lock_row', 2);
2726: END IF;
2727:
2728: OKC_API.init_msg_list(p_init_msg_list);
2721: BEGIN
2722:
2723: IF (l_debug = 'Y') THEN
2724: okc_debug.Set_Indentation('OKC_CAT_PVT');
2725: okc_debug.log('9400: Entered lock_row', 2);
2726: END IF;
2727:
2728: OKC_API.init_msg_list(p_init_msg_list);
2729: -- Make sure PL/SQL table has records in it before passing
2742: END LOOP;
2743: END IF;
2744:
2745: IF (l_debug = 'Y') THEN
2746: okc_debug.log('9500: Leaving lock_row', 2);
2747: okc_debug.Reset_Indentation;
2748: END IF;
2749:
2750: EXCEPTION
2743: END IF;
2744:
2745: IF (l_debug = 'Y') THEN
2746: okc_debug.log('9500: Leaving lock_row', 2);
2747: okc_debug.Reset_Indentation;
2748: END IF;
2749:
2750: EXCEPTION
2751: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2750: EXCEPTION
2751: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2752:
2753: IF (l_debug = 'Y') THEN
2754: okc_debug.log('9600: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2755: okc_debug.Reset_Indentation;
2756: END IF;
2757:
2758: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2751: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2752:
2753: IF (l_debug = 'Y') THEN
2754: okc_debug.log('9600: Leaving lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2755: okc_debug.Reset_Indentation;
2756: END IF;
2757:
2758: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2759: (
2766: );
2767: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2768:
2769: IF (l_debug = 'Y') THEN
2770: okc_debug.log('9700: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2771: okc_debug.Reset_Indentation;
2772: END IF;
2773:
2774: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2767: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2768:
2769: IF (l_debug = 'Y') THEN
2770: okc_debug.log('9700: Leaving lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2771: okc_debug.Reset_Indentation;
2772: END IF;
2773:
2774: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2775: (
2782: );
2783: WHEN OTHERS THEN
2784:
2785: IF (l_debug = 'Y') THEN
2786: okc_debug.log('9800: Leaving lock_row:OTHERS Exception', 2);
2787: okc_debug.Reset_Indentation;
2788: END IF;
2789:
2790: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2783: WHEN OTHERS THEN
2784:
2785: IF (l_debug = 'Y') THEN
2786: okc_debug.log('9800: Leaving lock_row:OTHERS Exception', 2);
2787: okc_debug.Reset_Indentation;
2788: END IF;
2789:
2790: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2791: (
2831: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2832: BEGIN
2833:
2834: IF (l_debug = 'Y') THEN
2835: okc_debug.Set_Indentation('OKC_CAT_PVT');
2836: okc_debug.log('9900: Entered populate_new_record', 2);
2837: END IF;
2838:
2839: x_cat_rec := p_cat_rec;
2832: BEGIN
2833:
2834: IF (l_debug = 'Y') THEN
2835: okc_debug.Set_Indentation('OKC_CAT_PVT');
2836: okc_debug.log('9900: Entered populate_new_record', 2);
2837: END IF;
2838:
2839: x_cat_rec := p_cat_rec;
2840: -- Get current database values
2967: x_cat_rec.attribute15 := l_cat_rec.attribute15;
2968: END IF;
2969:
2970: IF (l_debug = 'Y') THEN
2971: okc_debug.log('10000: Leaving populate_new_record ', 2);
2972: okc_debug.Reset_Indentation;
2973: END IF;
2974:
2975: RETURN(l_return_status);
2968: END IF;
2969:
2970: IF (l_debug = 'Y') THEN
2971: okc_debug.log('10000: Leaving populate_new_record ', 2);
2972: okc_debug.Reset_Indentation;
2973: END IF;
2974:
2975: RETURN(l_return_status);
2976:
2991: END Set_Attributes;
2992: BEGIN
2993:
2994: IF (l_debug = 'Y') THEN
2995: okc_debug.Set_Indentation('OKC_CAT_PVT');
2996: okc_debug.log('10100: Entered update_row', 2);
2997: END IF;
2998:
2999: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2992: BEGIN
2993:
2994: IF (l_debug = 'Y') THEN
2995: okc_debug.Set_Indentation('OKC_CAT_PVT');
2996: okc_debug.log('10100: Entered update_row', 2);
2997: END IF;
2998:
2999: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3000: p_init_msg_list,
3057: x_cat_rec := l_def_cat_rec;
3058: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3059:
3060: IF (l_debug = 'Y') THEN
3061: okc_debug.log('10200: Leaving update_row', 2);
3062: okc_debug.Reset_Indentation;
3063: END IF;
3064:
3065: EXCEPTION
3058: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3059:
3060: IF (l_debug = 'Y') THEN
3061: okc_debug.log('10200: Leaving update_row', 2);
3062: okc_debug.Reset_Indentation;
3063: END IF;
3064:
3065: EXCEPTION
3066: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3065: EXCEPTION
3066: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3067:
3068: IF (l_debug = 'Y') THEN
3069: okc_debug.log('10300: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3070: okc_debug.Reset_Indentation;
3071: END IF;
3072:
3073: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3066: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3067:
3068: IF (l_debug = 'Y') THEN
3069: okc_debug.log('10300: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3070: okc_debug.Reset_Indentation;
3071: END IF;
3072:
3073: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3074: (
3081: );
3082: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3083:
3084: IF (l_debug = 'Y') THEN
3085: okc_debug.log('10400: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3086: okc_debug.Reset_Indentation;
3087: END IF;
3088:
3089: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3082: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3083:
3084: IF (l_debug = 'Y') THEN
3085: okc_debug.log('10400: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3086: okc_debug.Reset_Indentation;
3087: END IF;
3088:
3089: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3090: (
3097: );
3098: WHEN OTHERS THEN
3099:
3100: IF (l_debug = 'Y') THEN
3101: okc_debug.log('10500: Leaving update_row:OTHERS Exception', 2);
3102: okc_debug.Reset_Indentation;
3103: END IF;
3104:
3105: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3098: WHEN OTHERS THEN
3099:
3100: IF (l_debug = 'Y') THEN
3101: okc_debug.log('10500: Leaving update_row:OTHERS Exception', 2);
3102: okc_debug.Reset_Indentation;
3103: END IF;
3104:
3105: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3106: (
3142: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3143: BEGIN
3144:
3145: IF (l_debug = 'Y') THEN
3146: okc_debug.Set_Indentation('OKC_CAT_PVT');
3147: okc_debug.log('10500: Entered populate_new_record', 2);
3148: END IF;
3149:
3150: x_okc_k_articles_tl_rec := p_okc_k_articles_tl_rec;
3143: BEGIN
3144:
3145: IF (l_debug = 'Y') THEN
3146: okc_debug.Set_Indentation('OKC_CAT_PVT');
3147: okc_debug.log('10500: Entered populate_new_record', 2);
3148: END IF;
3149:
3150: x_okc_k_articles_tl_rec := p_okc_k_articles_tl_rec;
3151: -- Get current database values
3218: x_okc_k_articles_tl_rec.sav_sav_release := l_okc_k_articles_tl_rec.sav_sav_release;
3219: END IF;
3220:
3221: IF (l_debug = 'Y') THEN
3222: okc_debug.log('10650: Leaving update_row', 2);
3223: okc_debug.Reset_Indentation;
3224: END IF;
3225:
3226: RETURN(l_return_status);
3219: END IF;
3220:
3221: IF (l_debug = 'Y') THEN
3222: okc_debug.log('10650: Leaving update_row', 2);
3223: okc_debug.Reset_Indentation;
3224: END IF;
3225:
3226: RETURN(l_return_status);
3227:
3244: END Set_Attributes;
3245: BEGIN
3246:
3247: IF (l_debug = 'Y') THEN
3248: okc_debug.Set_Indentation('OKC_CAT_PVT');
3249: okc_debug.log('10700: Entered update_row', 2);
3250: END IF;
3251:
3252: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3245: BEGIN
3246:
3247: IF (l_debug = 'Y') THEN
3248: okc_debug.Set_Indentation('OKC_CAT_PVT');
3249: okc_debug.log('10700: Entered update_row', 2);
3250: END IF;
3251:
3252: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3253: p_init_msg_list,
3303: x_okc_k_articles_tl_rec := l_def_okc_k_articles_tl_rec;
3304: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3305:
3306: IF (l_debug = 'Y') THEN
3307: okc_debug.log('10750: Leaving update_row', 2);
3308: okc_debug.Reset_Indentation;
3309: END IF;
3310:
3311: EXCEPTION
3304: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3305:
3306: IF (l_debug = 'Y') THEN
3307: okc_debug.log('10750: Leaving update_row', 2);
3308: okc_debug.Reset_Indentation;
3309: END IF;
3310:
3311: EXCEPTION
3312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3311: EXCEPTION
3312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3313:
3314: IF (l_debug = 'Y') THEN
3315: okc_debug.log('10800: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3316: okc_debug.Reset_Indentation;
3317: END IF;
3318:
3319: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3312: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3313:
3314: IF (l_debug = 'Y') THEN
3315: okc_debug.log('10800: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3316: okc_debug.Reset_Indentation;
3317: END IF;
3318:
3319: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3320: (
3327: );
3328: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3329:
3330: IF (l_debug = 'Y') THEN
3331: okc_debug.log('10900: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3332: okc_debug.Reset_Indentation;
3333: END IF;
3334:
3335: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3328: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3329:
3330: IF (l_debug = 'Y') THEN
3331: okc_debug.log('10900: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3332: okc_debug.Reset_Indentation;
3333: END IF;
3334:
3335: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3336: (
3343: );
3344: WHEN OTHERS THEN
3345:
3346: IF (l_debug = 'Y') THEN
3347: okc_debug.log('11000: Leaving update_row:OTHERS Exception', 2);
3348: okc_debug.Reset_Indentation;
3349: END IF;
3350:
3351: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3344: WHEN OTHERS THEN
3345:
3346: IF (l_debug = 'Y') THEN
3347: okc_debug.log('11000: Leaving update_row:OTHERS Exception', 2);
3348: okc_debug.Reset_Indentation;
3349: END IF;
3350:
3351: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3352: (
3407: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3408: BEGIN
3409:
3410: IF (l_debug = 'Y') THEN
3411: okc_debug.Set_Indentation('OKC_CAT_PVT');
3412: okc_debug.log('11300: Entered populate_new_record', 2);
3413: END IF;
3414:
3415: x_catv_rec := p_catv_rec;
3408: BEGIN
3409:
3410: IF (l_debug = 'Y') THEN
3411: okc_debug.Set_Indentation('OKC_CAT_PVT');
3412: okc_debug.log('11300: Entered populate_new_record', 2);
3413: END IF;
3414:
3415: x_catv_rec := p_catv_rec;
3416: -- Get current database values
3571: x_catv_rec.last_update_login := l_catv_rec.last_update_login;
3572: END IF;
3573:
3574: IF (l_debug = 'Y') THEN
3575: okc_debug.log('11400: Leaving populate_new_record ', 2);
3576: okc_debug.Reset_Indentation;
3577: END IF;
3578:
3579: RETURN(l_return_status);
3572: END IF;
3573:
3574: IF (l_debug = 'Y') THEN
3575: okc_debug.log('11400: Leaving populate_new_record ', 2);
3576: okc_debug.Reset_Indentation;
3577: END IF;
3578:
3579: RETURN(l_return_status);
3580:
3596: END Set_Attributes;
3597: BEGIN
3598:
3599: IF (l_debug = 'Y') THEN
3600: okc_debug.Set_Indentation('OKC_CAT_PVT');
3601: okc_debug.log('11500: Entered update_row', 2);
3602: END IF;
3603:
3604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3597: BEGIN
3598:
3599: IF (l_debug = 'Y') THEN
3600: okc_debug.Set_Indentation('OKC_CAT_PVT');
3601: okc_debug.log('11500: Entered update_row', 2);
3602: END IF;
3603:
3604: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3605: G_PKG_NAME,
3684: x_catv_rec := l_def_catv_rec;
3685: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3686:
3687: IF (l_debug = 'Y') THEN
3688: okc_debug.log('11600: Leaving update_row', 2);
3689: okc_debug.Reset_Indentation;
3690: END IF;
3691:
3692: EXCEPTION
3685: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3686:
3687: IF (l_debug = 'Y') THEN
3688: okc_debug.log('11600: Leaving update_row', 2);
3689: okc_debug.Reset_Indentation;
3690: END IF;
3691:
3692: EXCEPTION
3693: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3692: EXCEPTION
3693: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3694:
3695: IF (l_debug = 'Y') THEN
3696: okc_debug.log('11700: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3697: okc_debug.Reset_Indentation;
3698: END IF;
3699:
3700: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3693: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3694:
3695: IF (l_debug = 'Y') THEN
3696: okc_debug.log('11700: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3697: okc_debug.Reset_Indentation;
3698: END IF;
3699:
3700: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3701: (
3708: );
3709: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3710:
3711: IF (l_debug = 'Y') THEN
3712: okc_debug.log('11800: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3713: okc_debug.Reset_Indentation;
3714: END IF;
3715:
3716: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3709: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3710:
3711: IF (l_debug = 'Y') THEN
3712: okc_debug.log('11800: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3713: okc_debug.Reset_Indentation;
3714: END IF;
3715:
3716: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3717: (
3724: );
3725: WHEN OTHERS THEN
3726:
3727: IF (l_debug = 'Y') THEN
3728: okc_debug.log('11900: Leaving update_row:OTHERS Exception', 2);
3729: okc_debug.Reset_Indentation;
3730: END IF;
3731:
3732: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3725: WHEN OTHERS THEN
3726:
3727: IF (l_debug = 'Y') THEN
3728: okc_debug.log('11900: Leaving update_row:OTHERS Exception', 2);
3729: okc_debug.Reset_Indentation;
3730: END IF;
3731:
3732: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3733: (
3758: i NUMBER := 0;
3759: BEGIN
3760:
3761: IF (l_debug = 'Y') THEN
3762: okc_debug.Set_Indentation('OKC_CAT_PVT');
3763: okc_debug.log('12000: Entered update_row', 2);
3764: END IF;
3765:
3766: OKC_API.init_msg_list(p_init_msg_list);
3759: BEGIN
3760:
3761: IF (l_debug = 'Y') THEN
3762: okc_debug.Set_Indentation('OKC_CAT_PVT');
3763: okc_debug.log('12000: Entered update_row', 2);
3764: END IF;
3765:
3766: OKC_API.init_msg_list(p_init_msg_list);
3767: -- Make sure PL/SQL table has records in it before passing
3781: END LOOP;
3782: END IF;
3783:
3784: IF (l_debug = 'Y') THEN
3785: okc_debug.log('12100: Leaving update_row', 2);
3786: okc_debug.Reset_Indentation;
3787: END IF;
3788:
3789: EXCEPTION
3782: END IF;
3783:
3784: IF (l_debug = 'Y') THEN
3785: okc_debug.log('12100: Leaving update_row', 2);
3786: okc_debug.Reset_Indentation;
3787: END IF;
3788:
3789: EXCEPTION
3790: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3789: EXCEPTION
3790: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3791:
3792: IF (l_debug = 'Y') THEN
3793: okc_debug.log('12200: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3794: okc_debug.Reset_Indentation;
3795: END IF;
3796:
3797: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3790: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3791:
3792: IF (l_debug = 'Y') THEN
3793: okc_debug.log('12200: Leaving update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3794: okc_debug.Reset_Indentation;
3795: END IF;
3796:
3797: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3798: (
3805: );
3806: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3807:
3808: IF (l_debug = 'Y') THEN
3809: okc_debug.log('12300: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3810: okc_debug.Reset_Indentation;
3811: END IF;
3812:
3813: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3806: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3807:
3808: IF (l_debug = 'Y') THEN
3809: okc_debug.log('12300: Leaving update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3810: okc_debug.Reset_Indentation;
3811: END IF;
3812:
3813: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3814: (
3821: );
3822: WHEN OTHERS THEN
3823:
3824: IF (l_debug = 'Y') THEN
3825: okc_debug.log('12400: Leaving update_row:OTHERS Exception', 2);
3826: okc_debug.Reset_Indentation;
3827: END IF;
3828:
3829: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3822: WHEN OTHERS THEN
3823:
3824: IF (l_debug = 'Y') THEN
3825: okc_debug.log('12400: Leaving update_row:OTHERS Exception', 2);
3826: okc_debug.Reset_Indentation;
3827: END IF;
3828:
3829: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3830: (
3858: l_row_notfound BOOLEAN := TRUE;
3859: BEGIN
3860:
3861: IF (l_debug = 'Y') THEN
3862: okc_debug.Set_Indentation('OKC_CAT_PVT');
3863: okc_debug.log('12500: Entered delete_row', 2);
3864: END IF;
3865:
3866: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3859: BEGIN
3860:
3861: IF (l_debug = 'Y') THEN
3862: okc_debug.Set_Indentation('OKC_CAT_PVT');
3863: okc_debug.log('12500: Entered delete_row', 2);
3864: END IF;
3865:
3866: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3867: p_init_msg_list,
3877:
3878: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3879:
3880: IF (l_debug = 'Y') THEN
3881: okc_debug.log('12600: Leaving delete_row', 2);
3882: okc_debug.Reset_Indentation;
3883: END IF;
3884:
3885: EXCEPTION
3878: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3879:
3880: IF (l_debug = 'Y') THEN
3881: okc_debug.log('12600: Leaving delete_row', 2);
3882: okc_debug.Reset_Indentation;
3883: END IF;
3884:
3885: EXCEPTION
3886: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3885: EXCEPTION
3886: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3887:
3888: IF (l_debug = 'Y') THEN
3889: okc_debug.log('12700: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3890: okc_debug.Reset_Indentation;
3891: END IF;
3892:
3893: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3886: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3887:
3888: IF (l_debug = 'Y') THEN
3889: okc_debug.log('12700: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3890: okc_debug.Reset_Indentation;
3891: END IF;
3892:
3893: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3894: (
3901: );
3902: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3903:
3904: IF (l_debug = 'Y') THEN
3905: okc_debug.log('12800: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3906: okc_debug.Reset_Indentation;
3907: END IF;
3908:
3909: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3902: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3903:
3904: IF (l_debug = 'Y') THEN
3905: okc_debug.log('12800: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3906: okc_debug.Reset_Indentation;
3907: END IF;
3908:
3909: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3910: (
3917: );
3918: WHEN OTHERS THEN
3919:
3920: IF (l_debug = 'Y') THEN
3921: okc_debug.log('12900: Leaving delete_row:OTHERS Exception', 2);
3922: okc_debug.Reset_Indentation;
3923: END IF;
3924:
3925: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3918: WHEN OTHERS THEN
3919:
3920: IF (l_debug = 'Y') THEN
3921: okc_debug.log('12900: Leaving delete_row:OTHERS Exception', 2);
3922: okc_debug.Reset_Indentation;
3923: END IF;
3924:
3925: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3926: (
3965: END Set_Attributes;
3966: BEGIN
3967:
3968: IF (l_debug = 'Y') THEN
3969: okc_debug.Set_Indentation('OKC_CAT_PVT');
3970: okc_debug.log('13100: Entered delete_row', 2);
3971: END IF;
3972:
3973: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3966: BEGIN
3967:
3968: IF (l_debug = 'Y') THEN
3969: okc_debug.Set_Indentation('OKC_CAT_PVT');
3970: okc_debug.log('13100: Entered delete_row', 2);
3971: END IF;
3972:
3973: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3974: p_init_msg_list,
3994:
3995: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3996:
3997: IF (l_debug = 'Y') THEN
3998: okc_debug.log('13200: Leaving delete_row', 2);
3999: okc_debug.Reset_Indentation;
4000: END IF;
4001:
4002: EXCEPTION
3995: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3996:
3997: IF (l_debug = 'Y') THEN
3998: okc_debug.log('13200: Leaving delete_row', 2);
3999: okc_debug.Reset_Indentation;
4000: END IF;
4001:
4002: EXCEPTION
4003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4002: EXCEPTION
4003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4004:
4005: IF (l_debug = 'Y') THEN
4006: okc_debug.log('13300: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
4007: okc_debug.Reset_Indentation;
4008: END IF;
4009:
4010: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4004:
4005: IF (l_debug = 'Y') THEN
4006: okc_debug.log('13300: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
4007: okc_debug.Reset_Indentation;
4008: END IF;
4009:
4010: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4011: (
4018: );
4019: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4020:
4021: IF (l_debug = 'Y') THEN
4022: okc_debug.log('13400: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
4023: okc_debug.Reset_Indentation;
4024: END IF;
4025:
4026: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4019: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4020:
4021: IF (l_debug = 'Y') THEN
4022: okc_debug.log('13400: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
4023: okc_debug.Reset_Indentation;
4024: END IF;
4025:
4026: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4027: (
4034: );
4035: WHEN OTHERS THEN
4036:
4037: IF (l_debug = 'Y') THEN
4038: okc_debug.log('13500: Leaving delete_row:OTHERS Exception', 2);
4039: okc_debug.Reset_Indentation;
4040: END IF;
4041:
4042: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4035: WHEN OTHERS THEN
4036:
4037: IF (l_debug = 'Y') THEN
4038: okc_debug.log('13500: Leaving delete_row:OTHERS Exception', 2);
4039: okc_debug.Reset_Indentation;
4040: END IF;
4041:
4042: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4043: (
4069: l_cat_rec cat_rec_type;
4070: BEGIN
4071:
4072: IF (l_debug = 'Y') THEN
4073: okc_debug.Set_Indentation('OKC_CAT_PVT');
4074: okc_debug.log('13600: Entered delete_row', 2);
4075: END IF;
4076:
4077: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4070: BEGIN
4071:
4072: IF (l_debug = 'Y') THEN
4073: okc_debug.Set_Indentation('OKC_CAT_PVT');
4074: okc_debug.log('13600: Entered delete_row', 2);
4075: END IF;
4076:
4077: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4078: G_PKG_NAME,
4120: END IF;
4121: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4122:
4123: IF (l_debug = 'Y') THEN
4124: okc_debug.log('13700: Leaving delete_row', 2);
4125: okc_debug.Reset_Indentation;
4126: END IF;
4127:
4128: EXCEPTION
4121: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4122:
4123: IF (l_debug = 'Y') THEN
4124: okc_debug.log('13700: Leaving delete_row', 2);
4125: okc_debug.Reset_Indentation;
4126: END IF;
4127:
4128: EXCEPTION
4129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4128: EXCEPTION
4129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4130:
4131: IF (l_debug = 'Y') THEN
4132: okc_debug.log('13800: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
4133: okc_debug.Reset_Indentation;
4134: END IF;
4135:
4136: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4129: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4130:
4131: IF (l_debug = 'Y') THEN
4132: okc_debug.log('13800: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
4133: okc_debug.Reset_Indentation;
4134: END IF;
4135:
4136: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4137: (
4144: );
4145: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4146:
4147: IF (l_debug = 'Y') THEN
4148: okc_debug.log('13900: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
4149: okc_debug.Reset_Indentation;
4150: END IF;
4151:
4152: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4145: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4146:
4147: IF (l_debug = 'Y') THEN
4148: okc_debug.log('13900: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
4149: okc_debug.Reset_Indentation;
4150: END IF;
4151:
4152: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4153: (
4160: );
4161: WHEN OTHERS THEN
4162:
4163: IF (l_debug = 'Y') THEN
4164: okc_debug.log('14000: Leaving delete_row:OTHERS Exception', 2);
4165: okc_debug.Reset_Indentation;
4166: END IF;
4167:
4168: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4161: WHEN OTHERS THEN
4162:
4163: IF (l_debug = 'Y') THEN
4164: okc_debug.log('14000: Leaving delete_row:OTHERS Exception', 2);
4165: okc_debug.Reset_Indentation;
4166: END IF;
4167:
4168: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4169: (
4193: i NUMBER := 0;
4194: BEGIN
4195:
4196: IF (l_debug = 'Y') THEN
4197: okc_debug.Set_Indentation('OKC_CAT_PVT');
4198: okc_debug.log('14100: Entered delete_row', 2);
4199: END IF;
4200:
4201: OKC_API.init_msg_list(p_init_msg_list);
4194: BEGIN
4195:
4196: IF (l_debug = 'Y') THEN
4197: okc_debug.Set_Indentation('OKC_CAT_PVT');
4198: okc_debug.log('14100: Entered delete_row', 2);
4199: END IF;
4200:
4201: OKC_API.init_msg_list(p_init_msg_list);
4202: -- Make sure PL/SQL table has records in it before passing
4215: END LOOP;
4216: END IF;
4217:
4218: IF (l_debug = 'Y') THEN
4219: okc_debug.log('14200: Leaving delete_row', 2);
4220: okc_debug.Reset_Indentation;
4221: END IF;
4222:
4223: EXCEPTION
4216: END IF;
4217:
4218: IF (l_debug = 'Y') THEN
4219: okc_debug.log('14200: Leaving delete_row', 2);
4220: okc_debug.Reset_Indentation;
4221: END IF;
4222:
4223: EXCEPTION
4224: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4223: EXCEPTION
4224: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4225:
4226: IF (l_debug = 'Y') THEN
4227: okc_debug.log('14300: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
4228: okc_debug.Reset_Indentation;
4229: END IF;
4230:
4231: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4224: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4225:
4226: IF (l_debug = 'Y') THEN
4227: okc_debug.log('14300: Leaving delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
4228: okc_debug.Reset_Indentation;
4229: END IF;
4230:
4231: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4232: (
4239: );
4240: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4241:
4242: IF (l_debug = 'Y') THEN
4243: okc_debug.log('14400: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
4244: okc_debug.Reset_Indentation;
4245: END IF;
4246:
4247: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4240: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4241:
4242: IF (l_debug = 'Y') THEN
4243: okc_debug.log('14400: Leaving delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
4244: okc_debug.Reset_Indentation;
4245: END IF;
4246:
4247: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4248: (
4255: );
4256: WHEN OTHERS THEN
4257:
4258: IF (l_debug = 'Y') THEN
4259: okc_debug.log('14500: Leaving delete_row:OTHERS Exception', 2);
4260: okc_debug.Reset_Indentation;
4261: END IF;
4262:
4263: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4256: WHEN OTHERS THEN
4257:
4258: IF (l_debug = 'Y') THEN
4259: okc_debug.log('14500: Leaving delete_row:OTHERS Exception', 2);
4260: okc_debug.Reset_Indentation;
4261: END IF;
4262:
4263: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
4264: (
4321: BEGIN
4322: x_return_status := OKC_API.G_RET_STS_SUCCESS;
4323: -- Initializing Return status
4324: IF (l_debug = 'Y') THEN
4325: okc_debug.Set_Indentation('OKC_CAT_PVT');
4326: okc_debug.log('14600: Entered INSERT_ROW_UPG', 2);
4327: END IF;
4328:
4329: i := p_catv_tbl.FIRST; j:=0;
4322: x_return_status := OKC_API.G_RET_STS_SUCCESS;
4323: -- Initializing Return status
4324: IF (l_debug = 'Y') THEN
4325: okc_debug.Set_Indentation('OKC_CAT_PVT');
4326: okc_debug.log('14600: Entered INSERT_ROW_UPG', 2);
4327: END IF;
4328:
4329: i := p_catv_tbl.FIRST; j:=0;
4330: while i is not null
4482: );
4483: END LOOP;
4484:
4485: IF (l_debug = 'Y') THEN
4486: okc_debug.log('14700: Leaving INSERT_ROW_UPG', 2);
4487: okc_debug.Reset_Indentation;
4488: END IF;
4489:
4490: EXCEPTION
4483: END LOOP;
4484:
4485: IF (l_debug = 'Y') THEN
4486: okc_debug.log('14700: Leaving INSERT_ROW_UPG', 2);
4487: okc_debug.Reset_Indentation;
4488: END IF;
4489:
4490: EXCEPTION
4491: WHEN OTHERS THEN
4500: p_token2_value => SQLERRM);
4501: -- notify caller of an error as UNEXPECTED error
4502: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4503: IF (l_debug = 'Y') THEN
4504: okc_debug.log('14800: Leaving INSERT_ROW_UPG:OTHERS Exception', 2);
4505: okc_debug.Reset_Indentation;
4506: END IF;
4507:
4508: -- RAISE;
4501: -- notify caller of an error as UNEXPECTED error
4502: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4503: IF (l_debug = 'Y') THEN
4504: okc_debug.log('14800: Leaving INSERT_ROW_UPG:OTHERS Exception', 2);
4505: okc_debug.Reset_Indentation;
4506: END IF;
4507:
4508: -- RAISE;
4509:
4522:
4523: BEGIN
4524:
4525: IF (l_debug = 'Y') THEN
4526: okc_debug.Set_Indentation('OKC_CAT_PVT');
4527: okc_debug.log('14900: Entered create_version', 2);
4528: END IF;
4529:
4530: INSERT INTO okc_k_articles_bh
4523: BEGIN
4524:
4525: IF (l_debug = 'Y') THEN
4526: okc_debug.Set_Indentation('OKC_CAT_PVT');
4527: okc_debug.log('14900: Entered create_version', 2);
4528: END IF;
4529:
4530: INSERT INTO okc_k_articles_bh
4531: (
4642: WHERE id in (select id from okc_k_articles_b
4643: where dnz_chr_id = p_chr_id);
4644:
4645: IF (l_debug = 'Y') THEN
4646: okc_debug.log('15000: Leaving create_version', 2);
4647: okc_debug.Reset_Indentation;
4648: END IF;
4649:
4650: RETURN l_return_status;
4643: where dnz_chr_id = p_chr_id);
4644:
4645: IF (l_debug = 'Y') THEN
4646: okc_debug.log('15000: Leaving create_version', 2);
4647: okc_debug.Reset_Indentation;
4648: END IF;
4649:
4650: RETURN l_return_status;
4651:
4653: -- other appropriate handlers
4654: WHEN OTHERS THEN
4655:
4656: IF (l_debug = 'Y') THEN
4657: okc_debug.log('15100: Leaving create_version:OTHERS Exception', 2);
4658: okc_debug.Reset_Indentation;
4659: END IF;
4660:
4661: -- store SQL error message on message stack
4654: WHEN OTHERS THEN
4655:
4656: IF (l_debug = 'Y') THEN
4657: okc_debug.log('15100: Leaving create_version:OTHERS Exception', 2);
4658: okc_debug.Reset_Indentation;
4659: END IF;
4660:
4661: -- store SQL error message on message stack
4662: OKC_API.SET_MESSAGE(p_app_name => okc_version_pvt.G_APP_NAME,
4685:
4686: BEGIN
4687:
4688: IF (l_debug = 'Y') THEN
4689: okc_debug.Set_Indentation('OKC_CAT_PVT');
4690: okc_debug.log('15200: Entered restore_version', 2);
4691: END IF;
4692:
4693: INSERT INTO okc_k_articles_tl
4686: BEGIN
4687:
4688: IF (l_debug = 'Y') THEN
4689: okc_debug.Set_Indentation('OKC_CAT_PVT');
4690: okc_debug.log('15200: Entered restore_version', 2);
4691: END IF;
4692:
4693: INSERT INTO okc_k_articles_tl
4694: (
4804: WHERE dnz_chr_id = p_chr_id
4805: AND major_version = p_major_version;
4806:
4807: IF (l_debug = 'Y') THEN
4808: okc_debug.log('15300: Leaving restore_version', 2);
4809: okc_debug.Reset_Indentation;
4810: END IF;
4811:
4812: RETURN l_return_status;
4805: AND major_version = p_major_version;
4806:
4807: IF (l_debug = 'Y') THEN
4808: okc_debug.log('15300: Leaving restore_version', 2);
4809: okc_debug.Reset_Indentation;
4810: END IF;
4811:
4812: RETURN l_return_status;
4813:
4815: -- other appropriate handlers
4816: WHEN OTHERS THEN
4817:
4818: IF (l_debug = 'Y') THEN
4819: okc_debug.log('15400: Leaving restore_version:OTHERS Exception', 2);
4820: okc_debug.Reset_Indentation;
4821: END IF;
4822:
4823: -- store SQL error message on message stack
4816: WHEN OTHERS THEN
4817:
4818: IF (l_debug = 'Y') THEN
4819: okc_debug.log('15400: Leaving restore_version:OTHERS Exception', 2);
4820: okc_debug.Reset_Indentation;
4821: END IF;
4822:
4823: -- store SQL error message on message stack
4824: OKC_API.SET_MESSAGE(p_app_name => okc_version_pvt.G_APP_NAME,