[Home] [Help]
89: -- PROCEDURE add_language
90: ---------------------------------------------------------------------------
91: PROCEDURE add_language IS
92: BEGIN
93: DELETE FROM OKL_INS_POLICIES_TL T
94: WHERE NOT EXISTS (
95: SELECT NULL
96: FROM OKL_INS_POLICIES_ALL_B B
97: WHERE B.ID =T.ID
95: SELECT NULL
96: FROM OKL_INS_POLICIES_ALL_B B
97: WHERE B.ID =T.ID
98: );
99: UPDATE OKL_INS_POLICIES_TL T SET(
100: DESCRIPTION,
101: ENDORSEMENT,
102: COMMENTS,
103: CANCELLATION_COMMENT) = (SELECT
104: B.DESCRIPTION,
105: B.ENDORSEMENT,
106: B.COMMENTS,
107: B.CANCELLATION_COMMENT
108: FROM OKL_INS_POLICIES_TL B
109: WHERE B.ID = T.ID
110: AND B.LANGUAGE = T.SOURCE_LANG)
111: WHERE ( T.ID, T.LANGUAGE)
112: IN (SELECT
111: WHERE ( T.ID, T.LANGUAGE)
112: IN (SELECT
113: SUBT.ID
114: ,SUBT.LANGUAGE
115: FROM OKL_INS_POLICIES_TL SUBB, OKL_INS_POLICIES_TL SUBT
116: WHERE SUBB.ID = SUBT.ID
117: AND SUBB.LANGUAGE = SUBT.LANGUAGE
118: AND (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
119: OR SUBB.ENDORSEMENT <> SUBT.ENDORSEMENT
124: OR (SUBB.ENDORSEMENT IS NULL AND SUBT.ENDORSEMENT IS NOT NULL)
125: OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
126: OR (SUBB.CANCELLATION_COMMENT IS NULL AND SUBT.CANCELLATION_COMMENT IS NOT NULL)
127: ));
128: INSERT INTO OKL_INS_POLICIES_TL (
129: ID,
130: LANGUAGE,
131: SOURCE_LANG,
132: SFWT_FLAG,
152: B.CREATION_DATE,
153: B.LAST_UPDATED_BY,
154: B.LAST_UPDATE_DATE,
155: B.LAST_UPDATE_LOGIN
156: FROM OKL_INS_POLICIES_TL B, FND_LANGUAGES L
157: WHERE L.INSTALLED_FLAG IN ('I', 'B')
158: AND B.LANGUAGE = USERENV('LANG')
159: AND NOT EXISTS (
160: SELECT NULL
157: WHERE L.INSTALLED_FLAG IN ('I', 'B')
158: AND B.LANGUAGE = USERENV('LANG')
159: AND NOT EXISTS (
160: SELECT NULL
161: FROM OKL_INS_POLICIES_TL T
162: WHERE T.ID = B.ID
163: AND T.LANGUAGE = L.LANGUAGE_CODE
164: );
165: END add_language;
603: BEGIN
604: RETURN(get_rec(p_ipy_rec, l_row_not_found));
605: END get_rec;
606: ---------------------------------------------------------------------------
607: -- FUNCTION get_rec for: OKL_INS_POLICIES_TL
608: ---------------------------------------------------------------------------
609: FUNCTION get_rec (
610: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
611: x_no_data_found OUT NOCOPY BOOLEAN
606: ---------------------------------------------------------------------------
607: -- FUNCTION get_rec for: OKL_INS_POLICIES_TL
608: ---------------------------------------------------------------------------
609: FUNCTION get_rec (
610: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
611: x_no_data_found OUT NOCOPY BOOLEAN
612: ) RETURN okl_ins_policies_tl_rec_type IS
613: CURSOR ipy_tl_pk_csr (p_id IN NUMBER) IS
614: SELECT
608: ---------------------------------------------------------------------------
609: FUNCTION get_rec (
610: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
611: x_no_data_found OUT NOCOPY BOOLEAN
612: ) RETURN okl_ins_policies_tl_rec_type IS
613: CURSOR ipy_tl_pk_csr (p_id IN NUMBER) IS
614: SELECT
615: ID,
616: LANGUAGE,
624: CREATION_DATE,
625: LAST_UPDATED_BY,
626: LAST_UPDATE_DATE,
627: LAST_UPDATE_LOGIN
628: FROM Okl_Ins_Policies_Tl
629: WHERE okl_ins_policies_tl.id = p_id;
630: l_ipy_tl_pk ipy_tl_pk_csr%ROWTYPE;
631: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
632: BEGIN
625: LAST_UPDATED_BY,
626: LAST_UPDATE_DATE,
627: LAST_UPDATE_LOGIN
628: FROM Okl_Ins_Policies_Tl
629: WHERE okl_ins_policies_tl.id = p_id;
630: l_ipy_tl_pk ipy_tl_pk_csr%ROWTYPE;
631: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
632: BEGIN
633: x_no_data_found := TRUE;
627: LAST_UPDATE_LOGIN
628: FROM Okl_Ins_Policies_Tl
629: WHERE okl_ins_policies_tl.id = p_id;
630: l_ipy_tl_pk ipy_tl_pk_csr%ROWTYPE;
631: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
632: BEGIN
633: x_no_data_found := TRUE;
634: -- Get current database values
635: OPEN ipy_tl_pk_csr (p_okl_ins_policies_tl_rec.id);
631: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
632: BEGIN
633: x_no_data_found := TRUE;
634: -- Get current database values
635: OPEN ipy_tl_pk_csr (p_okl_ins_policies_tl_rec.id);
636: FETCH ipy_tl_pk_csr INTO
637: l_okl_ins_policies_tl_rec.id,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
633: x_no_data_found := TRUE;
634: -- Get current database values
635: OPEN ipy_tl_pk_csr (p_okl_ins_policies_tl_rec.id);
636: FETCH ipy_tl_pk_csr INTO
637: l_okl_ins_policies_tl_rec.id,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
634: -- Get current database values
635: OPEN ipy_tl_pk_csr (p_okl_ins_policies_tl_rec.id);
636: FETCH ipy_tl_pk_csr INTO
637: l_okl_ins_policies_tl_rec.id,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
635: OPEN ipy_tl_pk_csr (p_okl_ins_policies_tl_rec.id);
636: FETCH ipy_tl_pk_csr INTO
637: l_okl_ins_policies_tl_rec.id,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
636: FETCH ipy_tl_pk_csr INTO
637: l_okl_ins_policies_tl_rec.id,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
637: l_okl_ins_policies_tl_rec.id,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
638: l_okl_ins_policies_tl_rec.language,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
639: l_okl_ins_policies_tl_rec.source_lang,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
640: l_okl_ins_policies_tl_rec.sfwt_flag,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
648: l_okl_ins_policies_tl_rec.last_update_date,
641: l_okl_ins_policies_tl_rec.description,
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
648: l_okl_ins_policies_tl_rec.last_update_date,
649: l_okl_ins_policies_tl_rec.last_update_login;
642: l_okl_ins_policies_tl_rec.endorsement,
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
648: l_okl_ins_policies_tl_rec.last_update_date,
649: l_okl_ins_policies_tl_rec.last_update_login;
650: x_no_data_found := ipy_tl_pk_csr%NOTFOUND;
643: l_okl_ins_policies_tl_rec.comments,
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
648: l_okl_ins_policies_tl_rec.last_update_date,
649: l_okl_ins_policies_tl_rec.last_update_login;
650: x_no_data_found := ipy_tl_pk_csr%NOTFOUND;
651: CLOSE ipy_tl_pk_csr;
644: l_okl_ins_policies_tl_rec.cancellation_comment,
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
648: l_okl_ins_policies_tl_rec.last_update_date,
649: l_okl_ins_policies_tl_rec.last_update_login;
650: x_no_data_found := ipy_tl_pk_csr%NOTFOUND;
651: CLOSE ipy_tl_pk_csr;
652: RETURN(l_okl_ins_policies_tl_rec);
645: l_okl_ins_policies_tl_rec.created_by,
646: l_okl_ins_policies_tl_rec.creation_date,
647: l_okl_ins_policies_tl_rec.last_updated_by,
648: l_okl_ins_policies_tl_rec.last_update_date,
649: l_okl_ins_policies_tl_rec.last_update_login;
650: x_no_data_found := ipy_tl_pk_csr%NOTFOUND;
651: CLOSE ipy_tl_pk_csr;
652: RETURN(l_okl_ins_policies_tl_rec);
653: END get_rec;
648: l_okl_ins_policies_tl_rec.last_update_date,
649: l_okl_ins_policies_tl_rec.last_update_login;
650: x_no_data_found := ipy_tl_pk_csr%NOTFOUND;
651: CLOSE ipy_tl_pk_csr;
652: RETURN(l_okl_ins_policies_tl_rec);
653: END get_rec;
654: ------------------------------------------------------------------
655: -- This version of get_rec sets error messages if no data found --
656: ------------------------------------------------------------------
654: ------------------------------------------------------------------
655: -- This version of get_rec sets error messages if no data found --
656: ------------------------------------------------------------------
657: FUNCTION get_rec (
658: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
659: x_return_status OUT NOCOPY VARCHAR2
660: ) RETURN okl_ins_policies_tl_rec_type IS
661: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
662: l_row_notfound BOOLEAN := TRUE;
656: ------------------------------------------------------------------
657: FUNCTION get_rec (
658: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
659: x_return_status OUT NOCOPY VARCHAR2
660: ) RETURN okl_ins_policies_tl_rec_type IS
661: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
662: l_row_notfound BOOLEAN := TRUE;
663: BEGIN
664: x_return_status := OKC_API.G_RET_STS_SUCCESS;
657: FUNCTION get_rec (
658: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
659: x_return_status OUT NOCOPY VARCHAR2
660: ) RETURN okl_ins_policies_tl_rec_type IS
661: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
662: l_row_notfound BOOLEAN := TRUE;
663: BEGIN
664: x_return_status := OKC_API.G_RET_STS_SUCCESS;
665: l_okl_ins_policies_tl_rec := get_rec(p_okl_ins_policies_tl_rec, l_row_notfound);
661: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
662: l_row_notfound BOOLEAN := TRUE;
663: BEGIN
664: x_return_status := OKC_API.G_RET_STS_SUCCESS;
665: l_okl_ins_policies_tl_rec := get_rec(p_okl_ins_policies_tl_rec, l_row_notfound);
666: IF (l_row_notfound) THEN
667: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
668: x_return_status := OKC_API.G_RET_STS_ERROR;
669: END IF;
666: IF (l_row_notfound) THEN
667: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
668: x_return_status := OKC_API.G_RET_STS_ERROR;
669: END IF;
670: RETURN(l_okl_ins_policies_tl_rec);
671: END get_rec;
672: -----------------------------------------------------------
673: -- So we don't have to pass an "l_row_notfound" variable --
674: -----------------------------------------------------------
672: -----------------------------------------------------------
673: -- So we don't have to pass an "l_row_notfound" variable --
674: -----------------------------------------------------------
675: FUNCTION get_rec (
676: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type
677: ) RETURN okl_ins_policies_tl_rec_type IS
678: l_row_not_found BOOLEAN := TRUE;
679: BEGIN
680: RETURN(get_rec(p_okl_ins_policies_tl_rec, l_row_not_found));
673: -- So we don't have to pass an "l_row_notfound" variable --
674: -----------------------------------------------------------
675: FUNCTION get_rec (
676: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type
677: ) RETURN okl_ins_policies_tl_rec_type IS
678: l_row_not_found BOOLEAN := TRUE;
679: BEGIN
680: RETURN(get_rec(p_okl_ins_policies_tl_rec, l_row_not_found));
681: END get_rec;
676: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type
677: ) RETURN okl_ins_policies_tl_rec_type IS
678: l_row_not_found BOOLEAN := TRUE;
679: BEGIN
680: RETURN(get_rec(p_okl_ins_policies_tl_rec, l_row_not_found));
681: END get_rec;
682: ---------------------------------------------------------------------------
683: -- FUNCTION null_out_defaults for: OKL_INS_POLICIES_V
684: ---------------------------------------------------------------------------
3151: p_to.legal_entity_id := p_from.legal_entity_id;
3152: END migrate;
3153: PROCEDURE migrate (
3154: p_from IN ipyv_rec_type,
3155: p_to IN OUT NOCOPY okl_ins_policies_tl_rec_type
3156: ) IS
3157: BEGIN
3158: p_to.id := p_from.id;
3159: p_to.sfwt_flag := p_from.sfwt_flag;
3167: p_to.last_update_date := p_from.last_update_date;
3168: p_to.last_update_login := p_from.last_update_login;
3169: END migrate;
3170: PROCEDURE migrate (
3171: p_from IN okl_ins_policies_tl_rec_type,
3172: p_to IN OUT NOCOPY ipyv_rec_type
3173: ) IS
3174: BEGIN
3175: p_to.id := p_from.id;
3201: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
3202: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3203: l_ipyv_rec ipyv_rec_type := p_ipyv_rec;
3204: l_ipy_rec ipy_rec_type;
3205: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3206: BEGIN
3207: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3208: G_PKG_NAME,
3209: p_init_msg_list,
3667: '_PVT'
3668: );
3669: END insert_row;
3670: ----------------------------------------
3671: -- insert_row for:OKL_INS_POLICIES_TL --
3672: ----------------------------------------
3673: PROCEDURE insert_row(
3674: p_init_msg_list IN VARCHAR2 ,
3675: x_return_status OUT NOCOPY VARCHAR2,
3674: p_init_msg_list IN VARCHAR2 ,
3675: x_return_status OUT NOCOPY VARCHAR2,
3676: x_msg_count OUT NOCOPY NUMBER,
3677: x_msg_data OUT NOCOPY VARCHAR2,
3678: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
3679: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type) IS
3680: l_api_version CONSTANT NUMBER := 1;
3681: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3682: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3675: x_return_status OUT NOCOPY VARCHAR2,
3676: x_msg_count OUT NOCOPY NUMBER,
3677: x_msg_data OUT NOCOPY VARCHAR2,
3678: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
3679: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type) IS
3680: l_api_version CONSTANT NUMBER := 1;
3681: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3682: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3683: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
3679: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type) IS
3680: l_api_version CONSTANT NUMBER := 1;
3681: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3682: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3683: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
3684: l_def_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3685: CURSOR get_languages IS
3686: SELECT *
3687: FROM FND_LANGUAGES
3680: l_api_version CONSTANT NUMBER := 1;
3681: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3682: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3683: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
3684: l_def_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3685: CURSOR get_languages IS
3686: SELECT *
3687: FROM FND_LANGUAGES
3688: WHERE INSTALLED_FLAG IN ('I', 'B');
3686: SELECT *
3687: FROM FND_LANGUAGES
3688: WHERE INSTALLED_FLAG IN ('I', 'B');
3689: --------------------------------------------
3690: -- Set_Attributes for:OKL_INS_POLICIES_TL --
3691: --------------------------------------------
3692: FUNCTION Set_Attributes (
3693: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
3694: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
3689: --------------------------------------------
3690: -- Set_Attributes for:OKL_INS_POLICIES_TL --
3691: --------------------------------------------
3692: FUNCTION Set_Attributes (
3693: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
3694: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
3695: ) RETURN VARCHAR2 IS
3696: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3697: BEGIN
3690: -- Set_Attributes for:OKL_INS_POLICIES_TL --
3691: --------------------------------------------
3692: FUNCTION Set_Attributes (
3693: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
3694: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
3695: ) RETURN VARCHAR2 IS
3696: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3697: BEGIN
3698: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
3694: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
3695: ) RETURN VARCHAR2 IS
3696: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3697: BEGIN
3698: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
3699: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
3700: x_okl_ins_policies_tl_rec.SOURCE_LANG := USERENV('LANG');
3701: RETURN(l_return_status);
3702: END Set_Attributes;
3695: ) RETURN VARCHAR2 IS
3696: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3697: BEGIN
3698: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
3699: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
3700: x_okl_ins_policies_tl_rec.SOURCE_LANG := USERENV('LANG');
3701: RETURN(l_return_status);
3702: END Set_Attributes;
3703: BEGIN
3696: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3697: BEGIN
3698: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
3699: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
3700: x_okl_ins_policies_tl_rec.SOURCE_LANG := USERENV('LANG');
3701: RETURN(l_return_status);
3702: END Set_Attributes;
3703: BEGIN
3704: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3711: RAISE OKC_API.G_EXCEPTION_ERROR;
3712: END IF;
3713: --- Setting item attributes
3714: l_return_status := Set_Attributes(
3715: p_okl_ins_policies_tl_rec, -- IN
3716: l_okl_ins_policies_tl_rec); -- OUT
3717: --- If any errors happen abort API
3718: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3719: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3712: END IF;
3713: --- Setting item attributes
3714: l_return_status := Set_Attributes(
3715: p_okl_ins_policies_tl_rec, -- IN
3716: l_okl_ins_policies_tl_rec); -- OUT
3717: --- If any errors happen abort API
3718: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3719: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3720: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3720: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3721: RAISE OKC_API.G_EXCEPTION_ERROR;
3722: END IF;
3723: FOR l_lang_rec IN get_languages LOOP
3724: l_okl_ins_policies_tl_rec.language := l_lang_rec.language_code;
3725: INSERT INTO OKL_INS_POLICIES_TL(
3726: id,
3727: language,
3728: source_lang,
3721: RAISE OKC_API.G_EXCEPTION_ERROR;
3722: END IF;
3723: FOR l_lang_rec IN get_languages LOOP
3724: l_okl_ins_policies_tl_rec.language := l_lang_rec.language_code;
3725: INSERT INTO OKL_INS_POLICIES_TL(
3726: id,
3727: language,
3728: source_lang,
3729: sfwt_flag,
3736: last_updated_by,
3737: last_update_date,
3738: last_update_login)
3739: VALUES (
3740: l_okl_ins_policies_tl_rec.id,
3741: l_okl_ins_policies_tl_rec.language,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3737: last_update_date,
3738: last_update_login)
3739: VALUES (
3740: l_okl_ins_policies_tl_rec.id,
3741: l_okl_ins_policies_tl_rec.language,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3738: last_update_login)
3739: VALUES (
3740: l_okl_ins_policies_tl_rec.id,
3741: l_okl_ins_policies_tl_rec.language,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3739: VALUES (
3740: l_okl_ins_policies_tl_rec.id,
3741: l_okl_ins_policies_tl_rec.language,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3740: l_okl_ins_policies_tl_rec.id,
3741: l_okl_ins_policies_tl_rec.language,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3741: l_okl_ins_policies_tl_rec.language,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3742: l_okl_ins_policies_tl_rec.source_lang,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3743: l_okl_ins_policies_tl_rec.sfwt_flag,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3751: l_okl_ins_policies_tl_rec.last_update_date,
3744: l_okl_ins_policies_tl_rec.description,
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3751: l_okl_ins_policies_tl_rec.last_update_date,
3752: l_okl_ins_policies_tl_rec.last_update_login);
3745: l_okl_ins_policies_tl_rec.endorsement,
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3751: l_okl_ins_policies_tl_rec.last_update_date,
3752: l_okl_ins_policies_tl_rec.last_update_login);
3753: END LOOP;
3746: l_okl_ins_policies_tl_rec.comments,
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3751: l_okl_ins_policies_tl_rec.last_update_date,
3752: l_okl_ins_policies_tl_rec.last_update_login);
3753: END LOOP;
3754: -- Set OUT values
3747: l_okl_ins_policies_tl_rec.cancellation_comment,
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3751: l_okl_ins_policies_tl_rec.last_update_date,
3752: l_okl_ins_policies_tl_rec.last_update_login);
3753: END LOOP;
3754: -- Set OUT values
3755: x_okl_ins_policies_tl_rec := l_okl_ins_policies_tl_rec;
3748: l_okl_ins_policies_tl_rec.created_by,
3749: l_okl_ins_policies_tl_rec.creation_date,
3750: l_okl_ins_policies_tl_rec.last_updated_by,
3751: l_okl_ins_policies_tl_rec.last_update_date,
3752: l_okl_ins_policies_tl_rec.last_update_login);
3753: END LOOP;
3754: -- Set OUT values
3755: x_okl_ins_policies_tl_rec := l_okl_ins_policies_tl_rec;
3756: x_return_status := l_return_status;
3751: l_okl_ins_policies_tl_rec.last_update_date,
3752: l_okl_ins_policies_tl_rec.last_update_login);
3753: END LOOP;
3754: -- Set OUT values
3755: x_okl_ins_policies_tl_rec := l_okl_ins_policies_tl_rec;
3756: x_return_status := l_return_status;
3757: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3758: EXCEPTION
3759: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3804: l_ipyv_rec ipyv_rec_type := p_ipyv_rec;
3805: l_def_ipyv_rec ipyv_rec_type;
3806: l_ipy_rec ipy_rec_type;
3807: lx_ipy_rec ipy_rec_type;
3808: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3809: lx_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3810: -------------------------------
3811: -- FUNCTION fill_who_columns --
3812: -------------------------------
3805: l_def_ipyv_rec ipyv_rec_type;
3806: l_ipy_rec ipy_rec_type;
3807: lx_ipy_rec ipy_rec_type;
3808: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3809: lx_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
3810: -------------------------------
3811: -- FUNCTION fill_who_columns --
3812: -------------------------------
3813: FUNCTION fill_who_columns (
3914: -----------------------------------------
3915: -- Move VIEW record to "Child" records --
3916: -----------------------------------------
3917: migrate(l_def_ipyv_rec, l_ipy_rec);
3918: migrate(l_def_ipyv_rec, l_okl_ins_policies_tl_rec);
3919: -----------------------------------------------
3920: -- Call the INSERT_ROW for each child record --
3921: -----------------------------------------------
3922: insert_row(
3937: p_init_msg_list,
3938: l_return_status,
3939: x_msg_count,
3940: x_msg_data,
3941: l_okl_ins_policies_tl_rec,
3942: lx_okl_ins_policies_tl_rec
3943: );
3944: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3938: l_return_status,
3939: x_msg_count,
3940: x_msg_data,
3941: l_okl_ins_policies_tl_rec,
3942: lx_okl_ins_policies_tl_rec
3943: );
3944: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3947: RAISE OKC_API.G_EXCEPTION_ERROR;
3948: END IF;
3949: migrate(lx_okl_ins_policies_tl_rec, l_def_ipyv_rec);
3950: -- Set OUT values
3951: x_ipyv_rec := l_def_ipyv_rec;
3952: x_return_status := l_return_status;
3953: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4248: '_PVT'
4249: );
4250: END lock_row;
4251: --------------------------------------
4252: -- lock_row for:OKL_INS_POLICIES_TL --
4253: --------------------------------------
4254: PROCEDURE lock_row(
4255: p_init_msg_list IN VARCHAR2 ,
4256: x_return_status OUT NOCOPY VARCHAR2,
4255: p_init_msg_list IN VARCHAR2 ,
4256: x_return_status OUT NOCOPY VARCHAR2,
4257: x_msg_count OUT NOCOPY NUMBER,
4258: x_msg_data OUT NOCOPY VARCHAR2,
4259: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
4260: E_Resource_Busy EXCEPTION;
4261: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
4262: CURSOR lock_csr (p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
4263: SELECT *
4258: x_msg_data OUT NOCOPY VARCHAR2,
4259: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
4260: E_Resource_Busy EXCEPTION;
4261: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
4262: CURSOR lock_csr (p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
4263: SELECT *
4264: FROM OKL_INS_POLICIES_TL
4265: WHERE ID = p_okl_ins_policies_tl_rec.id
4266: FOR UPDATE NOWAIT;
4260: E_Resource_Busy EXCEPTION;
4261: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
4262: CURSOR lock_csr (p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
4263: SELECT *
4264: FROM OKL_INS_POLICIES_TL
4265: WHERE ID = p_okl_ins_policies_tl_rec.id
4266: FOR UPDATE NOWAIT;
4267: l_api_version CONSTANT NUMBER := 1;
4268: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
4261: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
4262: CURSOR lock_csr (p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
4263: SELECT *
4264: FROM OKL_INS_POLICIES_TL
4265: WHERE ID = p_okl_ins_policies_tl_rec.id
4266: FOR UPDATE NOWAIT;
4267: l_api_version CONSTANT NUMBER := 1;
4268: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
4269: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4280: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4281: RAISE OKC_API.G_EXCEPTION_ERROR;
4282: END IF;
4283: BEGIN
4284: OPEN lock_csr(p_okl_ins_policies_tl_rec);
4285: FETCH lock_csr INTO l_lock_var;
4286: l_row_notfound := lock_csr%NOTFOUND;
4287: CLOSE lock_csr;
4288: EXCEPTION
4344: l_api_version CONSTANT NUMBER := 1;
4345: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
4346: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4347: l_ipy_rec ipy_rec_type;
4348: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
4349: BEGIN
4350: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4351: G_PKG_NAME,
4352: p_init_msg_list,
4362: -----------------------------------------
4363: -- Move VIEW record to "Child" records --
4364: -----------------------------------------
4365: migrate(p_ipyv_rec, l_ipy_rec);
4366: migrate(p_ipyv_rec, l_okl_ins_policies_tl_rec);
4367: ---------------------------------------------
4368: -- Call the LOCK_ROW for each child record --
4369: ---------------------------------------------
4370: lock_row(
4383: p_init_msg_list,
4384: l_return_status,
4385: x_msg_count,
4386: x_msg_data,
4387: l_okl_ins_policies_tl_rec
4388: );
4389: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4390: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4391: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5062: '_PVT'
5063: );
5064: END update_row;
5065: ----------------------------------------
5066: -- update_row for:OKL_INS_POLICIES_TL --
5067: ----------------------------------------
5068: PROCEDURE update_row(
5069: p_init_msg_list IN VARCHAR2 ,
5070: x_return_status OUT NOCOPY VARCHAR2,
5069: p_init_msg_list IN VARCHAR2 ,
5070: x_return_status OUT NOCOPY VARCHAR2,
5071: x_msg_count OUT NOCOPY NUMBER,
5072: x_msg_data OUT NOCOPY VARCHAR2,
5073: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5074: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type) IS
5075: l_api_version CONSTANT NUMBER := 1;
5076: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
5077: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5070: x_return_status OUT NOCOPY VARCHAR2,
5071: x_msg_count OUT NOCOPY NUMBER,
5072: x_msg_data OUT NOCOPY VARCHAR2,
5073: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5074: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type) IS
5075: l_api_version CONSTANT NUMBER := 1;
5076: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
5077: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5078: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
5074: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type) IS
5075: l_api_version CONSTANT NUMBER := 1;
5076: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
5077: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5078: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
5079: l_def_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5080: l_row_notfound BOOLEAN := TRUE;
5081: ----------------------------------
5082: -- FUNCTION populate_new_record --
5075: l_api_version CONSTANT NUMBER := 1;
5076: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
5077: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5078: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
5079: l_def_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5080: l_row_notfound BOOLEAN := TRUE;
5081: ----------------------------------
5082: -- FUNCTION populate_new_record --
5083: ----------------------------------
5081: ----------------------------------
5082: -- FUNCTION populate_new_record --
5083: ----------------------------------
5084: FUNCTION populate_new_record (
5085: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5086: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5087: ) RETURN VARCHAR2 IS
5088: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5089: l_row_notfound BOOLEAN := TRUE;
5082: -- FUNCTION populate_new_record --
5083: ----------------------------------
5084: FUNCTION populate_new_record (
5085: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5086: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5087: ) RETURN VARCHAR2 IS
5088: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5089: l_row_notfound BOOLEAN := TRUE;
5090: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5084: FUNCTION populate_new_record (
5085: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5086: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5087: ) RETURN VARCHAR2 IS
5088: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5089: l_row_notfound BOOLEAN := TRUE;
5090: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5091: BEGIN
5092: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5088: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5089: l_row_notfound BOOLEAN := TRUE;
5090: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5091: BEGIN
5092: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5093: -- Get current database values
5094: l_okl_ins_policies_tl_rec := get_rec(p_okl_ins_policies_tl_rec, l_return_status);
5095: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
5096: IF (x_okl_ins_policies_tl_rec.id = OKC_API.G_MISS_NUM)
5090: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5091: BEGIN
5092: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5093: -- Get current database values
5094: l_okl_ins_policies_tl_rec := get_rec(p_okl_ins_policies_tl_rec, l_return_status);
5095: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
5096: IF (x_okl_ins_policies_tl_rec.id = OKC_API.G_MISS_NUM)
5097: THEN
5098: x_okl_ins_policies_tl_rec.id := l_okl_ins_policies_tl_rec.id;
5092: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5093: -- Get current database values
5094: l_okl_ins_policies_tl_rec := get_rec(p_okl_ins_policies_tl_rec, l_return_status);
5095: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
5096: IF (x_okl_ins_policies_tl_rec.id = OKC_API.G_MISS_NUM)
5097: THEN
5098: x_okl_ins_policies_tl_rec.id := l_okl_ins_policies_tl_rec.id;
5099: END IF;
5100: IF (x_okl_ins_policies_tl_rec.language = OKC_API.G_MISS_CHAR)
5094: l_okl_ins_policies_tl_rec := get_rec(p_okl_ins_policies_tl_rec, l_return_status);
5095: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
5096: IF (x_okl_ins_policies_tl_rec.id = OKC_API.G_MISS_NUM)
5097: THEN
5098: x_okl_ins_policies_tl_rec.id := l_okl_ins_policies_tl_rec.id;
5099: END IF;
5100: IF (x_okl_ins_policies_tl_rec.language = OKC_API.G_MISS_CHAR)
5101: THEN
5102: x_okl_ins_policies_tl_rec.language := l_okl_ins_policies_tl_rec.language;
5096: IF (x_okl_ins_policies_tl_rec.id = OKC_API.G_MISS_NUM)
5097: THEN
5098: x_okl_ins_policies_tl_rec.id := l_okl_ins_policies_tl_rec.id;
5099: END IF;
5100: IF (x_okl_ins_policies_tl_rec.language = OKC_API.G_MISS_CHAR)
5101: THEN
5102: x_okl_ins_policies_tl_rec.language := l_okl_ins_policies_tl_rec.language;
5103: END IF;
5104: IF (x_okl_ins_policies_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
5098: x_okl_ins_policies_tl_rec.id := l_okl_ins_policies_tl_rec.id;
5099: END IF;
5100: IF (x_okl_ins_policies_tl_rec.language = OKC_API.G_MISS_CHAR)
5101: THEN
5102: x_okl_ins_policies_tl_rec.language := l_okl_ins_policies_tl_rec.language;
5103: END IF;
5104: IF (x_okl_ins_policies_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
5105: THEN
5106: x_okl_ins_policies_tl_rec.source_lang := l_okl_ins_policies_tl_rec.source_lang;
5100: IF (x_okl_ins_policies_tl_rec.language = OKC_API.G_MISS_CHAR)
5101: THEN
5102: x_okl_ins_policies_tl_rec.language := l_okl_ins_policies_tl_rec.language;
5103: END IF;
5104: IF (x_okl_ins_policies_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
5105: THEN
5106: x_okl_ins_policies_tl_rec.source_lang := l_okl_ins_policies_tl_rec.source_lang;
5107: END IF;
5108: IF (x_okl_ins_policies_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
5102: x_okl_ins_policies_tl_rec.language := l_okl_ins_policies_tl_rec.language;
5103: END IF;
5104: IF (x_okl_ins_policies_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
5105: THEN
5106: x_okl_ins_policies_tl_rec.source_lang := l_okl_ins_policies_tl_rec.source_lang;
5107: END IF;
5108: IF (x_okl_ins_policies_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
5109: THEN
5110: x_okl_ins_policies_tl_rec.sfwt_flag := l_okl_ins_policies_tl_rec.sfwt_flag;
5104: IF (x_okl_ins_policies_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
5105: THEN
5106: x_okl_ins_policies_tl_rec.source_lang := l_okl_ins_policies_tl_rec.source_lang;
5107: END IF;
5108: IF (x_okl_ins_policies_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
5109: THEN
5110: x_okl_ins_policies_tl_rec.sfwt_flag := l_okl_ins_policies_tl_rec.sfwt_flag;
5111: END IF;
5112: IF (x_okl_ins_policies_tl_rec.description = OKC_API.G_MISS_CHAR)
5106: x_okl_ins_policies_tl_rec.source_lang := l_okl_ins_policies_tl_rec.source_lang;
5107: END IF;
5108: IF (x_okl_ins_policies_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
5109: THEN
5110: x_okl_ins_policies_tl_rec.sfwt_flag := l_okl_ins_policies_tl_rec.sfwt_flag;
5111: END IF;
5112: IF (x_okl_ins_policies_tl_rec.description = OKC_API.G_MISS_CHAR)
5113: THEN
5114: x_okl_ins_policies_tl_rec.description := l_okl_ins_policies_tl_rec.description;
5108: IF (x_okl_ins_policies_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
5109: THEN
5110: x_okl_ins_policies_tl_rec.sfwt_flag := l_okl_ins_policies_tl_rec.sfwt_flag;
5111: END IF;
5112: IF (x_okl_ins_policies_tl_rec.description = OKC_API.G_MISS_CHAR)
5113: THEN
5114: x_okl_ins_policies_tl_rec.description := l_okl_ins_policies_tl_rec.description;
5115: END IF;
5116: IF (x_okl_ins_policies_tl_rec.endorsement = OKC_API.G_MISS_CHAR)
5110: x_okl_ins_policies_tl_rec.sfwt_flag := l_okl_ins_policies_tl_rec.sfwt_flag;
5111: END IF;
5112: IF (x_okl_ins_policies_tl_rec.description = OKC_API.G_MISS_CHAR)
5113: THEN
5114: x_okl_ins_policies_tl_rec.description := l_okl_ins_policies_tl_rec.description;
5115: END IF;
5116: IF (x_okl_ins_policies_tl_rec.endorsement = OKC_API.G_MISS_CHAR)
5117: THEN
5118: x_okl_ins_policies_tl_rec.endorsement := l_okl_ins_policies_tl_rec.endorsement;
5112: IF (x_okl_ins_policies_tl_rec.description = OKC_API.G_MISS_CHAR)
5113: THEN
5114: x_okl_ins_policies_tl_rec.description := l_okl_ins_policies_tl_rec.description;
5115: END IF;
5116: IF (x_okl_ins_policies_tl_rec.endorsement = OKC_API.G_MISS_CHAR)
5117: THEN
5118: x_okl_ins_policies_tl_rec.endorsement := l_okl_ins_policies_tl_rec.endorsement;
5119: END IF;
5120: IF (x_okl_ins_policies_tl_rec.comments = OKC_API.G_MISS_CHAR)
5114: x_okl_ins_policies_tl_rec.description := l_okl_ins_policies_tl_rec.description;
5115: END IF;
5116: IF (x_okl_ins_policies_tl_rec.endorsement = OKC_API.G_MISS_CHAR)
5117: THEN
5118: x_okl_ins_policies_tl_rec.endorsement := l_okl_ins_policies_tl_rec.endorsement;
5119: END IF;
5120: IF (x_okl_ins_policies_tl_rec.comments = OKC_API.G_MISS_CHAR)
5121: THEN
5122: x_okl_ins_policies_tl_rec.comments := l_okl_ins_policies_tl_rec.comments;
5116: IF (x_okl_ins_policies_tl_rec.endorsement = OKC_API.G_MISS_CHAR)
5117: THEN
5118: x_okl_ins_policies_tl_rec.endorsement := l_okl_ins_policies_tl_rec.endorsement;
5119: END IF;
5120: IF (x_okl_ins_policies_tl_rec.comments = OKC_API.G_MISS_CHAR)
5121: THEN
5122: x_okl_ins_policies_tl_rec.comments := l_okl_ins_policies_tl_rec.comments;
5123: END IF;
5124: IF (x_okl_ins_policies_tl_rec.cancellation_comment = OKC_API.G_MISS_CHAR)
5118: x_okl_ins_policies_tl_rec.endorsement := l_okl_ins_policies_tl_rec.endorsement;
5119: END IF;
5120: IF (x_okl_ins_policies_tl_rec.comments = OKC_API.G_MISS_CHAR)
5121: THEN
5122: x_okl_ins_policies_tl_rec.comments := l_okl_ins_policies_tl_rec.comments;
5123: END IF;
5124: IF (x_okl_ins_policies_tl_rec.cancellation_comment = OKC_API.G_MISS_CHAR)
5125: THEN
5126: x_okl_ins_policies_tl_rec.cancellation_comment := l_okl_ins_policies_tl_rec.cancellation_comment;
5120: IF (x_okl_ins_policies_tl_rec.comments = OKC_API.G_MISS_CHAR)
5121: THEN
5122: x_okl_ins_policies_tl_rec.comments := l_okl_ins_policies_tl_rec.comments;
5123: END IF;
5124: IF (x_okl_ins_policies_tl_rec.cancellation_comment = OKC_API.G_MISS_CHAR)
5125: THEN
5126: x_okl_ins_policies_tl_rec.cancellation_comment := l_okl_ins_policies_tl_rec.cancellation_comment;
5127: END IF;
5128: IF (x_okl_ins_policies_tl_rec.created_by = OKC_API.G_MISS_NUM)
5122: x_okl_ins_policies_tl_rec.comments := l_okl_ins_policies_tl_rec.comments;
5123: END IF;
5124: IF (x_okl_ins_policies_tl_rec.cancellation_comment = OKC_API.G_MISS_CHAR)
5125: THEN
5126: x_okl_ins_policies_tl_rec.cancellation_comment := l_okl_ins_policies_tl_rec.cancellation_comment;
5127: END IF;
5128: IF (x_okl_ins_policies_tl_rec.created_by = OKC_API.G_MISS_NUM)
5129: THEN
5130: x_okl_ins_policies_tl_rec.created_by := l_okl_ins_policies_tl_rec.created_by;
5124: IF (x_okl_ins_policies_tl_rec.cancellation_comment = OKC_API.G_MISS_CHAR)
5125: THEN
5126: x_okl_ins_policies_tl_rec.cancellation_comment := l_okl_ins_policies_tl_rec.cancellation_comment;
5127: END IF;
5128: IF (x_okl_ins_policies_tl_rec.created_by = OKC_API.G_MISS_NUM)
5129: THEN
5130: x_okl_ins_policies_tl_rec.created_by := l_okl_ins_policies_tl_rec.created_by;
5131: END IF;
5132: IF (x_okl_ins_policies_tl_rec.creation_date = OKC_API.G_MISS_DATE)
5126: x_okl_ins_policies_tl_rec.cancellation_comment := l_okl_ins_policies_tl_rec.cancellation_comment;
5127: END IF;
5128: IF (x_okl_ins_policies_tl_rec.created_by = OKC_API.G_MISS_NUM)
5129: THEN
5130: x_okl_ins_policies_tl_rec.created_by := l_okl_ins_policies_tl_rec.created_by;
5131: END IF;
5132: IF (x_okl_ins_policies_tl_rec.creation_date = OKC_API.G_MISS_DATE)
5133: THEN
5134: x_okl_ins_policies_tl_rec.creation_date := l_okl_ins_policies_tl_rec.creation_date;
5128: IF (x_okl_ins_policies_tl_rec.created_by = OKC_API.G_MISS_NUM)
5129: THEN
5130: x_okl_ins_policies_tl_rec.created_by := l_okl_ins_policies_tl_rec.created_by;
5131: END IF;
5132: IF (x_okl_ins_policies_tl_rec.creation_date = OKC_API.G_MISS_DATE)
5133: THEN
5134: x_okl_ins_policies_tl_rec.creation_date := l_okl_ins_policies_tl_rec.creation_date;
5135: END IF;
5136: IF (x_okl_ins_policies_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
5130: x_okl_ins_policies_tl_rec.created_by := l_okl_ins_policies_tl_rec.created_by;
5131: END IF;
5132: IF (x_okl_ins_policies_tl_rec.creation_date = OKC_API.G_MISS_DATE)
5133: THEN
5134: x_okl_ins_policies_tl_rec.creation_date := l_okl_ins_policies_tl_rec.creation_date;
5135: END IF;
5136: IF (x_okl_ins_policies_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
5137: THEN
5138: x_okl_ins_policies_tl_rec.last_updated_by := l_okl_ins_policies_tl_rec.last_updated_by;
5132: IF (x_okl_ins_policies_tl_rec.creation_date = OKC_API.G_MISS_DATE)
5133: THEN
5134: x_okl_ins_policies_tl_rec.creation_date := l_okl_ins_policies_tl_rec.creation_date;
5135: END IF;
5136: IF (x_okl_ins_policies_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
5137: THEN
5138: x_okl_ins_policies_tl_rec.last_updated_by := l_okl_ins_policies_tl_rec.last_updated_by;
5139: END IF;
5140: IF (x_okl_ins_policies_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
5134: x_okl_ins_policies_tl_rec.creation_date := l_okl_ins_policies_tl_rec.creation_date;
5135: END IF;
5136: IF (x_okl_ins_policies_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
5137: THEN
5138: x_okl_ins_policies_tl_rec.last_updated_by := l_okl_ins_policies_tl_rec.last_updated_by;
5139: END IF;
5140: IF (x_okl_ins_policies_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
5141: THEN
5142: x_okl_ins_policies_tl_rec.last_update_date := l_okl_ins_policies_tl_rec.last_update_date;
5136: IF (x_okl_ins_policies_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
5137: THEN
5138: x_okl_ins_policies_tl_rec.last_updated_by := l_okl_ins_policies_tl_rec.last_updated_by;
5139: END IF;
5140: IF (x_okl_ins_policies_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
5141: THEN
5142: x_okl_ins_policies_tl_rec.last_update_date := l_okl_ins_policies_tl_rec.last_update_date;
5143: END IF;
5144: IF (x_okl_ins_policies_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
5138: x_okl_ins_policies_tl_rec.last_updated_by := l_okl_ins_policies_tl_rec.last_updated_by;
5139: END IF;
5140: IF (x_okl_ins_policies_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
5141: THEN
5142: x_okl_ins_policies_tl_rec.last_update_date := l_okl_ins_policies_tl_rec.last_update_date;
5143: END IF;
5144: IF (x_okl_ins_policies_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
5145: THEN
5146: x_okl_ins_policies_tl_rec.last_update_login := l_okl_ins_policies_tl_rec.last_update_login;
5140: IF (x_okl_ins_policies_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
5141: THEN
5142: x_okl_ins_policies_tl_rec.last_update_date := l_okl_ins_policies_tl_rec.last_update_date;
5143: END IF;
5144: IF (x_okl_ins_policies_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
5145: THEN
5146: x_okl_ins_policies_tl_rec.last_update_login := l_okl_ins_policies_tl_rec.last_update_login;
5147: END IF;
5148: END IF;
5142: x_okl_ins_policies_tl_rec.last_update_date := l_okl_ins_policies_tl_rec.last_update_date;
5143: END IF;
5144: IF (x_okl_ins_policies_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
5145: THEN
5146: x_okl_ins_policies_tl_rec.last_update_login := l_okl_ins_policies_tl_rec.last_update_login;
5147: END IF;
5148: END IF;
5149: RETURN(l_return_status);
5150: END populate_new_record;
5148: END IF;
5149: RETURN(l_return_status);
5150: END populate_new_record;
5151: --------------------------------------------
5152: -- Set_Attributes for:OKL_INS_POLICIES_TL --
5153: --------------------------------------------
5154: FUNCTION Set_Attributes (
5155: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5156: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5151: --------------------------------------------
5152: -- Set_Attributes for:OKL_INS_POLICIES_TL --
5153: --------------------------------------------
5154: FUNCTION Set_Attributes (
5155: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5156: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5157: ) RETURN VARCHAR2 IS
5158: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5159: BEGIN
5152: -- Set_Attributes for:OKL_INS_POLICIES_TL --
5153: --------------------------------------------
5154: FUNCTION Set_Attributes (
5155: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type,
5156: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5157: ) RETURN VARCHAR2 IS
5158: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5159: BEGIN
5160: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5156: x_okl_ins_policies_tl_rec OUT NOCOPY okl_ins_policies_tl_rec_type
5157: ) RETURN VARCHAR2 IS
5158: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5159: BEGIN
5160: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5161: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
5162: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
5163: RETURN(l_return_status);
5164: END Set_Attributes;
5157: ) RETURN VARCHAR2 IS
5158: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5159: BEGIN
5160: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5161: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
5162: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
5163: RETURN(l_return_status);
5164: END Set_Attributes;
5165: BEGIN
5158: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5159: BEGIN
5160: x_okl_ins_policies_tl_rec := p_okl_ins_policies_tl_rec;
5161: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
5162: x_okl_ins_policies_tl_rec.LANGUAGE := USERENV('LANG');
5163: RETURN(l_return_status);
5164: END Set_Attributes;
5165: BEGIN
5166: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
5173: RAISE OKC_API.G_EXCEPTION_ERROR;
5174: END IF;
5175: --- Setting item attributes
5176: l_return_status := Set_Attributes(
5177: p_okl_ins_policies_tl_rec, -- IN
5178: l_okl_ins_policies_tl_rec); -- OUT
5179: --- If any errors happen abort API
5180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5174: END IF;
5175: --- Setting item attributes
5176: l_return_status := Set_Attributes(
5177: p_okl_ins_policies_tl_rec, -- IN
5178: l_okl_ins_policies_tl_rec); -- OUT
5179: --- If any errors happen abort API
5180: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5181: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5182: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5183: RAISE OKC_API.G_EXCEPTION_ERROR;
5184: END IF;
5185: l_return_status := populate_new_record(l_okl_ins_policies_tl_rec, l_def_okl_ins_policies_tl_rec);
5186: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5187: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5189: RAISE OKC_API.G_EXCEPTION_ERROR;
5187: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5189: RAISE OKC_API.G_EXCEPTION_ERROR;
5190: END IF;
5191: UPDATE OKL_INS_POLICIES_TL
5192: SET DESCRIPTION = l_def_okl_ins_policies_tl_rec.description,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5188: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5189: RAISE OKC_API.G_EXCEPTION_ERROR;
5190: END IF;
5191: UPDATE OKL_INS_POLICIES_TL
5192: SET DESCRIPTION = l_def_okl_ins_policies_tl_rec.description,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5189: RAISE OKC_API.G_EXCEPTION_ERROR;
5190: END IF;
5191: UPDATE OKL_INS_POLICIES_TL
5192: SET DESCRIPTION = l_def_okl_ins_policies_tl_rec.description,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5190: END IF;
5191: UPDATE OKL_INS_POLICIES_TL
5192: SET DESCRIPTION = l_def_okl_ins_policies_tl_rec.description,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5191: UPDATE OKL_INS_POLICIES_TL
5192: SET DESCRIPTION = l_def_okl_ins_policies_tl_rec.description,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5192: SET DESCRIPTION = l_def_okl_ins_policies_tl_rec.description,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5193: SOURCE_LANG = l_def_okl_ins_policies_tl_rec.source_lang, --Added for bug 3637102
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5194: ENDORSEMENT = l_def_okl_ins_policies_tl_rec.endorsement,
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5202: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5195: COMMENTS = l_def_okl_ins_policies_tl_rec.comments,
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5202: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5203: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE for fixing 3637102
5196: CANCELLATION_COMMENT = l_def_okl_ins_policies_tl_rec.cancellation_comment,
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5202: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5203: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE for fixing 3637102
5204:
5197: CREATED_BY = l_def_okl_ins_policies_tl_rec.created_by,
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5202: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5203: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE for fixing 3637102
5204:
5205: UPDATE OKL_INS_POLICIES_TL
5198: CREATION_DATE = l_def_okl_ins_policies_tl_rec.creation_date,
5199: LAST_UPDATED_BY = l_def_okl_ins_policies_tl_rec.last_updated_by,
5200: LAST_UPDATE_DATE = l_def_okl_ins_policies_tl_rec.last_update_date,
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5202: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5203: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE for fixing 3637102
5204:
5205: UPDATE OKL_INS_POLICIES_TL
5206: SET SFWT_FLAG = 'Y'
5201: LAST_UPDATE_LOGIN = l_def_okl_ins_policies_tl_rec.last_update_login
5202: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5203: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE for fixing 3637102
5204:
5205: UPDATE OKL_INS_POLICIES_TL
5206: SET SFWT_FLAG = 'Y'
5207: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5208: AND SOURCE_LANG <> USERENV('LANG');
5209: x_okl_ins_policies_tl_rec := l_okl_ins_policies_tl_rec;
5203: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE for fixing 3637102
5204:
5205: UPDATE OKL_INS_POLICIES_TL
5206: SET SFWT_FLAG = 'Y'
5207: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5208: AND SOURCE_LANG <> USERENV('LANG');
5209: x_okl_ins_policies_tl_rec := l_okl_ins_policies_tl_rec;
5210: x_return_status := l_return_status;
5211: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5205: UPDATE OKL_INS_POLICIES_TL
5206: SET SFWT_FLAG = 'Y'
5207: WHERE ID = l_def_okl_ins_policies_tl_rec.id
5208: AND SOURCE_LANG <> USERENV('LANG');
5209: x_okl_ins_policies_tl_rec := l_okl_ins_policies_tl_rec;
5210: x_return_status := l_return_status;
5211: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5212: EXCEPTION
5213: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5259: l_def_ipyv_rec ipyv_rec_type;
5260: l_db_ipyv_rec ipyv_rec_type;
5261: l_ipy_rec ipy_rec_type;
5262: lx_ipy_rec ipy_rec_type;
5263: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5264: lx_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5265: -------------------------------
5266: -- FUNCTION fill_who_columns --
5267: -------------------------------
5260: l_db_ipyv_rec ipyv_rec_type;
5261: l_ipy_rec ipy_rec_type;
5262: lx_ipy_rec ipy_rec_type;
5263: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5264: lx_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
5265: -------------------------------
5266: -- FUNCTION fill_who_columns --
5267: -------------------------------
5268: FUNCTION fill_who_columns (
5682: -----------------------------------------
5683: -- Move VIEW record to "Child" records --
5684: -----------------------------------------
5685: migrate(l_def_ipyv_rec, l_ipy_rec);
5686: migrate(l_def_ipyv_rec, l_okl_ins_policies_tl_rec);
5687: -----------------------------------------------
5688: -- Call the UPDATE_ROW for each child record --
5689: -----------------------------------------------
5690: update_row(
5705: p_init_msg_list,
5706: l_return_status,
5707: x_msg_count,
5708: x_msg_data,
5709: l_okl_ins_policies_tl_rec,
5710: lx_okl_ins_policies_tl_rec
5711: );
5712: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5713: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5706: l_return_status,
5707: x_msg_count,
5708: x_msg_data,
5709: l_okl_ins_policies_tl_rec,
5710: lx_okl_ins_policies_tl_rec
5711: );
5712: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5713: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5714: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5713: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5714: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5715: RAISE OKC_API.G_EXCEPTION_ERROR;
5716: END IF;
5717: migrate(lx_okl_ins_policies_tl_rec, l_def_ipyv_rec);
5718: x_ipyv_rec := l_def_ipyv_rec;
5719: x_return_status := l_return_status;
5720: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5721: EXCEPTION
5971: '_PVT'
5972: );
5973: END delete_row;
5974: ----------------------------------------
5975: -- delete_row for:OKL_INS_POLICIES_TL --
5976: ----------------------------------------
5977: PROCEDURE delete_row(
5978: p_init_msg_list IN VARCHAR2 ,
5979: x_return_status OUT NOCOPY VARCHAR2,
5978: p_init_msg_list IN VARCHAR2 ,
5979: x_return_status OUT NOCOPY VARCHAR2,
5980: x_msg_count OUT NOCOPY NUMBER,
5981: x_msg_data OUT NOCOPY VARCHAR2,
5982: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
5983: l_api_version CONSTANT NUMBER := 1;
5984: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
5985: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5986: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
5982: p_okl_ins_policies_tl_rec IN okl_ins_policies_tl_rec_type) IS
5983: l_api_version CONSTANT NUMBER := 1;
5984: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
5985: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5986: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type := p_okl_ins_policies_tl_rec;
5987: l_row_notfound BOOLEAN := TRUE;
5988: BEGIN
5989: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
5990: p_init_msg_list,
5994: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5995: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5996: RAISE OKC_API.G_EXCEPTION_ERROR;
5997: END IF;
5998: DELETE FROM OKL_INS_POLICIES_TL
5999: WHERE ID = p_okl_ins_policies_tl_rec.id;
6000: x_return_status := l_return_status;
6001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
6002: EXCEPTION
5995: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5996: RAISE OKC_API.G_EXCEPTION_ERROR;
5997: END IF;
5998: DELETE FROM OKL_INS_POLICIES_TL
5999: WHERE ID = p_okl_ins_policies_tl_rec.id;
6000: x_return_status := l_return_status;
6001: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
6002: EXCEPTION
6003: WHEN OKC_API.G_EXCEPTION_ERROR THEN
6044: l_api_version CONSTANT NUMBER := 1;
6045: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
6046: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
6047: l_ipyv_rec ipyv_rec_type := p_ipyv_rec;
6048: l_okl_ins_policies_tl_rec okl_ins_policies_tl_rec_type;
6049: l_ipy_rec ipy_rec_type;
6050: BEGIN
6051: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
6052: G_PKG_NAME,
6062: END IF;
6063: -----------------------------------------
6064: -- Move VIEW record to "Child" records --
6065: -----------------------------------------
6066: migrate(l_ipyv_rec, l_okl_ins_policies_tl_rec);
6067: migrate(l_ipyv_rec, l_ipy_rec);
6068: -----------------------------------------------
6069: -- Call the DELETE_ROW for each child record --
6070: -----------------------------------------------
6072: p_init_msg_list,
6073: l_return_status,
6074: x_msg_count,
6075: x_msg_data,
6076: l_okl_ins_policies_tl_rec
6077: );
6078: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
6079: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
6080: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN