[Home] [Help]
32: -- PROCEDURE add_language
33: ---------------------------------------------------------------------------
34: PROCEDURE add_language IS
35: BEGIN
36: DELETE FROM OKL_INS_PRODUCTS_TL T
37: WHERE NOT EXISTS (
38: SELECT NULL
39: FROM OKL_INS_PRODUCTS_B B
40: WHERE B.ID = T.ID
38: SELECT NULL
39: FROM OKL_INS_PRODUCTS_B B
40: WHERE B.ID = T.ID
41: );
42: UPDATE OKL_INS_PRODUCTS_TL T SET (
43: NAME,
44: FACTOR_NAME) = (SELECT
45: B.NAME,
46: B.FACTOR_NAME
43: NAME,
44: FACTOR_NAME) = (SELECT
45: B.NAME,
46: B.FACTOR_NAME
47: FROM OKL_INS_PRODUCTS_TL B
48: WHERE B.ID = T.ID
49: AND B.LANGUAGE = T.SOURCE_LANG)
50: WHERE (
51: T.ID,
52: T.LANGUAGE)
53: IN (SELECT
54: SUBT.ID,
55: SUBT.LANGUAGE
56: FROM OKL_INS_PRODUCTS_TL SUBB, OKL_INS_PRODUCTS_TL SUBT
57: WHERE SUBB.ID = SUBT.ID
58: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
59: AND (SUBB.NAME <> SUBT.NAME
60: OR SUBB.FACTOR_NAME <> SUBT.FACTOR_NAME
62: OR (SUBB.NAME IS NOT NULL AND SUBT.NAME IS NULL)
63: OR (SUBB.FACTOR_NAME IS NULL AND SUBT.FACTOR_NAME IS NOT NULL)
64: OR (SUBB.FACTOR_NAME IS NOT NULL AND SUBT.FACTOR_NAME IS NULL)
65: ));
66: INSERT INTO OKL_INS_PRODUCTS_TL (
67: ID,
68: LANGUAGE,
69: SOURCE_LANG,
70: SFWT_FLAG,
86: B.CREATION_DATE,
87: B.LAST_UPDATED_BY,
88: B.LAST_UPDATE_DATE,
89: B.LAST_UPDATE_LOGIN
90: FROM OKL_INS_PRODUCTS_TL B, FND_LANGUAGES L
91: WHERE L.INSTALLED_FLAG IN ('I', 'B')
92: AND B.LANGUAGE = USERENV('LANG')
93: AND NOT EXISTS(
94: SELECT NULL
91: WHERE L.INSTALLED_FLAG IN ('I', 'B')
92: AND B.LANGUAGE = USERENV('LANG')
93: AND NOT EXISTS(
94: SELECT NULL
95: FROM OKL_INS_PRODUCTS_TL T
96: WHERE T.ID = B.ID
97: AND T.LANGUAGE = L.LANGUAGE_CODE
98: );
99: END add_language;
1283: BEGIN
1284: RETURN(get_rec(p_ipt_rec, l_row_notfound));
1285: END get_rec;
1286: ---------------------------------------------------------------------------
1287: -- FUNCTION get_rec for: OKL_INS_PRODUCTS_TL
1288: ---------------------------------------------------------------------------
1289: FUNCTION get_rec (
1290: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
1291: x_no_data_found OUT NOCOPY BOOLEAN
1286: ---------------------------------------------------------------------------
1287: -- FUNCTION get_rec for: OKL_INS_PRODUCTS_TL
1288: ---------------------------------------------------------------------------
1289: FUNCTION get_rec (
1290: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
1291: x_no_data_found OUT NOCOPY BOOLEAN
1292: ) RETURN okl_ins_products_tl_rec_type IS
1293: CURSOR okl_ins_iptl_pk_csr (p_id IN NUMBER,
1294: p_language IN VARCHAR2) IS
1288: ---------------------------------------------------------------------------
1289: FUNCTION get_rec (
1290: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
1291: x_no_data_found OUT NOCOPY BOOLEAN
1292: ) RETURN okl_ins_products_tl_rec_type IS
1293: CURSOR okl_ins_iptl_pk_csr (p_id IN NUMBER,
1294: p_language IN VARCHAR2) IS
1295: SELECT
1296: ID,
1303: CREATION_DATE,
1304: LAST_UPDATED_BY,
1305: LAST_UPDATE_DATE,
1306: LAST_UPDATE_LOGIN
1307: FROM Okl_Ins_Products_Tl
1308: WHERE okl_ins_products_tl.id = p_id
1309: AND okl_ins_products_tl.language = p_language;
1310: l_okl_ins_iptl_pk okl_ins_iptl_pk_csr%ROWTYPE;
1311: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
1304: LAST_UPDATED_BY,
1305: LAST_UPDATE_DATE,
1306: LAST_UPDATE_LOGIN
1307: FROM Okl_Ins_Products_Tl
1308: WHERE okl_ins_products_tl.id = p_id
1309: AND okl_ins_products_tl.language = p_language;
1310: l_okl_ins_iptl_pk okl_ins_iptl_pk_csr%ROWTYPE;
1311: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
1312: BEGIN
1305: LAST_UPDATE_DATE,
1306: LAST_UPDATE_LOGIN
1307: FROM Okl_Ins_Products_Tl
1308: WHERE okl_ins_products_tl.id = p_id
1309: AND okl_ins_products_tl.language = p_language;
1310: l_okl_ins_iptl_pk okl_ins_iptl_pk_csr%ROWTYPE;
1311: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
1312: BEGIN
1313: x_no_data_found := TRUE;
1307: FROM Okl_Ins_Products_Tl
1308: WHERE okl_ins_products_tl.id = p_id
1309: AND okl_ins_products_tl.language = p_language;
1310: l_okl_ins_iptl_pk okl_ins_iptl_pk_csr%ROWTYPE;
1311: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
1312: BEGIN
1313: x_no_data_found := TRUE;
1314: -- Get current database values
1315: OPEN okl_ins_iptl_pk_csr (p_okl_ins_products_tl_rec.id,
1311: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
1312: BEGIN
1313: x_no_data_found := TRUE;
1314: -- Get current database values
1315: OPEN okl_ins_iptl_pk_csr (p_okl_ins_products_tl_rec.id,
1316: p_okl_ins_products_tl_rec.language);
1317: FETCH okl_ins_iptl_pk_csr INTO
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1312: BEGIN
1313: x_no_data_found := TRUE;
1314: -- Get current database values
1315: OPEN okl_ins_iptl_pk_csr (p_okl_ins_products_tl_rec.id,
1316: p_okl_ins_products_tl_rec.language);
1317: FETCH okl_ins_iptl_pk_csr INTO
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1314: -- Get current database values
1315: OPEN okl_ins_iptl_pk_csr (p_okl_ins_products_tl_rec.id,
1316: p_okl_ins_products_tl_rec.language);
1317: FETCH okl_ins_iptl_pk_csr INTO
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1315: OPEN okl_ins_iptl_pk_csr (p_okl_ins_products_tl_rec.id,
1316: p_okl_ins_products_tl_rec.language);
1317: FETCH okl_ins_iptl_pk_csr INTO
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1316: p_okl_ins_products_tl_rec.language);
1317: FETCH okl_ins_iptl_pk_csr INTO
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1317: FETCH okl_ins_iptl_pk_csr INTO
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1318: l_okl_ins_products_tl_rec.ID,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1319: l_okl_ins_products_tl_rec.LANGUAGE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1320: l_okl_ins_products_tl_rec.SOURCE_LANG,
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1328: l_okl_ins_products_tl_rec.LAST_UPDATE_LOGIN;
1321: l_okl_ins_products_tl_rec.SFWT_FLAG,
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1328: l_okl_ins_products_tl_rec.LAST_UPDATE_LOGIN;
1329: x_no_data_found := okl_ins_iptl_pk_csr%NOTFOUND;
1322: l_okl_ins_products_tl_rec.NAME,
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1328: l_okl_ins_products_tl_rec.LAST_UPDATE_LOGIN;
1329: x_no_data_found := okl_ins_iptl_pk_csr%NOTFOUND;
1330: CLOSE okl_ins_iptl_pk_csr;
1323: l_okl_ins_products_tl_rec.FACTOR_NAME,
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1328: l_okl_ins_products_tl_rec.LAST_UPDATE_LOGIN;
1329: x_no_data_found := okl_ins_iptl_pk_csr%NOTFOUND;
1330: CLOSE okl_ins_iptl_pk_csr;
1331: RETURN(l_okl_ins_products_tl_rec);
1324: l_okl_ins_products_tl_rec.CREATED_BY,
1325: l_okl_ins_products_tl_rec.CREATION_DATE,
1326: l_okl_ins_products_tl_rec.LAST_UPDATED_BY,
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1328: l_okl_ins_products_tl_rec.LAST_UPDATE_LOGIN;
1329: x_no_data_found := okl_ins_iptl_pk_csr%NOTFOUND;
1330: CLOSE okl_ins_iptl_pk_csr;
1331: RETURN(l_okl_ins_products_tl_rec);
1332: END get_rec;
1327: l_okl_ins_products_tl_rec.LAST_UPDATE_DATE,
1328: l_okl_ins_products_tl_rec.LAST_UPDATE_LOGIN;
1329: x_no_data_found := okl_ins_iptl_pk_csr%NOTFOUND;
1330: CLOSE okl_ins_iptl_pk_csr;
1331: RETURN(l_okl_ins_products_tl_rec);
1332: END get_rec;
1333: FUNCTION get_rec (
1334: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type
1335: ) RETURN okl_ins_products_tl_rec_type IS
1330: CLOSE okl_ins_iptl_pk_csr;
1331: RETURN(l_okl_ins_products_tl_rec);
1332: END get_rec;
1333: FUNCTION get_rec (
1334: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type
1335: ) RETURN okl_ins_products_tl_rec_type IS
1336: l_row_notfound BOOLEAN := TRUE;
1337: BEGIN
1338: RETURN(get_rec(p_okl_ins_products_tl_rec, l_row_notfound));
1331: RETURN(l_okl_ins_products_tl_rec);
1332: END get_rec;
1333: FUNCTION get_rec (
1334: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type
1335: ) RETURN okl_ins_products_tl_rec_type IS
1336: l_row_notfound BOOLEAN := TRUE;
1337: BEGIN
1338: RETURN(get_rec(p_okl_ins_products_tl_rec, l_row_notfound));
1339: END get_rec;
1334: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type
1335: ) RETURN okl_ins_products_tl_rec_type IS
1336: l_row_notfound BOOLEAN := TRUE;
1337: BEGIN
1338: RETURN(get_rec(p_okl_ins_products_tl_rec, l_row_notfound));
1339: END get_rec;
1340: ---------------------------------------------------------------------------
1341: -- FUNCTION get_rec for: OKL_INS_PRODUCTS_V
1342: ---------------------------------------------------------------------------
2220: p_to.last_update_login := p_from.last_update_login;
2221: END migrate;
2222: PROCEDURE migrate (
2223: p_from IN iptv_rec_type,
2224: p_to OUT NOCOPY okl_ins_products_tl_rec_type
2225: ) IS
2226: BEGIN
2227: p_to.id := p_from.id;
2228: p_to.sfwt_flag := p_from.sfwt_flag;
2234: p_to.last_update_date := p_from.last_update_date;
2235: p_to.last_update_login := p_from.last_update_login;
2236: END migrate;
2237: PROCEDURE migrate (
2238: p_from IN okl_ins_products_tl_rec_type,
2239: p_to OUT NOCOPY iptv_rec_type
2240: ) IS
2241: BEGIN
2242: p_to.id := p_from.id;
2266: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
2267: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2268: l_iptv_rec iptv_rec_type := p_iptv_rec;
2269: l_ipt_rec ipt_rec_type;
2270: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
2271: BEGIN
2272: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2273: G_PKG_NAME,
2274: p_init_msg_list,
2552: '_PVT'
2553: );
2554: END insert_row;
2555: ----------------------------------------
2556: -- insert_row for:OKL_INS_PRODUCTS_TL --
2557: ----------------------------------------
2558: PROCEDURE insert_row(
2559: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2560: x_return_status OUT NOCOPY VARCHAR2,
2559: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2560: x_return_status OUT NOCOPY VARCHAR2,
2561: x_msg_count OUT NOCOPY NUMBER,
2562: x_msg_data OUT NOCOPY VARCHAR2,
2563: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
2564: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type) IS
2565: l_api_version CONSTANT NUMBER := 1;
2566: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
2567: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2560: x_return_status OUT NOCOPY VARCHAR2,
2561: x_msg_count OUT NOCOPY NUMBER,
2562: x_msg_data OUT NOCOPY VARCHAR2,
2563: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
2564: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type) IS
2565: l_api_version CONSTANT NUMBER := 1;
2566: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
2567: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2568: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type := p_okl_ins_products_tl_rec;
2564: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type) IS
2565: l_api_version CONSTANT NUMBER := 1;
2566: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
2567: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2568: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type := p_okl_ins_products_tl_rec;
2569: ldefoklinsproductstlrec okl_ins_products_tl_rec_type;
2570: CURSOR get_languages IS
2571: SELECT *
2572: FROM FND_LANGUAGES
2565: l_api_version CONSTANT NUMBER := 1;
2566: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
2567: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2568: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type := p_okl_ins_products_tl_rec;
2569: ldefoklinsproductstlrec okl_ins_products_tl_rec_type;
2570: CURSOR get_languages IS
2571: SELECT *
2572: FROM FND_LANGUAGES
2573: WHERE INSTALLED_FLAG IN ('I', 'B');
2571: SELECT *
2572: FROM FND_LANGUAGES
2573: WHERE INSTALLED_FLAG IN ('I', 'B');
2574: --------------------------------------------
2575: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
2576: --------------------------------------------
2577: FUNCTION Set_Attributes (
2578: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
2579: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
2574: --------------------------------------------
2575: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
2576: --------------------------------------------
2577: FUNCTION Set_Attributes (
2578: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
2579: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
2580: ) RETURN VARCHAR2 IS
2581: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2582: BEGIN
2575: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
2576: --------------------------------------------
2577: FUNCTION Set_Attributes (
2578: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
2579: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
2580: ) RETURN VARCHAR2 IS
2581: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2582: BEGIN
2583: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
2579: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
2580: ) RETURN VARCHAR2 IS
2581: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2582: BEGIN
2583: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
2584: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
2585: x_okl_ins_products_tl_rec.SOURCE_LANG := USERENV('LANG');
2586: RETURN(l_return_status);
2587: END Set_Attributes;
2580: ) RETURN VARCHAR2 IS
2581: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2582: BEGIN
2583: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
2584: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
2585: x_okl_ins_products_tl_rec.SOURCE_LANG := USERENV('LANG');
2586: RETURN(l_return_status);
2587: END Set_Attributes;
2588: BEGIN
2581: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2582: BEGIN
2583: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
2584: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
2585: x_okl_ins_products_tl_rec.SOURCE_LANG := USERENV('LANG');
2586: RETURN(l_return_status);
2587: END Set_Attributes;
2588: BEGIN
2589: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2596: RAISE OKC_API.G_EXCEPTION_ERROR;
2597: END IF;
2598: --- Setting item attributes
2599: l_return_status := Set_Attributes(
2600: p_okl_ins_products_tl_rec, -- IN
2601: l_okl_ins_products_tl_rec); -- OUT
2602: --- If any errors happen abort API
2603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2597: END IF;
2598: --- Setting item attributes
2599: l_return_status := Set_Attributes(
2600: p_okl_ins_products_tl_rec, -- IN
2601: l_okl_ins_products_tl_rec); -- OUT
2602: --- If any errors happen abort API
2603: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2604: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2605: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2605: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2606: RAISE OKC_API.G_EXCEPTION_ERROR;
2607: END IF;
2608: FOR l_lang_rec IN get_languages LOOP
2609: l_okl_ins_products_tl_rec.language := l_lang_rec.language_code;
2610: INSERT INTO OKL_INS_PRODUCTS_TL(
2611: id,
2612: language,
2613: source_lang,
2606: RAISE OKC_API.G_EXCEPTION_ERROR;
2607: END IF;
2608: FOR l_lang_rec IN get_languages LOOP
2609: l_okl_ins_products_tl_rec.language := l_lang_rec.language_code;
2610: INSERT INTO OKL_INS_PRODUCTS_TL(
2611: id,
2612: language,
2613: source_lang,
2614: sfwt_flag,
2619: last_updated_by,
2620: last_update_date,
2621: last_update_login)
2622: VALUES (
2623: l_okl_ins_products_tl_rec.id,
2624: l_okl_ins_products_tl_rec.language,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2620: last_update_date,
2621: last_update_login)
2622: VALUES (
2623: l_okl_ins_products_tl_rec.id,
2624: l_okl_ins_products_tl_rec.language,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2621: last_update_login)
2622: VALUES (
2623: l_okl_ins_products_tl_rec.id,
2624: l_okl_ins_products_tl_rec.language,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2622: VALUES (
2623: l_okl_ins_products_tl_rec.id,
2624: l_okl_ins_products_tl_rec.language,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2623: l_okl_ins_products_tl_rec.id,
2624: l_okl_ins_products_tl_rec.language,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2624: l_okl_ins_products_tl_rec.language,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2632: l_okl_ins_products_tl_rec.last_update_date,
2625: l_okl_ins_products_tl_rec.source_lang,
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2632: l_okl_ins_products_tl_rec.last_update_date,
2633: l_okl_ins_products_tl_rec.last_update_login);
2626: l_okl_ins_products_tl_rec.sfwt_flag,
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2632: l_okl_ins_products_tl_rec.last_update_date,
2633: l_okl_ins_products_tl_rec.last_update_login);
2634: END LOOP;
2627: l_okl_ins_products_tl_rec.name,
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2632: l_okl_ins_products_tl_rec.last_update_date,
2633: l_okl_ins_products_tl_rec.last_update_login);
2634: END LOOP;
2635: -- Set OUT values
2628: l_okl_ins_products_tl_rec.factor_name,
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2632: l_okl_ins_products_tl_rec.last_update_date,
2633: l_okl_ins_products_tl_rec.last_update_login);
2634: END LOOP;
2635: -- Set OUT values
2636: x_okl_ins_products_tl_rec := l_okl_ins_products_tl_rec;
2629: l_okl_ins_products_tl_rec.created_by,
2630: l_okl_ins_products_tl_rec.creation_date,
2631: l_okl_ins_products_tl_rec.last_updated_by,
2632: l_okl_ins_products_tl_rec.last_update_date,
2633: l_okl_ins_products_tl_rec.last_update_login);
2634: END LOOP;
2635: -- Set OUT values
2636: x_okl_ins_products_tl_rec := l_okl_ins_products_tl_rec;
2637: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2632: l_okl_ins_products_tl_rec.last_update_date,
2633: l_okl_ins_products_tl_rec.last_update_login);
2634: END LOOP;
2635: -- Set OUT values
2636: x_okl_ins_products_tl_rec := l_okl_ins_products_tl_rec;
2637: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2638: EXCEPTION
2639: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2640: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2684: l_iptv_rec iptv_rec_type;
2685: l_def_iptv_rec iptv_rec_type;
2686: l_ipt_rec ipt_rec_type;
2687: lx_ipt_rec ipt_rec_type;
2688: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
2689: lx_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
2690: -------------------------------
2691: -- FUNCTION fill_who_columns --
2692: -------------------------------
2685: l_def_iptv_rec iptv_rec_type;
2686: l_ipt_rec ipt_rec_type;
2687: lx_ipt_rec ipt_rec_type;
2688: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
2689: lx_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
2690: -------------------------------
2691: -- FUNCTION fill_who_columns --
2692: -------------------------------
2693: FUNCTION fill_who_columns (
2760: --------------------------------------
2761: -- Move VIEW record to "Child" records
2762: --------------------------------------
2763: migrate(l_def_iptv_rec, l_ipt_rec);
2764: migrate(l_def_iptv_rec, l_okl_ins_products_tl_rec);
2765: --------------------------------------------
2766: -- Call the INSERT_ROW for each child record
2767: --------------------------------------------
2768: insert_row(
2783: p_init_msg_list,
2784: x_return_status,
2785: x_msg_count,
2786: x_msg_data,
2787: l_okl_ins_products_tl_rec,
2788: lx_okl_ins_products_tl_rec
2789: );
2790: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2791: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2784: x_return_status,
2785: x_msg_count,
2786: x_msg_data,
2787: l_okl_ins_products_tl_rec,
2788: lx_okl_ins_products_tl_rec
2789: );
2790: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2791: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2792: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2791: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2792: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2793: RAISE OKC_API.G_EXCEPTION_ERROR;
2794: END IF;
2795: migrate(lx_okl_ins_products_tl_rec, l_def_iptv_rec);
2796: -- Set OUT values
2797: x_iptv_rec := l_def_iptv_rec;
2798: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2799: EXCEPTION
3000: '_PVT'
3001: );
3002: END lock_row;
3003: --------------------------------------
3004: -- lock_row for:OKL_INS_PRODUCTS_TL --
3005: --------------------------------------
3006: PROCEDURE lock_row(
3007: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3008: x_return_status OUT NOCOPY VARCHAR2,
3007: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3008: x_return_status OUT NOCOPY VARCHAR2,
3009: x_msg_count OUT NOCOPY NUMBER,
3010: x_msg_data OUT NOCOPY VARCHAR2,
3011: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
3012: E_Resource_Busy EXCEPTION;
3013: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3014: CURSOR lock_csr (p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
3015: SELECT *
3010: x_msg_data OUT NOCOPY VARCHAR2,
3011: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
3012: E_Resource_Busy EXCEPTION;
3013: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3014: CURSOR lock_csr (p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
3015: SELECT *
3016: FROM OKL_INS_PRODUCTS_TL
3017: WHERE ID = p_okl_ins_products_tl_rec.id
3018: FOR UPDATE NOWAIT;
3012: E_Resource_Busy EXCEPTION;
3013: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3014: CURSOR lock_csr (p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
3015: SELECT *
3016: FROM OKL_INS_PRODUCTS_TL
3017: WHERE ID = p_okl_ins_products_tl_rec.id
3018: FOR UPDATE NOWAIT;
3019: l_api_version CONSTANT NUMBER := 1;
3020: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
3013: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3014: CURSOR lock_csr (p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
3015: SELECT *
3016: FROM OKL_INS_PRODUCTS_TL
3017: WHERE ID = p_okl_ins_products_tl_rec.id
3018: FOR UPDATE NOWAIT;
3019: l_api_version CONSTANT NUMBER := 1;
3020: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
3021: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3032: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3033: RAISE OKC_API.G_EXCEPTION_ERROR;
3034: END IF;
3035: BEGIN
3036: OPEN lock_csr(p_okl_ins_products_tl_rec);
3037: FETCH lock_csr INTO l_lock_var;
3038: l_row_notfound := lock_csr%NOTFOUND;
3039: CLOSE lock_csr;
3040: EXCEPTION
3095: l_api_version CONSTANT NUMBER := 1;
3096: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3097: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3098: l_ipt_rec ipt_rec_type;
3099: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3100: BEGIN
3101: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3102: G_PKG_NAME,
3103: p_init_msg_list,
3113: --------------------------------------
3114: -- Move VIEW record to "Child" records
3115: --------------------------------------
3116: migrate(p_iptv_rec, l_ipt_rec);
3117: migrate(p_iptv_rec, l_okl_ins_products_tl_rec);
3118: --------------------------------------------
3119: -- Call the LOCK_ROW for each child record
3120: --------------------------------------------
3121: lock_row(
3134: p_init_msg_list,
3135: x_return_status,
3136: x_msg_count,
3137: x_msg_data,
3138: l_okl_ins_products_tl_rec
3139: );
3140: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3141: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3142: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3534: '_PVT'
3535: );
3536: END update_row;
3537: ----------------------------------------
3538: -- update_row for:OKL_INS_PRODUCTS_TL --
3539: ----------------------------------------
3540: PROCEDURE update_row(
3541: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3542: x_return_status OUT NOCOPY VARCHAR2,
3541: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3542: x_return_status OUT NOCOPY VARCHAR2,
3543: x_msg_count OUT NOCOPY NUMBER,
3544: x_msg_data OUT NOCOPY VARCHAR2,
3545: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3546: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type) IS
3547: l_api_version CONSTANT NUMBER := 1;
3548: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
3549: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3542: x_return_status OUT NOCOPY VARCHAR2,
3543: x_msg_count OUT NOCOPY NUMBER,
3544: x_msg_data OUT NOCOPY VARCHAR2,
3545: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3546: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type) IS
3547: l_api_version CONSTANT NUMBER := 1;
3548: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
3549: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3550: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type := p_okl_ins_products_tl_rec;
3546: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type) IS
3547: l_api_version CONSTANT NUMBER := 1;
3548: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
3549: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3550: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type := p_okl_ins_products_tl_rec;
3551: ldefoklinsproductstlrec okl_ins_products_tl_rec_type;
3552: l_row_notfound BOOLEAN := TRUE;
3553: ----------------------------------
3554: -- FUNCTION populate_new_record --
3547: l_api_version CONSTANT NUMBER := 1;
3548: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
3549: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3550: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type := p_okl_ins_products_tl_rec;
3551: ldefoklinsproductstlrec okl_ins_products_tl_rec_type;
3552: l_row_notfound BOOLEAN := TRUE;
3553: ----------------------------------
3554: -- FUNCTION populate_new_record --
3555: ----------------------------------
3553: ----------------------------------
3554: -- FUNCTION populate_new_record --
3555: ----------------------------------
3556: FUNCTION populate_new_record (
3557: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3558: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3559: ) RETURN VARCHAR2 IS
3560: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3561: l_row_notfound BOOLEAN := TRUE;
3554: -- FUNCTION populate_new_record --
3555: ----------------------------------
3556: FUNCTION populate_new_record (
3557: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3558: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3559: ) RETURN VARCHAR2 IS
3560: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3561: l_row_notfound BOOLEAN := TRUE;
3562: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3556: FUNCTION populate_new_record (
3557: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3558: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3559: ) RETURN VARCHAR2 IS
3560: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3561: l_row_notfound BOOLEAN := TRUE;
3562: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3563: BEGIN
3564: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3560: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3561: l_row_notfound BOOLEAN := TRUE;
3562: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3563: BEGIN
3564: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3565: -- Get current database values
3566: l_okl_ins_products_tl_rec := get_rec(p_okl_ins_products_tl_rec, l_row_notfound);
3567: IF (l_row_notfound) THEN
3568: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3562: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3563: BEGIN
3564: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3565: -- Get current database values
3566: l_okl_ins_products_tl_rec := get_rec(p_okl_ins_products_tl_rec, l_row_notfound);
3567: IF (l_row_notfound) THEN
3568: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3569: END IF;
3570: IF (x_okl_ins_products_tl_rec.id = OKC_API.G_MISS_NUM)
3566: l_okl_ins_products_tl_rec := get_rec(p_okl_ins_products_tl_rec, l_row_notfound);
3567: IF (l_row_notfound) THEN
3568: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3569: END IF;
3570: IF (x_okl_ins_products_tl_rec.id = OKC_API.G_MISS_NUM)
3571: THEN
3572: x_okl_ins_products_tl_rec.id := l_okl_ins_products_tl_rec.id;
3573: END IF;
3574: IF (x_okl_ins_products_tl_rec.language = OKC_API.G_MISS_CHAR)
3568: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
3569: END IF;
3570: IF (x_okl_ins_products_tl_rec.id = OKC_API.G_MISS_NUM)
3571: THEN
3572: x_okl_ins_products_tl_rec.id := l_okl_ins_products_tl_rec.id;
3573: END IF;
3574: IF (x_okl_ins_products_tl_rec.language = OKC_API.G_MISS_CHAR)
3575: THEN
3576: x_okl_ins_products_tl_rec.language := l_okl_ins_products_tl_rec.language;
3570: IF (x_okl_ins_products_tl_rec.id = OKC_API.G_MISS_NUM)
3571: THEN
3572: x_okl_ins_products_tl_rec.id := l_okl_ins_products_tl_rec.id;
3573: END IF;
3574: IF (x_okl_ins_products_tl_rec.language = OKC_API.G_MISS_CHAR)
3575: THEN
3576: x_okl_ins_products_tl_rec.language := l_okl_ins_products_tl_rec.language;
3577: END IF;
3578: IF (x_okl_ins_products_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
3572: x_okl_ins_products_tl_rec.id := l_okl_ins_products_tl_rec.id;
3573: END IF;
3574: IF (x_okl_ins_products_tl_rec.language = OKC_API.G_MISS_CHAR)
3575: THEN
3576: x_okl_ins_products_tl_rec.language := l_okl_ins_products_tl_rec.language;
3577: END IF;
3578: IF (x_okl_ins_products_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
3579: THEN
3580: x_okl_ins_products_tl_rec.source_lang := l_okl_ins_products_tl_rec.source_lang;
3574: IF (x_okl_ins_products_tl_rec.language = OKC_API.G_MISS_CHAR)
3575: THEN
3576: x_okl_ins_products_tl_rec.language := l_okl_ins_products_tl_rec.language;
3577: END IF;
3578: IF (x_okl_ins_products_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
3579: THEN
3580: x_okl_ins_products_tl_rec.source_lang := l_okl_ins_products_tl_rec.source_lang;
3581: END IF;
3582: IF (x_okl_ins_products_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3576: x_okl_ins_products_tl_rec.language := l_okl_ins_products_tl_rec.language;
3577: END IF;
3578: IF (x_okl_ins_products_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
3579: THEN
3580: x_okl_ins_products_tl_rec.source_lang := l_okl_ins_products_tl_rec.source_lang;
3581: END IF;
3582: IF (x_okl_ins_products_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3583: THEN
3584: x_okl_ins_products_tl_rec.sfwt_flag := l_okl_ins_products_tl_rec.sfwt_flag;
3578: IF (x_okl_ins_products_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
3579: THEN
3580: x_okl_ins_products_tl_rec.source_lang := l_okl_ins_products_tl_rec.source_lang;
3581: END IF;
3582: IF (x_okl_ins_products_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3583: THEN
3584: x_okl_ins_products_tl_rec.sfwt_flag := l_okl_ins_products_tl_rec.sfwt_flag;
3585: END IF;
3586: IF (x_okl_ins_products_tl_rec.name = OKC_API.G_MISS_CHAR)
3580: x_okl_ins_products_tl_rec.source_lang := l_okl_ins_products_tl_rec.source_lang;
3581: END IF;
3582: IF (x_okl_ins_products_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3583: THEN
3584: x_okl_ins_products_tl_rec.sfwt_flag := l_okl_ins_products_tl_rec.sfwt_flag;
3585: END IF;
3586: IF (x_okl_ins_products_tl_rec.name = OKC_API.G_MISS_CHAR)
3587: THEN
3588: x_okl_ins_products_tl_rec.name := l_okl_ins_products_tl_rec.name;
3582: IF (x_okl_ins_products_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
3583: THEN
3584: x_okl_ins_products_tl_rec.sfwt_flag := l_okl_ins_products_tl_rec.sfwt_flag;
3585: END IF;
3586: IF (x_okl_ins_products_tl_rec.name = OKC_API.G_MISS_CHAR)
3587: THEN
3588: x_okl_ins_products_tl_rec.name := l_okl_ins_products_tl_rec.name;
3589: END IF;
3590: IF (x_okl_ins_products_tl_rec.factor_name = OKC_API.G_MISS_CHAR)
3584: x_okl_ins_products_tl_rec.sfwt_flag := l_okl_ins_products_tl_rec.sfwt_flag;
3585: END IF;
3586: IF (x_okl_ins_products_tl_rec.name = OKC_API.G_MISS_CHAR)
3587: THEN
3588: x_okl_ins_products_tl_rec.name := l_okl_ins_products_tl_rec.name;
3589: END IF;
3590: IF (x_okl_ins_products_tl_rec.factor_name = OKC_API.G_MISS_CHAR)
3591: THEN
3592: x_okl_ins_products_tl_rec.factor_name := l_okl_ins_products_tl_rec.factor_name;
3586: IF (x_okl_ins_products_tl_rec.name = OKC_API.G_MISS_CHAR)
3587: THEN
3588: x_okl_ins_products_tl_rec.name := l_okl_ins_products_tl_rec.name;
3589: END IF;
3590: IF (x_okl_ins_products_tl_rec.factor_name = OKC_API.G_MISS_CHAR)
3591: THEN
3592: x_okl_ins_products_tl_rec.factor_name := l_okl_ins_products_tl_rec.factor_name;
3593: END IF;
3594: IF (x_okl_ins_products_tl_rec.created_by = OKC_API.G_MISS_NUM)
3588: x_okl_ins_products_tl_rec.name := l_okl_ins_products_tl_rec.name;
3589: END IF;
3590: IF (x_okl_ins_products_tl_rec.factor_name = OKC_API.G_MISS_CHAR)
3591: THEN
3592: x_okl_ins_products_tl_rec.factor_name := l_okl_ins_products_tl_rec.factor_name;
3593: END IF;
3594: IF (x_okl_ins_products_tl_rec.created_by = OKC_API.G_MISS_NUM)
3595: THEN
3596: x_okl_ins_products_tl_rec.created_by := l_okl_ins_products_tl_rec.created_by;
3590: IF (x_okl_ins_products_tl_rec.factor_name = OKC_API.G_MISS_CHAR)
3591: THEN
3592: x_okl_ins_products_tl_rec.factor_name := l_okl_ins_products_tl_rec.factor_name;
3593: END IF;
3594: IF (x_okl_ins_products_tl_rec.created_by = OKC_API.G_MISS_NUM)
3595: THEN
3596: x_okl_ins_products_tl_rec.created_by := l_okl_ins_products_tl_rec.created_by;
3597: END IF;
3598: IF (x_okl_ins_products_tl_rec.creation_date = OKC_API.G_MISS_DATE)
3592: x_okl_ins_products_tl_rec.factor_name := l_okl_ins_products_tl_rec.factor_name;
3593: END IF;
3594: IF (x_okl_ins_products_tl_rec.created_by = OKC_API.G_MISS_NUM)
3595: THEN
3596: x_okl_ins_products_tl_rec.created_by := l_okl_ins_products_tl_rec.created_by;
3597: END IF;
3598: IF (x_okl_ins_products_tl_rec.creation_date = OKC_API.G_MISS_DATE)
3599: THEN
3600: x_okl_ins_products_tl_rec.creation_date := l_okl_ins_products_tl_rec.creation_date;
3594: IF (x_okl_ins_products_tl_rec.created_by = OKC_API.G_MISS_NUM)
3595: THEN
3596: x_okl_ins_products_tl_rec.created_by := l_okl_ins_products_tl_rec.created_by;
3597: END IF;
3598: IF (x_okl_ins_products_tl_rec.creation_date = OKC_API.G_MISS_DATE)
3599: THEN
3600: x_okl_ins_products_tl_rec.creation_date := l_okl_ins_products_tl_rec.creation_date;
3601: END IF;
3602: IF (x_okl_ins_products_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
3596: x_okl_ins_products_tl_rec.created_by := l_okl_ins_products_tl_rec.created_by;
3597: END IF;
3598: IF (x_okl_ins_products_tl_rec.creation_date = OKC_API.G_MISS_DATE)
3599: THEN
3600: x_okl_ins_products_tl_rec.creation_date := l_okl_ins_products_tl_rec.creation_date;
3601: END IF;
3602: IF (x_okl_ins_products_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
3603: THEN
3604: x_okl_ins_products_tl_rec.last_updated_by := l_okl_ins_products_tl_rec.last_updated_by;
3598: IF (x_okl_ins_products_tl_rec.creation_date = OKC_API.G_MISS_DATE)
3599: THEN
3600: x_okl_ins_products_tl_rec.creation_date := l_okl_ins_products_tl_rec.creation_date;
3601: END IF;
3602: IF (x_okl_ins_products_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
3603: THEN
3604: x_okl_ins_products_tl_rec.last_updated_by := l_okl_ins_products_tl_rec.last_updated_by;
3605: END IF;
3606: IF (x_okl_ins_products_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
3600: x_okl_ins_products_tl_rec.creation_date := l_okl_ins_products_tl_rec.creation_date;
3601: END IF;
3602: IF (x_okl_ins_products_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
3603: THEN
3604: x_okl_ins_products_tl_rec.last_updated_by := l_okl_ins_products_tl_rec.last_updated_by;
3605: END IF;
3606: IF (x_okl_ins_products_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
3607: THEN
3608: x_okl_ins_products_tl_rec.last_update_date := l_okl_ins_products_tl_rec.last_update_date;
3602: IF (x_okl_ins_products_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
3603: THEN
3604: x_okl_ins_products_tl_rec.last_updated_by := l_okl_ins_products_tl_rec.last_updated_by;
3605: END IF;
3606: IF (x_okl_ins_products_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
3607: THEN
3608: x_okl_ins_products_tl_rec.last_update_date := l_okl_ins_products_tl_rec.last_update_date;
3609: END IF;
3610: IF (x_okl_ins_products_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
3604: x_okl_ins_products_tl_rec.last_updated_by := l_okl_ins_products_tl_rec.last_updated_by;
3605: END IF;
3606: IF (x_okl_ins_products_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
3607: THEN
3608: x_okl_ins_products_tl_rec.last_update_date := l_okl_ins_products_tl_rec.last_update_date;
3609: END IF;
3610: IF (x_okl_ins_products_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
3611: THEN
3612: x_okl_ins_products_tl_rec.last_update_login := l_okl_ins_products_tl_rec.last_update_login;
3606: IF (x_okl_ins_products_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
3607: THEN
3608: x_okl_ins_products_tl_rec.last_update_date := l_okl_ins_products_tl_rec.last_update_date;
3609: END IF;
3610: IF (x_okl_ins_products_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
3611: THEN
3612: x_okl_ins_products_tl_rec.last_update_login := l_okl_ins_products_tl_rec.last_update_login;
3613: END IF;
3614: RETURN(l_return_status);
3608: x_okl_ins_products_tl_rec.last_update_date := l_okl_ins_products_tl_rec.last_update_date;
3609: END IF;
3610: IF (x_okl_ins_products_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
3611: THEN
3612: x_okl_ins_products_tl_rec.last_update_login := l_okl_ins_products_tl_rec.last_update_login;
3613: END IF;
3614: RETURN(l_return_status);
3615: END populate_new_record;
3616: --------------------------------------------
3613: END IF;
3614: RETURN(l_return_status);
3615: END populate_new_record;
3616: --------------------------------------------
3617: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
3618: --------------------------------------------
3619: FUNCTION Set_Attributes (
3620: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3621: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3616: --------------------------------------------
3617: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
3618: --------------------------------------------
3619: FUNCTION Set_Attributes (
3620: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3621: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3622: ) RETURN VARCHAR2 IS
3623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3624: BEGIN
3617: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
3618: --------------------------------------------
3619: FUNCTION Set_Attributes (
3620: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
3621: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3622: ) RETURN VARCHAR2 IS
3623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3624: BEGIN
3625: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3621: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
3622: ) RETURN VARCHAR2 IS
3623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3624: BEGIN
3625: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3626: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
3627: x_okl_ins_products_tl_rec.SOURCE_LANG := USERENV('LANG');
3628: RETURN(l_return_status);
3629: END Set_Attributes;
3622: ) RETURN VARCHAR2 IS
3623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3624: BEGIN
3625: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3626: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
3627: x_okl_ins_products_tl_rec.SOURCE_LANG := USERENV('LANG');
3628: RETURN(l_return_status);
3629: END Set_Attributes;
3630: BEGIN
3623: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3624: BEGIN
3625: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
3626: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
3627: x_okl_ins_products_tl_rec.SOURCE_LANG := USERENV('LANG');
3628: RETURN(l_return_status);
3629: END Set_Attributes;
3630: BEGIN
3631: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3638: RAISE OKC_API.G_EXCEPTION_ERROR;
3639: END IF;
3640: --- Setting item attributes
3641: l_return_status := Set_Attributes(
3642: p_okl_ins_products_tl_rec, -- IN
3643: l_okl_ins_products_tl_rec); -- OUT
3644: --- If any errors happen abort API
3645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3639: END IF;
3640: --- Setting item attributes
3641: l_return_status := Set_Attributes(
3642: p_okl_ins_products_tl_rec, -- IN
3643: l_okl_ins_products_tl_rec); -- OUT
3644: --- If any errors happen abort API
3645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3648: RAISE OKC_API.G_EXCEPTION_ERROR;
3649: END IF;
3650: l_return_status := populate_new_record(l_okl_ins_products_tl_rec, ldefoklinsproductstlrec);
3651: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3652: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3653: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3654: RAISE OKC_API.G_EXCEPTION_ERROR;
3652: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3653: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3654: RAISE OKC_API.G_EXCEPTION_ERROR;
3655: END IF;
3656: UPDATE OKL_INS_PRODUCTS_TL
3657: SET NAME = ldefoklinsproductstlrec.name,
3658: SOURCE_LANG = ldefoklinsproductstlrec.source_lang, -- Added for Bug 3637102
3659: FACTOR_NAME = ldefoklinsproductstlrec.factor_name,
3660: CREATED_BY = ldefoklinsproductstlrec.created_by,
3663: LAST_UPDATE_DATE = ldefoklinsproductstlrec.last_update_date,
3664: LAST_UPDATE_LOGIN = ldefoklinsproductstlrec.last_update_login
3665: WHERE ID = ldefoklinsproductstlrec.id
3666: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE); --Bug 3637102 Added language
3667: UPDATE OKL_INS_PRODUCTS_TL
3668: SET SFWT_FLAG = 'Y'
3669: WHERE ID = ldefoklinsproductstlrec.id
3670: AND SOURCE_LANG <> USERENV('LANG');
3671: x_okl_ins_products_tl_rec := ldefoklinsproductstlrec;
3667: UPDATE OKL_INS_PRODUCTS_TL
3668: SET SFWT_FLAG = 'Y'
3669: WHERE ID = ldefoklinsproductstlrec.id
3670: AND SOURCE_LANG <> USERENV('LANG');
3671: x_okl_ins_products_tl_rec := ldefoklinsproductstlrec;
3672: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3673: EXCEPTION
3674: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3675: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3717: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
3718: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3719: l_iptv_rec iptv_rec_type := p_iptv_rec;
3720: l_def_iptv_rec iptv_rec_type;
3721: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3722: lx_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3723: l_ipt_rec ipt_rec_type;
3724: lx_ipt_rec ipt_rec_type;
3725: -------------------------------
3718: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3719: l_iptv_rec iptv_rec_type := p_iptv_rec;
3720: l_def_iptv_rec iptv_rec_type;
3721: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3722: lx_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
3723: l_ipt_rec ipt_rec_type;
3724: lx_ipt_rec ipt_rec_type;
3725: -------------------------------
3726: -- FUNCTION fill_who_columns --
3973: END IF;
3974: --------------------------------------
3975: -- Move VIEW record to "Child" records
3976: --------------------------------------
3977: migrate(l_def_iptv_rec, l_okl_ins_products_tl_rec);
3978: migrate(l_def_iptv_rec, l_ipt_rec);
3979: --------------------------------------------
3980: -- Call the UPDATE_ROW for each child record
3981: --------------------------------------------
3983: p_init_msg_list,
3984: x_return_status,
3985: x_msg_count,
3986: x_msg_data,
3987: l_okl_ins_products_tl_rec,
3988: lx_okl_ins_products_tl_rec
3989: );
3990: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3991: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3984: x_return_status,
3985: x_msg_count,
3986: x_msg_data,
3987: l_okl_ins_products_tl_rec,
3988: lx_okl_ins_products_tl_rec
3989: );
3990: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3991: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3992: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3991: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3992: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3993: RAISE OKC_API.G_EXCEPTION_ERROR;
3994: END IF;
3995: migrate(lx_okl_ins_products_tl_rec, l_def_iptv_rec);
3996: update_row(
3997: p_init_msg_list,
3998: x_return_status,
3999: x_msg_count,
4168: '_PVT'
4169: );
4170: END delete_row;
4171: ----------------------------------------
4172: -- delete_row for:OKL_INS_PRODUCTS_TL --
4173: ----------------------------------------
4174: PROCEDURE delete_row(
4175: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4176: x_return_status OUT NOCOPY VARCHAR2,
4175: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4176: x_return_status OUT NOCOPY VARCHAR2,
4177: x_msg_count OUT NOCOPY NUMBER,
4178: x_msg_data OUT NOCOPY VARCHAR2,
4179: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
4180: l_api_version CONSTANT NUMBER := 1;
4181: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
4182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4183: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type:= p_okl_ins_products_tl_rec;
4179: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type) IS
4180: l_api_version CONSTANT NUMBER := 1;
4181: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
4182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4183: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type:= p_okl_ins_products_tl_rec;
4184: l_row_notfound BOOLEAN := TRUE;
4185: --------------------------------------------
4186: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
4187: --------------------------------------------
4182: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4183: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type:= p_okl_ins_products_tl_rec;
4184: l_row_notfound BOOLEAN := TRUE;
4185: --------------------------------------------
4186: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
4187: --------------------------------------------
4188: FUNCTION Set_Attributes (
4189: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
4190: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
4185: --------------------------------------------
4186: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
4187: --------------------------------------------
4188: FUNCTION Set_Attributes (
4189: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
4190: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
4191: ) RETURN VARCHAR2 IS
4192: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4193: BEGIN
4186: -- Set_Attributes for:OKL_INS_PRODUCTS_TL --
4187: --------------------------------------------
4188: FUNCTION Set_Attributes (
4189: p_okl_ins_products_tl_rec IN okl_ins_products_tl_rec_type,
4190: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
4191: ) RETURN VARCHAR2 IS
4192: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4193: BEGIN
4194: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
4190: x_okl_ins_products_tl_rec OUT NOCOPY okl_ins_products_tl_rec_type
4191: ) RETURN VARCHAR2 IS
4192: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4193: BEGIN
4194: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
4195: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
4196: RETURN(l_return_status);
4197: END Set_Attributes;
4198: BEGIN
4191: ) RETURN VARCHAR2 IS
4192: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4193: BEGIN
4194: x_okl_ins_products_tl_rec := p_okl_ins_products_tl_rec;
4195: x_okl_ins_products_tl_rec.LANGUAGE := USERENV('LANG');
4196: RETURN(l_return_status);
4197: END Set_Attributes;
4198: BEGIN
4199: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4206: RAISE OKC_API.G_EXCEPTION_ERROR;
4207: END IF;
4208: --- Setting item attributes
4209: l_return_status := Set_Attributes(
4210: p_okl_ins_products_tl_rec, -- IN
4211: l_okl_ins_products_tl_rec); -- OUT
4212: --- If any errors happen abort API
4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4207: END IF;
4208: --- Setting item attributes
4209: l_return_status := Set_Attributes(
4210: p_okl_ins_products_tl_rec, -- IN
4211: l_okl_ins_products_tl_rec); -- OUT
4212: --- If any errors happen abort API
4213: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4214: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4216: RAISE OKC_API.G_EXCEPTION_ERROR;
4217: END IF;
4218: DELETE FROM OKL_INS_PRODUCTS_TL
4219: WHERE ID = l_okl_ins_products_tl_rec.id;
4220: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4221: EXCEPTION
4222: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4215: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4216: RAISE OKC_API.G_EXCEPTION_ERROR;
4217: END IF;
4218: DELETE FROM OKL_INS_PRODUCTS_TL
4219: WHERE ID = l_okl_ins_products_tl_rec.id;
4220: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4221: EXCEPTION
4222: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4223: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4263: l_api_version CONSTANT NUMBER := 1;
4264: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
4265: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4266: l_iptv_rec iptv_rec_type := p_iptv_rec;
4267: l_okl_ins_products_tl_rec okl_ins_products_tl_rec_type;
4268: l_ipt_rec ipt_rec_type;
4269: BEGIN
4270: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4271: G_PKG_NAME,
4281: END IF;
4282: --------------------------------------
4283: -- Move VIEW record to "Child" records
4284: --------------------------------------
4285: migrate(l_iptv_rec, l_okl_ins_products_tl_rec);
4286: migrate(l_iptv_rec, l_ipt_rec);
4287: --------------------------------------------
4288: -- Call the DELETE_ROW for each child record
4289: --------------------------------------------
4291: p_init_msg_list,
4292: x_return_status,
4293: x_msg_count,
4294: x_msg_data,
4295: l_okl_ins_products_tl_rec
4296: );
4297: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4298: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4299: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN