243: -- PROCEDURE add_language
244: ---------------------------------------------------------------------------
245: PROCEDURE add_language IS
246: BEGIN
247: DELETE FROM OKL_CNSLD_AR_STRMS_TL T
248: WHERE NOT EXISTS (
249: SELECT NULL
250: FROM OKL_CNSLD_AR_STRMS_B B
251: WHERE B.ID = T.ID
257: T.LANGUAGE)
258: IN (SELECT
259: SUBT.ID,
260: SUBT.LANGUAGE
261: FROM OKL_CNSLD_AR_STRMS_TL SUBB, OKL_CNSLD_AR_STRMS_TL SUBT
262: WHERE SUBB.ID = SUBT.ID
263: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
264: */
265:
262: WHERE SUBB.ID = SUBT.ID
263: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
264: */
265:
266: INSERT INTO OKL_CNSLD_AR_STRMS_TL (
267: ID,
268: LANGUAGE,
269: SOURCE_LANG,
270: SFWT_FLAG,
282: B.CREATION_DATE,
283: B.LAST_UPDATED_BY,
284: B.LAST_UPDATE_DATE,
285: B.LAST_UPDATE_LOGIN
286: FROM OKL_CNSLD_AR_STRMS_TL B, FND_LANGUAGES L
287: WHERE L.INSTALLED_FLAG IN ('I', 'B')
288: AND B.LANGUAGE = USERENV('LANG')
289: AND NOT EXISTS(
290: SELECT NULL
287: WHERE L.INSTALLED_FLAG IN ('I', 'B')
288: AND B.LANGUAGE = USERENV('LANG')
289: AND NOT EXISTS(
290: SELECT NULL
291: FROM OKL_CNSLD_AR_STRMS_TL T
292: WHERE T.ID = B.ID
293: AND T.LANGUAGE = L.LANGUAGE_CODE
294: );
295:
413: BEGIN
414: RETURN(get_rec(p_lsm_rec, l_row_notfound));
415: END get_rec;
416: ---------------------------------------------------------------------------
417: -- FUNCTION get_rec for: OKL_CNSLD_AR_STRMS_TL
418: ---------------------------------------------------------------------------
419: FUNCTION get_rec (
420: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
421: x_no_data_found OUT NOCOPY BOOLEAN
416: ---------------------------------------------------------------------------
417: -- FUNCTION get_rec for: OKL_CNSLD_AR_STRMS_TL
418: ---------------------------------------------------------------------------
419: FUNCTION get_rec (
420: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
421: x_no_data_found OUT NOCOPY BOOLEAN
422: ) RETURN okl_cnsld_ar_strms_tl_rec_type IS
423: CURSOR okl_cnsld_ar_strms_tl_pk_csr (p_id IN NUMBER,
424: p_language IN VARCHAR2) IS
418: ---------------------------------------------------------------------------
419: FUNCTION get_rec (
420: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
421: x_no_data_found OUT NOCOPY BOOLEAN
422: ) RETURN okl_cnsld_ar_strms_tl_rec_type IS
423: CURSOR okl_cnsld_ar_strms_tl_pk_csr (p_id IN NUMBER,
424: p_language IN VARCHAR2) IS
425: SELECT
426: ID,
419: FUNCTION get_rec (
420: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
421: x_no_data_found OUT NOCOPY BOOLEAN
422: ) RETURN okl_cnsld_ar_strms_tl_rec_type IS
423: CURSOR okl_cnsld_ar_strms_tl_pk_csr (p_id IN NUMBER,
424: p_language IN VARCHAR2) IS
425: SELECT
426: ID,
427: LANGUAGE,
431: CREATION_DATE,
432: LAST_UPDATED_BY,
433: LAST_UPDATE_DATE,
434: LAST_UPDATE_LOGIN
435: FROM Okl_Cnsld_Ar_Strms_Tl
436: WHERE okl_cnsld_ar_strms_tl.id = p_id
437: AND okl_cnsld_ar_strms_tl.LANGUAGE = p_language;
438: l_okl_cnsld_ar_strms_tl_pk okl_cnsld_ar_strms_tl_pk_csr%ROWTYPE;
439: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
432: LAST_UPDATED_BY,
433: LAST_UPDATE_DATE,
434: LAST_UPDATE_LOGIN
435: FROM Okl_Cnsld_Ar_Strms_Tl
436: WHERE okl_cnsld_ar_strms_tl.id = p_id
437: AND okl_cnsld_ar_strms_tl.LANGUAGE = p_language;
438: l_okl_cnsld_ar_strms_tl_pk okl_cnsld_ar_strms_tl_pk_csr%ROWTYPE;
439: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
440: BEGIN
433: LAST_UPDATE_DATE,
434: LAST_UPDATE_LOGIN
435: FROM Okl_Cnsld_Ar_Strms_Tl
436: WHERE okl_cnsld_ar_strms_tl.id = p_id
437: AND okl_cnsld_ar_strms_tl.LANGUAGE = p_language;
438: l_okl_cnsld_ar_strms_tl_pk okl_cnsld_ar_strms_tl_pk_csr%ROWTYPE;
439: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
440: BEGIN
441: x_no_data_found := TRUE;
434: LAST_UPDATE_LOGIN
435: FROM Okl_Cnsld_Ar_Strms_Tl
436: WHERE okl_cnsld_ar_strms_tl.id = p_id
437: AND okl_cnsld_ar_strms_tl.LANGUAGE = p_language;
438: l_okl_cnsld_ar_strms_tl_pk okl_cnsld_ar_strms_tl_pk_csr%ROWTYPE;
439: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
440: BEGIN
441: x_no_data_found := TRUE;
442: -- Get current database values
435: FROM Okl_Cnsld_Ar_Strms_Tl
436: WHERE okl_cnsld_ar_strms_tl.id = p_id
437: AND okl_cnsld_ar_strms_tl.LANGUAGE = p_language;
438: l_okl_cnsld_ar_strms_tl_pk okl_cnsld_ar_strms_tl_pk_csr%ROWTYPE;
439: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
440: BEGIN
441: x_no_data_found := TRUE;
442: -- Get current database values
443: OPEN okl_cnsld_ar_strms_tl_pk_csr (p_okl_cnsld_ar_strms_tl_rec.id,
439: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
440: BEGIN
441: x_no_data_found := TRUE;
442: -- Get current database values
443: OPEN okl_cnsld_ar_strms_tl_pk_csr (p_okl_cnsld_ar_strms_tl_rec.id,
444: p_okl_cnsld_ar_strms_tl_rec.LANGUAGE);
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
440: BEGIN
441: x_no_data_found := TRUE;
442: -- Get current database values
443: OPEN okl_cnsld_ar_strms_tl_pk_csr (p_okl_cnsld_ar_strms_tl_rec.id,
444: p_okl_cnsld_ar_strms_tl_rec.LANGUAGE);
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
441: x_no_data_found := TRUE;
442: -- Get current database values
443: OPEN okl_cnsld_ar_strms_tl_pk_csr (p_okl_cnsld_ar_strms_tl_rec.id,
444: p_okl_cnsld_ar_strms_tl_rec.LANGUAGE);
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
442: -- Get current database values
443: OPEN okl_cnsld_ar_strms_tl_pk_csr (p_okl_cnsld_ar_strms_tl_rec.id,
444: p_okl_cnsld_ar_strms_tl_rec.LANGUAGE);
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
443: OPEN okl_cnsld_ar_strms_tl_pk_csr (p_okl_cnsld_ar_strms_tl_rec.id,
444: p_okl_cnsld_ar_strms_tl_rec.LANGUAGE);
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
444: p_okl_cnsld_ar_strms_tl_rec.LANGUAGE);
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
445: FETCH okl_cnsld_ar_strms_tl_pk_csr INTO
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
446: l_okl_cnsld_ar_strms_tl_rec.ID,
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
447: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
448: l_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG,
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
456: CLOSE okl_cnsld_ar_strms_tl_pk_csr;
449: l_okl_cnsld_ar_strms_tl_rec.SFWT_FLAG,
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
456: CLOSE okl_cnsld_ar_strms_tl_pk_csr;
457: RETURN(l_okl_cnsld_ar_strms_tl_rec);
450: l_okl_cnsld_ar_strms_tl_rec.CREATED_BY,
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
456: CLOSE okl_cnsld_ar_strms_tl_pk_csr;
457: RETURN(l_okl_cnsld_ar_strms_tl_rec);
458: END get_rec;
451: l_okl_cnsld_ar_strms_tl_rec.CREATION_DATE,
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
456: CLOSE okl_cnsld_ar_strms_tl_pk_csr;
457: RETURN(l_okl_cnsld_ar_strms_tl_rec);
458: END get_rec;
459:
452: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATED_BY,
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
456: CLOSE okl_cnsld_ar_strms_tl_pk_csr;
457: RETURN(l_okl_cnsld_ar_strms_tl_rec);
458: END get_rec;
459:
460: FUNCTION get_rec (
453: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_DATE,
454: l_okl_cnsld_ar_strms_tl_rec.LAST_UPDATE_LOGIN;
455: x_no_data_found := okl_cnsld_ar_strms_tl_pk_csr%NOTFOUND;
456: CLOSE okl_cnsld_ar_strms_tl_pk_csr;
457: RETURN(l_okl_cnsld_ar_strms_tl_rec);
458: END get_rec;
459:
460: FUNCTION get_rec (
461: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type
457: RETURN(l_okl_cnsld_ar_strms_tl_rec);
458: END get_rec;
459:
460: FUNCTION get_rec (
461: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type
462: ) RETURN okl_cnsld_ar_strms_tl_rec_type IS
463: l_row_notfound BOOLEAN := TRUE;
464: BEGIN
465: RETURN(get_rec(p_okl_cnsld_ar_strms_tl_rec, l_row_notfound));
458: END get_rec;
459:
460: FUNCTION get_rec (
461: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type
462: ) RETURN okl_cnsld_ar_strms_tl_rec_type IS
463: l_row_notfound BOOLEAN := TRUE;
464: BEGIN
465: RETURN(get_rec(p_okl_cnsld_ar_strms_tl_rec, l_row_notfound));
466: END get_rec;
461: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type
462: ) RETURN okl_cnsld_ar_strms_tl_rec_type IS
463: l_row_notfound BOOLEAN := TRUE;
464: BEGIN
465: RETURN(get_rec(p_okl_cnsld_ar_strms_tl_rec, l_row_notfound));
466: END get_rec;
467: ---------------------------------------------------------------------------
468: -- FUNCTION get_rec for: OKL_CNSLD_AR_STRMS_V
469: ---------------------------------------------------------------------------
949: p_to.last_update_login := p_from.last_update_login;
950: END migrate;
951: PROCEDURE migrate (
952: p_from IN lsmv_rec_type,
953: p_to OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
954: ) IS
955: BEGIN
956: p_to.id := p_from.id;
957: p_to.sfwt_flag := p_from.sfwt_flag;
961: p_to.last_update_date := p_from.last_update_date;
962: p_to.last_update_login := p_from.last_update_login;
963: END migrate;
964: PROCEDURE migrate (
965: p_from IN okl_cnsld_ar_strms_tl_rec_type,
966: p_to OUT NOCOPY lsmv_rec_type
967: ) IS
968: BEGIN
969: p_to.id := p_from.id;
993: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
994: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
995: l_lsmv_rec lsmv_rec_type := p_lsmv_rec;
996: l_lsm_rec lsm_rec_type;
997: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
998: BEGIN
999: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
1000: G_PKG_NAME,
1001: p_init_msg_list,
1314: '_PVT'
1315: );
1316: END insert_row;
1317: ------------------------------------------
1318: -- insert_row for:OKL_CNSLD_AR_STRMS_TL --
1319: ------------------------------------------
1320: PROCEDURE insert_row(
1321: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1322: x_return_status OUT NOCOPY VARCHAR2,
1321: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1322: x_return_status OUT NOCOPY VARCHAR2,
1323: x_msg_count OUT NOCOPY NUMBER,
1324: x_msg_data OUT NOCOPY VARCHAR2,
1325: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
1326: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type) IS
1327:
1328: l_api_version CONSTANT NUMBER := 1;
1329: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1322: x_return_status OUT NOCOPY VARCHAR2,
1323: x_msg_count OUT NOCOPY NUMBER,
1324: x_msg_data OUT NOCOPY VARCHAR2,
1325: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
1326: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type) IS
1327:
1328: l_api_version CONSTANT NUMBER := 1;
1329: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1330: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1327:
1328: l_api_version CONSTANT NUMBER := 1;
1329: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1330: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1331: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type := p_okl_cnsld_ar_strms_tl_rec;
1332: ldefoklcnsldarstrmstlrec okl_cnsld_ar_strms_tl_rec_type;
1333: CURSOR get_languages IS
1334: SELECT *
1335: FROM FND_LANGUAGES
1328: l_api_version CONSTANT NUMBER := 1;
1329: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1330: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1331: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type := p_okl_cnsld_ar_strms_tl_rec;
1332: ldefoklcnsldarstrmstlrec okl_cnsld_ar_strms_tl_rec_type;
1333: CURSOR get_languages IS
1334: SELECT *
1335: FROM FND_LANGUAGES
1336: WHERE INSTALLED_FLAG IN ('I', 'B');
1334: SELECT *
1335: FROM FND_LANGUAGES
1336: WHERE INSTALLED_FLAG IN ('I', 'B');
1337: ----------------------------------------------
1338: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
1339: ----------------------------------------------
1340: FUNCTION Set_Attributes (
1341: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
1342: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
1337: ----------------------------------------------
1338: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
1339: ----------------------------------------------
1340: FUNCTION Set_Attributes (
1341: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
1342: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
1343: ) RETURN VARCHAR2 IS
1344: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1345: BEGIN
1338: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
1339: ----------------------------------------------
1340: FUNCTION Set_Attributes (
1341: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
1342: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
1343: ) RETURN VARCHAR2 IS
1344: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1345: BEGIN
1346: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
1342: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
1343: ) RETURN VARCHAR2 IS
1344: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1345: BEGIN
1346: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
1347: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
1348: x_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG := USERENV('LANG');
1349: RETURN(l_return_status);
1350: END Set_Attributes;
1343: ) RETURN VARCHAR2 IS
1344: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1345: BEGIN
1346: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
1347: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
1348: x_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG := USERENV('LANG');
1349: RETURN(l_return_status);
1350: END Set_Attributes;
1351: BEGIN
1344: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1345: BEGIN
1346: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
1347: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
1348: x_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG := USERENV('LANG');
1349: RETURN(l_return_status);
1350: END Set_Attributes;
1351: BEGIN
1352: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
1359: RAISE Okc_Api.G_EXCEPTION_ERROR;
1360: END IF;
1361: --- Setting item attributes
1362: l_return_status := Set_Attributes(
1363: p_okl_cnsld_ar_strms_tl_rec, -- IN
1364: l_okl_cnsld_ar_strms_tl_rec); -- OUT
1365: --- If any errors happen abort API
1366: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1367: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1360: END IF;
1361: --- Setting item attributes
1362: l_return_status := Set_Attributes(
1363: p_okl_cnsld_ar_strms_tl_rec, -- IN
1364: l_okl_cnsld_ar_strms_tl_rec); -- OUT
1365: --- If any errors happen abort API
1366: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1367: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1368: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1368: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1369: RAISE Okc_Api.G_EXCEPTION_ERROR;
1370: END IF;
1371: FOR l_lang_rec IN get_languages LOOP
1372: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_lang_rec.language_code;
1373: INSERT INTO OKL_CNSLD_AR_STRMS_TL(
1374: id,
1375: LANGUAGE,
1376: source_lang,
1369: RAISE Okc_Api.G_EXCEPTION_ERROR;
1370: END IF;
1371: FOR l_lang_rec IN get_languages LOOP
1372: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_lang_rec.language_code;
1373: INSERT INTO OKL_CNSLD_AR_STRMS_TL(
1374: id,
1375: LANGUAGE,
1376: source_lang,
1377: sfwt_flag,
1380: last_updated_by,
1381: last_update_date,
1382: last_update_login)
1383: VALUES (
1384: l_okl_cnsld_ar_strms_tl_rec.id,
1385: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1381: last_update_date,
1382: last_update_login)
1383: VALUES (
1384: l_okl_cnsld_ar_strms_tl_rec.id,
1385: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1382: last_update_login)
1383: VALUES (
1384: l_okl_cnsld_ar_strms_tl_rec.id,
1385: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1383: VALUES (
1384: l_okl_cnsld_ar_strms_tl_rec.id,
1385: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1384: l_okl_cnsld_ar_strms_tl_rec.id,
1385: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1392: l_okl_cnsld_ar_strms_tl_rec.last_update_login);
1385: l_okl_cnsld_ar_strms_tl_rec.LANGUAGE,
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1392: l_okl_cnsld_ar_strms_tl_rec.last_update_login);
1393: END LOOP;
1386: l_okl_cnsld_ar_strms_tl_rec.source_lang,
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1392: l_okl_cnsld_ar_strms_tl_rec.last_update_login);
1393: END LOOP;
1394: -- Set OUT values
1387: l_okl_cnsld_ar_strms_tl_rec.sfwt_flag,
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1392: l_okl_cnsld_ar_strms_tl_rec.last_update_login);
1393: END LOOP;
1394: -- Set OUT values
1395: x_okl_cnsld_ar_strms_tl_rec := l_okl_cnsld_ar_strms_tl_rec;
1388: l_okl_cnsld_ar_strms_tl_rec.created_by,
1389: l_okl_cnsld_ar_strms_tl_rec.creation_date,
1390: l_okl_cnsld_ar_strms_tl_rec.last_updated_by,
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1392: l_okl_cnsld_ar_strms_tl_rec.last_update_login);
1393: END LOOP;
1394: -- Set OUT values
1395: x_okl_cnsld_ar_strms_tl_rec := l_okl_cnsld_ar_strms_tl_rec;
1396: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1391: l_okl_cnsld_ar_strms_tl_rec.last_update_date,
1392: l_okl_cnsld_ar_strms_tl_rec.last_update_login);
1393: END LOOP;
1394: -- Set OUT values
1395: x_okl_cnsld_ar_strms_tl_rec := l_okl_cnsld_ar_strms_tl_rec;
1396: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1397: EXCEPTION
1398: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
1399: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
1444: l_lsmv_rec lsmv_rec_type;
1445: l_def_lsmv_rec lsmv_rec_type;
1446: l_lsm_rec lsm_rec_type;
1447: lx_lsm_rec lsm_rec_type;
1448: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
1449: lx_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
1450: -------------------------------
1451: -- FUNCTION fill_who_columns --
1452: -------------------------------
1445: l_def_lsmv_rec lsmv_rec_type;
1446: l_lsm_rec lsm_rec_type;
1447: lx_lsm_rec lsm_rec_type;
1448: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
1449: lx_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
1450: -------------------------------
1451: -- FUNCTION fill_who_columns --
1452: -------------------------------
1453: FUNCTION fill_who_columns (
1535: --------------------------------------
1536: -- Move VIEW record to "Child" records
1537: --------------------------------------
1538: migrate(l_def_lsmv_rec, l_lsm_rec);
1539: migrate(l_def_lsmv_rec, l_okl_cnsld_ar_strms_tl_rec);
1540: --------------------------------------------
1541: -- Call the INSERT_ROW for each child record
1542: --------------------------------------------
1543: insert_row(
1558: p_init_msg_list,
1559: x_return_status,
1560: x_msg_count,
1561: x_msg_data,
1562: l_okl_cnsld_ar_strms_tl_rec,
1563: lx_okl_cnsld_ar_strms_tl_rec
1564: );
1565: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1566: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1559: x_return_status,
1560: x_msg_count,
1561: x_msg_data,
1562: l_okl_cnsld_ar_strms_tl_rec,
1563: lx_okl_cnsld_ar_strms_tl_rec
1564: );
1565: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1566: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1567: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1566: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1567: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1568: RAISE Okc_Api.G_EXCEPTION_ERROR;
1569: END IF;
1570: migrate(lx_okl_cnsld_ar_strms_tl_rec, l_def_lsmv_rec);
1571: -- Set OUT values
1572: x_lsmv_rec := l_def_lsmv_rec;
1573: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1574: EXCEPTION
1797: '_PVT'
1798: );
1799: END lock_row;
1800: ----------------------------------------
1801: -- lock_row for:OKL_CNSLD_AR_STRMS_TL --
1802: ----------------------------------------
1803: PROCEDURE lock_row(
1804: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1805: x_return_status OUT NOCOPY VARCHAR2,
1804: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1805: x_return_status OUT NOCOPY VARCHAR2,
1806: x_msg_count OUT NOCOPY NUMBER,
1807: x_msg_data OUT NOCOPY VARCHAR2,
1808: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
1809:
1810: E_Resource_Busy EXCEPTION;
1811: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1812: CURSOR lock_csr (p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
1808: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
1809:
1810: E_Resource_Busy EXCEPTION;
1811: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1812: CURSOR lock_csr (p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
1813: SELECT *
1814: FROM OKL_CNSLD_AR_STRMS_TL
1815: WHERE ID = p_okl_cnsld_ar_strms_tl_rec.id
1816: FOR UPDATE NOWAIT;
1810: E_Resource_Busy EXCEPTION;
1811: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1812: CURSOR lock_csr (p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
1813: SELECT *
1814: FROM OKL_CNSLD_AR_STRMS_TL
1815: WHERE ID = p_okl_cnsld_ar_strms_tl_rec.id
1816: FOR UPDATE NOWAIT;
1817:
1818: l_api_version CONSTANT NUMBER := 1;
1811: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1812: CURSOR lock_csr (p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
1813: SELECT *
1814: FROM OKL_CNSLD_AR_STRMS_TL
1815: WHERE ID = p_okl_cnsld_ar_strms_tl_rec.id
1816: FOR UPDATE NOWAIT;
1817:
1818: l_api_version CONSTANT NUMBER := 1;
1819: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
1831: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1832: RAISE Okc_Api.G_EXCEPTION_ERROR;
1833: END IF;
1834: BEGIN
1835: OPEN lock_csr(p_okl_cnsld_ar_strms_tl_rec);
1836: FETCH lock_csr INTO l_lock_var;
1837: l_row_notfound := lock_csr%NOTFOUND;
1838: CLOSE lock_csr;
1839: EXCEPTION
1896: l_api_version CONSTANT NUMBER := 1;
1897: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1898: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1899: l_lsm_rec lsm_rec_type;
1900: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
1901: BEGIN
1902: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
1903: G_PKG_NAME,
1904: p_init_msg_list,
1914: --------------------------------------
1915: -- Move VIEW record to "Child" records
1916: --------------------------------------
1917: migrate(p_lsmv_rec, l_lsm_rec);
1918: migrate(p_lsmv_rec, l_okl_cnsld_ar_strms_tl_rec);
1919: --------------------------------------------
1920: -- Call the LOCK_ROW for each child record
1921: --------------------------------------------
1922: lock_row(
1935: p_init_msg_list,
1936: x_return_status,
1937: x_msg_count,
1938: x_msg_data,
1939: l_okl_cnsld_ar_strms_tl_rec
1940: );
1941: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
1942: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1943: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2395: '_PVT'
2396: );
2397: END update_row;
2398: ------------------------------------------
2399: -- update_row for:OKL_CNSLD_AR_STRMS_TL --
2400: ------------------------------------------
2401: PROCEDURE update_row(
2402: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2403: x_return_status OUT NOCOPY VARCHAR2,
2402: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2403: x_return_status OUT NOCOPY VARCHAR2,
2404: x_msg_count OUT NOCOPY NUMBER,
2405: x_msg_data OUT NOCOPY VARCHAR2,
2406: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2407: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type) IS
2408:
2409: l_api_version CONSTANT NUMBER := 1;
2410: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2403: x_return_status OUT NOCOPY VARCHAR2,
2404: x_msg_count OUT NOCOPY NUMBER,
2405: x_msg_data OUT NOCOPY VARCHAR2,
2406: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2407: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type) IS
2408:
2409: l_api_version CONSTANT NUMBER := 1;
2410: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2411: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2408:
2409: l_api_version CONSTANT NUMBER := 1;
2410: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2411: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2412: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type := p_okl_cnsld_ar_strms_tl_rec;
2413: ldefoklcnsldarstrmstlrec okl_cnsld_ar_strms_tl_rec_type;
2414: l_row_notfound BOOLEAN := TRUE;
2415: ----------------------------------
2416: -- FUNCTION populate_new_record --
2409: l_api_version CONSTANT NUMBER := 1;
2410: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2411: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2412: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type := p_okl_cnsld_ar_strms_tl_rec;
2413: ldefoklcnsldarstrmstlrec okl_cnsld_ar_strms_tl_rec_type;
2414: l_row_notfound BOOLEAN := TRUE;
2415: ----------------------------------
2416: -- FUNCTION populate_new_record --
2417: ----------------------------------
2415: ----------------------------------
2416: -- FUNCTION populate_new_record --
2417: ----------------------------------
2418: FUNCTION populate_new_record (
2419: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2420: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2421: ) RETURN VARCHAR2 IS
2422: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2423: l_row_notfound BOOLEAN := TRUE;
2416: -- FUNCTION populate_new_record --
2417: ----------------------------------
2418: FUNCTION populate_new_record (
2419: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2420: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2421: ) RETURN VARCHAR2 IS
2422: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2423: l_row_notfound BOOLEAN := TRUE;
2424: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2418: FUNCTION populate_new_record (
2419: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2420: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2421: ) RETURN VARCHAR2 IS
2422: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2423: l_row_notfound BOOLEAN := TRUE;
2424: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2425: BEGIN
2426: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2422: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2423: l_row_notfound BOOLEAN := TRUE;
2424: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2425: BEGIN
2426: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2427: -- Get current database values
2428: l_okl_cnsld_ar_strms_tl_rec := get_rec(p_okl_cnsld_ar_strms_tl_rec, l_row_notfound);
2429: IF (l_row_notfound) THEN
2430: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2424: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2425: BEGIN
2426: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2427: -- Get current database values
2428: l_okl_cnsld_ar_strms_tl_rec := get_rec(p_okl_cnsld_ar_strms_tl_rec, l_row_notfound);
2429: IF (l_row_notfound) THEN
2430: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2431: END IF;
2432: IF (x_okl_cnsld_ar_strms_tl_rec.id = Okc_Api.G_MISS_NUM)
2428: l_okl_cnsld_ar_strms_tl_rec := get_rec(p_okl_cnsld_ar_strms_tl_rec, l_row_notfound);
2429: IF (l_row_notfound) THEN
2430: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2431: END IF;
2432: IF (x_okl_cnsld_ar_strms_tl_rec.id = Okc_Api.G_MISS_NUM)
2433: THEN
2434: x_okl_cnsld_ar_strms_tl_rec.id := l_okl_cnsld_ar_strms_tl_rec.id;
2435: END IF;
2436: IF (x_okl_cnsld_ar_strms_tl_rec.LANGUAGE = Okc_Api.G_MISS_CHAR)
2430: l_return_status := Okc_Api.G_RET_STS_UNEXP_ERROR;
2431: END IF;
2432: IF (x_okl_cnsld_ar_strms_tl_rec.id = Okc_Api.G_MISS_NUM)
2433: THEN
2434: x_okl_cnsld_ar_strms_tl_rec.id := l_okl_cnsld_ar_strms_tl_rec.id;
2435: END IF;
2436: IF (x_okl_cnsld_ar_strms_tl_rec.LANGUAGE = Okc_Api.G_MISS_CHAR)
2437: THEN
2438: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_okl_cnsld_ar_strms_tl_rec.LANGUAGE;
2432: IF (x_okl_cnsld_ar_strms_tl_rec.id = Okc_Api.G_MISS_NUM)
2433: THEN
2434: x_okl_cnsld_ar_strms_tl_rec.id := l_okl_cnsld_ar_strms_tl_rec.id;
2435: END IF;
2436: IF (x_okl_cnsld_ar_strms_tl_rec.LANGUAGE = Okc_Api.G_MISS_CHAR)
2437: THEN
2438: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_okl_cnsld_ar_strms_tl_rec.LANGUAGE;
2439: END IF;
2440: IF (x_okl_cnsld_ar_strms_tl_rec.source_lang = Okc_Api.G_MISS_CHAR)
2434: x_okl_cnsld_ar_strms_tl_rec.id := l_okl_cnsld_ar_strms_tl_rec.id;
2435: END IF;
2436: IF (x_okl_cnsld_ar_strms_tl_rec.LANGUAGE = Okc_Api.G_MISS_CHAR)
2437: THEN
2438: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_okl_cnsld_ar_strms_tl_rec.LANGUAGE;
2439: END IF;
2440: IF (x_okl_cnsld_ar_strms_tl_rec.source_lang = Okc_Api.G_MISS_CHAR)
2441: THEN
2442: x_okl_cnsld_ar_strms_tl_rec.source_lang := l_okl_cnsld_ar_strms_tl_rec.source_lang;
2436: IF (x_okl_cnsld_ar_strms_tl_rec.LANGUAGE = Okc_Api.G_MISS_CHAR)
2437: THEN
2438: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_okl_cnsld_ar_strms_tl_rec.LANGUAGE;
2439: END IF;
2440: IF (x_okl_cnsld_ar_strms_tl_rec.source_lang = Okc_Api.G_MISS_CHAR)
2441: THEN
2442: x_okl_cnsld_ar_strms_tl_rec.source_lang := l_okl_cnsld_ar_strms_tl_rec.source_lang;
2443: END IF;
2444: IF (x_okl_cnsld_ar_strms_tl_rec.sfwt_flag = Okc_Api.G_MISS_CHAR)
2438: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := l_okl_cnsld_ar_strms_tl_rec.LANGUAGE;
2439: END IF;
2440: IF (x_okl_cnsld_ar_strms_tl_rec.source_lang = Okc_Api.G_MISS_CHAR)
2441: THEN
2442: x_okl_cnsld_ar_strms_tl_rec.source_lang := l_okl_cnsld_ar_strms_tl_rec.source_lang;
2443: END IF;
2444: IF (x_okl_cnsld_ar_strms_tl_rec.sfwt_flag = Okc_Api.G_MISS_CHAR)
2445: THEN
2446: x_okl_cnsld_ar_strms_tl_rec.sfwt_flag := l_okl_cnsld_ar_strms_tl_rec.sfwt_flag;
2440: IF (x_okl_cnsld_ar_strms_tl_rec.source_lang = Okc_Api.G_MISS_CHAR)
2441: THEN
2442: x_okl_cnsld_ar_strms_tl_rec.source_lang := l_okl_cnsld_ar_strms_tl_rec.source_lang;
2443: END IF;
2444: IF (x_okl_cnsld_ar_strms_tl_rec.sfwt_flag = Okc_Api.G_MISS_CHAR)
2445: THEN
2446: x_okl_cnsld_ar_strms_tl_rec.sfwt_flag := l_okl_cnsld_ar_strms_tl_rec.sfwt_flag;
2447: END IF;
2448: IF (x_okl_cnsld_ar_strms_tl_rec.created_by = Okc_Api.G_MISS_NUM)
2442: x_okl_cnsld_ar_strms_tl_rec.source_lang := l_okl_cnsld_ar_strms_tl_rec.source_lang;
2443: END IF;
2444: IF (x_okl_cnsld_ar_strms_tl_rec.sfwt_flag = Okc_Api.G_MISS_CHAR)
2445: THEN
2446: x_okl_cnsld_ar_strms_tl_rec.sfwt_flag := l_okl_cnsld_ar_strms_tl_rec.sfwt_flag;
2447: END IF;
2448: IF (x_okl_cnsld_ar_strms_tl_rec.created_by = Okc_Api.G_MISS_NUM)
2449: THEN
2450: x_okl_cnsld_ar_strms_tl_rec.created_by := l_okl_cnsld_ar_strms_tl_rec.created_by;
2444: IF (x_okl_cnsld_ar_strms_tl_rec.sfwt_flag = Okc_Api.G_MISS_CHAR)
2445: THEN
2446: x_okl_cnsld_ar_strms_tl_rec.sfwt_flag := l_okl_cnsld_ar_strms_tl_rec.sfwt_flag;
2447: END IF;
2448: IF (x_okl_cnsld_ar_strms_tl_rec.created_by = Okc_Api.G_MISS_NUM)
2449: THEN
2450: x_okl_cnsld_ar_strms_tl_rec.created_by := l_okl_cnsld_ar_strms_tl_rec.created_by;
2451: END IF;
2452: IF (x_okl_cnsld_ar_strms_tl_rec.creation_date = Okc_Api.G_MISS_DATE)
2446: x_okl_cnsld_ar_strms_tl_rec.sfwt_flag := l_okl_cnsld_ar_strms_tl_rec.sfwt_flag;
2447: END IF;
2448: IF (x_okl_cnsld_ar_strms_tl_rec.created_by = Okc_Api.G_MISS_NUM)
2449: THEN
2450: x_okl_cnsld_ar_strms_tl_rec.created_by := l_okl_cnsld_ar_strms_tl_rec.created_by;
2451: END IF;
2452: IF (x_okl_cnsld_ar_strms_tl_rec.creation_date = Okc_Api.G_MISS_DATE)
2453: THEN
2454: x_okl_cnsld_ar_strms_tl_rec.creation_date := l_okl_cnsld_ar_strms_tl_rec.creation_date;
2448: IF (x_okl_cnsld_ar_strms_tl_rec.created_by = Okc_Api.G_MISS_NUM)
2449: THEN
2450: x_okl_cnsld_ar_strms_tl_rec.created_by := l_okl_cnsld_ar_strms_tl_rec.created_by;
2451: END IF;
2452: IF (x_okl_cnsld_ar_strms_tl_rec.creation_date = Okc_Api.G_MISS_DATE)
2453: THEN
2454: x_okl_cnsld_ar_strms_tl_rec.creation_date := l_okl_cnsld_ar_strms_tl_rec.creation_date;
2455: END IF;
2456: IF (x_okl_cnsld_ar_strms_tl_rec.last_updated_by = Okc_Api.G_MISS_NUM)
2450: x_okl_cnsld_ar_strms_tl_rec.created_by := l_okl_cnsld_ar_strms_tl_rec.created_by;
2451: END IF;
2452: IF (x_okl_cnsld_ar_strms_tl_rec.creation_date = Okc_Api.G_MISS_DATE)
2453: THEN
2454: x_okl_cnsld_ar_strms_tl_rec.creation_date := l_okl_cnsld_ar_strms_tl_rec.creation_date;
2455: END IF;
2456: IF (x_okl_cnsld_ar_strms_tl_rec.last_updated_by = Okc_Api.G_MISS_NUM)
2457: THEN
2458: x_okl_cnsld_ar_strms_tl_rec.last_updated_by := l_okl_cnsld_ar_strms_tl_rec.last_updated_by;
2452: IF (x_okl_cnsld_ar_strms_tl_rec.creation_date = Okc_Api.G_MISS_DATE)
2453: THEN
2454: x_okl_cnsld_ar_strms_tl_rec.creation_date := l_okl_cnsld_ar_strms_tl_rec.creation_date;
2455: END IF;
2456: IF (x_okl_cnsld_ar_strms_tl_rec.last_updated_by = Okc_Api.G_MISS_NUM)
2457: THEN
2458: x_okl_cnsld_ar_strms_tl_rec.last_updated_by := l_okl_cnsld_ar_strms_tl_rec.last_updated_by;
2459: END IF;
2460: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_date = Okc_Api.G_MISS_DATE)
2454: x_okl_cnsld_ar_strms_tl_rec.creation_date := l_okl_cnsld_ar_strms_tl_rec.creation_date;
2455: END IF;
2456: IF (x_okl_cnsld_ar_strms_tl_rec.last_updated_by = Okc_Api.G_MISS_NUM)
2457: THEN
2458: x_okl_cnsld_ar_strms_tl_rec.last_updated_by := l_okl_cnsld_ar_strms_tl_rec.last_updated_by;
2459: END IF;
2460: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_date = Okc_Api.G_MISS_DATE)
2461: THEN
2462: x_okl_cnsld_ar_strms_tl_rec.last_update_date := l_okl_cnsld_ar_strms_tl_rec.last_update_date;
2456: IF (x_okl_cnsld_ar_strms_tl_rec.last_updated_by = Okc_Api.G_MISS_NUM)
2457: THEN
2458: x_okl_cnsld_ar_strms_tl_rec.last_updated_by := l_okl_cnsld_ar_strms_tl_rec.last_updated_by;
2459: END IF;
2460: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_date = Okc_Api.G_MISS_DATE)
2461: THEN
2462: x_okl_cnsld_ar_strms_tl_rec.last_update_date := l_okl_cnsld_ar_strms_tl_rec.last_update_date;
2463: END IF;
2464: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_login = Okc_Api.G_MISS_NUM)
2458: x_okl_cnsld_ar_strms_tl_rec.last_updated_by := l_okl_cnsld_ar_strms_tl_rec.last_updated_by;
2459: END IF;
2460: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_date = Okc_Api.G_MISS_DATE)
2461: THEN
2462: x_okl_cnsld_ar_strms_tl_rec.last_update_date := l_okl_cnsld_ar_strms_tl_rec.last_update_date;
2463: END IF;
2464: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_login = Okc_Api.G_MISS_NUM)
2465: THEN
2466: x_okl_cnsld_ar_strms_tl_rec.last_update_login := l_okl_cnsld_ar_strms_tl_rec.last_update_login;
2460: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_date = Okc_Api.G_MISS_DATE)
2461: THEN
2462: x_okl_cnsld_ar_strms_tl_rec.last_update_date := l_okl_cnsld_ar_strms_tl_rec.last_update_date;
2463: END IF;
2464: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_login = Okc_Api.G_MISS_NUM)
2465: THEN
2466: x_okl_cnsld_ar_strms_tl_rec.last_update_login := l_okl_cnsld_ar_strms_tl_rec.last_update_login;
2467: END IF;
2468: RETURN(l_return_status);
2462: x_okl_cnsld_ar_strms_tl_rec.last_update_date := l_okl_cnsld_ar_strms_tl_rec.last_update_date;
2463: END IF;
2464: IF (x_okl_cnsld_ar_strms_tl_rec.last_update_login = Okc_Api.G_MISS_NUM)
2465: THEN
2466: x_okl_cnsld_ar_strms_tl_rec.last_update_login := l_okl_cnsld_ar_strms_tl_rec.last_update_login;
2467: END IF;
2468: RETURN(l_return_status);
2469: END populate_new_record;
2470: ----------------------------------------------
2467: END IF;
2468: RETURN(l_return_status);
2469: END populate_new_record;
2470: ----------------------------------------------
2471: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
2472: ----------------------------------------------
2473: FUNCTION Set_Attributes (
2474: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2475: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2470: ----------------------------------------------
2471: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
2472: ----------------------------------------------
2473: FUNCTION Set_Attributes (
2474: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2475: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2476: ) RETURN VARCHAR2 IS
2477: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2478: BEGIN
2471: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
2472: ----------------------------------------------
2473: FUNCTION Set_Attributes (
2474: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
2475: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2476: ) RETURN VARCHAR2 IS
2477: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2478: BEGIN
2479: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2475: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
2476: ) RETURN VARCHAR2 IS
2477: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2478: BEGIN
2479: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2480: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
2481: x_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG := USERENV('LANG');
2482: RETURN(l_return_status);
2483: END Set_Attributes;
2476: ) RETURN VARCHAR2 IS
2477: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2478: BEGIN
2479: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2480: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
2481: x_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG := USERENV('LANG');
2482: RETURN(l_return_status);
2483: END Set_Attributes;
2484: BEGIN
2477: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2478: BEGIN
2479: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
2480: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
2481: x_okl_cnsld_ar_strms_tl_rec.SOURCE_LANG := USERENV('LANG');
2482: RETURN(l_return_status);
2483: END Set_Attributes;
2484: BEGIN
2485: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
2492: RAISE Okc_Api.G_EXCEPTION_ERROR;
2493: END IF;
2494: --- Setting item attributes
2495: l_return_status := Set_Attributes(
2496: p_okl_cnsld_ar_strms_tl_rec, -- IN
2497: l_okl_cnsld_ar_strms_tl_rec); -- OUT
2498: --- If any errors happen abort API
2499: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2500: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2493: END IF;
2494: --- Setting item attributes
2495: l_return_status := Set_Attributes(
2496: p_okl_cnsld_ar_strms_tl_rec, -- IN
2497: l_okl_cnsld_ar_strms_tl_rec); -- OUT
2498: --- If any errors happen abort API
2499: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2500: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2501: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2500: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2501: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2502: RAISE Okc_Api.G_EXCEPTION_ERROR;
2503: END IF;
2504: l_return_status := populate_new_record(l_okl_cnsld_ar_strms_tl_rec, ldefoklcnsldarstrmstlrec);
2505: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2506: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2507: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2508: RAISE Okc_Api.G_EXCEPTION_ERROR;
2506: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2507: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2508: RAISE Okc_Api.G_EXCEPTION_ERROR;
2509: END IF;
2510: UPDATE OKL_CNSLD_AR_STRMS_TL
2511: SET CREATED_BY = ldefoklcnsldarstrmstlrec.created_by,
2512: CREATION_DATE = ldefoklcnsldarstrmstlrec.creation_date,
2513: LAST_UPDATED_BY = ldefoklcnsldarstrmstlrec.last_updated_by,
2514: LAST_UPDATE_DATE = ldefoklcnsldarstrmstlrec.last_update_date,
2516: WHERE ID = ldefoklcnsldarstrmstlrec.id
2517: --AND SOURCE_LANG = USERENV('LANG');
2518: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2519:
2520: UPDATE OKL_CNSLD_AR_STRMS_TL
2521: SET SFWT_FLAG = 'Y'
2522: WHERE ID = ldefoklcnsldarstrmstlrec.id
2523: AND SOURCE_LANG <> USERENV('LANG');
2524:
2521: SET SFWT_FLAG = 'Y'
2522: WHERE ID = ldefoklcnsldarstrmstlrec.id
2523: AND SOURCE_LANG <> USERENV('LANG');
2524:
2525: x_okl_cnsld_ar_strms_tl_rec := ldefoklcnsldarstrmstlrec;
2526: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2527: EXCEPTION
2528: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
2529: x_return_status := Okc_Api.HANDLE_EXCEPTIONS
2572: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2573: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2574: l_lsmv_rec lsmv_rec_type := p_lsmv_rec;
2575: l_def_lsmv_rec lsmv_rec_type;
2576: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2577: lx_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2578: l_lsm_rec lsm_rec_type;
2579: lx_lsm_rec lsm_rec_type;
2580: -------------------------------
2573: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
2574: l_lsmv_rec lsmv_rec_type := p_lsmv_rec;
2575: l_def_lsmv_rec lsmv_rec_type;
2576: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2577: lx_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
2578: l_lsm_rec lsm_rec_type;
2579: lx_lsm_rec lsm_rec_type;
2580: -------------------------------
2581: -- FUNCTION fill_who_columns --
2872:
2873: --------------------------------------
2874: -- Move VIEW record to "Child" records
2875: --------------------------------------
2876: migrate(l_def_lsmv_rec, l_okl_cnsld_ar_strms_tl_rec);
2877: migrate(l_def_lsmv_rec, l_lsm_rec);
2878: --------------------------------------------
2879: -- Call the UPDATE_ROW for each child record
2880: --------------------------------------------
2882: p_init_msg_list,
2883: x_return_status,
2884: x_msg_count,
2885: x_msg_data,
2886: l_okl_cnsld_ar_strms_tl_rec,
2887: lx_okl_cnsld_ar_strms_tl_rec
2888: );
2889: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2890: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2883: x_return_status,
2884: x_msg_count,
2885: x_msg_data,
2886: l_okl_cnsld_ar_strms_tl_rec,
2887: lx_okl_cnsld_ar_strms_tl_rec
2888: );
2889: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
2890: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2891: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2890: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2891: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2892: RAISE Okc_Api.G_EXCEPTION_ERROR;
2893: END IF;
2894: migrate(lx_okl_cnsld_ar_strms_tl_rec, l_def_lsmv_rec);
2895: update_row(
2896: p_init_msg_list,
2897: x_return_status,
2898: x_msg_count,
3090: '_PVT'
3091: );
3092: END delete_row;
3093: ------------------------------------------
3094: -- delete_row for:OKL_CNSLD_AR_STRMS_TL --
3095: ------------------------------------------
3096: PROCEDURE delete_row(
3097: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3098: x_return_status OUT NOCOPY VARCHAR2,
3097: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
3098: x_return_status OUT NOCOPY VARCHAR2,
3099: x_msg_count OUT NOCOPY NUMBER,
3100: x_msg_data OUT NOCOPY VARCHAR2,
3101: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type) IS
3102:
3103: l_api_version CONSTANT NUMBER := 1;
3104: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3105: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3102:
3103: l_api_version CONSTANT NUMBER := 1;
3104: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3105: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3106: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type:= p_okl_cnsld_ar_strms_tl_rec;
3107: l_row_notfound BOOLEAN := TRUE;
3108: ----------------------------------------------
3109: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
3110: ----------------------------------------------
3105: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3106: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type:= p_okl_cnsld_ar_strms_tl_rec;
3107: l_row_notfound BOOLEAN := TRUE;
3108: ----------------------------------------------
3109: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
3110: ----------------------------------------------
3111: FUNCTION Set_Attributes (
3112: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
3113: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
3108: ----------------------------------------------
3109: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
3110: ----------------------------------------------
3111: FUNCTION Set_Attributes (
3112: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
3113: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
3114: ) RETURN VARCHAR2 IS
3115: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3116: BEGIN
3109: -- Set_Attributes for:OKL_CNSLD_AR_STRMS_TL --
3110: ----------------------------------------------
3111: FUNCTION Set_Attributes (
3112: p_okl_cnsld_ar_strms_tl_rec IN okl_cnsld_ar_strms_tl_rec_type,
3113: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
3114: ) RETURN VARCHAR2 IS
3115: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3116: BEGIN
3117: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
3113: x_okl_cnsld_ar_strms_tl_rec OUT NOCOPY okl_cnsld_ar_strms_tl_rec_type
3114: ) RETURN VARCHAR2 IS
3115: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3116: BEGIN
3117: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
3118: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
3119: RETURN(l_return_status);
3120: END Set_Attributes;
3121: BEGIN
3114: ) RETURN VARCHAR2 IS
3115: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3116: BEGIN
3117: x_okl_cnsld_ar_strms_tl_rec := p_okl_cnsld_ar_strms_tl_rec;
3118: x_okl_cnsld_ar_strms_tl_rec.LANGUAGE := USERENV('LANG');
3119: RETURN(l_return_status);
3120: END Set_Attributes;
3121: BEGIN
3122: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3129: RAISE Okc_Api.G_EXCEPTION_ERROR;
3130: END IF;
3131: --- Setting item attributes
3132: l_return_status := Set_Attributes(
3133: p_okl_cnsld_ar_strms_tl_rec, -- IN
3134: l_okl_cnsld_ar_strms_tl_rec); -- OUT
3135: --- If any errors happen abort API
3136: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3137: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3130: END IF;
3131: --- Setting item attributes
3132: l_return_status := Set_Attributes(
3133: p_okl_cnsld_ar_strms_tl_rec, -- IN
3134: l_okl_cnsld_ar_strms_tl_rec); -- OUT
3135: --- If any errors happen abort API
3136: IF (l_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3137: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3138: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3137: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3138: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3139: RAISE Okc_Api.G_EXCEPTION_ERROR;
3140: END IF;
3141: DELETE FROM OKL_CNSLD_AR_STRMS_TL
3142: WHERE ID = l_okl_cnsld_ar_strms_tl_rec.id;
3143:
3144: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3145: EXCEPTION
3138: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
3139: RAISE Okc_Api.G_EXCEPTION_ERROR;
3140: END IF;
3141: DELETE FROM OKL_CNSLD_AR_STRMS_TL
3142: WHERE ID = l_okl_cnsld_ar_strms_tl_rec.id;
3143:
3144: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3145: EXCEPTION
3146: WHEN Okc_Api.G_EXCEPTION_ERROR THEN
3188: l_api_version CONSTANT NUMBER := 1;
3189: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
3190: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
3191: l_lsmv_rec lsmv_rec_type := p_lsmv_rec;
3192: l_okl_cnsld_ar_strms_tl_rec okl_cnsld_ar_strms_tl_rec_type;
3193: l_lsm_rec lsm_rec_type;
3194: BEGIN
3195: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
3196: G_PKG_NAME,
3206: END IF;
3207: --------------------------------------
3208: -- Move VIEW record to "Child" records
3209: --------------------------------------
3210: migrate(l_lsmv_rec, l_okl_cnsld_ar_strms_tl_rec);
3211: migrate(l_lsmv_rec, l_lsm_rec);
3212: --------------------------------------------
3213: -- Call the DELETE_ROW for each child record
3214: --------------------------------------------
3216: p_init_msg_list,
3217: x_return_status,
3218: x_msg_count,
3219: x_msg_data,
3220: l_okl_cnsld_ar_strms_tl_rec
3221: );
3222: IF (x_return_status = Okc_Api.G_RET_STS_UNEXP_ERROR) THEN
3223: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3224: ELSIF (x_return_status = Okc_Api.G_RET_STS_ERROR) THEN