139: -- PROCEDURE add_language
140: ---------------------------------------------------------------------------
141: PROCEDURE add_language IS
142: BEGIN
143: DELETE FROM OKL_INS_EXCLUSIONS_TL T
144: WHERE NOT EXISTS (
145: SELECT NULL
146: FROM OKL_INS_EXCLUSIONS_B B
147: WHERE B.ID = T.ID
146: FROM OKL_INS_EXCLUSIONS_B B
147: WHERE B.ID = T.ID
148: );
149:
150: UPDATE OKL_INS_EXCLUSIONS_TL T SET (
151: COMMENTS) = (SELECT
152: B.COMMENTS
153: FROM OKL_INS_EXCLUSIONS_TL B
154: WHERE B.ID = T.ID
149:
150: UPDATE OKL_INS_EXCLUSIONS_TL T SET (
151: COMMENTS) = (SELECT
152: B.COMMENTS
153: FROM OKL_INS_EXCLUSIONS_TL B
154: WHERE B.ID = T.ID
155: AND B.LANGUAGE = T.SOURCE_LANG)
156: WHERE (
157: T.ID,
158: T.LANGUAGE)
159: IN (SELECT
160: SUBT.ID,
161: SUBT.LANGUAGE
162: FROM OKL_INS_EXCLUSIONS_TL SUBB, OKL_INS_EXCLUSIONS_TL SUBT
163: WHERE SUBB.ID = SUBT.ID
164: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
165: AND ( SUBB.COMMENTS <> SUBT.COMMENTS
166: OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
166: OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
167: OR (SUBB.COMMENTS IS NOT NULL AND SUBT.COMMENTS IS NULL)
168: ));
169:
170: INSERT INTO OKL_INS_EXCLUSIONS_TL (
171: ID,
172: LANGUAGE,
173: SOURCE_LANG,
174: SFWT_FLAG,
188: B.CREATION_DATE,
189: B.LAST_UPDATED_BY,
190: B.LAST_UPDATE_DATE,
191: B.LAST_UPDATE_LOGIN
192: FROM OKL_INS_EXCLUSIONS_TL B, FND_LANGUAGES L
193: WHERE L.INSTALLED_FLAG IN ('I', 'B')
194: AND B.LANGUAGE = USERENV('LANG')
195: AND NOT EXISTS(
196: SELECT NULL
193: WHERE L.INSTALLED_FLAG IN ('I', 'B')
194: AND B.LANGUAGE = USERENV('LANG')
195: AND NOT EXISTS(
196: SELECT NULL
197: FROM OKL_INS_EXCLUSIONS_TL T
198: WHERE T.ID = B.ID
199: AND T.LANGUAGE = L.LANGUAGE_CODE
200: );
201:
289: BEGIN
290: RETURN(get_rec(p_ien_rec, l_row_notfound));
291: END get_rec;
292: ---------------------------------------------------------------------------
293: -- FUNCTION get_rec for: OKL_INS_EXCLUSIONS_TL
294: ---------------------------------------------------------------------------
295: FUNCTION get_rec (
296: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
297: x_no_data_found OUT NOCOPY BOOLEAN
292: ---------------------------------------------------------------------------
293: -- FUNCTION get_rec for: OKL_INS_EXCLUSIONS_TL
294: ---------------------------------------------------------------------------
295: FUNCTION get_rec (
296: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
297: x_no_data_found OUT NOCOPY BOOLEAN
298: ) RETURN okl_ins_exclusions_tl_rec_type IS
299: CURSOR okl_ins_exclusions_tl_pk_csr (p_id IN NUMBER,
300: p_language IN VARCHAR2) IS
294: ---------------------------------------------------------------------------
295: FUNCTION get_rec (
296: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
297: x_no_data_found OUT NOCOPY BOOLEAN
298: ) RETURN okl_ins_exclusions_tl_rec_type IS
299: CURSOR okl_ins_exclusions_tl_pk_csr (p_id IN NUMBER,
300: p_language IN VARCHAR2) IS
301: SELECT
302: ID,
295: FUNCTION get_rec (
296: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
297: x_no_data_found OUT NOCOPY BOOLEAN
298: ) RETURN okl_ins_exclusions_tl_rec_type IS
299: CURSOR okl_ins_exclusions_tl_pk_csr (p_id IN NUMBER,
300: p_language IN VARCHAR2) IS
301: SELECT
302: ID,
303: LANGUAGE,
308: CREATION_DATE,
309: LAST_UPDATED_BY,
310: LAST_UPDATE_DATE,
311: LAST_UPDATE_LOGIN
312: FROM Okl_Ins_Exclusions_Tl
313: WHERE okl_ins_exclusions_tl.id = p_id
314: AND okl_ins_exclusions_tl.language = p_language;
315: l_okl_ins_exclusions_tl_pk okl_ins_exclusions_tl_pk_csr%ROWTYPE;
316: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
309: LAST_UPDATED_BY,
310: LAST_UPDATE_DATE,
311: LAST_UPDATE_LOGIN
312: FROM Okl_Ins_Exclusions_Tl
313: WHERE okl_ins_exclusions_tl.id = p_id
314: AND okl_ins_exclusions_tl.language = p_language;
315: l_okl_ins_exclusions_tl_pk okl_ins_exclusions_tl_pk_csr%ROWTYPE;
316: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
317: BEGIN
310: LAST_UPDATE_DATE,
311: LAST_UPDATE_LOGIN
312: FROM Okl_Ins_Exclusions_Tl
313: WHERE okl_ins_exclusions_tl.id = p_id
314: AND okl_ins_exclusions_tl.language = p_language;
315: l_okl_ins_exclusions_tl_pk okl_ins_exclusions_tl_pk_csr%ROWTYPE;
316: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
317: BEGIN
318: x_no_data_found := TRUE;
311: LAST_UPDATE_LOGIN
312: FROM Okl_Ins_Exclusions_Tl
313: WHERE okl_ins_exclusions_tl.id = p_id
314: AND okl_ins_exclusions_tl.language = p_language;
315: l_okl_ins_exclusions_tl_pk okl_ins_exclusions_tl_pk_csr%ROWTYPE;
316: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
317: BEGIN
318: x_no_data_found := TRUE;
319: -- Get current database values
312: FROM Okl_Ins_Exclusions_Tl
313: WHERE okl_ins_exclusions_tl.id = p_id
314: AND okl_ins_exclusions_tl.language = p_language;
315: l_okl_ins_exclusions_tl_pk okl_ins_exclusions_tl_pk_csr%ROWTYPE;
316: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
317: BEGIN
318: x_no_data_found := TRUE;
319: -- Get current database values
320: OPEN okl_ins_exclusions_tl_pk_csr (p_okl_ins_exclusions_tl_rec.id,
316: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
317: BEGIN
318: x_no_data_found := TRUE;
319: -- Get current database values
320: OPEN okl_ins_exclusions_tl_pk_csr (p_okl_ins_exclusions_tl_rec.id,
321: p_okl_ins_exclusions_tl_rec.language);
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
317: BEGIN
318: x_no_data_found := TRUE;
319: -- Get current database values
320: OPEN okl_ins_exclusions_tl_pk_csr (p_okl_ins_exclusions_tl_rec.id,
321: p_okl_ins_exclusions_tl_rec.language);
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
318: x_no_data_found := TRUE;
319: -- Get current database values
320: OPEN okl_ins_exclusions_tl_pk_csr (p_okl_ins_exclusions_tl_rec.id,
321: p_okl_ins_exclusions_tl_rec.language);
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
319: -- Get current database values
320: OPEN okl_ins_exclusions_tl_pk_csr (p_okl_ins_exclusions_tl_rec.id,
321: p_okl_ins_exclusions_tl_rec.language);
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
320: OPEN okl_ins_exclusions_tl_pk_csr (p_okl_ins_exclusions_tl_rec.id,
321: p_okl_ins_exclusions_tl_rec.language);
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
321: p_okl_ins_exclusions_tl_rec.language);
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
322: FETCH okl_ins_exclusions_tl_pk_csr INTO
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
323: l_okl_ins_exclusions_tl_rec.ID,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
324: l_okl_ins_exclusions_tl_rec.LANGUAGE,
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
325: l_okl_ins_exclusions_tl_rec.SOURCE_LANG,
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
326: l_okl_ins_exclusions_tl_rec.SFWT_FLAG,
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
334: CLOSE okl_ins_exclusions_tl_pk_csr;
327: l_okl_ins_exclusions_tl_rec.COMMENTS,
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
334: CLOSE okl_ins_exclusions_tl_pk_csr;
335: RETURN(l_okl_ins_exclusions_tl_rec);
328: l_okl_ins_exclusions_tl_rec.CREATED_BY,
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
334: CLOSE okl_ins_exclusions_tl_pk_csr;
335: RETURN(l_okl_ins_exclusions_tl_rec);
336: END get_rec;
329: l_okl_ins_exclusions_tl_rec.CREATION_DATE,
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
334: CLOSE okl_ins_exclusions_tl_pk_csr;
335: RETURN(l_okl_ins_exclusions_tl_rec);
336: END get_rec;
337:
330: l_okl_ins_exclusions_tl_rec.LAST_UPDATED_BY,
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
334: CLOSE okl_ins_exclusions_tl_pk_csr;
335: RETURN(l_okl_ins_exclusions_tl_rec);
336: END get_rec;
337:
338: FUNCTION get_rec (
331: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_DATE,
332: l_okl_ins_exclusions_tl_rec.LAST_UPDATE_LOGIN;
333: x_no_data_found := okl_ins_exclusions_tl_pk_csr%NOTFOUND;
334: CLOSE okl_ins_exclusions_tl_pk_csr;
335: RETURN(l_okl_ins_exclusions_tl_rec);
336: END get_rec;
337:
338: FUNCTION get_rec (
339: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type
335: RETURN(l_okl_ins_exclusions_tl_rec);
336: END get_rec;
337:
338: FUNCTION get_rec (
339: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type
340: ) RETURN okl_ins_exclusions_tl_rec_type IS
341: l_row_notfound BOOLEAN := TRUE;
342: BEGIN
343: RETURN(get_rec(p_okl_ins_exclusions_tl_rec, l_row_notfound));
336: END get_rec;
337:
338: FUNCTION get_rec (
339: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type
340: ) RETURN okl_ins_exclusions_tl_rec_type IS
341: l_row_notfound BOOLEAN := TRUE;
342: BEGIN
343: RETURN(get_rec(p_okl_ins_exclusions_tl_rec, l_row_notfound));
344: END get_rec;
339: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type
340: ) RETURN okl_ins_exclusions_tl_rec_type IS
341: l_row_notfound BOOLEAN := TRUE;
342: BEGIN
343: RETURN(get_rec(p_okl_ins_exclusions_tl_rec, l_row_notfound));
344: END get_rec;
345: ---------------------------------------------------------------------------
346: -- FUNCTION get_rec for: OKL_INS_EXCLUSIONS_V
347: ---------------------------------------------------------------------------
881: p_to.last_update_login := p_from.last_update_login;
882: END migrate;
883: PROCEDURE migrate (
884: p_from IN ienv_rec_type,
885: p_to OUT NOCOPY okl_ins_exclusions_tl_rec_type
886: ) IS
887: BEGIN
888: p_to.id := p_from.id;
889: p_to.sfwt_flag := p_from.sfwt_flag;
894: p_to.last_update_date := p_from.last_update_date;
895: p_to.last_update_login := p_from.last_update_login;
896: END migrate;
897: PROCEDURE migrate (
898: p_from IN okl_ins_exclusions_tl_rec_type,
899: p_to OUT NOCOPY ienv_rec_type
900: ) IS
901: BEGIN
902: p_to.id := p_from.id;
927: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
928: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
929: l_ienv_rec ienv_rec_type := p_ienv_rec;
930: l_ien_rec ien_rec_type;
931: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
932: BEGIN
933: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
934: G_PKG_NAME,
935: p_init_msg_list,
1200: '_PVT'
1201: );
1202: END insert_row;
1203: ------------------------------------------
1204: -- insert_row for:OKL_INS_EXCLUSIONS_TL --
1205: ------------------------------------------
1206: PROCEDURE insert_row(
1207: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1208: x_return_status OUT NOCOPY VARCHAR2,
1207: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1208: x_return_status OUT NOCOPY VARCHAR2,
1209: x_msg_count OUT NOCOPY NUMBER,
1210: x_msg_data OUT NOCOPY VARCHAR2,
1211: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
1212: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type) IS
1213:
1214: l_api_version CONSTANT NUMBER := 1;
1215: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1208: x_return_status OUT NOCOPY VARCHAR2,
1209: x_msg_count OUT NOCOPY NUMBER,
1210: x_msg_data OUT NOCOPY VARCHAR2,
1211: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
1212: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type) IS
1213:
1214: l_api_version CONSTANT NUMBER := 1;
1215: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1216: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1213:
1214: l_api_version CONSTANT NUMBER := 1;
1215: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1216: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1217: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type := p_okl_ins_exclusions_tl_rec;
1218: ldefoklinsexclusionstlrec okl_ins_exclusions_tl_rec_type;
1219: CURSOR get_languages IS
1220: SELECT *
1221: FROM FND_LANGUAGES
1214: l_api_version CONSTANT NUMBER := 1;
1215: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1216: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1217: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type := p_okl_ins_exclusions_tl_rec;
1218: ldefoklinsexclusionstlrec okl_ins_exclusions_tl_rec_type;
1219: CURSOR get_languages IS
1220: SELECT *
1221: FROM FND_LANGUAGES
1222: WHERE INSTALLED_FLAG IN ('I', 'B');
1220: SELECT *
1221: FROM FND_LANGUAGES
1222: WHERE INSTALLED_FLAG IN ('I', 'B');
1223: ----------------------------------------------
1224: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
1225: ----------------------------------------------
1226: FUNCTION Set_Attributes (
1227: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
1228: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
1223: ----------------------------------------------
1224: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
1225: ----------------------------------------------
1226: FUNCTION Set_Attributes (
1227: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
1228: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
1229: ) RETURN VARCHAR2 IS
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: BEGIN
1224: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
1225: ----------------------------------------------
1226: FUNCTION Set_Attributes (
1227: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
1228: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
1229: ) RETURN VARCHAR2 IS
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: BEGIN
1232: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
1228: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
1229: ) RETURN VARCHAR2 IS
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: BEGIN
1232: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
1233: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
1234: x_okl_ins_exclusions_tl_rec.SOURCE_LANG := USERENV('LANG');
1235: RETURN(l_return_status);
1236: END Set_Attributes;
1229: ) RETURN VARCHAR2 IS
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: BEGIN
1232: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
1233: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
1234: x_okl_ins_exclusions_tl_rec.SOURCE_LANG := USERENV('LANG');
1235: RETURN(l_return_status);
1236: END Set_Attributes;
1237: BEGIN
1230: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1231: BEGIN
1232: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
1233: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
1234: x_okl_ins_exclusions_tl_rec.SOURCE_LANG := USERENV('LANG');
1235: RETURN(l_return_status);
1236: END Set_Attributes;
1237: BEGIN
1238: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1245: RAISE OKC_API.G_EXCEPTION_ERROR;
1246: END IF;
1247: --- Setting item attributes
1248: l_return_status := Set_Attributes(
1249: p_okl_ins_exclusions_tl_rec, -- IN
1250: l_okl_ins_exclusions_tl_rec); -- OUT
1251: --- If any errors happen abort API
1252: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1246: END IF;
1247: --- Setting item attributes
1248: l_return_status := Set_Attributes(
1249: p_okl_ins_exclusions_tl_rec, -- IN
1250: l_okl_ins_exclusions_tl_rec); -- OUT
1251: --- If any errors happen abort API
1252: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1254: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1255: RAISE OKC_API.G_EXCEPTION_ERROR;
1256: END IF;
1257: FOR l_lang_rec IN get_languages LOOP
1258: l_okl_ins_exclusions_tl_rec.language := l_lang_rec.language_code;
1259: INSERT INTO OKL_INS_EXCLUSIONS_TL(
1260: id,
1261: language,
1262: source_lang,
1255: RAISE OKC_API.G_EXCEPTION_ERROR;
1256: END IF;
1257: FOR l_lang_rec IN get_languages LOOP
1258: l_okl_ins_exclusions_tl_rec.language := l_lang_rec.language_code;
1259: INSERT INTO OKL_INS_EXCLUSIONS_TL(
1260: id,
1261: language,
1262: source_lang,
1263: sfwt_flag,
1267: last_updated_by,
1268: last_update_date,
1269: last_update_login)
1270: VALUES (
1271: l_okl_ins_exclusions_tl_rec.id,
1272: l_okl_ins_exclusions_tl_rec.language,
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1268: last_update_date,
1269: last_update_login)
1270: VALUES (
1271: l_okl_ins_exclusions_tl_rec.id,
1272: l_okl_ins_exclusions_tl_rec.language,
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1269: last_update_login)
1270: VALUES (
1271: l_okl_ins_exclusions_tl_rec.id,
1272: l_okl_ins_exclusions_tl_rec.language,
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1270: VALUES (
1271: l_okl_ins_exclusions_tl_rec.id,
1272: l_okl_ins_exclusions_tl_rec.language,
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1271: l_okl_ins_exclusions_tl_rec.id,
1272: l_okl_ins_exclusions_tl_rec.language,
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1272: l_okl_ins_exclusions_tl_rec.language,
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1280: l_okl_ins_exclusions_tl_rec.last_update_login);
1273: l_okl_ins_exclusions_tl_rec.source_lang,
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1280: l_okl_ins_exclusions_tl_rec.last_update_login);
1281: END LOOP;
1274: l_okl_ins_exclusions_tl_rec.sfwt_flag,
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1280: l_okl_ins_exclusions_tl_rec.last_update_login);
1281: END LOOP;
1282: -- Set OUT values
1275: l_okl_ins_exclusions_tl_rec.comments,
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1280: l_okl_ins_exclusions_tl_rec.last_update_login);
1281: END LOOP;
1282: -- Set OUT values
1283: x_okl_ins_exclusions_tl_rec := l_okl_ins_exclusions_tl_rec;
1276: l_okl_ins_exclusions_tl_rec.created_by,
1277: l_okl_ins_exclusions_tl_rec.creation_date,
1278: l_okl_ins_exclusions_tl_rec.last_updated_by,
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1280: l_okl_ins_exclusions_tl_rec.last_update_login);
1281: END LOOP;
1282: -- Set OUT values
1283: x_okl_ins_exclusions_tl_rec := l_okl_ins_exclusions_tl_rec;
1284: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1279: l_okl_ins_exclusions_tl_rec.last_update_date,
1280: l_okl_ins_exclusions_tl_rec.last_update_login);
1281: END LOOP;
1282: -- Set OUT values
1283: x_okl_ins_exclusions_tl_rec := l_okl_ins_exclusions_tl_rec;
1284: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1285: EXCEPTION
1286: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1287: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1332: l_ienv_rec ienv_rec_type;
1333: l_def_ienv_rec ienv_rec_type;
1334: l_ien_rec ien_rec_type;
1335: lx_ien_rec ien_rec_type;
1336: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
1337: lx_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
1338: -------------------------------
1339: -- FUNCTION fill_who_columns --
1340: -------------------------------
1333: l_def_ienv_rec ienv_rec_type;
1334: l_ien_rec ien_rec_type;
1335: lx_ien_rec ien_rec_type;
1336: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
1337: lx_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
1338: -------------------------------
1339: -- FUNCTION fill_who_columns --
1340: -------------------------------
1341: FUNCTION fill_who_columns (
1408: --------------------------------------
1409: -- Move VIEW record to "Child" records
1410: --------------------------------------
1411: migrate(l_def_ienv_rec, l_ien_rec);
1412: migrate(l_def_ienv_rec, l_okl_ins_exclusions_tl_rec);
1413: --------------------------------------------
1414: -- Call the INSERT_ROW for each child record
1415: --------------------------------------------
1416: insert_row(
1431: p_init_msg_list,
1432: x_return_status,
1433: x_msg_count,
1434: x_msg_data,
1435: l_okl_ins_exclusions_tl_rec,
1436: lx_okl_ins_exclusions_tl_rec
1437: );
1438: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1439: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1432: x_return_status,
1433: x_msg_count,
1434: x_msg_data,
1435: l_okl_ins_exclusions_tl_rec,
1436: lx_okl_ins_exclusions_tl_rec
1437: );
1438: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1439: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1440: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1439: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1440: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1441: RAISE OKC_API.G_EXCEPTION_ERROR;
1442: END IF;
1443: migrate(lx_okl_ins_exclusions_tl_rec, l_def_ienv_rec);
1444: -- Set OUT values
1445: x_ienv_rec := l_def_ienv_rec;
1446: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1447: EXCEPTION
1652: '_PVT'
1653: );
1654: END lock_row;
1655: ----------------------------------------
1656: -- lock_row for:OKL_INS_EXCLUSIONS_TL --
1657: ----------------------------------------
1658: PROCEDURE lock_row(
1659: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1660: x_return_status OUT NOCOPY VARCHAR2,
1659: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1660: x_return_status OUT NOCOPY VARCHAR2,
1661: x_msg_count OUT NOCOPY NUMBER,
1662: x_msg_data OUT NOCOPY VARCHAR2,
1663: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
1664:
1665: E_Resource_Busy EXCEPTION;
1666: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1667: CURSOR lock_csr (p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
1663: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
1664:
1665: E_Resource_Busy EXCEPTION;
1666: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1667: CURSOR lock_csr (p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
1668: SELECT *
1669: FROM OKL_INS_EXCLUSIONS_TL
1670: WHERE ID = p_okl_ins_exclusions_tl_rec.id
1671: FOR UPDATE NOWAIT;
1665: E_Resource_Busy EXCEPTION;
1666: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1667: CURSOR lock_csr (p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
1668: SELECT *
1669: FROM OKL_INS_EXCLUSIONS_TL
1670: WHERE ID = p_okl_ins_exclusions_tl_rec.id
1671: FOR UPDATE NOWAIT;
1672:
1673: l_api_version CONSTANT NUMBER := 1;
1666: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1667: CURSOR lock_csr (p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
1668: SELECT *
1669: FROM OKL_INS_EXCLUSIONS_TL
1670: WHERE ID = p_okl_ins_exclusions_tl_rec.id
1671: FOR UPDATE NOWAIT;
1672:
1673: l_api_version CONSTANT NUMBER := 1;
1674: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
1686: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1687: RAISE OKC_API.G_EXCEPTION_ERROR;
1688: END IF;
1689: BEGIN
1690: OPEN lock_csr(p_okl_ins_exclusions_tl_rec);
1691: FETCH lock_csr INTO l_lock_var;
1692: l_row_notfound := lock_csr%NOTFOUND;
1693: CLOSE lock_csr;
1694: EXCEPTION
1751: l_api_version CONSTANT NUMBER := 1;
1752: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1753: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1754: l_ien_rec ien_rec_type;
1755: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
1756: BEGIN
1757: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1758: G_PKG_NAME,
1759: p_init_msg_list,
1769: --------------------------------------
1770: -- Move VIEW record to "Child" records
1771: --------------------------------------
1772: migrate(p_ienv_rec, l_ien_rec);
1773: migrate(p_ienv_rec, l_okl_ins_exclusions_tl_rec);
1774: --------------------------------------------
1775: -- Call the LOCK_ROW for each child record
1776: --------------------------------------------
1777: lock_row(
1790: p_init_msg_list,
1791: x_return_status,
1792: x_msg_count,
1793: x_msg_data,
1794: l_okl_ins_exclusions_tl_rec
1795: );
1796: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1797: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1798: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2153: '_PVT'
2154: );
2155: END update_row;
2156: ------------------------------------------
2157: -- update_row for:OKL_INS_EXCLUSIONS_TL --
2158: ------------------------------------------
2159: PROCEDURE update_row(
2160: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2161: x_return_status OUT NOCOPY VARCHAR2,
2160: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2161: x_return_status OUT NOCOPY VARCHAR2,
2162: x_msg_count OUT NOCOPY NUMBER,
2163: x_msg_data OUT NOCOPY VARCHAR2,
2164: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2165: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type) IS
2166:
2167: l_api_version CONSTANT NUMBER := 1;
2168: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2161: x_return_status OUT NOCOPY VARCHAR2,
2162: x_msg_count OUT NOCOPY NUMBER,
2163: x_msg_data OUT NOCOPY VARCHAR2,
2164: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2165: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type) IS
2166:
2167: l_api_version CONSTANT NUMBER := 1;
2168: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2169: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2166:
2167: l_api_version CONSTANT NUMBER := 1;
2168: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2169: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2170: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type := p_okl_ins_exclusions_tl_rec;
2171: ldefoklinsexclusionstlrec okl_ins_exclusions_tl_rec_type;
2172: l_row_notfound BOOLEAN := TRUE;
2173: ----------------------------------
2174: -- FUNCTION populate_new_record --
2167: l_api_version CONSTANT NUMBER := 1;
2168: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2169: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2170: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type := p_okl_ins_exclusions_tl_rec;
2171: ldefoklinsexclusionstlrec okl_ins_exclusions_tl_rec_type;
2172: l_row_notfound BOOLEAN := TRUE;
2173: ----------------------------------
2174: -- FUNCTION populate_new_record --
2175: ----------------------------------
2173: ----------------------------------
2174: -- FUNCTION populate_new_record --
2175: ----------------------------------
2176: FUNCTION populate_new_record (
2177: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2178: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2179: ) RETURN VARCHAR2 IS
2180: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2181: l_row_notfound BOOLEAN := TRUE;
2174: -- FUNCTION populate_new_record --
2175: ----------------------------------
2176: FUNCTION populate_new_record (
2177: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2178: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2179: ) RETURN VARCHAR2 IS
2180: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2181: l_row_notfound BOOLEAN := TRUE;
2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2176: FUNCTION populate_new_record (
2177: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2178: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2179: ) RETURN VARCHAR2 IS
2180: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2181: l_row_notfound BOOLEAN := TRUE;
2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2183: BEGIN
2184: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2180: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2181: l_row_notfound BOOLEAN := TRUE;
2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2183: BEGIN
2184: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2185: -- Get current database values
2186: l_okl_ins_exclusions_tl_rec := get_rec(p_okl_ins_exclusions_tl_rec, l_row_notfound);
2187: IF (l_row_notfound) THEN
2188: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2183: BEGIN
2184: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2185: -- Get current database values
2186: l_okl_ins_exclusions_tl_rec := get_rec(p_okl_ins_exclusions_tl_rec, l_row_notfound);
2187: IF (l_row_notfound) THEN
2188: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2189: END IF;
2190: IF (x_okl_ins_exclusions_tl_rec.id = OKC_API.G_MISS_NUM)
2186: l_okl_ins_exclusions_tl_rec := get_rec(p_okl_ins_exclusions_tl_rec, l_row_notfound);
2187: IF (l_row_notfound) THEN
2188: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2189: END IF;
2190: IF (x_okl_ins_exclusions_tl_rec.id = OKC_API.G_MISS_NUM)
2191: THEN
2192: x_okl_ins_exclusions_tl_rec.id := l_okl_ins_exclusions_tl_rec.id;
2193: END IF;
2194: IF (x_okl_ins_exclusions_tl_rec.language = OKC_API.G_MISS_CHAR)
2188: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2189: END IF;
2190: IF (x_okl_ins_exclusions_tl_rec.id = OKC_API.G_MISS_NUM)
2191: THEN
2192: x_okl_ins_exclusions_tl_rec.id := l_okl_ins_exclusions_tl_rec.id;
2193: END IF;
2194: IF (x_okl_ins_exclusions_tl_rec.language = OKC_API.G_MISS_CHAR)
2195: THEN
2196: x_okl_ins_exclusions_tl_rec.language := l_okl_ins_exclusions_tl_rec.language;
2190: IF (x_okl_ins_exclusions_tl_rec.id = OKC_API.G_MISS_NUM)
2191: THEN
2192: x_okl_ins_exclusions_tl_rec.id := l_okl_ins_exclusions_tl_rec.id;
2193: END IF;
2194: IF (x_okl_ins_exclusions_tl_rec.language = OKC_API.G_MISS_CHAR)
2195: THEN
2196: x_okl_ins_exclusions_tl_rec.language := l_okl_ins_exclusions_tl_rec.language;
2197: END IF;
2198: IF (x_okl_ins_exclusions_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2192: x_okl_ins_exclusions_tl_rec.id := l_okl_ins_exclusions_tl_rec.id;
2193: END IF;
2194: IF (x_okl_ins_exclusions_tl_rec.language = OKC_API.G_MISS_CHAR)
2195: THEN
2196: x_okl_ins_exclusions_tl_rec.language := l_okl_ins_exclusions_tl_rec.language;
2197: END IF;
2198: IF (x_okl_ins_exclusions_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2199: THEN
2200: x_okl_ins_exclusions_tl_rec.source_lang := l_okl_ins_exclusions_tl_rec.source_lang;
2194: IF (x_okl_ins_exclusions_tl_rec.language = OKC_API.G_MISS_CHAR)
2195: THEN
2196: x_okl_ins_exclusions_tl_rec.language := l_okl_ins_exclusions_tl_rec.language;
2197: END IF;
2198: IF (x_okl_ins_exclusions_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2199: THEN
2200: x_okl_ins_exclusions_tl_rec.source_lang := l_okl_ins_exclusions_tl_rec.source_lang;
2201: END IF;
2202: IF (x_okl_ins_exclusions_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2196: x_okl_ins_exclusions_tl_rec.language := l_okl_ins_exclusions_tl_rec.language;
2197: END IF;
2198: IF (x_okl_ins_exclusions_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2199: THEN
2200: x_okl_ins_exclusions_tl_rec.source_lang := l_okl_ins_exclusions_tl_rec.source_lang;
2201: END IF;
2202: IF (x_okl_ins_exclusions_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2203: THEN
2204: x_okl_ins_exclusions_tl_rec.sfwt_flag := l_okl_ins_exclusions_tl_rec.sfwt_flag;
2198: IF (x_okl_ins_exclusions_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2199: THEN
2200: x_okl_ins_exclusions_tl_rec.source_lang := l_okl_ins_exclusions_tl_rec.source_lang;
2201: END IF;
2202: IF (x_okl_ins_exclusions_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2203: THEN
2204: x_okl_ins_exclusions_tl_rec.sfwt_flag := l_okl_ins_exclusions_tl_rec.sfwt_flag;
2205: END IF;
2206: IF (x_okl_ins_exclusions_tl_rec.comments = OKC_API.G_MISS_CHAR)
2200: x_okl_ins_exclusions_tl_rec.source_lang := l_okl_ins_exclusions_tl_rec.source_lang;
2201: END IF;
2202: IF (x_okl_ins_exclusions_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2203: THEN
2204: x_okl_ins_exclusions_tl_rec.sfwt_flag := l_okl_ins_exclusions_tl_rec.sfwt_flag;
2205: END IF;
2206: IF (x_okl_ins_exclusions_tl_rec.comments = OKC_API.G_MISS_CHAR)
2207: THEN
2208: x_okl_ins_exclusions_tl_rec.comments := l_okl_ins_exclusions_tl_rec.comments;
2202: IF (x_okl_ins_exclusions_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2203: THEN
2204: x_okl_ins_exclusions_tl_rec.sfwt_flag := l_okl_ins_exclusions_tl_rec.sfwt_flag;
2205: END IF;
2206: IF (x_okl_ins_exclusions_tl_rec.comments = OKC_API.G_MISS_CHAR)
2207: THEN
2208: x_okl_ins_exclusions_tl_rec.comments := l_okl_ins_exclusions_tl_rec.comments;
2209: END IF;
2210: IF (x_okl_ins_exclusions_tl_rec.created_by = OKC_API.G_MISS_NUM)
2204: x_okl_ins_exclusions_tl_rec.sfwt_flag := l_okl_ins_exclusions_tl_rec.sfwt_flag;
2205: END IF;
2206: IF (x_okl_ins_exclusions_tl_rec.comments = OKC_API.G_MISS_CHAR)
2207: THEN
2208: x_okl_ins_exclusions_tl_rec.comments := l_okl_ins_exclusions_tl_rec.comments;
2209: END IF;
2210: IF (x_okl_ins_exclusions_tl_rec.created_by = OKC_API.G_MISS_NUM)
2211: THEN
2212: x_okl_ins_exclusions_tl_rec.created_by := l_okl_ins_exclusions_tl_rec.created_by;
2206: IF (x_okl_ins_exclusions_tl_rec.comments = OKC_API.G_MISS_CHAR)
2207: THEN
2208: x_okl_ins_exclusions_tl_rec.comments := l_okl_ins_exclusions_tl_rec.comments;
2209: END IF;
2210: IF (x_okl_ins_exclusions_tl_rec.created_by = OKC_API.G_MISS_NUM)
2211: THEN
2212: x_okl_ins_exclusions_tl_rec.created_by := l_okl_ins_exclusions_tl_rec.created_by;
2213: END IF;
2214: IF (x_okl_ins_exclusions_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2208: x_okl_ins_exclusions_tl_rec.comments := l_okl_ins_exclusions_tl_rec.comments;
2209: END IF;
2210: IF (x_okl_ins_exclusions_tl_rec.created_by = OKC_API.G_MISS_NUM)
2211: THEN
2212: x_okl_ins_exclusions_tl_rec.created_by := l_okl_ins_exclusions_tl_rec.created_by;
2213: END IF;
2214: IF (x_okl_ins_exclusions_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2215: THEN
2216: x_okl_ins_exclusions_tl_rec.creation_date := l_okl_ins_exclusions_tl_rec.creation_date;
2210: IF (x_okl_ins_exclusions_tl_rec.created_by = OKC_API.G_MISS_NUM)
2211: THEN
2212: x_okl_ins_exclusions_tl_rec.created_by := l_okl_ins_exclusions_tl_rec.created_by;
2213: END IF;
2214: IF (x_okl_ins_exclusions_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2215: THEN
2216: x_okl_ins_exclusions_tl_rec.creation_date := l_okl_ins_exclusions_tl_rec.creation_date;
2217: END IF;
2218: IF (x_okl_ins_exclusions_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2212: x_okl_ins_exclusions_tl_rec.created_by := l_okl_ins_exclusions_tl_rec.created_by;
2213: END IF;
2214: IF (x_okl_ins_exclusions_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2215: THEN
2216: x_okl_ins_exclusions_tl_rec.creation_date := l_okl_ins_exclusions_tl_rec.creation_date;
2217: END IF;
2218: IF (x_okl_ins_exclusions_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2219: THEN
2220: x_okl_ins_exclusions_tl_rec.last_updated_by := l_okl_ins_exclusions_tl_rec.last_updated_by;
2214: IF (x_okl_ins_exclusions_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2215: THEN
2216: x_okl_ins_exclusions_tl_rec.creation_date := l_okl_ins_exclusions_tl_rec.creation_date;
2217: END IF;
2218: IF (x_okl_ins_exclusions_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2219: THEN
2220: x_okl_ins_exclusions_tl_rec.last_updated_by := l_okl_ins_exclusions_tl_rec.last_updated_by;
2221: END IF;
2222: IF (x_okl_ins_exclusions_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2216: x_okl_ins_exclusions_tl_rec.creation_date := l_okl_ins_exclusions_tl_rec.creation_date;
2217: END IF;
2218: IF (x_okl_ins_exclusions_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2219: THEN
2220: x_okl_ins_exclusions_tl_rec.last_updated_by := l_okl_ins_exclusions_tl_rec.last_updated_by;
2221: END IF;
2222: IF (x_okl_ins_exclusions_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2223: THEN
2224: x_okl_ins_exclusions_tl_rec.last_update_date := l_okl_ins_exclusions_tl_rec.last_update_date;
2218: IF (x_okl_ins_exclusions_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2219: THEN
2220: x_okl_ins_exclusions_tl_rec.last_updated_by := l_okl_ins_exclusions_tl_rec.last_updated_by;
2221: END IF;
2222: IF (x_okl_ins_exclusions_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2223: THEN
2224: x_okl_ins_exclusions_tl_rec.last_update_date := l_okl_ins_exclusions_tl_rec.last_update_date;
2225: END IF;
2226: IF (x_okl_ins_exclusions_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2220: x_okl_ins_exclusions_tl_rec.last_updated_by := l_okl_ins_exclusions_tl_rec.last_updated_by;
2221: END IF;
2222: IF (x_okl_ins_exclusions_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2223: THEN
2224: x_okl_ins_exclusions_tl_rec.last_update_date := l_okl_ins_exclusions_tl_rec.last_update_date;
2225: END IF;
2226: IF (x_okl_ins_exclusions_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2227: THEN
2228: x_okl_ins_exclusions_tl_rec.last_update_login := l_okl_ins_exclusions_tl_rec.last_update_login;
2222: IF (x_okl_ins_exclusions_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2223: THEN
2224: x_okl_ins_exclusions_tl_rec.last_update_date := l_okl_ins_exclusions_tl_rec.last_update_date;
2225: END IF;
2226: IF (x_okl_ins_exclusions_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2227: THEN
2228: x_okl_ins_exclusions_tl_rec.last_update_login := l_okl_ins_exclusions_tl_rec.last_update_login;
2229: END IF;
2230: RETURN(l_return_status);
2224: x_okl_ins_exclusions_tl_rec.last_update_date := l_okl_ins_exclusions_tl_rec.last_update_date;
2225: END IF;
2226: IF (x_okl_ins_exclusions_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2227: THEN
2228: x_okl_ins_exclusions_tl_rec.last_update_login := l_okl_ins_exclusions_tl_rec.last_update_login;
2229: END IF;
2230: RETURN(l_return_status);
2231: END populate_new_record;
2232: ----------------------------------------------
2229: END IF;
2230: RETURN(l_return_status);
2231: END populate_new_record;
2232: ----------------------------------------------
2233: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2234: ----------------------------------------------
2235: FUNCTION Set_Attributes (
2236: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2237: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2232: ----------------------------------------------
2233: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2234: ----------------------------------------------
2235: FUNCTION Set_Attributes (
2236: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2237: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2238: ) RETURN VARCHAR2 IS
2239: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2240: BEGIN
2233: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2234: ----------------------------------------------
2235: FUNCTION Set_Attributes (
2236: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2237: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2238: ) RETURN VARCHAR2 IS
2239: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2240: BEGIN
2241: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2237: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2238: ) RETURN VARCHAR2 IS
2239: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2240: BEGIN
2241: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2242: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
2243: x_okl_ins_exclusions_tl_rec.SOURCE_LANG := USERENV('LANG');
2244: RETURN(l_return_status);
2245: END Set_Attributes;
2238: ) RETURN VARCHAR2 IS
2239: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2240: BEGIN
2241: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2242: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
2243: x_okl_ins_exclusions_tl_rec.SOURCE_LANG := USERENV('LANG');
2244: RETURN(l_return_status);
2245: END Set_Attributes;
2246: BEGIN
2239: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2240: BEGIN
2241: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2242: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
2243: x_okl_ins_exclusions_tl_rec.SOURCE_LANG := USERENV('LANG');
2244: RETURN(l_return_status);
2245: END Set_Attributes;
2246: BEGIN
2247: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2254: RAISE OKC_API.G_EXCEPTION_ERROR;
2255: END IF;
2256: --- Setting item attributes
2257: l_return_status := Set_Attributes(
2258: p_okl_ins_exclusions_tl_rec, -- IN
2259: l_okl_ins_exclusions_tl_rec); -- OUT
2260: --- If any errors happen abort API
2261: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2262: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2255: END IF;
2256: --- Setting item attributes
2257: l_return_status := Set_Attributes(
2258: p_okl_ins_exclusions_tl_rec, -- IN
2259: l_okl_ins_exclusions_tl_rec); -- OUT
2260: --- If any errors happen abort API
2261: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2262: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2263: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2262: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2263: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2264: RAISE OKC_API.G_EXCEPTION_ERROR;
2265: END IF;
2266: l_return_status := populate_new_record(l_okl_ins_exclusions_tl_rec, ldefoklinsexclusionstlrec);
2267: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2268: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2269: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2270: RAISE OKC_API.G_EXCEPTION_ERROR;
2268: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2269: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2270: RAISE OKC_API.G_EXCEPTION_ERROR;
2271: END IF;
2272: UPDATE OKL_INS_EXCLUSIONS_TL
2273: SET COMMENTS = ldefoklinsexclusionstlrec.comments,
2274: SOURCE_LANG = ldefoklinsexclusionstlrec.source_lang,--Added for bug 3637102
2275: CREATED_BY = ldefoklinsexclusionstlrec.created_by,
2276: CREATION_DATE = ldefoklinsexclusionstlrec.creation_date,
2279: LAST_UPDATE_LOGIN = ldefoklinsexclusionstlrec.last_update_login
2280: WHERE ID = ldefoklinsexclusionstlrec.id
2281: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);--Added LANGUAGE as fix for 3637102
2282:
2283: UPDATE OKL_INS_EXCLUSIONS_TL
2284: SET SFWT_FLAG = 'Y'
2285: WHERE ID = ldefoklinsexclusionstlrec.id
2286: AND SOURCE_LANG <> USERENV('LANG');
2287: x_okl_ins_exclusions_tl_rec := ldefoklinsexclusionstlrec;
2283: UPDATE OKL_INS_EXCLUSIONS_TL
2284: SET SFWT_FLAG = 'Y'
2285: WHERE ID = ldefoklinsexclusionstlrec.id
2286: AND SOURCE_LANG <> USERENV('LANG');
2287: x_okl_ins_exclusions_tl_rec := ldefoklinsexclusionstlrec;
2288: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2289: EXCEPTION
2290: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2291: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2334: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2335: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2336: l_ienv_rec ienv_rec_type := p_ienv_rec;
2337: l_def_ienv_rec ienv_rec_type;
2338: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2339: lx_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2340: l_ien_rec ien_rec_type;
2341: lx_ien_rec ien_rec_type;
2342: -------------------------------
2335: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2336: l_ienv_rec ienv_rec_type := p_ienv_rec;
2337: l_def_ienv_rec ienv_rec_type;
2338: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2339: lx_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2340: l_ien_rec ien_rec_type;
2341: lx_ien_rec ien_rec_type;
2342: -------------------------------
2343: -- FUNCTION fill_who_columns --
2552: END IF;
2553: --------------------------------------
2554: -- Move VIEW record to "Child" records
2555: --------------------------------------
2556: migrate(l_def_ienv_rec, l_okl_ins_exclusions_tl_rec);
2557: migrate(l_def_ienv_rec, l_ien_rec);
2558: --------------------------------------------
2559: -- Call the UPDATE_ROW for each child record
2560: --------------------------------------------
2562: p_init_msg_list,
2563: x_return_status,
2564: x_msg_count,
2565: x_msg_data,
2566: l_okl_ins_exclusions_tl_rec,
2567: lx_okl_ins_exclusions_tl_rec
2568: );
2569: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2563: x_return_status,
2564: x_msg_count,
2565: x_msg_data,
2566: l_okl_ins_exclusions_tl_rec,
2567: lx_okl_ins_exclusions_tl_rec
2568: );
2569: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2571: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2570: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2571: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2572: RAISE OKC_API.G_EXCEPTION_ERROR;
2573: END IF;
2574: migrate(lx_okl_ins_exclusions_tl_rec, l_def_ienv_rec);
2575: update_row(
2576: p_init_msg_list,
2577: x_return_status,
2578: x_msg_count,
2751: '_PVT'
2752: );
2753: END delete_row;
2754: ------------------------------------------
2755: -- delete_row for:OKL_INS_EXCLUSIONS_TL --
2756: ------------------------------------------
2757: PROCEDURE delete_row(
2758: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2759: x_return_status OUT NOCOPY VARCHAR2,
2758: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2759: x_return_status OUT NOCOPY VARCHAR2,
2760: x_msg_count OUT NOCOPY NUMBER,
2761: x_msg_data OUT NOCOPY VARCHAR2,
2762: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type) IS
2763:
2764: l_api_version CONSTANT NUMBER := 1;
2765: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
2766: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2763:
2764: l_api_version CONSTANT NUMBER := 1;
2765: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
2766: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2767: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type:= p_okl_ins_exclusions_tl_rec;
2768: l_row_notfound BOOLEAN := TRUE;
2769: ----------------------------------------------
2770: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2771: ----------------------------------------------
2766: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2767: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type:= p_okl_ins_exclusions_tl_rec;
2768: l_row_notfound BOOLEAN := TRUE;
2769: ----------------------------------------------
2770: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2771: ----------------------------------------------
2772: FUNCTION Set_Attributes (
2773: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2774: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2769: ----------------------------------------------
2770: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2771: ----------------------------------------------
2772: FUNCTION Set_Attributes (
2773: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2774: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2775: ) RETURN VARCHAR2 IS
2776: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2777: BEGIN
2770: -- Set_Attributes for:OKL_INS_EXCLUSIONS_TL --
2771: ----------------------------------------------
2772: FUNCTION Set_Attributes (
2773: p_okl_ins_exclusions_tl_rec IN okl_ins_exclusions_tl_rec_type,
2774: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2775: ) RETURN VARCHAR2 IS
2776: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2777: BEGIN
2778: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2774: x_okl_ins_exclusions_tl_rec OUT NOCOPY okl_ins_exclusions_tl_rec_type
2775: ) RETURN VARCHAR2 IS
2776: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2777: BEGIN
2778: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2779: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
2780: RETURN(l_return_status);
2781: END Set_Attributes;
2782: BEGIN
2775: ) RETURN VARCHAR2 IS
2776: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2777: BEGIN
2778: x_okl_ins_exclusions_tl_rec := p_okl_ins_exclusions_tl_rec;
2779: x_okl_ins_exclusions_tl_rec.LANGUAGE := USERENV('LANG');
2780: RETURN(l_return_status);
2781: END Set_Attributes;
2782: BEGIN
2783: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2790: RAISE OKC_API.G_EXCEPTION_ERROR;
2791: END IF;
2792: --- Setting item attributes
2793: l_return_status := Set_Attributes(
2794: p_okl_ins_exclusions_tl_rec, -- IN
2795: l_okl_ins_exclusions_tl_rec); -- OUT
2796: --- If any errors happen abort API
2797: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2798: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2791: END IF;
2792: --- Setting item attributes
2793: l_return_status := Set_Attributes(
2794: p_okl_ins_exclusions_tl_rec, -- IN
2795: l_okl_ins_exclusions_tl_rec); -- OUT
2796: --- If any errors happen abort API
2797: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2798: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2799: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2798: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2799: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2800: RAISE OKC_API.G_EXCEPTION_ERROR;
2801: END IF;
2802: DELETE FROM OKL_INS_EXCLUSIONS_TL
2803: WHERE ID = l_okl_ins_exclusions_tl_rec.id;
2804:
2805: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2806: EXCEPTION
2799: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2800: RAISE OKC_API.G_EXCEPTION_ERROR;
2801: END IF;
2802: DELETE FROM OKL_INS_EXCLUSIONS_TL
2803: WHERE ID = l_okl_ins_exclusions_tl_rec.id;
2804:
2805: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2806: EXCEPTION
2807: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2849: l_api_version CONSTANT NUMBER := 1;
2850: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2851: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2852: l_ienv_rec ienv_rec_type := p_ienv_rec;
2853: l_okl_ins_exclusions_tl_rec okl_ins_exclusions_tl_rec_type;
2854: l_ien_rec ien_rec_type;
2855: BEGIN
2856: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2857: G_PKG_NAME,
2867: END IF;
2868: --------------------------------------
2869: -- Move VIEW record to "Child" records
2870: --------------------------------------
2871: migrate(l_ienv_rec, l_okl_ins_exclusions_tl_rec);
2872: migrate(l_ienv_rec, l_ien_rec);
2873: --------------------------------------------
2874: -- Call the DELETE_ROW for each child record
2875: --------------------------------------------
2877: p_init_msg_list,
2878: x_return_status,
2879: x_msg_count,
2880: x_msg_data,
2881: l_okl_ins_exclusions_tl_rec
2882: );
2883: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2884: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2885: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN