[Home] [Help]
395: okc_debug.Set_Indentation('OKC_SAE_PVT');
396: okc_debug.log('1200: Entered null_out_defaults', 2);
397: END IF;
398:
399: IF (l_saev_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
400: l_saev_rec.object_version_number := NULL;
401: END IF;
402: IF (l_saev_rec.sfwt_flag = OKC_API.G_MISS_CHAR) THEN
403: l_saev_rec.sfwt_flag := NULL;
398:
399: IF (l_saev_rec.object_version_number = OKC_API.G_MISS_NUM) THEN
400: l_saev_rec.object_version_number := NULL;
401: END IF;
402: IF (l_saev_rec.sfwt_flag = OKC_API.G_MISS_CHAR) THEN
403: l_saev_rec.sfwt_flag := NULL;
404: END IF;
405: IF (l_saev_rec.sbt_code = OKC_API.G_MISS_CHAR) THEN
406: l_saev_rec.sbt_code := NULL;
401: END IF;
402: IF (l_saev_rec.sfwt_flag = OKC_API.G_MISS_CHAR) THEN
403: l_saev_rec.sfwt_flag := NULL;
404: END IF;
405: IF (l_saev_rec.sbt_code = OKC_API.G_MISS_CHAR) THEN
406: l_saev_rec.sbt_code := NULL;
407: END IF;
408: IF (l_saev_rec.name = OKC_API.G_MISS_CHAR) THEN
409: l_saev_rec.name := NULL;
404: END IF;
405: IF (l_saev_rec.sbt_code = OKC_API.G_MISS_CHAR) THEN
406: l_saev_rec.sbt_code := NULL;
407: END IF;
408: IF (l_saev_rec.name = OKC_API.G_MISS_CHAR) THEN
409: l_saev_rec.name := NULL;
410: END IF;
411: IF (l_saev_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN
412: l_saev_rec.attribute_category := NULL;
407: END IF;
408: IF (l_saev_rec.name = OKC_API.G_MISS_CHAR) THEN
409: l_saev_rec.name := NULL;
410: END IF;
411: IF (l_saev_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN
412: l_saev_rec.attribute_category := NULL;
413: END IF;
414: IF (l_saev_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN
415: l_saev_rec.attribute1 := NULL;
410: END IF;
411: IF (l_saev_rec.attribute_category = OKC_API.G_MISS_CHAR) THEN
412: l_saev_rec.attribute_category := NULL;
413: END IF;
414: IF (l_saev_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN
415: l_saev_rec.attribute1 := NULL;
416: END IF;
417: IF (l_saev_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN
418: l_saev_rec.attribute2 := NULL;
413: END IF;
414: IF (l_saev_rec.attribute1 = OKC_API.G_MISS_CHAR) THEN
415: l_saev_rec.attribute1 := NULL;
416: END IF;
417: IF (l_saev_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN
418: l_saev_rec.attribute2 := NULL;
419: END IF;
420: IF (l_saev_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN
421: l_saev_rec.attribute3 := NULL;
416: END IF;
417: IF (l_saev_rec.attribute2 = OKC_API.G_MISS_CHAR) THEN
418: l_saev_rec.attribute2 := NULL;
419: END IF;
420: IF (l_saev_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN
421: l_saev_rec.attribute3 := NULL;
422: END IF;
423: IF (l_saev_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN
424: l_saev_rec.attribute4 := NULL;
419: END IF;
420: IF (l_saev_rec.attribute3 = OKC_API.G_MISS_CHAR) THEN
421: l_saev_rec.attribute3 := NULL;
422: END IF;
423: IF (l_saev_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN
424: l_saev_rec.attribute4 := NULL;
425: END IF;
426: IF (l_saev_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN
427: l_saev_rec.attribute5 := NULL;
422: END IF;
423: IF (l_saev_rec.attribute4 = OKC_API.G_MISS_CHAR) THEN
424: l_saev_rec.attribute4 := NULL;
425: END IF;
426: IF (l_saev_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN
427: l_saev_rec.attribute5 := NULL;
428: END IF;
429: IF (l_saev_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN
430: l_saev_rec.attribute6 := NULL;
425: END IF;
426: IF (l_saev_rec.attribute5 = OKC_API.G_MISS_CHAR) THEN
427: l_saev_rec.attribute5 := NULL;
428: END IF;
429: IF (l_saev_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN
430: l_saev_rec.attribute6 := NULL;
431: END IF;
432: IF (l_saev_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN
433: l_saev_rec.attribute7 := NULL;
428: END IF;
429: IF (l_saev_rec.attribute6 = OKC_API.G_MISS_CHAR) THEN
430: l_saev_rec.attribute6 := NULL;
431: END IF;
432: IF (l_saev_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN
433: l_saev_rec.attribute7 := NULL;
434: END IF;
435: IF (l_saev_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN
436: l_saev_rec.attribute8 := NULL;
431: END IF;
432: IF (l_saev_rec.attribute7 = OKC_API.G_MISS_CHAR) THEN
433: l_saev_rec.attribute7 := NULL;
434: END IF;
435: IF (l_saev_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN
436: l_saev_rec.attribute8 := NULL;
437: END IF;
438: IF (l_saev_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN
439: l_saev_rec.attribute9 := NULL;
434: END IF;
435: IF (l_saev_rec.attribute8 = OKC_API.G_MISS_CHAR) THEN
436: l_saev_rec.attribute8 := NULL;
437: END IF;
438: IF (l_saev_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN
439: l_saev_rec.attribute9 := NULL;
440: END IF;
441: IF (l_saev_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN
442: l_saev_rec.attribute10 := NULL;
437: END IF;
438: IF (l_saev_rec.attribute9 = OKC_API.G_MISS_CHAR) THEN
439: l_saev_rec.attribute9 := NULL;
440: END IF;
441: IF (l_saev_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN
442: l_saev_rec.attribute10 := NULL;
443: END IF;
444: IF (l_saev_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN
445: l_saev_rec.attribute11 := NULL;
440: END IF;
441: IF (l_saev_rec.attribute10 = OKC_API.G_MISS_CHAR) THEN
442: l_saev_rec.attribute10 := NULL;
443: END IF;
444: IF (l_saev_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN
445: l_saev_rec.attribute11 := NULL;
446: END IF;
447: IF (l_saev_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN
448: l_saev_rec.attribute12 := NULL;
443: END IF;
444: IF (l_saev_rec.attribute11 = OKC_API.G_MISS_CHAR) THEN
445: l_saev_rec.attribute11 := NULL;
446: END IF;
447: IF (l_saev_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN
448: l_saev_rec.attribute12 := NULL;
449: END IF;
450: IF (l_saev_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN
451: l_saev_rec.attribute13 := NULL;
446: END IF;
447: IF (l_saev_rec.attribute12 = OKC_API.G_MISS_CHAR) THEN
448: l_saev_rec.attribute12 := NULL;
449: END IF;
450: IF (l_saev_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN
451: l_saev_rec.attribute13 := NULL;
452: END IF;
453: IF (l_saev_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN
454: l_saev_rec.attribute14 := NULL;
449: END IF;
450: IF (l_saev_rec.attribute13 = OKC_API.G_MISS_CHAR) THEN
451: l_saev_rec.attribute13 := NULL;
452: END IF;
453: IF (l_saev_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN
454: l_saev_rec.attribute14 := NULL;
455: END IF;
456: IF (l_saev_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN
457: l_saev_rec.attribute15 := NULL;
452: END IF;
453: IF (l_saev_rec.attribute14 = OKC_API.G_MISS_CHAR) THEN
454: l_saev_rec.attribute14 := NULL;
455: END IF;
456: IF (l_saev_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN
457: l_saev_rec.attribute15 := NULL;
458: END IF;
459: IF (l_saev_rec.created_by = OKC_API.G_MISS_NUM) THEN
460: l_saev_rec.created_by := NULL;
455: END IF;
456: IF (l_saev_rec.attribute15 = OKC_API.G_MISS_CHAR) THEN
457: l_saev_rec.attribute15 := NULL;
458: END IF;
459: IF (l_saev_rec.created_by = OKC_API.G_MISS_NUM) THEN
460: l_saev_rec.created_by := NULL;
461: END IF;
462: IF (l_saev_rec.creation_date = OKC_API.G_MISS_DATE) THEN
463: l_saev_rec.creation_date := NULL;
458: END IF;
459: IF (l_saev_rec.created_by = OKC_API.G_MISS_NUM) THEN
460: l_saev_rec.created_by := NULL;
461: END IF;
462: IF (l_saev_rec.creation_date = OKC_API.G_MISS_DATE) THEN
463: l_saev_rec.creation_date := NULL;
464: END IF;
465: IF (l_saev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
466: l_saev_rec.last_updated_by := NULL;
461: END IF;
462: IF (l_saev_rec.creation_date = OKC_API.G_MISS_DATE) THEN
463: l_saev_rec.creation_date := NULL;
464: END IF;
465: IF (l_saev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
466: l_saev_rec.last_updated_by := NULL;
467: END IF;
468: IF (l_saev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
469: l_saev_rec.last_update_date := NULL;
464: END IF;
465: IF (l_saev_rec.last_updated_by = OKC_API.G_MISS_NUM) THEN
466: l_saev_rec.last_updated_by := NULL;
467: END IF;
468: IF (l_saev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
469: l_saev_rec.last_update_date := NULL;
470: END IF;
471: IF (l_saev_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
472: l_saev_rec.last_update_login := NULL;
467: END IF;
468: IF (l_saev_rec.last_update_date = OKC_API.G_MISS_DATE) THEN
469: l_saev_rec.last_update_date := NULL;
470: END IF;
471: IF (l_saev_rec.last_update_login = OKC_API.G_MISS_NUM) THEN
472: l_saev_rec.last_update_login := NULL;
473: END IF;
474:
475: IF (l_debug = 'Y') THEN
508: okc_debug.Set_Indentation('OKC_SAE_PVT');
509: okc_debug.log('1300: Entered validate_no_k_attached', 2);
510: END IF;
511:
512: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
513:
514: --check that this article is not being referenced by any contract
515: Open l_ate_csr;
516: Fetch l_ate_csr into dummy;
515: Open l_ate_csr;
516: Fetch l_ate_csr into dummy;
517: Close l_ate_csr;
518: IF dummy='1' then
519: x_return_status:=OKC_API.G_RET_STS_ERROR;
520: End If;
521:
522: IF (l_debug = 'Y') THEN
523: okc_debug.log('1400: Leaving validate_no_k_attached', 2);
532: okc_debug.Reset_Indentation;
533: END IF;
534:
535: -- store SQL error message on message stack
536: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
537: p_msg_name => G_UNEXPECTED_ERROR,
538: p_token1 => G_SQLCODE_TOKEN,
539: p_token1_value => sqlcode,
540: p_token2 => G_SQLERRM_TOKEN,
540: p_token2 => G_SQLERRM_TOKEN,
541: p_token2_value => sqlerrm);
542:
543: -- notify UNEXPECTED error
544: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
545:
546: END validate_no_k_attached;
547:
548: -- Start of comments
561: okc_debug.Set_Indentation('OKC_SAE_PVT');
562: okc_debug.log('1600: Entered validate_id', 2);
563: END IF;
564:
565: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
566: --check not null
567: If (p_saev_rec.id is null) OR (p_saev_rec.id=OKC_API.G_MISS_NUM) then
568: x_return_status:=OKC_API.G_RET_STS_ERROR;
569: --set error message in message stack
563: END IF;
564:
565: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
566: --check not null
567: If (p_saev_rec.id is null) OR (p_saev_rec.id=OKC_API.G_MISS_NUM) then
568: x_return_status:=OKC_API.G_RET_STS_ERROR;
569: --set error message in message stack
570: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
571: p_msg_name => G_REQUIRED_VALUE,
564:
565: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
566: --check not null
567: If (p_saev_rec.id is null) OR (p_saev_rec.id=OKC_API.G_MISS_NUM) then
568: x_return_status:=OKC_API.G_RET_STS_ERROR;
569: --set error message in message stack
570: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
571: p_msg_name => G_REQUIRED_VALUE,
572: p_token1 => G_COL_NAME_TOKEN,
566: --check not null
567: If (p_saev_rec.id is null) OR (p_saev_rec.id=OKC_API.G_MISS_NUM) then
568: x_return_status:=OKC_API.G_RET_STS_ERROR;
569: --set error message in message stack
570: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
571: p_msg_name => G_REQUIRED_VALUE,
572: p_token1 => G_COL_NAME_TOKEN,
573: p_token1_value => 'ID');
574: RAISE G_EXCEPTION_HALT_VALIDATION;
597: okc_debug.Reset_Indentation;
598: END IF;
599:
600: -- store SQL error message on message stack
601: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
602: p_msg_name => G_UNEXPECTED_ERROR,
603: p_token1 => G_SQLCODE_TOKEN,
604: p_token1_value => sqlcode,
605: p_token2 => G_SQLERRM_TOKEN,
605: p_token2 => G_SQLERRM_TOKEN,
606: p_token2_value => sqlerrm);
607:
608: -- notify UNEXPECTED error
609: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
610:
611: END validate_id;
612:
613: -- Start of comments
626: okc_debug.Set_Indentation('OKC_SAE_PVT');
627: okc_debug.log('2000: Entered validate_Object_Version_Number', 2);
628: END IF;
629:
630: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
631: --check not null
632: If (p_saev_rec.object_version_number is null) OR (p_saev_rec.object_version_number=OKC_API.G_MISS_NUM) then
633: x_return_status:=OKC_API.G_RET_STS_ERROR;
634: --set error message in message stack
628: END IF;
629:
630: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
631: --check not null
632: If (p_saev_rec.object_version_number is null) OR (p_saev_rec.object_version_number=OKC_API.G_MISS_NUM) then
633: x_return_status:=OKC_API.G_RET_STS_ERROR;
634: --set error message in message stack
635: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
636: p_msg_name => G_REQUIRED_VALUE,
629:
630: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
631: --check not null
632: If (p_saev_rec.object_version_number is null) OR (p_saev_rec.object_version_number=OKC_API.G_MISS_NUM) then
633: x_return_status:=OKC_API.G_RET_STS_ERROR;
634: --set error message in message stack
635: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
636: p_msg_name => G_REQUIRED_VALUE,
637: p_token1 => G_COL_NAME_TOKEN,
631: --check not null
632: If (p_saev_rec.object_version_number is null) OR (p_saev_rec.object_version_number=OKC_API.G_MISS_NUM) then
633: x_return_status:=OKC_API.G_RET_STS_ERROR;
634: --set error message in message stack
635: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
636: p_msg_name => G_REQUIRED_VALUE,
637: p_token1 => G_COL_NAME_TOKEN,
638: p_token1_value => 'OBJECT_VERSION_NUMBER');
639: RAISE G_EXCEPTION_HALT_VALIDATION;
663: okc_debug.Reset_Indentation;
664: END IF;
665:
666: -- store SQL error message on message stack
667: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
668: p_msg_name => G_UNEXPECTED_ERROR,
669: p_token1 => G_SQLCODE_TOKEN,
670: p_token1_value => sqlcode,
671: p_token2 => G_SQLERRM_TOKEN,
671: p_token2 => G_SQLERRM_TOKEN,
672: p_token2_value => sqlerrm);
673:
674: -- notify UNEXPECTED error
675: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
676:
677: END validate_object_version_number;
678:
679:
693: okc_debug.Set_Indentation('OKC_SAE_PVT');
694: okc_debug.log('2400: Entered validate_sfwt_flag', 2);
695: END IF;
696:
697: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
698: --check not null
699: If (p_saev_rec.sfwt_flag is null) OR (p_saev_rec.sfwt_flag=OKC_API.G_MISS_CHAR) then
700: x_return_status:=OKC_API.G_RET_STS_ERROR;
701: --set error message in message stack
695: END IF;
696:
697: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
698: --check not null
699: If (p_saev_rec.sfwt_flag is null) OR (p_saev_rec.sfwt_flag=OKC_API.G_MISS_CHAR) then
700: x_return_status:=OKC_API.G_RET_STS_ERROR;
701: --set error message in message stack
702: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
703: p_msg_name => G_REQUIRED_VALUE,
696:
697: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
698: --check not null
699: If (p_saev_rec.sfwt_flag is null) OR (p_saev_rec.sfwt_flag=OKC_API.G_MISS_CHAR) then
700: x_return_status:=OKC_API.G_RET_STS_ERROR;
701: --set error message in message stack
702: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
703: p_msg_name => G_REQUIRED_VALUE,
704: p_token1 => G_COL_NAME_TOKEN,
698: --check not null
699: If (p_saev_rec.sfwt_flag is null) OR (p_saev_rec.sfwt_flag=OKC_API.G_MISS_CHAR) then
700: x_return_status:=OKC_API.G_RET_STS_ERROR;
701: --set error message in message stack
702: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
703: p_msg_name => G_REQUIRED_VALUE,
704: p_token1 => G_COL_NAME_TOKEN,
705: p_token1_value => 'SFWT_FLAG');
706: RAISE G_EXCEPTION_HALT_VALIDATION;
707: End If;
708:
709: --check in domain
710: If UPPER(p_saev_rec.sfwt_flag) not in('Y','N') then
711: x_return_status:=OKC_API.G_RET_STS_ERROR;
712:
713: --set error message in message stack
714: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
715: p_msg_name => G_INVALID_VALUE,
710: If UPPER(p_saev_rec.sfwt_flag) not in('Y','N') then
711: x_return_status:=OKC_API.G_RET_STS_ERROR;
712:
713: --set error message in message stack
714: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
715: p_msg_name => G_INVALID_VALUE,
716: p_token1 => G_COL_NAME_TOKEN,
717: p_token1_value => 'SFWT_FLAG');
718:
720: End If;
721:
722: --check uppercase
723: IF p_saev_rec.sfwt_flag <> UPPER(p_saev_rec.sfwt_flag) then
724: x_return_status:=OKC_API.G_RET_STS_ERROR;
725:
726: --set error message in message stack
727: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
728: p_msg_name => G_NOT_UPPER,
723: IF p_saev_rec.sfwt_flag <> UPPER(p_saev_rec.sfwt_flag) then
724: x_return_status:=OKC_API.G_RET_STS_ERROR;
725:
726: --set error message in message stack
727: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
728: p_msg_name => G_NOT_UPPER,
729: p_token1 => G_COL_NAME_TOKEN,
730: p_token1_value => 'SFWT_FLAG');
731:
755: okc_debug.Reset_Indentation;
756: END IF;
757:
758: -- store SQL error message on message stack
759: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
760: p_msg_name => G_UNEXPECTED_ERROR,
761: p_token1 => G_SQLCODE_TOKEN,
762: p_token1_value => sqlcode,
763: p_token2 => G_SQLERRM_TOKEN,
763: p_token2 => G_SQLERRM_TOKEN,
764: p_token2_value => sqlerrm);
765:
766: -- notify UNEXPECTED error
767: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
768:
769: END validate_sfwt_flag;
770:
771:
785: okc_debug.Set_Indentation('OKC_SAE_PVT');
786: okc_debug.log('2800: Entered validate_sbt_code', 2);
787: END IF;
788:
789: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
790: --check not null
791: If (p_saev_rec.sbt_code is null) OR (p_saev_rec.sbt_code=OKC_API.G_MISS_CHAR) then
792: x_return_status:=OKC_API.G_RET_STS_ERROR;
793: --set error message in message stack
787: END IF;
788:
789: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
790: --check not null
791: If (p_saev_rec.sbt_code is null) OR (p_saev_rec.sbt_code=OKC_API.G_MISS_CHAR) then
792: x_return_status:=OKC_API.G_RET_STS_ERROR;
793: --set error message in message stack
794: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
795: p_msg_name => G_REQUIRED_VALUE,
788:
789: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
790: --check not null
791: If (p_saev_rec.sbt_code is null) OR (p_saev_rec.sbt_code=OKC_API.G_MISS_CHAR) then
792: x_return_status:=OKC_API.G_RET_STS_ERROR;
793: --set error message in message stack
794: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
795: p_msg_name => G_REQUIRED_VALUE,
796: p_token1 => G_COL_NAME_TOKEN,
790: --check not null
791: If (p_saev_rec.sbt_code is null) OR (p_saev_rec.sbt_code=OKC_API.G_MISS_CHAR) then
792: x_return_status:=OKC_API.G_RET_STS_ERROR;
793: --set error message in message stack
794: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
795: p_msg_name => G_REQUIRED_VALUE,
796: p_token1 => G_COL_NAME_TOKEN,
797: p_token1_value => 'SBT_CODE');
798: RAISE G_EXCEPTION_HALT_VALIDATION;
799: End If;
800:
801: --check within length limit
802: If (length(p_saev_rec.sbt_code)>30) Then
803: x_return_status:=OKC_API.G_RET_STS_ERROR;
804: --set error message in message stack
805: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
806: p_msg_name => G_LEN_CHK,
807: p_token1 => G_COL_NAME_TOKEN,
801: --check within length limit
802: If (length(p_saev_rec.sbt_code)>30) Then
803: x_return_status:=OKC_API.G_RET_STS_ERROR;
804: --set error message in message stack
805: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
806: p_msg_name => G_LEN_CHK,
807: p_token1 => G_COL_NAME_TOKEN,
808: p_token1_value => 'SBT_CODE');
809: RAISE G_EXCEPTION_HALT_VALIDATION;
811:
812:
813: -- Check if the value is valid code from lookup table for SUBJECT
814: x_return_status:=OKC_UTIL.check_lookup_code('OKC_SUBJECT',p_saev_rec.sbt_code);
815: If (x_return_status=OKC_API.G_RET_STS_ERROR) Then
816: --set error message in message stack
817: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
818: p_msg_name => G_INVALID_VALUE,
819: p_token1 => G_COL_NAME_TOKEN,
813: -- Check if the value is valid code from lookup table for SUBJECT
814: x_return_status:=OKC_UTIL.check_lookup_code('OKC_SUBJECT',p_saev_rec.sbt_code);
815: If (x_return_status=OKC_API.G_RET_STS_ERROR) Then
816: --set error message in message stack
817: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
818: p_msg_name => G_INVALID_VALUE,
819: p_token1 => G_COL_NAME_TOKEN,
820: p_token1_value => 'SBT_CODE');
821: RAISE G_EXCEPTION_HALT_VALIDATION;
818: p_msg_name => G_INVALID_VALUE,
819: p_token1 => G_COL_NAME_TOKEN,
820: p_token1_value => 'SBT_CODE');
821: RAISE G_EXCEPTION_HALT_VALIDATION;
822: ELSIF (x_return_status=OKC_API.G_RET_STS_UNEXP_ERROR) Then
823: RAISE G_EXCEPTION_HALT_VALIDATION;
824: End If;
825:
826: IF (l_debug = 'Y') THEN
846: okc_debug.Reset_Indentation;
847: END IF;
848:
849: -- store SQL error message on message stack
850: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
851: p_msg_name => G_UNEXPECTED_ERROR,
852: p_token1 => G_SQLCODE_TOKEN,
853: p_token1_value => sqlcode,
854: p_token2 => G_SQLERRM_TOKEN,
854: p_token2 => G_SQLERRM_TOKEN,
855: p_token2_value => sqlerrm);
856:
857: -- notify UNEXPECTED error
858: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
859:
860: END validate_sbt_code;
861:
862:
870: procedure validate_name(p_saev_rec IN saev_rec_type,
871: x_return_status OUT NOCOPY VARCHAR2) is
872:
873: cursor c1 is select id from okc_std_articles_v where UPPER(name)=UPPER(p_saev_rec.name);
874: l_id number:=OKC_API.G_MISS_NUM;
875: BEGIN
876:
877: IF (l_debug = 'Y') THEN
878: okc_debug.Set_Indentation('OKC_SAE_PVT');
878: okc_debug.Set_Indentation('OKC_SAE_PVT');
879: okc_debug.log('3200: Entered validate_name', 2);
880: END IF;
881:
882: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
883: --check not null
884: If (p_saev_rec.name is null) OR (p_saev_rec.name=OKC_API.G_MISS_CHAR) then
885: x_return_status:=OKC_API.G_RET_STS_ERROR;
886: --set error message in message stack
880: END IF;
881:
882: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
883: --check not null
884: If (p_saev_rec.name is null) OR (p_saev_rec.name=OKC_API.G_MISS_CHAR) then
885: x_return_status:=OKC_API.G_RET_STS_ERROR;
886: --set error message in message stack
887: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
888: p_msg_name => 'OKC_ARTICLE_NAME_REQUIRED');
881:
882: x_return_status:=OKC_API.G_RET_STS_SUCCESS;
883: --check not null
884: If (p_saev_rec.name is null) OR (p_saev_rec.name=OKC_API.G_MISS_CHAR) then
885: x_return_status:=OKC_API.G_RET_STS_ERROR;
886: --set error message in message stack
887: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
888: p_msg_name => 'OKC_ARTICLE_NAME_REQUIRED');
889: RAISE G_EXCEPTION_HALT_VALIDATION;
883: --check not null
884: If (p_saev_rec.name is null) OR (p_saev_rec.name=OKC_API.G_MISS_CHAR) then
885: x_return_status:=OKC_API.G_RET_STS_ERROR;
886: --set error message in message stack
887: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
888: p_msg_name => 'OKC_ARTICLE_NAME_REQUIRED');
889: RAISE G_EXCEPTION_HALT_VALIDATION;
890: End If;
891:
893: Open c1;
894: Fetch c1 into l_id;
895: close c1;
896:
897: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_saev_rec.id,0)) THEN
898: x_return_status:=OKC_API.G_RET_STS_ERROR;
899: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
900: p_msg_name => 'OKC_ART_NAME_NOT_UNIQUE');
901: RAISE G_EXCEPTION_HALT_VALIDATION;
894: Fetch c1 into l_id;
895: close c1;
896:
897: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_saev_rec.id,0)) THEN
898: x_return_status:=OKC_API.G_RET_STS_ERROR;
899: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
900: p_msg_name => 'OKC_ART_NAME_NOT_UNIQUE');
901: RAISE G_EXCEPTION_HALT_VALIDATION;
902: END IF;
895: close c1;
896:
897: IF (l_id<>OKC_API.G_MISS_NUM AND l_id<>nvl(p_saev_rec.id,0)) THEN
898: x_return_status:=OKC_API.G_RET_STS_ERROR;
899: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
900: p_msg_name => 'OKC_ART_NAME_NOT_UNIQUE');
901: RAISE G_EXCEPTION_HALT_VALIDATION;
902: END IF;
903:
924: okc_debug.Reset_Indentation;
925: END IF;
926:
927: -- store SQL error message on message stack
928: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
929: p_msg_name => G_UNEXPECTED_ERROR,
930: p_token1 => G_SQLCODE_TOKEN,
931: p_token1_value => sqlcode,
932: p_token2 => G_SQLERRM_TOKEN,
932: p_token2 => G_SQLERRM_TOKEN,
933: p_token2_value => sqlerrm);
934:
935: -- notify UNEXPECTED error
936: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
937:
938: END validate_name;
939:
940: ---------------------------------------------------------------------------
945: ------------------------------------------------
946: FUNCTION Validate_Attributes (
947: p_saev_rec IN saev_rec_type
948: ) RETURN VARCHAR2 IS
949: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
950: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
951: BEGIN
952:
953: IF (l_debug = 'Y') THEN
946: FUNCTION Validate_Attributes (
947: p_saev_rec IN saev_rec_type
948: ) RETURN VARCHAR2 IS
949: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
950: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
951: BEGIN
952:
953: IF (l_debug = 'Y') THEN
954: okc_debug.Set_Indentation('OKC_SAE_PVT');
955: okc_debug.log('3600: Entered Validate_Attributes', 2);
956: END IF;
957:
958: validate_id(p_saev_rec,l_return_status);
959: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
960: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
961: l_return_status := x_return_status;
962: RAISE G_EXCEPTION_HALT_VALIDATION;
963: ELSE
956: END IF;
957:
958: validate_id(p_saev_rec,l_return_status);
959: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
960: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
961: l_return_status := x_return_status;
962: RAISE G_EXCEPTION_HALT_VALIDATION;
963: ELSE
964: l_return_status := x_return_status; -- record that there was an error
965: END IF;
966: END IF;
967:
968: validate_object_version_number(p_saev_rec,x_return_status);
969: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
970: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
971: l_return_status := x_return_status;
972: RAISE G_EXCEPTION_HALT_VALIDATION;
973: ELSE
966: END IF;
967:
968: validate_object_version_number(p_saev_rec,x_return_status);
969: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
970: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
971: l_return_status := x_return_status;
972: RAISE G_EXCEPTION_HALT_VALIDATION;
973: ELSE
974: l_return_status := x_return_status; -- record that there was an error
975: END IF;
976: END IF;
977:
978: validate_sfwt_flag(p_saev_rec,x_return_status);
979: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
980: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
981: l_return_status := x_return_status;
982: RAISE G_EXCEPTION_HALT_VALIDATION;
983: ELSE
976: END IF;
977:
978: validate_sfwt_flag(p_saev_rec,x_return_status);
979: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
980: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
981: l_return_status := x_return_status;
982: RAISE G_EXCEPTION_HALT_VALIDATION;
983: ELSE
984: l_return_status := x_return_status; -- record that there was an error
985: END IF;
986: END IF;
987:
988: validate_sbt_code(p_saev_rec,x_return_status);
989: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
990: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
991: l_return_status := x_return_status;
992: RAISE G_EXCEPTION_HALT_VALIDATION;
993: ELSE
986: END IF;
987:
988: validate_sbt_code(p_saev_rec,x_return_status);
989: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
990: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
991: l_return_status := x_return_status;
992: RAISE G_EXCEPTION_HALT_VALIDATION;
993: ELSE
994: l_return_status := x_return_status; -- record that there was an error
995: END IF;
996: END IF;
997:
998: validate_name(p_saev_rec,x_return_status);
999: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1000: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
1001: l_return_status := x_return_status;
1002: RAISE G_EXCEPTION_HALT_VALIDATION;
1003: ELSE
996: END IF;
997:
998: validate_name(p_saev_rec,x_return_status);
999: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
1000: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
1001: l_return_status := x_return_status;
1002: RAISE G_EXCEPTION_HALT_VALIDATION;
1003: ELSE
1004: l_return_status := x_return_status; -- record that there was an error
1030: okc_debug.Reset_Indentation;
1031: END IF;
1032:
1033: -- store SQL error message on message stack
1034: OKC_API.SET_MESSAGE(p_app_name => G_APP_NAME,
1035: p_msg_name => G_UNEXPECTED_ERROR,
1036: p_token1 => G_SQLCODE_TOKEN,
1037: p_token1_value => sqlcode,
1038: p_token2 => G_SQLERRM_TOKEN,
1038: p_token2 => G_SQLERRM_TOKEN,
1039: p_token2_value => sqlerrm);
1040:
1041: -- notify UNEXPECTED error
1042: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1043: RETURN(l_return_status);
1044:
1045: END Validate_Attributes;
1046: /****************END ADDED AFTER TAPI**************/
1052: --------------------------------------------
1053: FUNCTION Validate_Record (
1054: p_saev_rec IN saev_rec_type
1055: ) RETURN VARCHAR2 IS
1056: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1057: BEGIN
1058:
1059: RETURN (l_return_status);
1060:
1179: p_saev_rec IN saev_rec_type) IS
1180:
1181: l_api_version CONSTANT NUMBER := 1;
1182: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
1183: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1184: l_saev_rec saev_rec_type := p_saev_rec;
1185: l_sae_rec sae_rec_type;
1186: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type;
1187: BEGIN
1190: okc_debug.Set_Indentation('OKC_SAE_PVT');
1191: okc_debug.log('4500: Entered validate_row', 2);
1192: END IF;
1193:
1194: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1195: G_PKG_NAME,
1196: p_init_msg_list,
1197: l_api_version,
1198: p_api_version,
1197: l_api_version,
1198: p_api_version,
1199: '_PVT',
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1198: p_api_version,
1199: '_PVT',
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1206: --- Validate all non-missing attributes (Item Level Validation)
1199: '_PVT',
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1206: --- Validate all non-missing attributes (Item Level Validation)
1207: l_return_status := Validate_Attributes(l_saev_rec);
1200: x_return_status);
1201: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1202: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1203: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1204: RAISE OKC_API.G_EXCEPTION_ERROR;
1205: END IF;
1206: --- Validate all non-missing attributes (Item Level Validation)
1207: l_return_status := Validate_Attributes(l_saev_rec);
1208: --- If any errors happen abort API
1205: END IF;
1206: --- Validate all non-missing attributes (Item Level Validation)
1207: l_return_status := Validate_Attributes(l_saev_rec);
1208: --- If any errors happen abort API
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: RAISE OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1206: --- Validate all non-missing attributes (Item Level Validation)
1207: l_return_status := Validate_Attributes(l_saev_rec);
1208: --- If any errors happen abort API
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: RAISE OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: l_return_status := Validate_Record(l_saev_rec);
1207: l_return_status := Validate_Attributes(l_saev_rec);
1208: --- If any errors happen abort API
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: RAISE OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: l_return_status := Validate_Record(l_saev_rec);
1215: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1208: --- If any errors happen abort API
1209: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1210: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: RAISE OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: l_return_status := Validate_Record(l_saev_rec);
1215: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1216: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1211: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1212: RAISE OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: l_return_status := Validate_Record(l_saev_rec);
1215: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1216: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1217: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1218: RAISE OKC_API.G_EXCEPTION_ERROR;
1219: END IF;
1212: RAISE OKC_API.G_EXCEPTION_ERROR;
1213: END IF;
1214: l_return_status := Validate_Record(l_saev_rec);
1215: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1216: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1217: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1218: RAISE OKC_API.G_EXCEPTION_ERROR;
1219: END IF;
1220: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1213: END IF;
1214: l_return_status := Validate_Record(l_saev_rec);
1215: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1216: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1217: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1218: RAISE OKC_API.G_EXCEPTION_ERROR;
1219: END IF;
1220: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1221:
1214: l_return_status := Validate_Record(l_saev_rec);
1215: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1216: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1217: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1218: RAISE OKC_API.G_EXCEPTION_ERROR;
1219: END IF;
1220: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1221:
1222: IF (l_debug = 'Y') THEN
1216: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1217: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1218: RAISE OKC_API.G_EXCEPTION_ERROR;
1219: END IF;
1220: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1221:
1222: IF (l_debug = 'Y') THEN
1223: okc_debug.log('4600: Leaving validate_row', 2);
1224: okc_debug.Reset_Indentation;
1224: okc_debug.Reset_Indentation;
1225: END IF;
1226:
1227: EXCEPTION
1228: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1229:
1230: IF (l_debug = 'Y') THEN
1231: okc_debug.log('4700: Exiting validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1232: okc_debug.Reset_Indentation;
1227: EXCEPTION
1228: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1229:
1230: IF (l_debug = 'Y') THEN
1231: okc_debug.log('4700: Exiting validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1232: okc_debug.Reset_Indentation;
1233: END IF;
1234:
1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1231: okc_debug.log('4700: Exiting validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1232: okc_debug.Reset_Indentation;
1233: END IF;
1234:
1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1236: (
1237: l_api_name,
1238: G_PKG_NAME,
1239: 'OKC_API.G_RET_STS_ERROR',
1235: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1236: (
1237: l_api_name,
1238: G_PKG_NAME,
1239: 'OKC_API.G_RET_STS_ERROR',
1240: x_msg_count,
1241: x_msg_data,
1242: '_PVT'
1243: );
1240: x_msg_count,
1241: x_msg_data,
1242: '_PVT'
1243: );
1244: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1245:
1246: IF (l_debug = 'Y') THEN
1247: okc_debug.log('4800: Exiting validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1248: okc_debug.Reset_Indentation;
1243: );
1244: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1245:
1246: IF (l_debug = 'Y') THEN
1247: okc_debug.log('4800: Exiting validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1248: okc_debug.Reset_Indentation;
1249: END IF;
1250:
1251: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1247: okc_debug.log('4800: Exiting validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1248: okc_debug.Reset_Indentation;
1249: END IF;
1250:
1251: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1252: (
1253: l_api_name,
1254: G_PKG_NAME,
1255: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1251: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1252: (
1253: l_api_name,
1254: G_PKG_NAME,
1255: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1256: x_msg_count,
1257: x_msg_data,
1258: '_PVT'
1259: );
1263: okc_debug.log('4900: Exiting validate_row:OTHERS Exception', 2);
1264: okc_debug.Reset_Indentation;
1265: END IF;
1266:
1267: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1268: (
1269: l_api_name,
1270: G_PKG_NAME,
1271: 'OTHERS',
1287: p_saev_tbl IN saev_tbl_type) IS
1288:
1289: l_api_version CONSTANT NUMBER := 1;
1290: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
1291: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1292: i NUMBER := 0;
1293: BEGIN
1294:
1295: IF (l_debug = 'Y') THEN
1318: okc_debug.Reset_Indentation;
1319: END IF;
1320:
1321: EXCEPTION
1322: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1323:
1324: IF (l_debug = 'Y') THEN
1325: okc_debug.log('5200: Exiting validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1326: okc_debug.Reset_Indentation;
1321: EXCEPTION
1322: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1323:
1324: IF (l_debug = 'Y') THEN
1325: okc_debug.log('5200: Exiting validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1326: okc_debug.Reset_Indentation;
1327: END IF;
1328:
1329: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1325: okc_debug.log('5200: Exiting validate_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1326: okc_debug.Reset_Indentation;
1327: END IF;
1328:
1329: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1330: (
1331: l_api_name,
1332: G_PKG_NAME,
1333: 'OKC_API.G_RET_STS_ERROR',
1329: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1330: (
1331: l_api_name,
1332: G_PKG_NAME,
1333: 'OKC_API.G_RET_STS_ERROR',
1334: x_msg_count,
1335: x_msg_data,
1336: '_PVT'
1337: );
1334: x_msg_count,
1335: x_msg_data,
1336: '_PVT'
1337: );
1338: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1339:
1340: IF (l_debug = 'Y') THEN
1341: okc_debug.log('5300: Exiting validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1342: okc_debug.Reset_Indentation;
1337: );
1338: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1339:
1340: IF (l_debug = 'Y') THEN
1341: okc_debug.log('5300: Exiting validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1342: okc_debug.Reset_Indentation;
1343: END IF;
1344:
1345: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1341: okc_debug.log('5300: Exiting validate_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1342: okc_debug.Reset_Indentation;
1343: END IF;
1344:
1345: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1346: (
1347: l_api_name,
1348: G_PKG_NAME,
1349: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1345: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1346: (
1347: l_api_name,
1348: G_PKG_NAME,
1349: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1350: x_msg_count,
1351: x_msg_data,
1352: '_PVT'
1353: );
1357: okc_debug.log('5400: Exiting validate_row:OTHERS Exception', 2);
1358: okc_debug.Reset_Indentation;
1359: END IF;
1360:
1361: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1362: (
1363: l_api_name,
1364: G_PKG_NAME,
1365: 'OTHERS',
1385: x_sae_rec OUT NOCOPY sae_rec_type) IS
1386:
1387: l_api_version CONSTANT NUMBER := 1;
1388: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
1389: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1390: l_sae_rec sae_rec_type := p_sae_rec;
1391: l_def_sae_rec sae_rec_type;
1392: -------------------------------------------
1393: -- Set_Attributes for:OKC_STD_ARTICLES_B --
1395: FUNCTION Set_Attributes (
1396: p_sae_rec IN sae_rec_type,
1397: x_sae_rec OUT NOCOPY sae_rec_type
1398: ) RETURN VARCHAR2 IS
1399: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1400: BEGIN
1401:
1402: x_sae_rec := p_sae_rec;
1403: RETURN(l_return_status);
1409: okc_debug.Set_Indentation('OKC_SAE_PVT');
1410: okc_debug.log('5600: Entered insert_row', 2);
1411: END IF;
1412:
1413: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1414: p_init_msg_list,
1415: '_PVT',
1416: x_return_status);
1417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1413: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1414: p_init_msg_list,
1415: '_PVT',
1416: x_return_status);
1417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1420: RAISE OKC_API.G_EXCEPTION_ERROR;
1421: END IF;
1414: p_init_msg_list,
1415: '_PVT',
1416: x_return_status);
1417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1420: RAISE OKC_API.G_EXCEPTION_ERROR;
1421: END IF;
1422: --- Setting item attributes
1415: '_PVT',
1416: x_return_status);
1417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1420: RAISE OKC_API.G_EXCEPTION_ERROR;
1421: END IF;
1422: --- Setting item attributes
1423: l_return_status := Set_Attributes(
1416: x_return_status);
1417: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1418: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1419: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1420: RAISE OKC_API.G_EXCEPTION_ERROR;
1421: END IF;
1422: --- Setting item attributes
1423: l_return_status := Set_Attributes(
1424: p_sae_rec, -- IN
1423: l_return_status := Set_Attributes(
1424: p_sae_rec, -- IN
1425: l_sae_rec); -- OUT
1426: --- If any errors happen abort API
1427: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1428: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1430: RAISE OKC_API.G_EXCEPTION_ERROR;
1431: END IF;
1424: p_sae_rec, -- IN
1425: l_sae_rec); -- OUT
1426: --- If any errors happen abort API
1427: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1428: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1430: RAISE OKC_API.G_EXCEPTION_ERROR;
1431: END IF;
1432: INSERT INTO OKC_STD_ARTICLES_B(
1425: l_sae_rec); -- OUT
1426: --- If any errors happen abort API
1427: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1428: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1430: RAISE OKC_API.G_EXCEPTION_ERROR;
1431: END IF;
1432: INSERT INTO OKC_STD_ARTICLES_B(
1433: id,
1426: --- If any errors happen abort API
1427: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1428: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1429: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1430: RAISE OKC_API.G_EXCEPTION_ERROR;
1431: END IF;
1432: INSERT INTO OKC_STD_ARTICLES_B(
1433: id,
1434: sbt_code,
1480: l_sae_rec.attribute14,
1481: l_sae_rec.attribute15);
1482: -- Set OUT values
1483: x_sae_rec := l_sae_rec;
1484: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1485:
1486: IF (l_debug = 'Y') THEN
1487: okc_debug.log('5700: Leaving insert_row', 2);
1488: okc_debug.Reset_Indentation;
1488: okc_debug.Reset_Indentation;
1489: END IF;
1490:
1491: EXCEPTION
1492: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1493:
1494: IF (l_debug = 'Y') THEN
1495: okc_debug.log('5800: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1496: okc_debug.Reset_Indentation;
1491: EXCEPTION
1492: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1493:
1494: IF (l_debug = 'Y') THEN
1495: okc_debug.log('5800: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1496: okc_debug.Reset_Indentation;
1497: END IF;
1498:
1499: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1495: okc_debug.log('5800: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1496: okc_debug.Reset_Indentation;
1497: END IF;
1498:
1499: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1500: (
1501: l_api_name,
1502: G_PKG_NAME,
1503: 'OKC_API.G_RET_STS_ERROR',
1499: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1500: (
1501: l_api_name,
1502: G_PKG_NAME,
1503: 'OKC_API.G_RET_STS_ERROR',
1504: x_msg_count,
1505: x_msg_data,
1506: '_PVT'
1507: );
1504: x_msg_count,
1505: x_msg_data,
1506: '_PVT'
1507: );
1508: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1509:
1510: IF (l_debug = 'Y') THEN
1511: okc_debug.log('5900: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1512: okc_debug.Reset_Indentation;
1507: );
1508: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1509:
1510: IF (l_debug = 'Y') THEN
1511: okc_debug.log('5900: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1512: okc_debug.Reset_Indentation;
1513: END IF;
1514:
1515: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1511: okc_debug.log('5900: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1512: okc_debug.Reset_Indentation;
1513: END IF;
1514:
1515: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1516: (
1517: l_api_name,
1518: G_PKG_NAME,
1519: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1515: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1516: (
1517: l_api_name,
1518: G_PKG_NAME,
1519: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1520: x_msg_count,
1521: x_msg_data,
1522: '_PVT'
1523: );
1527: okc_debug.log('6000: Exiting insert_row:OTHERS Exception', 2);
1528: okc_debug.Reset_Indentation;
1529: END IF;
1530:
1531: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1532: (
1533: l_api_name,
1534: G_PKG_NAME,
1535: 'OTHERS',
1551: x_okc_std_articles_tl_rec OUT NOCOPY okc_std_articles_tl_rec_type) IS
1552:
1553: l_api_version CONSTANT NUMBER := 1;
1554: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1555: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1556: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type := p_okc_std_articles_tl_rec;
1557: ldefokcstdarticlestlrec okc_std_articles_tl_rec_type;
1558: CURSOR get_languages IS
1559: SELECT *
1565: FUNCTION Set_Attributes (
1566: p_okc_std_articles_tl_rec IN okc_std_articles_tl_rec_type,
1567: x_okc_std_articles_tl_rec OUT NOCOPY okc_std_articles_tl_rec_type
1568: ) RETURN VARCHAR2 IS
1569: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1570: BEGIN
1571:
1572: x_okc_std_articles_tl_rec := p_okc_std_articles_tl_rec;
1573: --x_okc_std_articles_tl_rec.LANGUAGE := USERENV('LANG');
1583: okc_debug.Set_Indentation('OKC_SAE_PVT');
1584: okc_debug.log('6200: Entered insert_row', 2);
1585: END IF;
1586:
1587: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1588: p_init_msg_list,
1589: '_PVT',
1590: x_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1587: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1588: p_init_msg_list,
1589: '_PVT',
1590: x_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1588: p_init_msg_list,
1589: '_PVT',
1590: x_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1596: --- Setting item attributes
1589: '_PVT',
1590: x_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1596: --- Setting item attributes
1597: l_return_status := Set_Attributes(
1590: x_return_status);
1591: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1592: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1593: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1594: RAISE OKC_API.G_EXCEPTION_ERROR;
1595: END IF;
1596: --- Setting item attributes
1597: l_return_status := Set_Attributes(
1598: p_okc_std_articles_tl_rec, -- IN
1597: l_return_status := Set_Attributes(
1598: p_okc_std_articles_tl_rec, -- IN
1599: l_okc_std_articles_tl_rec); -- OUT
1600: --- If any errors happen abort API
1601: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1602: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1603: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1604: RAISE OKC_API.G_EXCEPTION_ERROR;
1605: END IF;
1598: p_okc_std_articles_tl_rec, -- IN
1599: l_okc_std_articles_tl_rec); -- OUT
1600: --- If any errors happen abort API
1601: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1602: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1603: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1604: RAISE OKC_API.G_EXCEPTION_ERROR;
1605: END IF;
1606: FOR l_lang_rec IN get_languages LOOP
1599: l_okc_std_articles_tl_rec); -- OUT
1600: --- If any errors happen abort API
1601: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1602: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1603: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1604: RAISE OKC_API.G_EXCEPTION_ERROR;
1605: END IF;
1606: FOR l_lang_rec IN get_languages LOOP
1607: l_okc_std_articles_tl_rec.language := l_lang_rec.language_code;
1600: --- If any errors happen abort API
1601: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1602: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1603: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1604: RAISE OKC_API.G_EXCEPTION_ERROR;
1605: END IF;
1606: FOR l_lang_rec IN get_languages LOOP
1607: l_okc_std_articles_tl_rec.language := l_lang_rec.language_code;
1608: INSERT INTO OKC_STD_ARTICLES_TL(
1629: l_okc_std_articles_tl_rec.last_update_login);
1630: END LOOP;
1631: -- Set OUT values
1632: x_okc_std_articles_tl_rec := l_okc_std_articles_tl_rec;
1633: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1634:
1635: IF (l_debug = 'Y') THEN
1636: okc_debug.log('6300: Leaving insert_row', 2);
1637: okc_debug.Reset_Indentation;
1637: okc_debug.Reset_Indentation;
1638: END IF;
1639:
1640: EXCEPTION
1641: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1642:
1643: IF (l_debug = 'Y') THEN
1644: okc_debug.log('6400: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1645: okc_debug.Reset_Indentation;
1640: EXCEPTION
1641: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1642:
1643: IF (l_debug = 'Y') THEN
1644: okc_debug.log('6400: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1645: okc_debug.Reset_Indentation;
1646: END IF;
1647:
1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1644: okc_debug.log('6400: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1645: okc_debug.Reset_Indentation;
1646: END IF;
1647:
1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1649: (
1650: l_api_name,
1651: G_PKG_NAME,
1652: 'OKC_API.G_RET_STS_ERROR',
1648: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1649: (
1650: l_api_name,
1651: G_PKG_NAME,
1652: 'OKC_API.G_RET_STS_ERROR',
1653: x_msg_count,
1654: x_msg_data,
1655: '_PVT'
1656: );
1653: x_msg_count,
1654: x_msg_data,
1655: '_PVT'
1656: );
1657: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1658:
1659: IF (l_debug = 'Y') THEN
1660: okc_debug.log('6500: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1661: okc_debug.Reset_Indentation;
1656: );
1657: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1658:
1659: IF (l_debug = 'Y') THEN
1660: okc_debug.log('6500: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1661: okc_debug.Reset_Indentation;
1662: END IF;
1663:
1664: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1660: okc_debug.log('6500: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1661: okc_debug.Reset_Indentation;
1662: END IF;
1663:
1664: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1665: (
1666: l_api_name,
1667: G_PKG_NAME,
1668: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1664: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1665: (
1666: l_api_name,
1667: G_PKG_NAME,
1668: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1669: x_msg_count,
1670: x_msg_data,
1671: '_PVT'
1672: );
1676: okc_debug.log('6600: Exiting insert_row:OTHERS Exception', 2);
1677: okc_debug.Reset_Indentation;
1678: END IF;
1679:
1680: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1681: (
1682: l_api_name,
1683: G_PKG_NAME,
1684: 'OTHERS',
1701: x_saev_rec OUT NOCOPY saev_rec_type) IS
1702:
1703: l_api_version CONSTANT NUMBER := 1;
1704: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1705: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1706: l_saev_rec saev_rec_type;
1707: l_def_saev_rec saev_rec_type;
1708: l_sae_rec sae_rec_type;
1709: lx_sae_rec sae_rec_type;
1733: FUNCTION Set_Attributes (
1734: p_saev_rec IN saev_rec_type,
1735: x_saev_rec OUT NOCOPY saev_rec_type
1736: ) RETURN VARCHAR2 IS
1737: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1738: BEGIN
1739:
1740: x_saev_rec := p_saev_rec;
1741: x_saev_rec.OBJECT_VERSION_NUMBER := 1;
1755: okc_debug.Set_Indentation('OKC_SAE_PVT');
1756: okc_debug.log('6900: Entered insert_row', 2);
1757: END IF;
1758:
1759: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1760: G_PKG_NAME,
1761: p_init_msg_list,
1762: l_api_version,
1763: p_api_version,
1762: l_api_version,
1763: p_api_version,
1764: '_PVT',
1765: x_return_status);
1766: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1768: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1763: p_api_version,
1764: '_PVT',
1765: x_return_status);
1766: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1768: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1771: l_saev_rec := null_out_defaults(p_saev_rec);
1764: '_PVT',
1765: x_return_status);
1766: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1768: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1771: l_saev_rec := null_out_defaults(p_saev_rec);
1772: -- Set primary key value
1765: x_return_status);
1766: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1768: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1769: RAISE OKC_API.G_EXCEPTION_ERROR;
1770: END IF;
1771: l_saev_rec := null_out_defaults(p_saev_rec);
1772: -- Set primary key value
1773: l_saev_rec.ID := get_seq_id;
1775: l_return_status := Set_Attributes(
1776: l_saev_rec, -- IN
1777: l_def_saev_rec); -- OUT
1778: --- If any errors happen abort API
1779: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1781: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1782: RAISE OKC_API.G_EXCEPTION_ERROR;
1783: END IF;
1776: l_saev_rec, -- IN
1777: l_def_saev_rec); -- OUT
1778: --- If any errors happen abort API
1779: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1781: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1782: RAISE OKC_API.G_EXCEPTION_ERROR;
1783: END IF;
1784: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
1777: l_def_saev_rec); -- OUT
1778: --- If any errors happen abort API
1779: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1781: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1782: RAISE OKC_API.G_EXCEPTION_ERROR;
1783: END IF;
1784: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
1785: --- Validate all non-missing attributes (Item Level Validation)
1778: --- If any errors happen abort API
1779: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1780: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1781: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1782: RAISE OKC_API.G_EXCEPTION_ERROR;
1783: END IF;
1784: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
1785: --- Validate all non-missing attributes (Item Level Validation)
1786: l_return_status := Validate_Attributes(l_def_saev_rec);
1784: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
1785: --- Validate all non-missing attributes (Item Level Validation)
1786: l_return_status := Validate_Attributes(l_def_saev_rec);
1787: --- If any errors happen abort API
1788: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1789: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1790: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1791: RAISE OKC_API.G_EXCEPTION_ERROR;
1792: END IF;
1785: --- Validate all non-missing attributes (Item Level Validation)
1786: l_return_status := Validate_Attributes(l_def_saev_rec);
1787: --- If any errors happen abort API
1788: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1789: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1790: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1791: RAISE OKC_API.G_EXCEPTION_ERROR;
1792: END IF;
1793: l_return_status := Validate_Record(l_def_saev_rec);
1786: l_return_status := Validate_Attributes(l_def_saev_rec);
1787: --- If any errors happen abort API
1788: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1789: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1790: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1791: RAISE OKC_API.G_EXCEPTION_ERROR;
1792: END IF;
1793: l_return_status := Validate_Record(l_def_saev_rec);
1794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1787: --- If any errors happen abort API
1788: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1789: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1790: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1791: RAISE OKC_API.G_EXCEPTION_ERROR;
1792: END IF;
1793: l_return_status := Validate_Record(l_def_saev_rec);
1794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1790: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1791: RAISE OKC_API.G_EXCEPTION_ERROR;
1792: END IF;
1793: l_return_status := Validate_Record(l_def_saev_rec);
1794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1797: RAISE OKC_API.G_EXCEPTION_ERROR;
1798: END IF;
1791: RAISE OKC_API.G_EXCEPTION_ERROR;
1792: END IF;
1793: l_return_status := Validate_Record(l_def_saev_rec);
1794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1797: RAISE OKC_API.G_EXCEPTION_ERROR;
1798: END IF;
1799: --------------------------------------
1792: END IF;
1793: l_return_status := Validate_Record(l_def_saev_rec);
1794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1797: RAISE OKC_API.G_EXCEPTION_ERROR;
1798: END IF;
1799: --------------------------------------
1800: -- Move VIEW record to "Child" records
1793: l_return_status := Validate_Record(l_def_saev_rec);
1794: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1795: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1796: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1797: RAISE OKC_API.G_EXCEPTION_ERROR;
1798: END IF;
1799: --------------------------------------
1800: -- Move VIEW record to "Child" records
1801: --------------------------------------
1811: x_msg_data,
1812: l_sae_rec,
1813: lx_sae_rec
1814: );
1815: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1812: l_sae_rec,
1813: lx_sae_rec
1814: );
1815: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: migrate(lx_sae_rec, l_def_saev_rec);
1813: lx_sae_rec
1814: );
1815: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: migrate(lx_sae_rec, l_def_saev_rec);
1821: insert_row(
1814: );
1815: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1816: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1817: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1818: RAISE OKC_API.G_EXCEPTION_ERROR;
1819: END IF;
1820: migrate(lx_sae_rec, l_def_saev_rec);
1821: insert_row(
1822: p_init_msg_list,
1825: x_msg_data,
1826: l_okc_std_articles_tl_rec,
1827: lx_okc_std_articles_tl_rec
1828: );
1829: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_ERROR;
1833: END IF;
1826: l_okc_std_articles_tl_rec,
1827: lx_okc_std_articles_tl_rec
1828: );
1829: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
1827: lx_okc_std_articles_tl_rec
1828: );
1829: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
1835: -- Set OUT values
1828: );
1829: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1830: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1831: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1832: RAISE OKC_API.G_EXCEPTION_ERROR;
1833: END IF;
1834: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
1835: -- Set OUT values
1836: x_saev_rec := l_def_saev_rec;
1833: END IF;
1834: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
1835: -- Set OUT values
1836: x_saev_rec := l_def_saev_rec;
1837: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1838:
1839:
1840: IF (l_debug = 'Y') THEN
1841: okc_debug.log('7000: Leaving insert_row', 2);
1842: okc_debug.Reset_Indentation;
1843: END IF;
1844:
1845: EXCEPTION
1846: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1847:
1848: IF (l_debug = 'Y') THEN
1849: okc_debug.log('7100: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1850: okc_debug.Reset_Indentation;
1845: EXCEPTION
1846: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1847:
1848: IF (l_debug = 'Y') THEN
1849: okc_debug.log('7100: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1850: okc_debug.Reset_Indentation;
1851: END IF;
1852:
1853: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1849: okc_debug.log('7100: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1850: okc_debug.Reset_Indentation;
1851: END IF;
1852:
1853: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1854: (
1855: l_api_name,
1856: G_PKG_NAME,
1857: 'OKC_API.G_RET_STS_ERROR',
1853: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1854: (
1855: l_api_name,
1856: G_PKG_NAME,
1857: 'OKC_API.G_RET_STS_ERROR',
1858: x_msg_count,
1859: x_msg_data,
1860: '_PVT'
1861: );
1858: x_msg_count,
1859: x_msg_data,
1860: '_PVT'
1861: );
1862: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1863:
1864: IF (l_debug = 'Y') THEN
1865: okc_debug.log('7200: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1866: okc_debug.Reset_Indentation;
1861: );
1862: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1863:
1864: IF (l_debug = 'Y') THEN
1865: okc_debug.log('7200: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1866: okc_debug.Reset_Indentation;
1867: END IF;
1868:
1869: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1865: okc_debug.log('7200: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1866: okc_debug.Reset_Indentation;
1867: END IF;
1868:
1869: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1873: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1869: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1870: (
1871: l_api_name,
1872: G_PKG_NAME,
1873: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1874: x_msg_count,
1875: x_msg_data,
1876: '_PVT'
1877: );
1881: okc_debug.log('7300: Exiting insert_row:OTHERS Exception', 2);
1882: okc_debug.Reset_Indentation;
1883: END IF;
1884:
1885: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1886: (
1887: l_api_name,
1888: G_PKG_NAME,
1889: 'OTHERS',
1906: x_saev_tbl OUT NOCOPY saev_tbl_type) IS
1907:
1908: l_api_version CONSTANT NUMBER := 1;
1909: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1910: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1911: i NUMBER := 0;
1912: BEGIN
1913:
1914: IF (l_debug = 'Y') THEN
1938: okc_debug.Reset_Indentation;
1939: END IF;
1940:
1941: EXCEPTION
1942: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1943:
1944: IF (l_debug = 'Y') THEN
1945: okc_debug.log('7600: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1946: okc_debug.Reset_Indentation;
1941: EXCEPTION
1942: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1943:
1944: IF (l_debug = 'Y') THEN
1945: okc_debug.log('7600: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1946: okc_debug.Reset_Indentation;
1947: END IF;
1948:
1949: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1945: okc_debug.log('7600: Exiting insert_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
1946: okc_debug.Reset_Indentation;
1947: END IF;
1948:
1949: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1950: (
1951: l_api_name,
1952: G_PKG_NAME,
1953: 'OKC_API.G_RET_STS_ERROR',
1949: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1950: (
1951: l_api_name,
1952: G_PKG_NAME,
1953: 'OKC_API.G_RET_STS_ERROR',
1954: x_msg_count,
1955: x_msg_data,
1956: '_PVT'
1957: );
1954: x_msg_count,
1955: x_msg_data,
1956: '_PVT'
1957: );
1958: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1959:
1960: IF (l_debug = 'Y') THEN
1961: okc_debug.log('7700: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1962: okc_debug.Reset_Indentation;
1957: );
1958: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1959:
1960: IF (l_debug = 'Y') THEN
1961: okc_debug.log('7700: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1962: okc_debug.Reset_Indentation;
1963: END IF;
1964:
1965: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1961: okc_debug.log('7700: Exiting insert_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1962: okc_debug.Reset_Indentation;
1963: END IF;
1964:
1965: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1966: (
1967: l_api_name,
1968: G_PKG_NAME,
1969: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1965: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1966: (
1967: l_api_name,
1968: G_PKG_NAME,
1969: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1970: x_msg_count,
1971: x_msg_data,
1972: '_PVT'
1973: );
1977: okc_debug.log('7800: Exiting insert_row:OTHERS Exception', 2);
1978: okc_debug.Reset_Indentation;
1979: END IF;
1980:
1981: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
1982: (
1983: l_api_name,
1984: G_PKG_NAME,
1985: 'OTHERS',
2017: FROM OKC_STD_ARTICLES_B
2018: WHERE ID = p_sae_rec.id;
2019: l_api_version CONSTANT NUMBER := 1;
2020: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
2021: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2022: l_object_version_number OKC_STD_ARTICLES_B.OBJECT_VERSION_NUMBER%TYPE;
2023: lc_object_version_number OKC_STD_ARTICLES_B.OBJECT_VERSION_NUMBER%TYPE;
2024: l_row_notfound BOOLEAN := FALSE;
2025: lc_row_notfound BOOLEAN := FALSE;
2029: okc_debug.Set_Indentation('OKC_SAE_PVT');
2030: okc_debug.log('7900: Entered lock_row', 2);
2031: END IF;
2032:
2033: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2034: p_init_msg_list,
2035: '_PVT',
2036: x_return_status);
2037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2033: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2034: p_init_msg_list,
2035: '_PVT',
2036: x_return_status);
2037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_ERROR;
2041: END IF;
2034: p_init_msg_list,
2035: '_PVT',
2036: x_return_status);
2037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_ERROR;
2041: END IF;
2042: BEGIN
2035: '_PVT',
2036: x_return_status);
2037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_ERROR;
2041: END IF;
2042: BEGIN
2043:
2036: x_return_status);
2037: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2038: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2039: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2040: RAISE OKC_API.G_EXCEPTION_ERROR;
2041: END IF;
2042: BEGIN
2043:
2044: IF (l_debug = 'Y') THEN
2066:
2067: IF (lock_csr%ISOPEN) THEN
2068: CLOSE lock_csr;
2069: END IF;
2070: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
2071: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
2072: END;
2073:
2074: IF ( l_row_notfound ) THEN
2077: lc_row_notfound := lchk_csr%NOTFOUND;
2078: CLOSE lchk_csr;
2079: END IF;
2080: IF (lc_row_notfound) THEN
2081: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2082: RAISE OKC_API.G_EXCEPTION_ERROR;
2083: ELSIF lc_object_version_number > p_sae_rec.object_version_number THEN
2084: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2078: CLOSE lchk_csr;
2079: END IF;
2080: IF (lc_row_notfound) THEN
2081: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2082: RAISE OKC_API.G_EXCEPTION_ERROR;
2083: ELSIF lc_object_version_number > p_sae_rec.object_version_number THEN
2084: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: ELSIF lc_object_version_number <> p_sae_rec.object_version_number THEN
2080: IF (lc_row_notfound) THEN
2081: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2082: RAISE OKC_API.G_EXCEPTION_ERROR;
2083: ELSIF lc_object_version_number > p_sae_rec.object_version_number THEN
2084: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: ELSIF lc_object_version_number <> p_sae_rec.object_version_number THEN
2087: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2088: RAISE OKC_API.G_EXCEPTION_ERROR;
2081: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2082: RAISE OKC_API.G_EXCEPTION_ERROR;
2083: ELSIF lc_object_version_number > p_sae_rec.object_version_number THEN
2084: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: ELSIF lc_object_version_number <> p_sae_rec.object_version_number THEN
2087: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2088: RAISE OKC_API.G_EXCEPTION_ERROR;
2089: ELSIF lc_object_version_number = -1 THEN
2083: ELSIF lc_object_version_number > p_sae_rec.object_version_number THEN
2084: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: ELSIF lc_object_version_number <> p_sae_rec.object_version_number THEN
2087: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2088: RAISE OKC_API.G_EXCEPTION_ERROR;
2089: ELSIF lc_object_version_number = -1 THEN
2090: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
2091: RAISE OKC_API.G_EXCEPTION_ERROR;
2084: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: ELSIF lc_object_version_number <> p_sae_rec.object_version_number THEN
2087: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2088: RAISE OKC_API.G_EXCEPTION_ERROR;
2089: ELSIF lc_object_version_number = -1 THEN
2090: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
2091: RAISE OKC_API.G_EXCEPTION_ERROR;
2092: END IF;
2086: ELSIF lc_object_version_number <> p_sae_rec.object_version_number THEN
2087: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2088: RAISE OKC_API.G_EXCEPTION_ERROR;
2089: ELSIF lc_object_version_number = -1 THEN
2090: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
2091: RAISE OKC_API.G_EXCEPTION_ERROR;
2092: END IF;
2093: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2094:
2087: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
2088: RAISE OKC_API.G_EXCEPTION_ERROR;
2089: ELSIF lc_object_version_number = -1 THEN
2090: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
2091: RAISE OKC_API.G_EXCEPTION_ERROR;
2092: END IF;
2093: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2094:
2095: IF (l_debug = 'Y') THEN
2089: ELSIF lc_object_version_number = -1 THEN
2090: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
2091: RAISE OKC_API.G_EXCEPTION_ERROR;
2092: END IF;
2093: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2094:
2095: IF (l_debug = 'Y') THEN
2096: okc_debug.log('8300: Leaving lock_row', 2);
2097: okc_debug.Reset_Indentation;
2097: okc_debug.Reset_Indentation;
2098: END IF;
2099:
2100: EXCEPTION
2101: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2102:
2103: IF (l_debug = 'Y') THEN
2104: okc_debug.log('8400: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2105: okc_debug.Reset_Indentation;
2100: EXCEPTION
2101: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2102:
2103: IF (l_debug = 'Y') THEN
2104: okc_debug.log('8400: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2105: okc_debug.Reset_Indentation;
2106: END IF;
2107:
2108: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2104: okc_debug.log('8400: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2105: okc_debug.Reset_Indentation;
2106: END IF;
2107:
2108: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2109: (
2110: l_api_name,
2111: G_PKG_NAME,
2112: 'OKC_API.G_RET_STS_ERROR',
2108: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2109: (
2110: l_api_name,
2111: G_PKG_NAME,
2112: 'OKC_API.G_RET_STS_ERROR',
2113: x_msg_count,
2114: x_msg_data,
2115: '_PVT'
2116: );
2113: x_msg_count,
2114: x_msg_data,
2115: '_PVT'
2116: );
2117: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2118:
2119: IF (l_debug = 'Y') THEN
2120: okc_debug.log('8500: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2121: okc_debug.Reset_Indentation;
2116: );
2117: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2118:
2119: IF (l_debug = 'Y') THEN
2120: okc_debug.log('8500: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2121: okc_debug.Reset_Indentation;
2122: END IF;
2123:
2124: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2120: okc_debug.log('8500: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2121: okc_debug.Reset_Indentation;
2122: END IF;
2123:
2124: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2125: (
2126: l_api_name,
2127: G_PKG_NAME,
2128: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2124: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2125: (
2126: l_api_name,
2127: G_PKG_NAME,
2128: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2129: x_msg_count,
2130: x_msg_data,
2131: '_PVT'
2132: );
2136: okc_debug.log('8600: Exiting lock_row:OTHERS Exception', 2);
2137: okc_debug.Reset_Indentation;
2138: END IF;
2139:
2140: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2141: (
2142: l_api_name,
2143: G_PKG_NAME,
2144: 'OTHERS',
2167: FOR UPDATE NOWAIT;
2168:
2169: l_api_version CONSTANT NUMBER := 1;
2170: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
2171: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2172: l_lock_var lock_csr%ROWTYPE;
2173: l_row_notfound BOOLEAN := FALSE;
2174: lc_row_notfound BOOLEAN := FALSE;
2175: BEGIN
2178: okc_debug.Set_Indentation('OKC_SAE_PVT');
2179: okc_debug.log('8700: Entered lock_row', 2);
2180: END IF;
2181:
2182: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2183: p_init_msg_list,
2184: '_PVT',
2185: x_return_status);
2186: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2182: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2183: p_init_msg_list,
2184: '_PVT',
2185: x_return_status);
2186: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2187: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2189: RAISE OKC_API.G_EXCEPTION_ERROR;
2190: END IF;
2183: p_init_msg_list,
2184: '_PVT',
2185: x_return_status);
2186: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2187: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2189: RAISE OKC_API.G_EXCEPTION_ERROR;
2190: END IF;
2191: BEGIN
2184: '_PVT',
2185: x_return_status);
2186: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2187: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2189: RAISE OKC_API.G_EXCEPTION_ERROR;
2190: END IF;
2191: BEGIN
2192:
2185: x_return_status);
2186: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2187: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2189: RAISE OKC_API.G_EXCEPTION_ERROR;
2190: END IF;
2191: BEGIN
2192:
2193: IF (l_debug = 'Y') THEN
2215:
2216: IF (lock_csr%ISOPEN) THEN
2217: CLOSE lock_csr;
2218: END IF;
2219: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
2220: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
2221: END;
2222:
2223: IF ( l_row_notfound ) THEN
2220: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
2221: END;
2222:
2223: IF ( l_row_notfound ) THEN
2224: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2225: RAISE OKC_API.G_EXCEPTION_ERROR;
2226: END IF;
2227: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2228:
2221: END;
2222:
2223: IF ( l_row_notfound ) THEN
2224: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2225: RAISE OKC_API.G_EXCEPTION_ERROR;
2226: END IF;
2227: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2228:
2229: IF (l_debug = 'Y') THEN
2223: IF ( l_row_notfound ) THEN
2224: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
2225: RAISE OKC_API.G_EXCEPTION_ERROR;
2226: END IF;
2227: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2228:
2229: IF (l_debug = 'Y') THEN
2230: okc_debug.log('9100: Leaving lock_row', 2);
2231: okc_debug.Reset_Indentation;
2231: okc_debug.Reset_Indentation;
2232: END IF;
2233:
2234: EXCEPTION
2235: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2236:
2237: IF (l_debug = 'Y') THEN
2238: okc_debug.log('9200: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2239: okc_debug.Reset_Indentation;
2234: EXCEPTION
2235: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2236:
2237: IF (l_debug = 'Y') THEN
2238: okc_debug.log('9200: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2239: okc_debug.Reset_Indentation;
2240: END IF;
2241:
2242: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2238: okc_debug.log('9200: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2239: okc_debug.Reset_Indentation;
2240: END IF;
2241:
2242: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2243: (
2244: l_api_name,
2245: G_PKG_NAME,
2246: 'OKC_API.G_RET_STS_ERROR',
2242: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2243: (
2244: l_api_name,
2245: G_PKG_NAME,
2246: 'OKC_API.G_RET_STS_ERROR',
2247: x_msg_count,
2248: x_msg_data,
2249: '_PVT'
2250: );
2247: x_msg_count,
2248: x_msg_data,
2249: '_PVT'
2250: );
2251: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2252:
2253: IF (l_debug = 'Y') THEN
2254: okc_debug.log('9300: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2255: okc_debug.Reset_Indentation;
2250: );
2251: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2252:
2253: IF (l_debug = 'Y') THEN
2254: okc_debug.log('9300: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2255: okc_debug.Reset_Indentation;
2256: END IF;
2257:
2258: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2254: okc_debug.log('9300: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2255: okc_debug.Reset_Indentation;
2256: END IF;
2257:
2258: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2259: (
2260: l_api_name,
2261: G_PKG_NAME,
2262: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2258: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2259: (
2260: l_api_name,
2261: G_PKG_NAME,
2262: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2263: x_msg_count,
2264: x_msg_data,
2265: '_PVT'
2266: );
2270: okc_debug.log('9400: Exiting lock_row:OTHERS Exception', 2);
2271: okc_debug.Reset_Indentation;
2272: END IF;
2273:
2274: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2275: (
2276: l_api_name,
2277: G_PKG_NAME,
2278: 'OTHERS',
2294: p_saev_rec IN saev_rec_type) IS
2295:
2296: l_api_version CONSTANT NUMBER := 1;
2297: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
2298: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2299: l_sae_rec sae_rec_type;
2300: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type;
2301: BEGIN
2302:
2304: okc_debug.Set_Indentation('OKC_SAE_PVT');
2305: okc_debug.log('9500: Entered lock_row', 2);
2306: END IF;
2307:
2308: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2309: G_PKG_NAME,
2310: p_init_msg_list,
2311: l_api_version,
2312: p_api_version,
2311: l_api_version,
2312: p_api_version,
2313: '_PVT',
2314: x_return_status);
2315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2318: RAISE OKC_API.G_EXCEPTION_ERROR;
2319: END IF;
2312: p_api_version,
2313: '_PVT',
2314: x_return_status);
2315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2318: RAISE OKC_API.G_EXCEPTION_ERROR;
2319: END IF;
2320: --------------------------------------
2313: '_PVT',
2314: x_return_status);
2315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2318: RAISE OKC_API.G_EXCEPTION_ERROR;
2319: END IF;
2320: --------------------------------------
2321: -- Move VIEW record to "Child" records
2314: x_return_status);
2315: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2316: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2317: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2318: RAISE OKC_API.G_EXCEPTION_ERROR;
2319: END IF;
2320: --------------------------------------
2321: -- Move VIEW record to "Child" records
2322: --------------------------------------
2331: x_msg_count,
2332: x_msg_data,
2333: l_sae_rec
2334: );
2335: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2338: RAISE OKC_API.G_EXCEPTION_ERROR;
2339: END IF;
2332: x_msg_data,
2333: l_sae_rec
2334: );
2335: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2338: RAISE OKC_API.G_EXCEPTION_ERROR;
2339: END IF;
2340: lock_row(
2333: l_sae_rec
2334: );
2335: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2338: RAISE OKC_API.G_EXCEPTION_ERROR;
2339: END IF;
2340: lock_row(
2341: p_init_msg_list,
2334: );
2335: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2336: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2337: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2338: RAISE OKC_API.G_EXCEPTION_ERROR;
2339: END IF;
2340: lock_row(
2341: p_init_msg_list,
2342: x_return_status,
2343: x_msg_count,
2344: x_msg_data,
2345: l_okc_std_articles_tl_rec
2346: );
2347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2350: RAISE OKC_API.G_EXCEPTION_ERROR;
2351: END IF;
2344: x_msg_data,
2345: l_okc_std_articles_tl_rec
2346: );
2347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2350: RAISE OKC_API.G_EXCEPTION_ERROR;
2351: END IF;
2352: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2345: l_okc_std_articles_tl_rec
2346: );
2347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2350: RAISE OKC_API.G_EXCEPTION_ERROR;
2351: END IF;
2352: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2353:
2346: );
2347: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2350: RAISE OKC_API.G_EXCEPTION_ERROR;
2351: END IF;
2352: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2353:
2354: IF (l_debug = 'Y') THEN
2348: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2349: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2350: RAISE OKC_API.G_EXCEPTION_ERROR;
2351: END IF;
2352: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2353:
2354: IF (l_debug = 'Y') THEN
2355: okc_debug.log('9600: Leaving lock_row', 2);
2356: okc_debug.Reset_Indentation;
2356: okc_debug.Reset_Indentation;
2357: END IF;
2358:
2359: EXCEPTION
2360: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2361:
2362: IF (l_debug = 'Y') THEN
2363: okc_debug.log('9700: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2364: okc_debug.Reset_Indentation;
2359: EXCEPTION
2360: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2361:
2362: IF (l_debug = 'Y') THEN
2363: okc_debug.log('9700: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2364: okc_debug.Reset_Indentation;
2365: END IF;
2366:
2367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2363: okc_debug.log('9700: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2364: okc_debug.Reset_Indentation;
2365: END IF;
2366:
2367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2368: (
2369: l_api_name,
2370: G_PKG_NAME,
2371: 'OKC_API.G_RET_STS_ERROR',
2367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2368: (
2369: l_api_name,
2370: G_PKG_NAME,
2371: 'OKC_API.G_RET_STS_ERROR',
2372: x_msg_count,
2373: x_msg_data,
2374: '_PVT'
2375: );
2372: x_msg_count,
2373: x_msg_data,
2374: '_PVT'
2375: );
2376: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2377:
2378: IF (l_debug = 'Y') THEN
2379: okc_debug.log('9800: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2380: okc_debug.Reset_Indentation;
2375: );
2376: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2377:
2378: IF (l_debug = 'Y') THEN
2379: okc_debug.log('9800: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2380: okc_debug.Reset_Indentation;
2381: END IF;
2382:
2383: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2379: okc_debug.log('9800: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2380: okc_debug.Reset_Indentation;
2381: END IF;
2382:
2383: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2384: (
2385: l_api_name,
2386: G_PKG_NAME,
2387: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2383: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2384: (
2385: l_api_name,
2386: G_PKG_NAME,
2387: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2388: x_msg_count,
2389: x_msg_data,
2390: '_PVT'
2391: );
2395: okc_debug.log('9900: Exiting lock_row:OTHERS Exception', 2);
2396: okc_debug.Reset_Indentation;
2397: END IF;
2398:
2399: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2400: (
2401: l_api_name,
2402: G_PKG_NAME,
2403: 'OTHERS',
2419: p_saev_tbl IN saev_tbl_type) IS
2420:
2421: l_api_version CONSTANT NUMBER := 1;
2422: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
2423: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2424: i NUMBER := 0;
2425: BEGIN
2426:
2427: IF (l_debug = 'Y') THEN
2450: okc_debug.Reset_Indentation;
2451: END IF;
2452:
2453: EXCEPTION
2454: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2455:
2456: IF (l_debug = 'Y') THEN
2457: okc_debug.log('10200: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2458: okc_debug.Reset_Indentation;
2453: EXCEPTION
2454: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2455:
2456: IF (l_debug = 'Y') THEN
2457: okc_debug.log('10200: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2458: okc_debug.Reset_Indentation;
2459: END IF;
2460:
2461: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2457: okc_debug.log('10200: Exiting lock_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2458: okc_debug.Reset_Indentation;
2459: END IF;
2460:
2461: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2462: (
2463: l_api_name,
2464: G_PKG_NAME,
2465: 'OKC_API.G_RET_STS_ERROR',
2461: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2462: (
2463: l_api_name,
2464: G_PKG_NAME,
2465: 'OKC_API.G_RET_STS_ERROR',
2466: x_msg_count,
2467: x_msg_data,
2468: '_PVT'
2469: );
2466: x_msg_count,
2467: x_msg_data,
2468: '_PVT'
2469: );
2470: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2471:
2472: IF (l_debug = 'Y') THEN
2473: okc_debug.log('10300: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2474: okc_debug.Reset_Indentation;
2469: );
2470: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2471:
2472: IF (l_debug = 'Y') THEN
2473: okc_debug.log('10300: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2474: okc_debug.Reset_Indentation;
2475: END IF;
2476:
2477: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2473: okc_debug.log('10300: Exiting lock_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2474: okc_debug.Reset_Indentation;
2475: END IF;
2476:
2477: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2478: (
2479: l_api_name,
2480: G_PKG_NAME,
2481: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2477: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2478: (
2479: l_api_name,
2480: G_PKG_NAME,
2481: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2482: x_msg_count,
2483: x_msg_data,
2484: '_PVT'
2485: );
2489: okc_debug.log('10400: Exiting lock_row:OTHERS Exception', 2);
2490: okc_debug.Reset_Indentation;
2491: END IF;
2492:
2493: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2494: (
2495: l_api_name,
2496: G_PKG_NAME,
2497: 'OTHERS',
2517: x_sae_rec OUT NOCOPY sae_rec_type) IS
2518:
2519: l_api_version CONSTANT NUMBER := 1;
2520: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
2521: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2522: l_sae_rec sae_rec_type := p_sae_rec;
2523: l_def_sae_rec sae_rec_type;
2524: l_row_notfound BOOLEAN := TRUE;
2525: ----------------------------------
2530: x_sae_rec OUT NOCOPY sae_rec_type
2531: ) RETURN VARCHAR2 IS
2532: l_sae_rec sae_rec_type;
2533: l_row_notfound BOOLEAN := TRUE;
2534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2535: BEGIN
2536:
2537: IF (l_debug = 'Y') THEN
2538: okc_debug.Set_Indentation('OKC_SAE_PVT');
2542: x_sae_rec := p_sae_rec;
2543: -- Get current database values
2544: l_sae_rec := get_rec(p_sae_rec, l_row_notfound);
2545: IF (l_row_notfound) THEN
2546: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2547: END IF;
2548: IF (x_sae_rec.id = OKC_API.G_MISS_NUM)
2549: THEN
2550: x_sae_rec.id := l_sae_rec.id;
2544: l_sae_rec := get_rec(p_sae_rec, l_row_notfound);
2545: IF (l_row_notfound) THEN
2546: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2547: END IF;
2548: IF (x_sae_rec.id = OKC_API.G_MISS_NUM)
2549: THEN
2550: x_sae_rec.id := l_sae_rec.id;
2551: END IF;
2552: IF (x_sae_rec.sbt_code = OKC_API.G_MISS_CHAR)
2548: IF (x_sae_rec.id = OKC_API.G_MISS_NUM)
2549: THEN
2550: x_sae_rec.id := l_sae_rec.id;
2551: END IF;
2552: IF (x_sae_rec.sbt_code = OKC_API.G_MISS_CHAR)
2553: THEN
2554: x_sae_rec.sbt_code := l_sae_rec.sbt_code;
2555: END IF;
2556: IF (x_sae_rec.object_version_number = OKC_API.G_MISS_NUM)
2552: IF (x_sae_rec.sbt_code = OKC_API.G_MISS_CHAR)
2553: THEN
2554: x_sae_rec.sbt_code := l_sae_rec.sbt_code;
2555: END IF;
2556: IF (x_sae_rec.object_version_number = OKC_API.G_MISS_NUM)
2557: THEN
2558: x_sae_rec.object_version_number := l_sae_rec.object_version_number;
2559: END IF;
2560: IF (x_sae_rec.created_by = OKC_API.G_MISS_NUM)
2556: IF (x_sae_rec.object_version_number = OKC_API.G_MISS_NUM)
2557: THEN
2558: x_sae_rec.object_version_number := l_sae_rec.object_version_number;
2559: END IF;
2560: IF (x_sae_rec.created_by = OKC_API.G_MISS_NUM)
2561: THEN
2562: x_sae_rec.created_by := l_sae_rec.created_by;
2563: END IF;
2564: IF (x_sae_rec.creation_date = OKC_API.G_MISS_DATE)
2560: IF (x_sae_rec.created_by = OKC_API.G_MISS_NUM)
2561: THEN
2562: x_sae_rec.created_by := l_sae_rec.created_by;
2563: END IF;
2564: IF (x_sae_rec.creation_date = OKC_API.G_MISS_DATE)
2565: THEN
2566: x_sae_rec.creation_date := l_sae_rec.creation_date;
2567: END IF;
2568: IF (x_sae_rec.last_updated_by = OKC_API.G_MISS_NUM)
2564: IF (x_sae_rec.creation_date = OKC_API.G_MISS_DATE)
2565: THEN
2566: x_sae_rec.creation_date := l_sae_rec.creation_date;
2567: END IF;
2568: IF (x_sae_rec.last_updated_by = OKC_API.G_MISS_NUM)
2569: THEN
2570: x_sae_rec.last_updated_by := l_sae_rec.last_updated_by;
2571: END IF;
2572: IF (x_sae_rec.last_update_date = OKC_API.G_MISS_DATE)
2568: IF (x_sae_rec.last_updated_by = OKC_API.G_MISS_NUM)
2569: THEN
2570: x_sae_rec.last_updated_by := l_sae_rec.last_updated_by;
2571: END IF;
2572: IF (x_sae_rec.last_update_date = OKC_API.G_MISS_DATE)
2573: THEN
2574: x_sae_rec.last_update_date := l_sae_rec.last_update_date;
2575: END IF;
2576: IF (x_sae_rec.last_update_login = OKC_API.G_MISS_NUM)
2572: IF (x_sae_rec.last_update_date = OKC_API.G_MISS_DATE)
2573: THEN
2574: x_sae_rec.last_update_date := l_sae_rec.last_update_date;
2575: END IF;
2576: IF (x_sae_rec.last_update_login = OKC_API.G_MISS_NUM)
2577: THEN
2578: x_sae_rec.last_update_login := l_sae_rec.last_update_login;
2579: END IF;
2580: IF (x_sae_rec.attribute_category = OKC_API.G_MISS_CHAR)
2576: IF (x_sae_rec.last_update_login = OKC_API.G_MISS_NUM)
2577: THEN
2578: x_sae_rec.last_update_login := l_sae_rec.last_update_login;
2579: END IF;
2580: IF (x_sae_rec.attribute_category = OKC_API.G_MISS_CHAR)
2581: THEN
2582: x_sae_rec.attribute_category := l_sae_rec.attribute_category;
2583: END IF;
2584: IF (x_sae_rec.attribute1 = OKC_API.G_MISS_CHAR)
2580: IF (x_sae_rec.attribute_category = OKC_API.G_MISS_CHAR)
2581: THEN
2582: x_sae_rec.attribute_category := l_sae_rec.attribute_category;
2583: END IF;
2584: IF (x_sae_rec.attribute1 = OKC_API.G_MISS_CHAR)
2585: THEN
2586: x_sae_rec.attribute1 := l_sae_rec.attribute1;
2587: END IF;
2588: IF (x_sae_rec.attribute2 = OKC_API.G_MISS_CHAR)
2584: IF (x_sae_rec.attribute1 = OKC_API.G_MISS_CHAR)
2585: THEN
2586: x_sae_rec.attribute1 := l_sae_rec.attribute1;
2587: END IF;
2588: IF (x_sae_rec.attribute2 = OKC_API.G_MISS_CHAR)
2589: THEN
2590: x_sae_rec.attribute2 := l_sae_rec.attribute2;
2591: END IF;
2592: IF (x_sae_rec.attribute3 = OKC_API.G_MISS_CHAR)
2588: IF (x_sae_rec.attribute2 = OKC_API.G_MISS_CHAR)
2589: THEN
2590: x_sae_rec.attribute2 := l_sae_rec.attribute2;
2591: END IF;
2592: IF (x_sae_rec.attribute3 = OKC_API.G_MISS_CHAR)
2593: THEN
2594: x_sae_rec.attribute3 := l_sae_rec.attribute3;
2595: END IF;
2596: IF (x_sae_rec.attribute4 = OKC_API.G_MISS_CHAR)
2592: IF (x_sae_rec.attribute3 = OKC_API.G_MISS_CHAR)
2593: THEN
2594: x_sae_rec.attribute3 := l_sae_rec.attribute3;
2595: END IF;
2596: IF (x_sae_rec.attribute4 = OKC_API.G_MISS_CHAR)
2597: THEN
2598: x_sae_rec.attribute4 := l_sae_rec.attribute4;
2599: END IF;
2600: IF (x_sae_rec.attribute5 = OKC_API.G_MISS_CHAR)
2596: IF (x_sae_rec.attribute4 = OKC_API.G_MISS_CHAR)
2597: THEN
2598: x_sae_rec.attribute4 := l_sae_rec.attribute4;
2599: END IF;
2600: IF (x_sae_rec.attribute5 = OKC_API.G_MISS_CHAR)
2601: THEN
2602: x_sae_rec.attribute5 := l_sae_rec.attribute5;
2603: END IF;
2604: IF (x_sae_rec.attribute6 = OKC_API.G_MISS_CHAR)
2600: IF (x_sae_rec.attribute5 = OKC_API.G_MISS_CHAR)
2601: THEN
2602: x_sae_rec.attribute5 := l_sae_rec.attribute5;
2603: END IF;
2604: IF (x_sae_rec.attribute6 = OKC_API.G_MISS_CHAR)
2605: THEN
2606: x_sae_rec.attribute6 := l_sae_rec.attribute6;
2607: END IF;
2608: IF (x_sae_rec.attribute7 = OKC_API.G_MISS_CHAR)
2604: IF (x_sae_rec.attribute6 = OKC_API.G_MISS_CHAR)
2605: THEN
2606: x_sae_rec.attribute6 := l_sae_rec.attribute6;
2607: END IF;
2608: IF (x_sae_rec.attribute7 = OKC_API.G_MISS_CHAR)
2609: THEN
2610: x_sae_rec.attribute7 := l_sae_rec.attribute7;
2611: END IF;
2612: IF (x_sae_rec.attribute8 = OKC_API.G_MISS_CHAR)
2608: IF (x_sae_rec.attribute7 = OKC_API.G_MISS_CHAR)
2609: THEN
2610: x_sae_rec.attribute7 := l_sae_rec.attribute7;
2611: END IF;
2612: IF (x_sae_rec.attribute8 = OKC_API.G_MISS_CHAR)
2613: THEN
2614: x_sae_rec.attribute8 := l_sae_rec.attribute8;
2615: END IF;
2616: IF (x_sae_rec.attribute9 = OKC_API.G_MISS_CHAR)
2612: IF (x_sae_rec.attribute8 = OKC_API.G_MISS_CHAR)
2613: THEN
2614: x_sae_rec.attribute8 := l_sae_rec.attribute8;
2615: END IF;
2616: IF (x_sae_rec.attribute9 = OKC_API.G_MISS_CHAR)
2617: THEN
2618: x_sae_rec.attribute9 := l_sae_rec.attribute9;
2619: END IF;
2620: IF (x_sae_rec.attribute10 = OKC_API.G_MISS_CHAR)
2616: IF (x_sae_rec.attribute9 = OKC_API.G_MISS_CHAR)
2617: THEN
2618: x_sae_rec.attribute9 := l_sae_rec.attribute9;
2619: END IF;
2620: IF (x_sae_rec.attribute10 = OKC_API.G_MISS_CHAR)
2621: THEN
2622: x_sae_rec.attribute10 := l_sae_rec.attribute10;
2623: END IF;
2624: IF (x_sae_rec.attribute11 = OKC_API.G_MISS_CHAR)
2620: IF (x_sae_rec.attribute10 = OKC_API.G_MISS_CHAR)
2621: THEN
2622: x_sae_rec.attribute10 := l_sae_rec.attribute10;
2623: END IF;
2624: IF (x_sae_rec.attribute11 = OKC_API.G_MISS_CHAR)
2625: THEN
2626: x_sae_rec.attribute11 := l_sae_rec.attribute11;
2627: END IF;
2628: IF (x_sae_rec.attribute12 = OKC_API.G_MISS_CHAR)
2624: IF (x_sae_rec.attribute11 = OKC_API.G_MISS_CHAR)
2625: THEN
2626: x_sae_rec.attribute11 := l_sae_rec.attribute11;
2627: END IF;
2628: IF (x_sae_rec.attribute12 = OKC_API.G_MISS_CHAR)
2629: THEN
2630: x_sae_rec.attribute12 := l_sae_rec.attribute12;
2631: END IF;
2632: IF (x_sae_rec.attribute13 = OKC_API.G_MISS_CHAR)
2628: IF (x_sae_rec.attribute12 = OKC_API.G_MISS_CHAR)
2629: THEN
2630: x_sae_rec.attribute12 := l_sae_rec.attribute12;
2631: END IF;
2632: IF (x_sae_rec.attribute13 = OKC_API.G_MISS_CHAR)
2633: THEN
2634: x_sae_rec.attribute13 := l_sae_rec.attribute13;
2635: END IF;
2636: IF (x_sae_rec.attribute14 = OKC_API.G_MISS_CHAR)
2632: IF (x_sae_rec.attribute13 = OKC_API.G_MISS_CHAR)
2633: THEN
2634: x_sae_rec.attribute13 := l_sae_rec.attribute13;
2635: END IF;
2636: IF (x_sae_rec.attribute14 = OKC_API.G_MISS_CHAR)
2637: THEN
2638: x_sae_rec.attribute14 := l_sae_rec.attribute14;
2639: END IF;
2640: IF (x_sae_rec.attribute15 = OKC_API.G_MISS_CHAR)
2636: IF (x_sae_rec.attribute14 = OKC_API.G_MISS_CHAR)
2637: THEN
2638: x_sae_rec.attribute14 := l_sae_rec.attribute14;
2639: END IF;
2640: IF (x_sae_rec.attribute15 = OKC_API.G_MISS_CHAR)
2641: THEN
2642: x_sae_rec.attribute15 := l_sae_rec.attribute15;
2643: END IF;
2644:
2656: FUNCTION Set_Attributes (
2657: p_sae_rec IN sae_rec_type,
2658: x_sae_rec OUT NOCOPY sae_rec_type
2659: ) RETURN VARCHAR2 IS
2660: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2661: BEGIN
2662:
2663: x_sae_rec := p_sae_rec;
2664: RETURN(l_return_status);
2670: okc_debug.Set_Indentation('OKC_SAE_PVT');
2671: okc_debug.log('10700: Entered update_row', 2);
2672: END IF;
2673:
2674: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2675: p_init_msg_list,
2676: '_PVT',
2677: x_return_status);
2678: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2674: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2675: p_init_msg_list,
2676: '_PVT',
2677: x_return_status);
2678: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2681: RAISE OKC_API.G_EXCEPTION_ERROR;
2682: END IF;
2675: p_init_msg_list,
2676: '_PVT',
2677: x_return_status);
2678: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2681: RAISE OKC_API.G_EXCEPTION_ERROR;
2682: END IF;
2683: --- Setting item attributes
2676: '_PVT',
2677: x_return_status);
2678: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2681: RAISE OKC_API.G_EXCEPTION_ERROR;
2682: END IF;
2683: --- Setting item attributes
2684: l_return_status := Set_Attributes(
2677: x_return_status);
2678: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2679: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2681: RAISE OKC_API.G_EXCEPTION_ERROR;
2682: END IF;
2683: --- Setting item attributes
2684: l_return_status := Set_Attributes(
2685: p_sae_rec, -- IN
2684: l_return_status := Set_Attributes(
2685: p_sae_rec, -- IN
2686: l_sae_rec); -- OUT
2687: --- If any errors happen abort API
2688: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2689: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2690: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2691: RAISE OKC_API.G_EXCEPTION_ERROR;
2692: END IF;
2685: p_sae_rec, -- IN
2686: l_sae_rec); -- OUT
2687: --- If any errors happen abort API
2688: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2689: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2690: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2691: RAISE OKC_API.G_EXCEPTION_ERROR;
2692: END IF;
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2686: l_sae_rec); -- OUT
2687: --- If any errors happen abort API
2688: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2689: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2690: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2691: RAISE OKC_API.G_EXCEPTION_ERROR;
2692: END IF;
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2694: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2687: --- If any errors happen abort API
2688: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2689: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2690: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2691: RAISE OKC_API.G_EXCEPTION_ERROR;
2692: END IF;
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2694: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2695: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2690: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2691: RAISE OKC_API.G_EXCEPTION_ERROR;
2692: END IF;
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2694: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2695: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2696: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2697: RAISE OKC_API.G_EXCEPTION_ERROR;
2698: END IF;
2691: RAISE OKC_API.G_EXCEPTION_ERROR;
2692: END IF;
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2694: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2695: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2696: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2697: RAISE OKC_API.G_EXCEPTION_ERROR;
2698: END IF;
2699: UPDATE OKC_STD_ARTICLES_B
2692: END IF;
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2694: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2695: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2696: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2697: RAISE OKC_API.G_EXCEPTION_ERROR;
2698: END IF;
2699: UPDATE OKC_STD_ARTICLES_B
2700: SET SBT_CODE = l_def_sae_rec.sbt_code,
2693: l_return_status := populate_new_record(l_sae_rec, l_def_sae_rec);
2694: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2695: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2696: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2697: RAISE OKC_API.G_EXCEPTION_ERROR;
2698: END IF;
2699: UPDATE OKC_STD_ARTICLES_B
2700: SET SBT_CODE = l_def_sae_rec.sbt_code,
2701: OBJECT_VERSION_NUMBER = l_def_sae_rec.object_version_number,
2722: ATTRIBUTE15 = l_def_sae_rec.attribute15
2723: WHERE ID = l_def_sae_rec.id;
2724:
2725: x_sae_rec := l_def_sae_rec;
2726: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2727:
2728: IF (l_debug = 'Y') THEN
2729: okc_debug.log('10800: Leaving update_row', 2);
2730: okc_debug.Reset_Indentation;
2730: okc_debug.Reset_Indentation;
2731: END IF;
2732:
2733: EXCEPTION
2734: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2735:
2736: IF (l_debug = 'Y') THEN
2737: okc_debug.log('10900: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2738: okc_debug.Reset_Indentation;
2733: EXCEPTION
2734: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2735:
2736: IF (l_debug = 'Y') THEN
2737: okc_debug.log('10900: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2738: okc_debug.Reset_Indentation;
2739: END IF;
2740:
2741: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2737: okc_debug.log('10900: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2738: okc_debug.Reset_Indentation;
2739: END IF;
2740:
2741: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2742: (
2743: l_api_name,
2744: G_PKG_NAME,
2745: 'OKC_API.G_RET_STS_ERROR',
2741: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2742: (
2743: l_api_name,
2744: G_PKG_NAME,
2745: 'OKC_API.G_RET_STS_ERROR',
2746: x_msg_count,
2747: x_msg_data,
2748: '_PVT'
2749: );
2746: x_msg_count,
2747: x_msg_data,
2748: '_PVT'
2749: );
2750: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2751:
2752: IF (l_debug = 'Y') THEN
2753: okc_debug.log('11000: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2754: okc_debug.Reset_Indentation;
2749: );
2750: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2751:
2752: IF (l_debug = 'Y') THEN
2753: okc_debug.log('11000: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2754: okc_debug.Reset_Indentation;
2755: END IF;
2756:
2757: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2753: okc_debug.log('11000: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2754: okc_debug.Reset_Indentation;
2755: END IF;
2756:
2757: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2758: (
2759: l_api_name,
2760: G_PKG_NAME,
2761: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2757: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2758: (
2759: l_api_name,
2760: G_PKG_NAME,
2761: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2762: x_msg_count,
2763: x_msg_data,
2764: '_PVT'
2765: );
2769: okc_debug.log('11100: Exiting update_row:OTHERS Exception', 2);
2770: okc_debug.Reset_Indentation;
2771: END IF;
2772:
2773: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2774: (
2775: l_api_name,
2776: G_PKG_NAME,
2777: 'OTHERS',
2794: x_okc_std_articles_tl_rec OUT NOCOPY okc_std_articles_tl_rec_type) IS
2795:
2796: l_api_version CONSTANT NUMBER := 1;
2797: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2798: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2799: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type := p_okc_std_articles_tl_rec;
2800: ldefokcstdarticlestlrec okc_std_articles_tl_rec_type;
2801: l_row_notfound BOOLEAN := TRUE;
2802: ----------------------------------
2807: x_okc_std_articles_tl_rec OUT NOCOPY okc_std_articles_tl_rec_type
2808: ) RETURN VARCHAR2 IS
2809: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type;
2810: l_row_notfound BOOLEAN := TRUE;
2811: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2812: BEGIN
2813:
2814: IF (l_debug = 'Y') THEN
2815: okc_debug.Set_Indentation('OKC_SAE_PVT');
2819: x_okc_std_articles_tl_rec := p_okc_std_articles_tl_rec;
2820: -- Get current database values
2821: l_okc_std_articles_tl_rec := get_rec(p_okc_std_articles_tl_rec, l_row_notfound);
2822: IF (l_row_notfound) THEN
2823: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2824: END IF;
2825: IF (x_okc_std_articles_tl_rec.id = OKC_API.G_MISS_NUM)
2826: THEN
2827: x_okc_std_articles_tl_rec.id := l_okc_std_articles_tl_rec.id;
2821: l_okc_std_articles_tl_rec := get_rec(p_okc_std_articles_tl_rec, l_row_notfound);
2822: IF (l_row_notfound) THEN
2823: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2824: END IF;
2825: IF (x_okc_std_articles_tl_rec.id = OKC_API.G_MISS_NUM)
2826: THEN
2827: x_okc_std_articles_tl_rec.id := l_okc_std_articles_tl_rec.id;
2828: END IF;
2829: IF (x_okc_std_articles_tl_rec.language = OKC_API.G_MISS_CHAR)
2825: IF (x_okc_std_articles_tl_rec.id = OKC_API.G_MISS_NUM)
2826: THEN
2827: x_okc_std_articles_tl_rec.id := l_okc_std_articles_tl_rec.id;
2828: END IF;
2829: IF (x_okc_std_articles_tl_rec.language = OKC_API.G_MISS_CHAR)
2830: THEN
2831: x_okc_std_articles_tl_rec.language := l_okc_std_articles_tl_rec.language;
2832: END IF;
2833: IF (x_okc_std_articles_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2829: IF (x_okc_std_articles_tl_rec.language = OKC_API.G_MISS_CHAR)
2830: THEN
2831: x_okc_std_articles_tl_rec.language := l_okc_std_articles_tl_rec.language;
2832: END IF;
2833: IF (x_okc_std_articles_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2834: THEN
2835: x_okc_std_articles_tl_rec.source_lang := l_okc_std_articles_tl_rec.source_lang;
2836: END IF;
2837: IF (x_okc_std_articles_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2833: IF (x_okc_std_articles_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2834: THEN
2835: x_okc_std_articles_tl_rec.source_lang := l_okc_std_articles_tl_rec.source_lang;
2836: END IF;
2837: IF (x_okc_std_articles_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2838: THEN
2839: x_okc_std_articles_tl_rec.sfwt_flag := l_okc_std_articles_tl_rec.sfwt_flag;
2840: END IF;
2841: IF (x_okc_std_articles_tl_rec.name = OKC_API.G_MISS_CHAR)
2837: IF (x_okc_std_articles_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2838: THEN
2839: x_okc_std_articles_tl_rec.sfwt_flag := l_okc_std_articles_tl_rec.sfwt_flag;
2840: END IF;
2841: IF (x_okc_std_articles_tl_rec.name = OKC_API.G_MISS_CHAR)
2842: THEN
2843: x_okc_std_articles_tl_rec.name := l_okc_std_articles_tl_rec.name;
2844: END IF;
2845: IF (x_okc_std_articles_tl_rec.created_by = OKC_API.G_MISS_NUM)
2841: IF (x_okc_std_articles_tl_rec.name = OKC_API.G_MISS_CHAR)
2842: THEN
2843: x_okc_std_articles_tl_rec.name := l_okc_std_articles_tl_rec.name;
2844: END IF;
2845: IF (x_okc_std_articles_tl_rec.created_by = OKC_API.G_MISS_NUM)
2846: THEN
2847: x_okc_std_articles_tl_rec.created_by := l_okc_std_articles_tl_rec.created_by;
2848: END IF;
2849: IF (x_okc_std_articles_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2845: IF (x_okc_std_articles_tl_rec.created_by = OKC_API.G_MISS_NUM)
2846: THEN
2847: x_okc_std_articles_tl_rec.created_by := l_okc_std_articles_tl_rec.created_by;
2848: END IF;
2849: IF (x_okc_std_articles_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2850: THEN
2851: x_okc_std_articles_tl_rec.creation_date := l_okc_std_articles_tl_rec.creation_date;
2852: END IF;
2853: IF (x_okc_std_articles_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2849: IF (x_okc_std_articles_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2850: THEN
2851: x_okc_std_articles_tl_rec.creation_date := l_okc_std_articles_tl_rec.creation_date;
2852: END IF;
2853: IF (x_okc_std_articles_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2854: THEN
2855: x_okc_std_articles_tl_rec.last_updated_by := l_okc_std_articles_tl_rec.last_updated_by;
2856: END IF;
2857: IF (x_okc_std_articles_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2853: IF (x_okc_std_articles_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2854: THEN
2855: x_okc_std_articles_tl_rec.last_updated_by := l_okc_std_articles_tl_rec.last_updated_by;
2856: END IF;
2857: IF (x_okc_std_articles_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2858: THEN
2859: x_okc_std_articles_tl_rec.last_update_date := l_okc_std_articles_tl_rec.last_update_date;
2860: END IF;
2861: IF (x_okc_std_articles_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2857: IF (x_okc_std_articles_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2858: THEN
2859: x_okc_std_articles_tl_rec.last_update_date := l_okc_std_articles_tl_rec.last_update_date;
2860: END IF;
2861: IF (x_okc_std_articles_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2862: THEN
2863: x_okc_std_articles_tl_rec.last_update_login := l_okc_std_articles_tl_rec.last_update_login;
2864: END IF;
2865:
2877: FUNCTION Set_Attributes (
2878: p_okc_std_articles_tl_rec IN okc_std_articles_tl_rec_type,
2879: x_okc_std_articles_tl_rec OUT NOCOPY okc_std_articles_tl_rec_type
2880: ) RETURN VARCHAR2 IS
2881: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2882: BEGIN
2883:
2884: x_okc_std_articles_tl_rec := p_okc_std_articles_tl_rec;
2885: x_okc_std_articles_tl_rec.LANGUAGE := okc_util.get_userenv_lang;
2895: okc_debug.Set_Indentation('OKC_SAE_PVT');
2896: okc_debug.log('11400: Entered update_row', 2);
2897: END IF;
2898:
2899: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2900: p_init_msg_list,
2901: '_PVT',
2902: x_return_status);
2903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2899: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2900: p_init_msg_list,
2901: '_PVT',
2902: x_return_status);
2903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2906: RAISE OKC_API.G_EXCEPTION_ERROR;
2907: END IF;
2900: p_init_msg_list,
2901: '_PVT',
2902: x_return_status);
2903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2906: RAISE OKC_API.G_EXCEPTION_ERROR;
2907: END IF;
2908: --- Setting item attributes
2901: '_PVT',
2902: x_return_status);
2903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2906: RAISE OKC_API.G_EXCEPTION_ERROR;
2907: END IF;
2908: --- Setting item attributes
2909: l_return_status := Set_Attributes(
2902: x_return_status);
2903: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2904: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2905: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2906: RAISE OKC_API.G_EXCEPTION_ERROR;
2907: END IF;
2908: --- Setting item attributes
2909: l_return_status := Set_Attributes(
2910: p_okc_std_articles_tl_rec, -- IN
2909: l_return_status := Set_Attributes(
2910: p_okc_std_articles_tl_rec, -- IN
2911: l_okc_std_articles_tl_rec); -- OUT
2912: --- If any errors happen abort API
2913: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2914: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2915: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_ERROR;
2917: END IF;
2910: p_okc_std_articles_tl_rec, -- IN
2911: l_okc_std_articles_tl_rec); -- OUT
2912: --- If any errors happen abort API
2913: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2914: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2915: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_ERROR;
2917: END IF;
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2911: l_okc_std_articles_tl_rec); -- OUT
2912: --- If any errors happen abort API
2913: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2914: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2915: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_ERROR;
2917: END IF;
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2919: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2912: --- If any errors happen abort API
2913: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2914: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2915: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_ERROR;
2917: END IF;
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2919: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2920: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2915: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2916: RAISE OKC_API.G_EXCEPTION_ERROR;
2917: END IF;
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2919: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2920: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2921: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2922: RAISE OKC_API.G_EXCEPTION_ERROR;
2923: END IF;
2916: RAISE OKC_API.G_EXCEPTION_ERROR;
2917: END IF;
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2919: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2920: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2921: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2922: RAISE OKC_API.G_EXCEPTION_ERROR;
2923: END IF;
2924: UPDATE OKC_STD_ARTICLES_TL
2917: END IF;
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2919: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2920: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2921: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2922: RAISE OKC_API.G_EXCEPTION_ERROR;
2923: END IF;
2924: UPDATE OKC_STD_ARTICLES_TL
2925: SET NAME = ldefokcstdarticlestlrec.name,
2918: l_return_status := populate_new_record(l_okc_std_articles_tl_rec, ldefokcstdarticlestlrec);
2919: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2920: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2921: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2922: RAISE OKC_API.G_EXCEPTION_ERROR;
2923: END IF;
2924: UPDATE OKC_STD_ARTICLES_TL
2925: SET NAME = ldefokcstdarticlestlrec.name,
2926: CREATED_BY = ldefokcstdarticlestlrec.created_by,
2942: WHERE ID = ldefokcstdarticlestlrec.id
2943: AND SOURCE_LANG <> USERENV('LANG');
2944:
2945: x_okc_std_articles_tl_rec := ldefokcstdarticlestlrec;
2946: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2947:
2948: IF (l_debug = 'Y') THEN
2949: okc_debug.log('11500: Leaving update_row', 2);
2950: okc_debug.Reset_Indentation;
2950: okc_debug.Reset_Indentation;
2951: END IF;
2952:
2953: EXCEPTION
2954: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2955:
2956: IF (l_debug = 'Y') THEN
2957: okc_debug.log('11600: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2958: okc_debug.Reset_Indentation;
2953: EXCEPTION
2954: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2955:
2956: IF (l_debug = 'Y') THEN
2957: okc_debug.log('11600: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2958: okc_debug.Reset_Indentation;
2959: END IF;
2960:
2961: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2957: okc_debug.log('11600: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
2958: okc_debug.Reset_Indentation;
2959: END IF;
2960:
2961: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2962: (
2963: l_api_name,
2964: G_PKG_NAME,
2965: 'OKC_API.G_RET_STS_ERROR',
2961: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2962: (
2963: l_api_name,
2964: G_PKG_NAME,
2965: 'OKC_API.G_RET_STS_ERROR',
2966: x_msg_count,
2967: x_msg_data,
2968: '_PVT'
2969: );
2966: x_msg_count,
2967: x_msg_data,
2968: '_PVT'
2969: );
2970: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2971:
2972: IF (l_debug = 'Y') THEN
2973: okc_debug.log('11700: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2974: okc_debug.Reset_Indentation;
2969: );
2970: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2971:
2972: IF (l_debug = 'Y') THEN
2973: okc_debug.log('11700: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2974: okc_debug.Reset_Indentation;
2975: END IF;
2976:
2977: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2973: okc_debug.log('11700: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
2974: okc_debug.Reset_Indentation;
2975: END IF;
2976:
2977: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2978: (
2979: l_api_name,
2980: G_PKG_NAME,
2981: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2977: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2978: (
2979: l_api_name,
2980: G_PKG_NAME,
2981: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2982: x_msg_count,
2983: x_msg_data,
2984: '_PVT'
2985: );
2989: okc_debug.log('11800: Exiting update_row:OTHERS Exception', 2);
2990: okc_debug.Reset_Indentation;
2991: END IF;
2992:
2993: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
2994: (
2995: l_api_name,
2996: G_PKG_NAME,
2997: 'OTHERS',
3014: x_saev_rec OUT NOCOPY saev_rec_type) IS
3015:
3016: l_api_version CONSTANT NUMBER := 1;
3017: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
3018: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3019: l_saev_rec saev_rec_type := p_saev_rec;
3020: l_def_saev_rec saev_rec_type;
3021: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type;
3022: lx_okc_std_articles_tl_rec okc_std_articles_tl_rec_type;
3045: x_saev_rec OUT NOCOPY saev_rec_type
3046: ) RETURN VARCHAR2 IS
3047: l_saev_rec saev_rec_type;
3048: l_row_notfound BOOLEAN := TRUE;
3049: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3050: BEGIN
3051:
3052: IF (l_debug = 'Y') THEN
3053: okc_debug.Set_Indentation('OKC_SAE_PVT');
3057: x_saev_rec := p_saev_rec;
3058: -- Get current database values
3059: l_saev_rec := get_rec(p_saev_rec, l_row_notfound);
3060: IF (l_row_notfound) THEN
3061: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3062: END IF;
3063: IF (x_saev_rec.id = OKC_API.G_MISS_NUM)
3064: THEN
3065: x_saev_rec.id := l_saev_rec.id;
3059: l_saev_rec := get_rec(p_saev_rec, l_row_notfound);
3060: IF (l_row_notfound) THEN
3061: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3062: END IF;
3063: IF (x_saev_rec.id = OKC_API.G_MISS_NUM)
3064: THEN
3065: x_saev_rec.id := l_saev_rec.id;
3066: END IF;
3067: IF (x_saev_rec.object_version_number = OKC_API.G_MISS_NUM)
3063: IF (x_saev_rec.id = OKC_API.G_MISS_NUM)
3064: THEN
3065: x_saev_rec.id := l_saev_rec.id;
3066: END IF;
3067: IF (x_saev_rec.object_version_number = OKC_API.G_MISS_NUM)
3068: THEN
3069: x_saev_rec.object_version_number := l_saev_rec.object_version_number;
3070: END IF;
3071: IF (x_saev_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3067: IF (x_saev_rec.object_version_number = OKC_API.G_MISS_NUM)
3068: THEN
3069: x_saev_rec.object_version_number := l_saev_rec.object_version_number;
3070: END IF;
3071: IF (x_saev_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3072: THEN
3073: x_saev_rec.sfwt_flag := l_saev_rec.sfwt_flag;
3074: END IF;
3075: IF (x_saev_rec.sbt_code = OKC_API.G_MISS_CHAR)
3071: IF (x_saev_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3072: THEN
3073: x_saev_rec.sfwt_flag := l_saev_rec.sfwt_flag;
3074: END IF;
3075: IF (x_saev_rec.sbt_code = OKC_API.G_MISS_CHAR)
3076: THEN
3077: x_saev_rec.sbt_code := l_saev_rec.sbt_code;
3078: END IF;
3079: IF (x_saev_rec.name = OKC_API.G_MISS_CHAR)
3075: IF (x_saev_rec.sbt_code = OKC_API.G_MISS_CHAR)
3076: THEN
3077: x_saev_rec.sbt_code := l_saev_rec.sbt_code;
3078: END IF;
3079: IF (x_saev_rec.name = OKC_API.G_MISS_CHAR)
3080: THEN
3081: x_saev_rec.name := l_saev_rec.name;
3082: END IF;
3083: IF (x_saev_rec.attribute_category = OKC_API.G_MISS_CHAR)
3079: IF (x_saev_rec.name = OKC_API.G_MISS_CHAR)
3080: THEN
3081: x_saev_rec.name := l_saev_rec.name;
3082: END IF;
3083: IF (x_saev_rec.attribute_category = OKC_API.G_MISS_CHAR)
3084: THEN
3085: x_saev_rec.attribute_category := l_saev_rec.attribute_category;
3086: END IF;
3087: IF (x_saev_rec.attribute1 = OKC_API.G_MISS_CHAR)
3083: IF (x_saev_rec.attribute_category = OKC_API.G_MISS_CHAR)
3084: THEN
3085: x_saev_rec.attribute_category := l_saev_rec.attribute_category;
3086: END IF;
3087: IF (x_saev_rec.attribute1 = OKC_API.G_MISS_CHAR)
3088: THEN
3089: x_saev_rec.attribute1 := l_saev_rec.attribute1;
3090: END IF;
3091: IF (x_saev_rec.attribute2 = OKC_API.G_MISS_CHAR)
3087: IF (x_saev_rec.attribute1 = OKC_API.G_MISS_CHAR)
3088: THEN
3089: x_saev_rec.attribute1 := l_saev_rec.attribute1;
3090: END IF;
3091: IF (x_saev_rec.attribute2 = OKC_API.G_MISS_CHAR)
3092: THEN
3093: x_saev_rec.attribute2 := l_saev_rec.attribute2;
3094: END IF;
3095: IF (x_saev_rec.attribute3 = OKC_API.G_MISS_CHAR)
3091: IF (x_saev_rec.attribute2 = OKC_API.G_MISS_CHAR)
3092: THEN
3093: x_saev_rec.attribute2 := l_saev_rec.attribute2;
3094: END IF;
3095: IF (x_saev_rec.attribute3 = OKC_API.G_MISS_CHAR)
3096: THEN
3097: x_saev_rec.attribute3 := l_saev_rec.attribute3;
3098: END IF;
3099: IF (x_saev_rec.attribute4 = OKC_API.G_MISS_CHAR)
3095: IF (x_saev_rec.attribute3 = OKC_API.G_MISS_CHAR)
3096: THEN
3097: x_saev_rec.attribute3 := l_saev_rec.attribute3;
3098: END IF;
3099: IF (x_saev_rec.attribute4 = OKC_API.G_MISS_CHAR)
3100: THEN
3101: x_saev_rec.attribute4 := l_saev_rec.attribute4;
3102: END IF;
3103: IF (x_saev_rec.attribute5 = OKC_API.G_MISS_CHAR)
3099: IF (x_saev_rec.attribute4 = OKC_API.G_MISS_CHAR)
3100: THEN
3101: x_saev_rec.attribute4 := l_saev_rec.attribute4;
3102: END IF;
3103: IF (x_saev_rec.attribute5 = OKC_API.G_MISS_CHAR)
3104: THEN
3105: x_saev_rec.attribute5 := l_saev_rec.attribute5;
3106: END IF;
3107: IF (x_saev_rec.attribute6 = OKC_API.G_MISS_CHAR)
3103: IF (x_saev_rec.attribute5 = OKC_API.G_MISS_CHAR)
3104: THEN
3105: x_saev_rec.attribute5 := l_saev_rec.attribute5;
3106: END IF;
3107: IF (x_saev_rec.attribute6 = OKC_API.G_MISS_CHAR)
3108: THEN
3109: x_saev_rec.attribute6 := l_saev_rec.attribute6;
3110: END IF;
3111: IF (x_saev_rec.attribute7 = OKC_API.G_MISS_CHAR)
3107: IF (x_saev_rec.attribute6 = OKC_API.G_MISS_CHAR)
3108: THEN
3109: x_saev_rec.attribute6 := l_saev_rec.attribute6;
3110: END IF;
3111: IF (x_saev_rec.attribute7 = OKC_API.G_MISS_CHAR)
3112: THEN
3113: x_saev_rec.attribute7 := l_saev_rec.attribute7;
3114: END IF;
3115: IF (x_saev_rec.attribute8 = OKC_API.G_MISS_CHAR)
3111: IF (x_saev_rec.attribute7 = OKC_API.G_MISS_CHAR)
3112: THEN
3113: x_saev_rec.attribute7 := l_saev_rec.attribute7;
3114: END IF;
3115: IF (x_saev_rec.attribute8 = OKC_API.G_MISS_CHAR)
3116: THEN
3117: x_saev_rec.attribute8 := l_saev_rec.attribute8;
3118: END IF;
3119: IF (x_saev_rec.attribute9 = OKC_API.G_MISS_CHAR)
3115: IF (x_saev_rec.attribute8 = OKC_API.G_MISS_CHAR)
3116: THEN
3117: x_saev_rec.attribute8 := l_saev_rec.attribute8;
3118: END IF;
3119: IF (x_saev_rec.attribute9 = OKC_API.G_MISS_CHAR)
3120: THEN
3121: x_saev_rec.attribute9 := l_saev_rec.attribute9;
3122: END IF;
3123: IF (x_saev_rec.attribute10 = OKC_API.G_MISS_CHAR)
3119: IF (x_saev_rec.attribute9 = OKC_API.G_MISS_CHAR)
3120: THEN
3121: x_saev_rec.attribute9 := l_saev_rec.attribute9;
3122: END IF;
3123: IF (x_saev_rec.attribute10 = OKC_API.G_MISS_CHAR)
3124: THEN
3125: x_saev_rec.attribute10 := l_saev_rec.attribute10;
3126: END IF;
3127: IF (x_saev_rec.attribute11 = OKC_API.G_MISS_CHAR)
3123: IF (x_saev_rec.attribute10 = OKC_API.G_MISS_CHAR)
3124: THEN
3125: x_saev_rec.attribute10 := l_saev_rec.attribute10;
3126: END IF;
3127: IF (x_saev_rec.attribute11 = OKC_API.G_MISS_CHAR)
3128: THEN
3129: x_saev_rec.attribute11 := l_saev_rec.attribute11;
3130: END IF;
3131: IF (x_saev_rec.attribute12 = OKC_API.G_MISS_CHAR)
3127: IF (x_saev_rec.attribute11 = OKC_API.G_MISS_CHAR)
3128: THEN
3129: x_saev_rec.attribute11 := l_saev_rec.attribute11;
3130: END IF;
3131: IF (x_saev_rec.attribute12 = OKC_API.G_MISS_CHAR)
3132: THEN
3133: x_saev_rec.attribute12 := l_saev_rec.attribute12;
3134: END IF;
3135: IF (x_saev_rec.attribute13 = OKC_API.G_MISS_CHAR)
3131: IF (x_saev_rec.attribute12 = OKC_API.G_MISS_CHAR)
3132: THEN
3133: x_saev_rec.attribute12 := l_saev_rec.attribute12;
3134: END IF;
3135: IF (x_saev_rec.attribute13 = OKC_API.G_MISS_CHAR)
3136: THEN
3137: x_saev_rec.attribute13 := l_saev_rec.attribute13;
3138: END IF;
3139: IF (x_saev_rec.attribute14 = OKC_API.G_MISS_CHAR)
3135: IF (x_saev_rec.attribute13 = OKC_API.G_MISS_CHAR)
3136: THEN
3137: x_saev_rec.attribute13 := l_saev_rec.attribute13;
3138: END IF;
3139: IF (x_saev_rec.attribute14 = OKC_API.G_MISS_CHAR)
3140: THEN
3141: x_saev_rec.attribute14 := l_saev_rec.attribute14;
3142: END IF;
3143: IF (x_saev_rec.attribute15 = OKC_API.G_MISS_CHAR)
3139: IF (x_saev_rec.attribute14 = OKC_API.G_MISS_CHAR)
3140: THEN
3141: x_saev_rec.attribute14 := l_saev_rec.attribute14;
3142: END IF;
3143: IF (x_saev_rec.attribute15 = OKC_API.G_MISS_CHAR)
3144: THEN
3145: x_saev_rec.attribute15 := l_saev_rec.attribute15;
3146: END IF;
3147: IF (x_saev_rec.created_by = OKC_API.G_MISS_NUM)
3143: IF (x_saev_rec.attribute15 = OKC_API.G_MISS_CHAR)
3144: THEN
3145: x_saev_rec.attribute15 := l_saev_rec.attribute15;
3146: END IF;
3147: IF (x_saev_rec.created_by = OKC_API.G_MISS_NUM)
3148: THEN
3149: x_saev_rec.created_by := l_saev_rec.created_by;
3150: END IF;
3151: IF (x_saev_rec.creation_date = OKC_API.G_MISS_DATE)
3147: IF (x_saev_rec.created_by = OKC_API.G_MISS_NUM)
3148: THEN
3149: x_saev_rec.created_by := l_saev_rec.created_by;
3150: END IF;
3151: IF (x_saev_rec.creation_date = OKC_API.G_MISS_DATE)
3152: THEN
3153: x_saev_rec.creation_date := l_saev_rec.creation_date;
3154: END IF;
3155: IF (x_saev_rec.last_updated_by = OKC_API.G_MISS_NUM)
3151: IF (x_saev_rec.creation_date = OKC_API.G_MISS_DATE)
3152: THEN
3153: x_saev_rec.creation_date := l_saev_rec.creation_date;
3154: END IF;
3155: IF (x_saev_rec.last_updated_by = OKC_API.G_MISS_NUM)
3156: THEN
3157: x_saev_rec.last_updated_by := l_saev_rec.last_updated_by;
3158: END IF;
3159: IF (x_saev_rec.last_update_date = OKC_API.G_MISS_DATE)
3155: IF (x_saev_rec.last_updated_by = OKC_API.G_MISS_NUM)
3156: THEN
3157: x_saev_rec.last_updated_by := l_saev_rec.last_updated_by;
3158: END IF;
3159: IF (x_saev_rec.last_update_date = OKC_API.G_MISS_DATE)
3160: THEN
3161: x_saev_rec.last_update_date := l_saev_rec.last_update_date;
3162: END IF;
3163: IF (x_saev_rec.last_update_login = OKC_API.G_MISS_NUM)
3159: IF (x_saev_rec.last_update_date = OKC_API.G_MISS_DATE)
3160: THEN
3161: x_saev_rec.last_update_date := l_saev_rec.last_update_date;
3162: END IF;
3163: IF (x_saev_rec.last_update_login = OKC_API.G_MISS_NUM)
3164: THEN
3165: x_saev_rec.last_update_login := l_saev_rec.last_update_login;
3166: END IF;
3167:
3179: FUNCTION Set_Attributes (
3180: p_saev_rec IN saev_rec_type,
3181: x_saev_rec OUT NOCOPY saev_rec_type
3182: ) RETURN VARCHAR2 IS
3183: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3184: BEGIN
3185:
3186: x_saev_rec := p_saev_rec;
3187: x_saev_rec.OBJECT_VERSION_NUMBER := NVL(x_saev_rec.OBJECT_VERSION_NUMBER, 0) + 1;
3200: okc_debug.Set_Indentation('OKC_SAE_PVT');
3201: okc_debug.log('12200: Entered update_row', 2);
3202: END IF;
3203:
3204: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3205: G_PKG_NAME,
3206: p_init_msg_list,
3207: l_api_version,
3208: p_api_version,
3207: l_api_version,
3208: p_api_version,
3209: '_PVT',
3210: x_return_status);
3211: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3213: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3214: RAISE OKC_API.G_EXCEPTION_ERROR;
3215: END IF;
3208: p_api_version,
3209: '_PVT',
3210: x_return_status);
3211: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3213: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3214: RAISE OKC_API.G_EXCEPTION_ERROR;
3215: END IF;
3216: --- Setting item attributes
3209: '_PVT',
3210: x_return_status);
3211: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3213: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3214: RAISE OKC_API.G_EXCEPTION_ERROR;
3215: END IF;
3216: --- Setting item attributes
3217: l_return_status := Set_Attributes(
3210: x_return_status);
3211: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3212: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3213: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3214: RAISE OKC_API.G_EXCEPTION_ERROR;
3215: END IF;
3216: --- Setting item attributes
3217: l_return_status := Set_Attributes(
3218: p_saev_rec, -- IN
3217: l_return_status := Set_Attributes(
3218: p_saev_rec, -- IN
3219: l_saev_rec); -- OUT
3220: --- If any errors happen abort API
3221: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3222: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3223: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3224: RAISE OKC_API.G_EXCEPTION_ERROR;
3225: END IF;
3218: p_saev_rec, -- IN
3219: l_saev_rec); -- OUT
3220: --- If any errors happen abort API
3221: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3222: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3223: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3224: RAISE OKC_API.G_EXCEPTION_ERROR;
3225: END IF;
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3219: l_saev_rec); -- OUT
3220: --- If any errors happen abort API
3221: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3222: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3223: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3224: RAISE OKC_API.G_EXCEPTION_ERROR;
3225: END IF;
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3227: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3220: --- If any errors happen abort API
3221: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3222: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3223: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3224: RAISE OKC_API.G_EXCEPTION_ERROR;
3225: END IF;
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3227: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3228: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3223: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3224: RAISE OKC_API.G_EXCEPTION_ERROR;
3225: END IF;
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3227: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3228: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3229: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3230: RAISE OKC_API.G_EXCEPTION_ERROR;
3231: END IF;
3224: RAISE OKC_API.G_EXCEPTION_ERROR;
3225: END IF;
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3227: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3228: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3229: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3230: RAISE OKC_API.G_EXCEPTION_ERROR;
3231: END IF;
3232: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
3225: END IF;
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3227: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3228: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3229: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3230: RAISE OKC_API.G_EXCEPTION_ERROR;
3231: END IF;
3232: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
3233: --- Validate all non-missing attributes (Item Level Validation)
3226: l_return_status := populate_new_record(l_saev_rec, l_def_saev_rec);
3227: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3228: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3229: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3230: RAISE OKC_API.G_EXCEPTION_ERROR;
3231: END IF;
3232: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
3233: --- Validate all non-missing attributes (Item Level Validation)
3234: l_return_status := Validate_Attributes(l_def_saev_rec);
3232: l_def_saev_rec := fill_who_columns(l_def_saev_rec);
3233: --- Validate all non-missing attributes (Item Level Validation)
3234: l_return_status := Validate_Attributes(l_def_saev_rec);
3235: --- If any errors happen abort API
3236: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3237: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3238: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3239: RAISE OKC_API.G_EXCEPTION_ERROR;
3240: END IF;
3233: --- Validate all non-missing attributes (Item Level Validation)
3234: l_return_status := Validate_Attributes(l_def_saev_rec);
3235: --- If any errors happen abort API
3236: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3237: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3238: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3239: RAISE OKC_API.G_EXCEPTION_ERROR;
3240: END IF;
3241: l_return_status := Validate_Record(l_def_saev_rec);
3234: l_return_status := Validate_Attributes(l_def_saev_rec);
3235: --- If any errors happen abort API
3236: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3237: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3238: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3239: RAISE OKC_API.G_EXCEPTION_ERROR;
3240: END IF;
3241: l_return_status := Validate_Record(l_def_saev_rec);
3242: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3235: --- If any errors happen abort API
3236: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3237: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3238: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3239: RAISE OKC_API.G_EXCEPTION_ERROR;
3240: END IF;
3241: l_return_status := Validate_Record(l_def_saev_rec);
3242: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3238: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3239: RAISE OKC_API.G_EXCEPTION_ERROR;
3240: END IF;
3241: l_return_status := Validate_Record(l_def_saev_rec);
3242: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3245: RAISE OKC_API.G_EXCEPTION_ERROR;
3246: END IF;
3239: RAISE OKC_API.G_EXCEPTION_ERROR;
3240: END IF;
3241: l_return_status := Validate_Record(l_def_saev_rec);
3242: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3245: RAISE OKC_API.G_EXCEPTION_ERROR;
3246: END IF;
3247:
3240: END IF;
3241: l_return_status := Validate_Record(l_def_saev_rec);
3242: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3245: RAISE OKC_API.G_EXCEPTION_ERROR;
3246: END IF;
3247:
3248: --------------------------------------
3241: l_return_status := Validate_Record(l_def_saev_rec);
3242: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3243: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3244: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3245: RAISE OKC_API.G_EXCEPTION_ERROR;
3246: END IF;
3247:
3248: --------------------------------------
3249: -- Move VIEW record to "Child" records
3260: x_msg_data,
3261: l_okc_std_articles_tl_rec,
3262: lx_okc_std_articles_tl_rec
3263: );
3264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3265: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3267: RAISE OKC_API.G_EXCEPTION_ERROR;
3268: END IF;
3261: l_okc_std_articles_tl_rec,
3262: lx_okc_std_articles_tl_rec
3263: );
3264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3265: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3267: RAISE OKC_API.G_EXCEPTION_ERROR;
3268: END IF;
3269: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
3262: lx_okc_std_articles_tl_rec
3263: );
3264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3265: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3267: RAISE OKC_API.G_EXCEPTION_ERROR;
3268: END IF;
3269: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
3270: update_row(
3263: );
3264: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3265: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3266: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3267: RAISE OKC_API.G_EXCEPTION_ERROR;
3268: END IF;
3269: migrate(lx_okc_std_articles_tl_rec, l_def_saev_rec);
3270: update_row(
3271: p_init_msg_list,
3274: x_msg_data,
3275: l_sae_rec,
3276: lx_sae_rec
3277: );
3278: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3279: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3280: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3281: RAISE OKC_API.G_EXCEPTION_ERROR;
3282: END IF;
3275: l_sae_rec,
3276: lx_sae_rec
3277: );
3278: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3279: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3280: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3281: RAISE OKC_API.G_EXCEPTION_ERROR;
3282: END IF;
3283: migrate(lx_sae_rec, l_def_saev_rec);
3276: lx_sae_rec
3277: );
3278: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3279: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3280: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3281: RAISE OKC_API.G_EXCEPTION_ERROR;
3282: END IF;
3283: migrate(lx_sae_rec, l_def_saev_rec);
3284: x_saev_rec := l_def_saev_rec;
3277: );
3278: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3279: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3280: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3281: RAISE OKC_API.G_EXCEPTION_ERROR;
3282: END IF;
3283: migrate(lx_sae_rec, l_def_saev_rec);
3284: x_saev_rec := l_def_saev_rec;
3285: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3281: RAISE OKC_API.G_EXCEPTION_ERROR;
3282: END IF;
3283: migrate(lx_sae_rec, l_def_saev_rec);
3284: x_saev_rec := l_def_saev_rec;
3285: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3286:
3287:
3288: IF (l_debug = 'Y') THEN
3289: okc_debug.log('12300: Leaving update_row', 2);
3290: okc_debug.Reset_Indentation;
3291: END IF;
3292:
3293: EXCEPTION
3294: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3295:
3296: IF (l_debug = 'Y') THEN
3297: okc_debug.log('12400: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3298: okc_debug.Reset_Indentation;
3293: EXCEPTION
3294: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3295:
3296: IF (l_debug = 'Y') THEN
3297: okc_debug.log('12400: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3298: okc_debug.Reset_Indentation;
3299: END IF;
3300:
3301: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3297: okc_debug.log('12400: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3298: okc_debug.Reset_Indentation;
3299: END IF;
3300:
3301: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3302: (
3303: l_api_name,
3304: G_PKG_NAME,
3305: 'OKC_API.G_RET_STS_ERROR',
3301: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3302: (
3303: l_api_name,
3304: G_PKG_NAME,
3305: 'OKC_API.G_RET_STS_ERROR',
3306: x_msg_count,
3307: x_msg_data,
3308: '_PVT'
3309: );
3306: x_msg_count,
3307: x_msg_data,
3308: '_PVT'
3309: );
3310: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3311:
3312: IF (l_debug = 'Y') THEN
3313: okc_debug.log('12500: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3314: okc_debug.Reset_Indentation;
3309: );
3310: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3311:
3312: IF (l_debug = 'Y') THEN
3313: okc_debug.log('12500: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3314: okc_debug.Reset_Indentation;
3315: END IF;
3316:
3317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3313: okc_debug.log('12500: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3314: okc_debug.Reset_Indentation;
3315: END IF;
3316:
3317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3318: (
3319: l_api_name,
3320: G_PKG_NAME,
3321: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3317: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3318: (
3319: l_api_name,
3320: G_PKG_NAME,
3321: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3322: x_msg_count,
3323: x_msg_data,
3324: '_PVT'
3325: );
3329: okc_debug.log('12600: Exiting update_row:OTHERS Exception', 2);
3330: okc_debug.Reset_Indentation;
3331: END IF;
3332:
3333: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3334: (
3335: l_api_name,
3336: G_PKG_NAME,
3337: 'OTHERS',
3354: x_saev_tbl OUT NOCOPY saev_tbl_type) IS
3355:
3356: l_api_version CONSTANT NUMBER := 1;
3357: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
3358: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3359: i NUMBER := 0;
3360: BEGIN
3361:
3362: IF (l_debug = 'Y') THEN
3386: okc_debug.Reset_Indentation;
3387: END IF;
3388:
3389: EXCEPTION
3390: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3391:
3392: IF (l_debug = 'Y') THEN
3393: okc_debug.log('12900: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3394: okc_debug.Reset_Indentation;
3389: EXCEPTION
3390: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3391:
3392: IF (l_debug = 'Y') THEN
3393: okc_debug.log('12900: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3394: okc_debug.Reset_Indentation;
3395: END IF;
3396:
3397: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3393: okc_debug.log('12900: Exiting update_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3394: okc_debug.Reset_Indentation;
3395: END IF;
3396:
3397: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3398: (
3399: l_api_name,
3400: G_PKG_NAME,
3401: 'OKC_API.G_RET_STS_ERROR',
3397: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3398: (
3399: l_api_name,
3400: G_PKG_NAME,
3401: 'OKC_API.G_RET_STS_ERROR',
3402: x_msg_count,
3403: x_msg_data,
3404: '_PVT'
3405: );
3402: x_msg_count,
3403: x_msg_data,
3404: '_PVT'
3405: );
3406: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3407:
3408: IF (l_debug = 'Y') THEN
3409: okc_debug.log('13000: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3410: okc_debug.Reset_Indentation;
3405: );
3406: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3407:
3408: IF (l_debug = 'Y') THEN
3409: okc_debug.log('13000: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3410: okc_debug.Reset_Indentation;
3411: END IF;
3412:
3413: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3409: okc_debug.log('13000: Exiting update_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3410: okc_debug.Reset_Indentation;
3411: END IF;
3412:
3413: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3414: (
3415: l_api_name,
3416: G_PKG_NAME,
3417: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3413: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3414: (
3415: l_api_name,
3416: G_PKG_NAME,
3417: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3418: x_msg_count,
3419: x_msg_data,
3420: '_PVT'
3421: );
3425: okc_debug.log('13100: Exiting update_row:OTHERS Exception', 2);
3426: okc_debug.Reset_Indentation;
3427: END IF;
3428:
3429: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3430: (
3431: l_api_name,
3432: G_PKG_NAME,
3433: 'OTHERS',
3452: p_sae_rec IN sae_rec_type) IS
3453:
3454: l_api_version CONSTANT NUMBER := 1;
3455: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
3456: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3457: l_sae_rec sae_rec_type:= p_sae_rec;
3458: l_row_notfound BOOLEAN := TRUE;
3459: BEGIN
3460:
3462: okc_debug.Set_Indentation('OKC_SAE_PVT');
3463: okc_debug.log('13200: Entered delete_row', 2);
3464: END IF;
3465:
3466: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3467: p_init_msg_list,
3468: '_PVT',
3469: x_return_status);
3470: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3466: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3467: p_init_msg_list,
3468: '_PVT',
3469: x_return_status);
3470: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3471: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3472: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3473: RAISE OKC_API.G_EXCEPTION_ERROR;
3474: END IF;
3467: p_init_msg_list,
3468: '_PVT',
3469: x_return_status);
3470: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3471: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3472: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3473: RAISE OKC_API.G_EXCEPTION_ERROR;
3474: END IF;
3475: DELETE FROM OKC_STD_ARTICLES_B
3468: '_PVT',
3469: x_return_status);
3470: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3471: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3472: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3473: RAISE OKC_API.G_EXCEPTION_ERROR;
3474: END IF;
3475: DELETE FROM OKC_STD_ARTICLES_B
3476: WHERE ID = l_sae_rec.id;
3469: x_return_status);
3470: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3471: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3472: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3473: RAISE OKC_API.G_EXCEPTION_ERROR;
3474: END IF;
3475: DELETE FROM OKC_STD_ARTICLES_B
3476: WHERE ID = l_sae_rec.id;
3477:
3474: END IF;
3475: DELETE FROM OKC_STD_ARTICLES_B
3476: WHERE ID = l_sae_rec.id;
3477:
3478: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3479:
3480: IF (l_debug = 'Y') THEN
3481: okc_debug.log('13300: Leaving delete_row', 2);
3482: okc_debug.Reset_Indentation;
3482: okc_debug.Reset_Indentation;
3483: END IF;
3484:
3485: EXCEPTION
3486: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3487:
3488: IF (l_debug = 'Y') THEN
3489: okc_debug.log('13400: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3490: okc_debug.Reset_Indentation;
3485: EXCEPTION
3486: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3487:
3488: IF (l_debug = 'Y') THEN
3489: okc_debug.log('13400: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3490: okc_debug.Reset_Indentation;
3491: END IF;
3492:
3493: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3489: okc_debug.log('13400: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3490: okc_debug.Reset_Indentation;
3491: END IF;
3492:
3493: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3494: (
3495: l_api_name,
3496: G_PKG_NAME,
3497: 'OKC_API.G_RET_STS_ERROR',
3493: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3494: (
3495: l_api_name,
3496: G_PKG_NAME,
3497: 'OKC_API.G_RET_STS_ERROR',
3498: x_msg_count,
3499: x_msg_data,
3500: '_PVT'
3501: );
3498: x_msg_count,
3499: x_msg_data,
3500: '_PVT'
3501: );
3502: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3503:
3504: IF (l_debug = 'Y') THEN
3505: okc_debug.log('13500: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3506: okc_debug.Reset_Indentation;
3501: );
3502: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3503:
3504: IF (l_debug = 'Y') THEN
3505: okc_debug.log('13500: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3506: okc_debug.Reset_Indentation;
3507: END IF;
3508:
3509: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3505: okc_debug.log('13500: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3506: okc_debug.Reset_Indentation;
3507: END IF;
3508:
3509: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3510: (
3511: l_api_name,
3512: G_PKG_NAME,
3513: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3509: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3510: (
3511: l_api_name,
3512: G_PKG_NAME,
3513: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3514: x_msg_count,
3515: x_msg_data,
3516: '_PVT'
3517: );
3521: okc_debug.log('13600: Exiting delete_row:OTHERS Exception', 2);
3522: okc_debug.Reset_Indentation;
3523: END IF;
3524:
3525: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3526: (
3527: l_api_name,
3528: G_PKG_NAME,
3529: 'OTHERS',
3544: p_okc_std_articles_tl_rec IN okc_std_articles_tl_rec_type) IS
3545:
3546: l_api_version CONSTANT NUMBER := 1;
3547: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3548: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3549: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type:= p_okc_std_articles_tl_rec;
3550: l_row_notfound BOOLEAN := TRUE;
3551: --------------------------------------------
3552: -- Set_Attributes for:OKC_STD_ARTICLES_TL --
3554: FUNCTION Set_Attributes (
3555: p_okc_std_articles_tl_rec IN okc_std_articles_tl_rec_type,
3556: x_okc_std_articles_tl_rec OUT NOCOPY okc_std_articles_tl_rec_type
3557: ) RETURN VARCHAR2 IS
3558: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3559: BEGIN
3560:
3561: IF (l_debug = 'Y') THEN
3562: okc_debug.Set_Indentation('OKC_SAE_PVT');
3575: okc_debug.Set_Indentation('OKC_SAE_PVT');
3576: okc_debug.log('13800: Entered delete_row', 2);
3577: END IF;
3578:
3579: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3580: p_init_msg_list,
3581: '_PVT',
3582: x_return_status);
3583: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3579: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3580: p_init_msg_list,
3581: '_PVT',
3582: x_return_status);
3583: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3586: RAISE OKC_API.G_EXCEPTION_ERROR;
3587: END IF;
3580: p_init_msg_list,
3581: '_PVT',
3582: x_return_status);
3583: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3586: RAISE OKC_API.G_EXCEPTION_ERROR;
3587: END IF;
3588: --- Setting item attributes
3581: '_PVT',
3582: x_return_status);
3583: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3586: RAISE OKC_API.G_EXCEPTION_ERROR;
3587: END IF;
3588: --- Setting item attributes
3589: l_return_status := Set_Attributes(
3582: x_return_status);
3583: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3586: RAISE OKC_API.G_EXCEPTION_ERROR;
3587: END IF;
3588: --- Setting item attributes
3589: l_return_status := Set_Attributes(
3590: p_okc_std_articles_tl_rec, -- IN
3589: l_return_status := Set_Attributes(
3590: p_okc_std_articles_tl_rec, -- IN
3591: l_okc_std_articles_tl_rec); -- OUT
3592: --- If any errors happen abort API
3593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3596: RAISE OKC_API.G_EXCEPTION_ERROR;
3597: END IF;
3590: p_okc_std_articles_tl_rec, -- IN
3591: l_okc_std_articles_tl_rec); -- OUT
3592: --- If any errors happen abort API
3593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3596: RAISE OKC_API.G_EXCEPTION_ERROR;
3597: END IF;
3598: DELETE FROM OKC_STD_ARTICLES_TL
3591: l_okc_std_articles_tl_rec); -- OUT
3592: --- If any errors happen abort API
3593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3596: RAISE OKC_API.G_EXCEPTION_ERROR;
3597: END IF;
3598: DELETE FROM OKC_STD_ARTICLES_TL
3599: WHERE ID = l_okc_std_articles_tl_rec.id;
3592: --- If any errors happen abort API
3593: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3594: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3595: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3596: RAISE OKC_API.G_EXCEPTION_ERROR;
3597: END IF;
3598: DELETE FROM OKC_STD_ARTICLES_TL
3599: WHERE ID = l_okc_std_articles_tl_rec.id;
3600:
3597: END IF;
3598: DELETE FROM OKC_STD_ARTICLES_TL
3599: WHERE ID = l_okc_std_articles_tl_rec.id;
3600:
3601: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3602:
3603: IF (l_debug = 'Y') THEN
3604: okc_debug.log('13900: Leaving delete_row', 2);
3605: okc_debug.Reset_Indentation;
3605: okc_debug.Reset_Indentation;
3606: END IF;
3607:
3608: EXCEPTION
3609: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3610:
3611: IF (l_debug = 'Y') THEN
3612: okc_debug.log('14000: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3613: okc_debug.Reset_Indentation;
3608: EXCEPTION
3609: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3610:
3611: IF (l_debug = 'Y') THEN
3612: okc_debug.log('14000: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3613: okc_debug.Reset_Indentation;
3614: END IF;
3615:
3616: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3612: okc_debug.log('14000: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3613: okc_debug.Reset_Indentation;
3614: END IF;
3615:
3616: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3617: (
3618: l_api_name,
3619: G_PKG_NAME,
3620: 'OKC_API.G_RET_STS_ERROR',
3616: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3617: (
3618: l_api_name,
3619: G_PKG_NAME,
3620: 'OKC_API.G_RET_STS_ERROR',
3621: x_msg_count,
3622: x_msg_data,
3623: '_PVT'
3624: );
3621: x_msg_count,
3622: x_msg_data,
3623: '_PVT'
3624: );
3625: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3626:
3627: IF (l_debug = 'Y') THEN
3628: okc_debug.log('14100: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3629: okc_debug.Reset_Indentation;
3624: );
3625: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3626:
3627: IF (l_debug = 'Y') THEN
3628: okc_debug.log('14100: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3629: okc_debug.Reset_Indentation;
3630: END IF;
3631:
3632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3628: okc_debug.log('14100: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3629: okc_debug.Reset_Indentation;
3630: END IF;
3631:
3632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3633: (
3634: l_api_name,
3635: G_PKG_NAME,
3636: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3632: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3633: (
3634: l_api_name,
3635: G_PKG_NAME,
3636: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3637: x_msg_count,
3638: x_msg_data,
3639: '_PVT'
3640: );
3644: okc_debug.log('14200: Exiting delete_row:OTHERS Exception', 2);
3645: okc_debug.Reset_Indentation;
3646: END IF;
3647:
3648: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3649: (
3650: l_api_name,
3651: G_PKG_NAME,
3652: 'OTHERS',
3668: p_saev_rec IN saev_rec_type) IS
3669:
3670: l_api_version CONSTANT NUMBER := 1;
3671: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
3672: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3673: l_saev_rec saev_rec_type := p_saev_rec;
3674: l_okc_std_articles_tl_rec okc_std_articles_tl_rec_type;
3675: l_sae_rec sae_rec_type;
3676: BEGIN
3679: okc_debug.Set_Indentation('OKC_SAE_PVT');
3680: okc_debug.log('14300: Entered delete_row', 2);
3681: END IF;
3682:
3683: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3684: G_PKG_NAME,
3685: p_init_msg_list,
3686: l_api_version,
3687: p_api_version,
3686: l_api_version,
3687: p_api_version,
3688: '_PVT',
3689: x_return_status);
3690: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3691: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3692: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3693: RAISE OKC_API.G_EXCEPTION_ERROR;
3694: END IF;
3687: p_api_version,
3688: '_PVT',
3689: x_return_status);
3690: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3691: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3692: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3693: RAISE OKC_API.G_EXCEPTION_ERROR;
3694: END IF;
3695: --------------------------------------
3688: '_PVT',
3689: x_return_status);
3690: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3691: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3692: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3693: RAISE OKC_API.G_EXCEPTION_ERROR;
3694: END IF;
3695: --------------------------------------
3696: -- Move VIEW record to "Child" records
3689: x_return_status);
3690: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3691: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3692: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3693: RAISE OKC_API.G_EXCEPTION_ERROR;
3694: END IF;
3695: --------------------------------------
3696: -- Move VIEW record to "Child" records
3697: --------------------------------------
3706: x_msg_count,
3707: x_msg_data,
3708: l_okc_std_articles_tl_rec
3709: );
3710: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3711: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3712: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3713: RAISE OKC_API.G_EXCEPTION_ERROR;
3714: END IF;
3707: x_msg_data,
3708: l_okc_std_articles_tl_rec
3709: );
3710: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3711: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3712: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3713: RAISE OKC_API.G_EXCEPTION_ERROR;
3714: END IF;
3715: delete_row(
3708: l_okc_std_articles_tl_rec
3709: );
3710: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3711: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3712: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3713: RAISE OKC_API.G_EXCEPTION_ERROR;
3714: END IF;
3715: delete_row(
3716: p_init_msg_list,
3709: );
3710: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3711: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3712: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3713: RAISE OKC_API.G_EXCEPTION_ERROR;
3714: END IF;
3715: delete_row(
3716: p_init_msg_list,
3717: x_return_status,
3718: x_msg_count,
3719: x_msg_data,
3720: l_sae_rec
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3719: x_msg_data,
3720: l_sae_rec
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3720: l_sae_rec
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728:
3721: );
3722: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728:
3729: IF (l_debug = 'Y') THEN
3723: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3724: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3725: RAISE OKC_API.G_EXCEPTION_ERROR;
3726: END IF;
3727: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3728:
3729: IF (l_debug = 'Y') THEN
3730: okc_debug.log('14400: Leaving delete_row', 2);
3731: okc_debug.Reset_Indentation;
3731: okc_debug.Reset_Indentation;
3732: END IF;
3733:
3734: EXCEPTION
3735: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3736:
3737: IF (l_debug = 'Y') THEN
3738: okc_debug.log('14500: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3739: okc_debug.Reset_Indentation;
3734: EXCEPTION
3735: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3736:
3737: IF (l_debug = 'Y') THEN
3738: okc_debug.log('14500: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3739: okc_debug.Reset_Indentation;
3740: END IF;
3741:
3742: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3738: okc_debug.log('14500: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3739: okc_debug.Reset_Indentation;
3740: END IF;
3741:
3742: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3743: (
3744: l_api_name,
3745: G_PKG_NAME,
3746: 'OKC_API.G_RET_STS_ERROR',
3742: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3743: (
3744: l_api_name,
3745: G_PKG_NAME,
3746: 'OKC_API.G_RET_STS_ERROR',
3747: x_msg_count,
3748: x_msg_data,
3749: '_PVT'
3750: );
3747: x_msg_count,
3748: x_msg_data,
3749: '_PVT'
3750: );
3751: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3752:
3753: IF (l_debug = 'Y') THEN
3754: okc_debug.log('14600: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3755: okc_debug.Reset_Indentation;
3750: );
3751: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3752:
3753: IF (l_debug = 'Y') THEN
3754: okc_debug.log('14600: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3755: okc_debug.Reset_Indentation;
3756: END IF;
3757:
3758: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3754: okc_debug.log('14600: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3755: okc_debug.Reset_Indentation;
3756: END IF;
3757:
3758: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3759: (
3760: l_api_name,
3761: G_PKG_NAME,
3762: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3758: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3759: (
3760: l_api_name,
3761: G_PKG_NAME,
3762: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3763: x_msg_count,
3764: x_msg_data,
3765: '_PVT'
3766: );
3770: okc_debug.log('14700: Exiting delete_row:OTHERS Exception', 2);
3771: okc_debug.Reset_Indentation;
3772: END IF;
3773:
3774: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3775: (
3776: l_api_name,
3777: G_PKG_NAME,
3778: 'OTHERS',
3794: p_saev_tbl IN saev_tbl_type) IS
3795:
3796: l_api_version CONSTANT NUMBER := 1;
3797: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
3798: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3799: i NUMBER := 0;
3800: BEGIN
3801:
3802: IF (l_debug = 'Y') THEN
3825: okc_debug.Reset_Indentation;
3826: END IF;
3827:
3828: EXCEPTION
3829: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3830:
3831: IF (l_debug = 'Y') THEN
3832: okc_debug.log('15000: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3833: okc_debug.Reset_Indentation;
3828: EXCEPTION
3829: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3830:
3831: IF (l_debug = 'Y') THEN
3832: okc_debug.log('15000: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3833: okc_debug.Reset_Indentation;
3834: END IF;
3835:
3836: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3832: okc_debug.log('15000: Exiting delete_row:OKC_API.G_EXCEPTION_ERROR Exception', 2);
3833: okc_debug.Reset_Indentation;
3834: END IF;
3835:
3836: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3837: (
3838: l_api_name,
3839: G_PKG_NAME,
3840: 'OKC_API.G_RET_STS_ERROR',
3836: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3837: (
3838: l_api_name,
3839: G_PKG_NAME,
3840: 'OKC_API.G_RET_STS_ERROR',
3841: x_msg_count,
3842: x_msg_data,
3843: '_PVT'
3844: );
3841: x_msg_count,
3842: x_msg_data,
3843: '_PVT'
3844: );
3845: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3846:
3847: IF (l_debug = 'Y') THEN
3848: okc_debug.log('15100: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3849: okc_debug.Reset_Indentation;
3844: );
3845: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3846:
3847: IF (l_debug = 'Y') THEN
3848: okc_debug.log('15100: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3849: okc_debug.Reset_Indentation;
3850: END IF;
3851:
3852: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3848: okc_debug.log('15100: Exiting delete_row:OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
3849: okc_debug.Reset_Indentation;
3850: END IF;
3851:
3852: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3853: (
3854: l_api_name,
3855: G_PKG_NAME,
3856: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3852: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3853: (
3854: l_api_name,
3855: G_PKG_NAME,
3856: 'OKC_API.G_RET_STS_UNEXP_ERROR',
3857: x_msg_count,
3858: x_msg_data,
3859: '_PVT'
3860: );
3864: okc_debug.log('15200: Exiting delete_row:OTHERS Exception', 2);
3865: okc_debug.Reset_Indentation;
3866: END IF;
3867:
3868: x_return_status :=OKC_API.HANDLE_EXCEPTIONS
3869: (
3870: l_api_name,
3871: G_PKG_NAME,
3872: 'OTHERS',