36: -- PROCEDURE add_language
37: ---------------------------------------------------------------------------
38: PROCEDURE add_language IS
39: BEGIN
40: DELETE FROM OKL_PARAMETERS_TL T
41: WHERE NOT EXISTS (
42: SELECT NULL
43: FROM OKL_PARAMETERS_B B --fixed bug 3321017 by kmotepal
44: WHERE B.ID = T.ID
43: FROM OKL_PARAMETERS_B B --fixed bug 3321017 by kmotepal
44: WHERE B.ID = T.ID
45: );
46:
47: UPDATE OKL_PARAMETERS_TL T SET (
48: DESCRIPTION) = (SELECT
49: B.DESCRIPTION
50: FROM OKL_PARAMETERS_TL B
51: WHERE B.ID = T.ID
46:
47: UPDATE OKL_PARAMETERS_TL T SET (
48: DESCRIPTION) = (SELECT
49: B.DESCRIPTION
50: FROM OKL_PARAMETERS_TL B
51: WHERE B.ID = T.ID
52: AND B.LANGUAGE = T.SOURCE_LANG)
53: WHERE (
54: T.ID,
55: T.LANGUAGE)
56: IN (SELECT
57: SUBT.ID,
58: SUBT.LANGUAGE
59: FROM OKL_PARAMETERS_TL SUBB, OKL_PARAMETERS_TL SUBT
60: WHERE SUBB.ID = SUBT.ID
61: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
62: AND (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
63: OR (SUBB.DESCRIPTION IS NULL AND SUBT.DESCRIPTION IS NOT NULL)
63: OR (SUBB.DESCRIPTION IS NULL AND SUBT.DESCRIPTION IS NOT NULL)
64: OR (SUBB.DESCRIPTION IS NOT NULL AND SUBT.DESCRIPTION IS NULL)
65: ));
66:
67: INSERT INTO OKL_PARAMETERS_TL (
68: ID,
69: LANGUAGE,
70: SOURCE_LANG,
71: SFWT_FLAG,
85: B.CREATION_DATE,
86: B.LAST_UPDATED_BY,
87: B.LAST_UPDATE_DATE,
88: B.LAST_UPDATE_LOGIN
89: FROM OKL_PARAMETERS_TL B, FND_LANGUAGES L
90: WHERE L.INSTALLED_FLAG IN ('I', 'B')
91: AND B.LANGUAGE = USERENV('LANG')
92: AND NOT EXISTS(
93: SELECT NULL
90: WHERE L.INSTALLED_FLAG IN ('I', 'B')
91: AND B.LANGUAGE = USERENV('LANG')
92: AND NOT EXISTS(
93: SELECT NULL
94: FROM OKL_PARAMETERS_TL T
95: WHERE T.ID = B.ID
96: AND T.LANGUAGE = L.LANGUAGE_CODE
97: );
98:
148: BEGIN
149: RETURN(get_rec(p_pmr_rec, l_row_notfound));
150: END get_rec;
151: ---------------------------------------------------------------------------
152: -- FUNCTION get_rec for: OKL_PARAMETERS_TL
153: ---------------------------------------------------------------------------
154: FUNCTION get_rec (
155: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
156: x_no_data_found OUT NOCOPY BOOLEAN
151: ---------------------------------------------------------------------------
152: -- FUNCTION get_rec for: OKL_PARAMETERS_TL
153: ---------------------------------------------------------------------------
154: FUNCTION get_rec (
155: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
156: x_no_data_found OUT NOCOPY BOOLEAN
157: ) RETURN okl_parameters_tl_rec_type IS
158: CURSOR okl_parameters_tl_pk_csr (p_id IN NUMBER,
159: p_language IN VARCHAR2) IS
153: ---------------------------------------------------------------------------
154: FUNCTION get_rec (
155: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
156: x_no_data_found OUT NOCOPY BOOLEAN
157: ) RETURN okl_parameters_tl_rec_type IS
158: CURSOR okl_parameters_tl_pk_csr (p_id IN NUMBER,
159: p_language IN VARCHAR2) IS
160: SELECT
161: ID,
154: FUNCTION get_rec (
155: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
156: x_no_data_found OUT NOCOPY BOOLEAN
157: ) RETURN okl_parameters_tl_rec_type IS
158: CURSOR okl_parameters_tl_pk_csr (p_id IN NUMBER,
159: p_language IN VARCHAR2) IS
160: SELECT
161: ID,
162: LANGUAGE,
167: CREATION_DATE,
168: LAST_UPDATED_BY,
169: LAST_UPDATE_DATE,
170: LAST_UPDATE_LOGIN
171: FROM Okl_Parameters_Tl
172: WHERE okl_parameters_tl.id = p_id
173: AND okl_parameters_tl.language = p_language;
174: l_okl_parameters_tl_pk okl_parameters_tl_pk_csr%ROWTYPE;
175: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
168: LAST_UPDATED_BY,
169: LAST_UPDATE_DATE,
170: LAST_UPDATE_LOGIN
171: FROM Okl_Parameters_Tl
172: WHERE okl_parameters_tl.id = p_id
173: AND okl_parameters_tl.language = p_language;
174: l_okl_parameters_tl_pk okl_parameters_tl_pk_csr%ROWTYPE;
175: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
176: BEGIN
169: LAST_UPDATE_DATE,
170: LAST_UPDATE_LOGIN
171: FROM Okl_Parameters_Tl
172: WHERE okl_parameters_tl.id = p_id
173: AND okl_parameters_tl.language = p_language;
174: l_okl_parameters_tl_pk okl_parameters_tl_pk_csr%ROWTYPE;
175: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
176: BEGIN
177: x_no_data_found := TRUE;
170: LAST_UPDATE_LOGIN
171: FROM Okl_Parameters_Tl
172: WHERE okl_parameters_tl.id = p_id
173: AND okl_parameters_tl.language = p_language;
174: l_okl_parameters_tl_pk okl_parameters_tl_pk_csr%ROWTYPE;
175: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
176: BEGIN
177: x_no_data_found := TRUE;
178: -- Get current database values
171: FROM Okl_Parameters_Tl
172: WHERE okl_parameters_tl.id = p_id
173: AND okl_parameters_tl.language = p_language;
174: l_okl_parameters_tl_pk okl_parameters_tl_pk_csr%ROWTYPE;
175: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
176: BEGIN
177: x_no_data_found := TRUE;
178: -- Get current database values
179: OPEN okl_parameters_tl_pk_csr (p_okl_parameters_tl_rec.id,
175: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
176: BEGIN
177: x_no_data_found := TRUE;
178: -- Get current database values
179: OPEN okl_parameters_tl_pk_csr (p_okl_parameters_tl_rec.id,
180: p_okl_parameters_tl_rec.language);
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
176: BEGIN
177: x_no_data_found := TRUE;
178: -- Get current database values
179: OPEN okl_parameters_tl_pk_csr (p_okl_parameters_tl_rec.id,
180: p_okl_parameters_tl_rec.language);
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
177: x_no_data_found := TRUE;
178: -- Get current database values
179: OPEN okl_parameters_tl_pk_csr (p_okl_parameters_tl_rec.id,
180: p_okl_parameters_tl_rec.language);
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
178: -- Get current database values
179: OPEN okl_parameters_tl_pk_csr (p_okl_parameters_tl_rec.id,
180: p_okl_parameters_tl_rec.language);
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
179: OPEN okl_parameters_tl_pk_csr (p_okl_parameters_tl_rec.id,
180: p_okl_parameters_tl_rec.language);
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
180: p_okl_parameters_tl_rec.language);
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
181: FETCH okl_parameters_tl_pk_csr INTO
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
182: l_okl_parameters_tl_rec.ID,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
183: l_okl_parameters_tl_rec.LANGUAGE,
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
184: l_okl_parameters_tl_rec.SOURCE_LANG,
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
185: l_okl_parameters_tl_rec.SFWT_FLAG,
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
193: CLOSE okl_parameters_tl_pk_csr;
186: l_okl_parameters_tl_rec.DESCRIPTION,
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
193: CLOSE okl_parameters_tl_pk_csr;
194: RETURN(l_okl_parameters_tl_rec);
187: l_okl_parameters_tl_rec.CREATED_BY,
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
193: CLOSE okl_parameters_tl_pk_csr;
194: RETURN(l_okl_parameters_tl_rec);
195: END get_rec;
188: l_okl_parameters_tl_rec.CREATION_DATE,
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
193: CLOSE okl_parameters_tl_pk_csr;
194: RETURN(l_okl_parameters_tl_rec);
195: END get_rec;
196:
189: l_okl_parameters_tl_rec.LAST_UPDATED_BY,
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
193: CLOSE okl_parameters_tl_pk_csr;
194: RETURN(l_okl_parameters_tl_rec);
195: END get_rec;
196:
197: FUNCTION get_rec (
190: l_okl_parameters_tl_rec.LAST_UPDATE_DATE,
191: l_okl_parameters_tl_rec.LAST_UPDATE_LOGIN;
192: x_no_data_found := okl_parameters_tl_pk_csr%NOTFOUND;
193: CLOSE okl_parameters_tl_pk_csr;
194: RETURN(l_okl_parameters_tl_rec);
195: END get_rec;
196:
197: FUNCTION get_rec (
198: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type
194: RETURN(l_okl_parameters_tl_rec);
195: END get_rec;
196:
197: FUNCTION get_rec (
198: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type
199: ) RETURN okl_parameters_tl_rec_type IS
200: l_row_notfound BOOLEAN := TRUE;
201: BEGIN
202: RETURN(get_rec(p_okl_parameters_tl_rec, l_row_notfound));
195: END get_rec;
196:
197: FUNCTION get_rec (
198: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type
199: ) RETURN okl_parameters_tl_rec_type IS
200: l_row_notfound BOOLEAN := TRUE;
201: BEGIN
202: RETURN(get_rec(p_okl_parameters_tl_rec, l_row_notfound));
203: END get_rec;
198: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type
199: ) RETURN okl_parameters_tl_rec_type IS
200: l_row_notfound BOOLEAN := TRUE;
201: BEGIN
202: RETURN(get_rec(p_okl_parameters_tl_rec, l_row_notfound));
203: END get_rec;
204: ---------------------------------------------------------------------------
205: -- FUNCTION get_rec for: OKL_PARAMETERS_V
206: ---------------------------------------------------------------------------
991: p_to.last_update_login := p_from.last_update_login;
992: END migrate;
993: PROCEDURE migrate (
994: p_from IN pmrv_rec_type,
995: p_to OUT NOCOPY okl_parameters_tl_rec_type
996: ) IS
997: BEGIN
998: p_to.id := p_from.id;
999: p_to.sfwt_flag := p_from.sfwt_flag;
1004: p_to.last_update_date := p_from.last_update_date;
1005: p_to.last_update_login := p_from.last_update_login;
1006: END migrate;
1007: PROCEDURE migrate (
1008: p_from IN okl_parameters_tl_rec_type,
1009: p_to OUT NOCOPY pmrv_rec_type
1010: ) IS
1011: BEGIN
1012: p_to.id := p_from.id;
1037: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
1038: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1039: l_pmrv_rec pmrv_rec_type := p_pmrv_rec;
1040: l_pmr_rec pmr_rec_type;
1041: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1042: BEGIN
1043: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1044: G_PKG_NAME,
1045: p_init_msg_list,
1284: '_PVT'
1285: );
1286: END insert_row;
1287: --------------------------------------
1288: -- insert_row for:OKL_PARAMETERS_TL --
1289: --------------------------------------
1290: PROCEDURE insert_row(
1291: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1292: x_return_status OUT NOCOPY VARCHAR2,
1291: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1292: x_return_status OUT NOCOPY VARCHAR2,
1293: x_msg_count OUT NOCOPY NUMBER,
1294: x_msg_data OUT NOCOPY VARCHAR2,
1295: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
1296: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type) IS
1297:
1298: l_api_version CONSTANT NUMBER := 1;
1299: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1292: x_return_status OUT NOCOPY VARCHAR2,
1293: x_msg_count OUT NOCOPY NUMBER,
1294: x_msg_data OUT NOCOPY VARCHAR2,
1295: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
1296: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type) IS
1297:
1298: l_api_version CONSTANT NUMBER := 1;
1299: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1300: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1297:
1298: l_api_version CONSTANT NUMBER := 1;
1299: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1300: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1301: l_okl_parameters_tl_rec okl_parameters_tl_rec_type := p_okl_parameters_tl_rec;
1302: l_def_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1303: CURSOR get_languages IS
1304: SELECT *
1305: FROM FND_LANGUAGES
1298: l_api_version CONSTANT NUMBER := 1;
1299: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1300: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1301: l_okl_parameters_tl_rec okl_parameters_tl_rec_type := p_okl_parameters_tl_rec;
1302: l_def_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1303: CURSOR get_languages IS
1304: SELECT *
1305: FROM FND_LANGUAGES
1306: WHERE INSTALLED_FLAG IN ('I', 'B');
1304: SELECT *
1305: FROM FND_LANGUAGES
1306: WHERE INSTALLED_FLAG IN ('I', 'B');
1307: ------------------------------------------
1308: -- Set_Attributes for:OKL_PARAMETERS_TL --
1309: ------------------------------------------
1310: FUNCTION Set_Attributes (
1311: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
1312: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
1307: ------------------------------------------
1308: -- Set_Attributes for:OKL_PARAMETERS_TL --
1309: ------------------------------------------
1310: FUNCTION Set_Attributes (
1311: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
1312: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
1313: ) RETURN VARCHAR2 IS
1314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1315: BEGIN
1308: -- Set_Attributes for:OKL_PARAMETERS_TL --
1309: ------------------------------------------
1310: FUNCTION Set_Attributes (
1311: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
1312: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
1313: ) RETURN VARCHAR2 IS
1314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1315: BEGIN
1316: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
1312: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
1313: ) RETURN VARCHAR2 IS
1314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1315: BEGIN
1316: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
1317: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
1318: x_okl_parameters_tl_rec.SOURCE_LANG := USERENV('LANG');
1319: RETURN(l_return_status);
1320: END Set_Attributes;
1313: ) RETURN VARCHAR2 IS
1314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1315: BEGIN
1316: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
1317: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
1318: x_okl_parameters_tl_rec.SOURCE_LANG := USERENV('LANG');
1319: RETURN(l_return_status);
1320: END Set_Attributes;
1321: BEGIN
1314: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1315: BEGIN
1316: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
1317: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
1318: x_okl_parameters_tl_rec.SOURCE_LANG := USERENV('LANG');
1319: RETURN(l_return_status);
1320: END Set_Attributes;
1321: BEGIN
1322: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1329: RAISE OKC_API.G_EXCEPTION_ERROR;
1330: END IF;
1331: --- Setting item attributes
1332: l_return_status := Set_Attributes(
1333: p_okl_parameters_tl_rec, -- IN
1334: l_okl_parameters_tl_rec); -- OUT
1335: --- If any errors happen abort API
1336: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1337: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1330: END IF;
1331: --- Setting item attributes
1332: l_return_status := Set_Attributes(
1333: p_okl_parameters_tl_rec, -- IN
1334: l_okl_parameters_tl_rec); -- OUT
1335: --- If any errors happen abort API
1336: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1337: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1338: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1338: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1339: RAISE OKC_API.G_EXCEPTION_ERROR;
1340: END IF;
1341: FOR l_lang_rec IN get_languages LOOP
1342: l_okl_parameters_tl_rec.language := l_lang_rec.language_code;
1343: INSERT INTO OKL_PARAMETERS_TL(
1344: id,
1345: language,
1346: source_lang,
1339: RAISE OKC_API.G_EXCEPTION_ERROR;
1340: END IF;
1341: FOR l_lang_rec IN get_languages LOOP
1342: l_okl_parameters_tl_rec.language := l_lang_rec.language_code;
1343: INSERT INTO OKL_PARAMETERS_TL(
1344: id,
1345: language,
1346: source_lang,
1347: sfwt_flag,
1351: last_updated_by,
1352: last_update_date,
1353: last_update_login)
1354: VALUES (
1355: l_okl_parameters_tl_rec.id,
1356: l_okl_parameters_tl_rec.language,
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1352: last_update_date,
1353: last_update_login)
1354: VALUES (
1355: l_okl_parameters_tl_rec.id,
1356: l_okl_parameters_tl_rec.language,
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1353: last_update_login)
1354: VALUES (
1355: l_okl_parameters_tl_rec.id,
1356: l_okl_parameters_tl_rec.language,
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1354: VALUES (
1355: l_okl_parameters_tl_rec.id,
1356: l_okl_parameters_tl_rec.language,
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1355: l_okl_parameters_tl_rec.id,
1356: l_okl_parameters_tl_rec.language,
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1363: l_okl_parameters_tl_rec.last_update_date,
1356: l_okl_parameters_tl_rec.language,
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1363: l_okl_parameters_tl_rec.last_update_date,
1364: l_okl_parameters_tl_rec.last_update_login);
1357: l_okl_parameters_tl_rec.source_lang,
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1363: l_okl_parameters_tl_rec.last_update_date,
1364: l_okl_parameters_tl_rec.last_update_login);
1365: END LOOP;
1358: l_okl_parameters_tl_rec.sfwt_flag,
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1363: l_okl_parameters_tl_rec.last_update_date,
1364: l_okl_parameters_tl_rec.last_update_login);
1365: END LOOP;
1366: -- Set OUT values
1359: l_okl_parameters_tl_rec.description,
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1363: l_okl_parameters_tl_rec.last_update_date,
1364: l_okl_parameters_tl_rec.last_update_login);
1365: END LOOP;
1366: -- Set OUT values
1367: x_okl_parameters_tl_rec := l_okl_parameters_tl_rec;
1360: l_okl_parameters_tl_rec.created_by,
1361: l_okl_parameters_tl_rec.creation_date,
1362: l_okl_parameters_tl_rec.last_updated_by,
1363: l_okl_parameters_tl_rec.last_update_date,
1364: l_okl_parameters_tl_rec.last_update_login);
1365: END LOOP;
1366: -- Set OUT values
1367: x_okl_parameters_tl_rec := l_okl_parameters_tl_rec;
1368: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1363: l_okl_parameters_tl_rec.last_update_date,
1364: l_okl_parameters_tl_rec.last_update_login);
1365: END LOOP;
1366: -- Set OUT values
1367: x_okl_parameters_tl_rec := l_okl_parameters_tl_rec;
1368: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1369: EXCEPTION
1370: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1371: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1416: l_pmrv_rec pmrv_rec_type;
1417: l_def_pmrv_rec pmrv_rec_type;
1418: l_pmr_rec pmr_rec_type;
1419: lx_pmr_rec pmr_rec_type;
1420: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1421: lx_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1422: -------------------------------
1423: -- FUNCTION fill_who_columns --
1424: -------------------------------
1417: l_def_pmrv_rec pmrv_rec_type;
1418: l_pmr_rec pmr_rec_type;
1419: lx_pmr_rec pmr_rec_type;
1420: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1421: lx_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1422: -------------------------------
1423: -- FUNCTION fill_who_columns --
1424: -------------------------------
1425: FUNCTION fill_who_columns (
1492: --------------------------------------
1493: -- Move VIEW record to "Child" records
1494: --------------------------------------
1495: migrate(l_def_pmrv_rec, l_pmr_rec);
1496: migrate(l_def_pmrv_rec, l_okl_parameters_tl_rec);
1497: --------------------------------------------
1498: -- Call the INSERT_ROW for each child record
1499: --------------------------------------------
1500: insert_row(
1515: p_init_msg_list,
1516: x_return_status,
1517: x_msg_count,
1518: x_msg_data,
1519: l_okl_parameters_tl_rec,
1520: lx_okl_parameters_tl_rec
1521: );
1522: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1523: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1516: x_return_status,
1517: x_msg_count,
1518: x_msg_data,
1519: l_okl_parameters_tl_rec,
1520: lx_okl_parameters_tl_rec
1521: );
1522: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1523: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1524: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1523: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1524: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1525: RAISE OKC_API.G_EXCEPTION_ERROR;
1526: END IF;
1527: migrate(lx_okl_parameters_tl_rec, l_def_pmrv_rec);
1528: -- Set OUT values
1529: x_pmrv_rec := l_def_pmrv_rec;
1530: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1531: EXCEPTION
1748: '_PVT'
1749: );
1750: END lock_row;
1751: ------------------------------------
1752: -- lock_row for:OKL_PARAMETERS_TL --
1753: ------------------------------------
1754: PROCEDURE lock_row(
1755: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1756: x_return_status OUT NOCOPY VARCHAR2,
1755: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1756: x_return_status OUT NOCOPY VARCHAR2,
1757: x_msg_count OUT NOCOPY NUMBER,
1758: x_msg_data OUT NOCOPY VARCHAR2,
1759: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
1760:
1761: E_Resource_Busy EXCEPTION;
1762: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1763: CURSOR lock_csr (p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
1759: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
1760:
1761: E_Resource_Busy EXCEPTION;
1762: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1763: CURSOR lock_csr (p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
1764: SELECT *
1765: FROM OKL_PARAMETERS_TL
1766: WHERE ID = p_okl_parameters_tl_rec.id
1767: FOR UPDATE NOWAIT;
1761: E_Resource_Busy EXCEPTION;
1762: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1763: CURSOR lock_csr (p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
1764: SELECT *
1765: FROM OKL_PARAMETERS_TL
1766: WHERE ID = p_okl_parameters_tl_rec.id
1767: FOR UPDATE NOWAIT;
1768:
1769: l_api_version CONSTANT NUMBER := 1;
1762: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1763: CURSOR lock_csr (p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
1764: SELECT *
1765: FROM OKL_PARAMETERS_TL
1766: WHERE ID = p_okl_parameters_tl_rec.id
1767: FOR UPDATE NOWAIT;
1768:
1769: l_api_version CONSTANT NUMBER := 1;
1770: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
1782: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1783: RAISE OKC_API.G_EXCEPTION_ERROR;
1784: END IF;
1785: BEGIN
1786: OPEN lock_csr(p_okl_parameters_tl_rec);
1787: FETCH lock_csr INTO l_lock_var;
1788: l_row_notfound := lock_csr%NOTFOUND;
1789: CLOSE lock_csr;
1790: EXCEPTION
1847: l_api_version CONSTANT NUMBER := 1;
1848: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1849: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1850: l_pmr_rec pmr_rec_type;
1851: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
1852: BEGIN
1853: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1854: G_PKG_NAME,
1855: p_init_msg_list,
1865: --------------------------------------
1866: -- Move VIEW record to "Child" records
1867: --------------------------------------
1868: migrate(p_pmrv_rec, l_pmr_rec);
1869: migrate(p_pmrv_rec, l_okl_parameters_tl_rec);
1870: --------------------------------------------
1871: -- Call the LOCK_ROW for each child record
1872: --------------------------------------------
1873: lock_row(
1886: p_init_msg_list,
1887: x_return_status,
1888: x_msg_count,
1889: x_msg_data,
1890: l_okl_parameters_tl_rec
1891: );
1892: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1893: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1894: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2167: '_PVT'
2168: );
2169: END update_row;
2170: --------------------------------------
2171: -- update_row for:OKL_PARAMETERS_TL --
2172: --------------------------------------
2173: PROCEDURE update_row(
2174: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2175: x_return_status OUT NOCOPY VARCHAR2,
2174: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2175: x_return_status OUT NOCOPY VARCHAR2,
2176: x_msg_count OUT NOCOPY NUMBER,
2177: x_msg_data OUT NOCOPY VARCHAR2,
2178: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2179: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type) IS
2180:
2181: l_api_version CONSTANT NUMBER := 1;
2182: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2175: x_return_status OUT NOCOPY VARCHAR2,
2176: x_msg_count OUT NOCOPY NUMBER,
2177: x_msg_data OUT NOCOPY VARCHAR2,
2178: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2179: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type) IS
2180:
2181: l_api_version CONSTANT NUMBER := 1;
2182: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2183: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2180:
2181: l_api_version CONSTANT NUMBER := 1;
2182: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2183: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2184: l_okl_parameters_tl_rec okl_parameters_tl_rec_type := p_okl_parameters_tl_rec;
2185: l_def_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2186: l_row_notfound BOOLEAN := TRUE;
2187: ----------------------------------
2188: -- FUNCTION populate_new_record --
2181: l_api_version CONSTANT NUMBER := 1;
2182: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2183: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2184: l_okl_parameters_tl_rec okl_parameters_tl_rec_type := p_okl_parameters_tl_rec;
2185: l_def_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2186: l_row_notfound BOOLEAN := TRUE;
2187: ----------------------------------
2188: -- FUNCTION populate_new_record --
2189: ----------------------------------
2187: ----------------------------------
2188: -- FUNCTION populate_new_record --
2189: ----------------------------------
2190: FUNCTION populate_new_record (
2191: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2192: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2193: ) RETURN VARCHAR2 IS
2194: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2195: l_row_notfound BOOLEAN := TRUE;
2188: -- FUNCTION populate_new_record --
2189: ----------------------------------
2190: FUNCTION populate_new_record (
2191: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2192: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2193: ) RETURN VARCHAR2 IS
2194: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2195: l_row_notfound BOOLEAN := TRUE;
2196: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2190: FUNCTION populate_new_record (
2191: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2192: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2193: ) RETURN VARCHAR2 IS
2194: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2195: l_row_notfound BOOLEAN := TRUE;
2196: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2197: BEGIN
2198: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2194: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2195: l_row_notfound BOOLEAN := TRUE;
2196: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2197: BEGIN
2198: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2199: -- Get current database values
2200: l_okl_parameters_tl_rec := get_rec(p_okl_parameters_tl_rec, l_row_notfound);
2201: IF (l_row_notfound) THEN
2202: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2196: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2197: BEGIN
2198: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2199: -- Get current database values
2200: l_okl_parameters_tl_rec := get_rec(p_okl_parameters_tl_rec, l_row_notfound);
2201: IF (l_row_notfound) THEN
2202: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2203: END IF;
2204: IF (x_okl_parameters_tl_rec.id = OKC_API.G_MISS_NUM)
2200: l_okl_parameters_tl_rec := get_rec(p_okl_parameters_tl_rec, l_row_notfound);
2201: IF (l_row_notfound) THEN
2202: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2203: END IF;
2204: IF (x_okl_parameters_tl_rec.id = OKC_API.G_MISS_NUM)
2205: THEN
2206: x_okl_parameters_tl_rec.id := l_okl_parameters_tl_rec.id;
2207: END IF;
2208: IF (x_okl_parameters_tl_rec.language = OKC_API.G_MISS_CHAR)
2202: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2203: END IF;
2204: IF (x_okl_parameters_tl_rec.id = OKC_API.G_MISS_NUM)
2205: THEN
2206: x_okl_parameters_tl_rec.id := l_okl_parameters_tl_rec.id;
2207: END IF;
2208: IF (x_okl_parameters_tl_rec.language = OKC_API.G_MISS_CHAR)
2209: THEN
2210: x_okl_parameters_tl_rec.language := l_okl_parameters_tl_rec.language;
2204: IF (x_okl_parameters_tl_rec.id = OKC_API.G_MISS_NUM)
2205: THEN
2206: x_okl_parameters_tl_rec.id := l_okl_parameters_tl_rec.id;
2207: END IF;
2208: IF (x_okl_parameters_tl_rec.language = OKC_API.G_MISS_CHAR)
2209: THEN
2210: x_okl_parameters_tl_rec.language := l_okl_parameters_tl_rec.language;
2211: END IF;
2212: IF (x_okl_parameters_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2206: x_okl_parameters_tl_rec.id := l_okl_parameters_tl_rec.id;
2207: END IF;
2208: IF (x_okl_parameters_tl_rec.language = OKC_API.G_MISS_CHAR)
2209: THEN
2210: x_okl_parameters_tl_rec.language := l_okl_parameters_tl_rec.language;
2211: END IF;
2212: IF (x_okl_parameters_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2213: THEN
2214: x_okl_parameters_tl_rec.source_lang := l_okl_parameters_tl_rec.source_lang;
2208: IF (x_okl_parameters_tl_rec.language = OKC_API.G_MISS_CHAR)
2209: THEN
2210: x_okl_parameters_tl_rec.language := l_okl_parameters_tl_rec.language;
2211: END IF;
2212: IF (x_okl_parameters_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2213: THEN
2214: x_okl_parameters_tl_rec.source_lang := l_okl_parameters_tl_rec.source_lang;
2215: END IF;
2216: IF (x_okl_parameters_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2210: x_okl_parameters_tl_rec.language := l_okl_parameters_tl_rec.language;
2211: END IF;
2212: IF (x_okl_parameters_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2213: THEN
2214: x_okl_parameters_tl_rec.source_lang := l_okl_parameters_tl_rec.source_lang;
2215: END IF;
2216: IF (x_okl_parameters_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2217: THEN
2218: x_okl_parameters_tl_rec.sfwt_flag := l_okl_parameters_tl_rec.sfwt_flag;
2212: IF (x_okl_parameters_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
2213: THEN
2214: x_okl_parameters_tl_rec.source_lang := l_okl_parameters_tl_rec.source_lang;
2215: END IF;
2216: IF (x_okl_parameters_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2217: THEN
2218: x_okl_parameters_tl_rec.sfwt_flag := l_okl_parameters_tl_rec.sfwt_flag;
2219: END IF;
2220: IF (x_okl_parameters_tl_rec.description = OKC_API.G_MISS_CHAR)
2214: x_okl_parameters_tl_rec.source_lang := l_okl_parameters_tl_rec.source_lang;
2215: END IF;
2216: IF (x_okl_parameters_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2217: THEN
2218: x_okl_parameters_tl_rec.sfwt_flag := l_okl_parameters_tl_rec.sfwt_flag;
2219: END IF;
2220: IF (x_okl_parameters_tl_rec.description = OKC_API.G_MISS_CHAR)
2221: THEN
2222: x_okl_parameters_tl_rec.description := l_okl_parameters_tl_rec.description;
2216: IF (x_okl_parameters_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
2217: THEN
2218: x_okl_parameters_tl_rec.sfwt_flag := l_okl_parameters_tl_rec.sfwt_flag;
2219: END IF;
2220: IF (x_okl_parameters_tl_rec.description = OKC_API.G_MISS_CHAR)
2221: THEN
2222: x_okl_parameters_tl_rec.description := l_okl_parameters_tl_rec.description;
2223: END IF;
2224: IF (x_okl_parameters_tl_rec.created_by = OKC_API.G_MISS_NUM)
2218: x_okl_parameters_tl_rec.sfwt_flag := l_okl_parameters_tl_rec.sfwt_flag;
2219: END IF;
2220: IF (x_okl_parameters_tl_rec.description = OKC_API.G_MISS_CHAR)
2221: THEN
2222: x_okl_parameters_tl_rec.description := l_okl_parameters_tl_rec.description;
2223: END IF;
2224: IF (x_okl_parameters_tl_rec.created_by = OKC_API.G_MISS_NUM)
2225: THEN
2226: x_okl_parameters_tl_rec.created_by := l_okl_parameters_tl_rec.created_by;
2220: IF (x_okl_parameters_tl_rec.description = OKC_API.G_MISS_CHAR)
2221: THEN
2222: x_okl_parameters_tl_rec.description := l_okl_parameters_tl_rec.description;
2223: END IF;
2224: IF (x_okl_parameters_tl_rec.created_by = OKC_API.G_MISS_NUM)
2225: THEN
2226: x_okl_parameters_tl_rec.created_by := l_okl_parameters_tl_rec.created_by;
2227: END IF;
2228: IF (x_okl_parameters_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2222: x_okl_parameters_tl_rec.description := l_okl_parameters_tl_rec.description;
2223: END IF;
2224: IF (x_okl_parameters_tl_rec.created_by = OKC_API.G_MISS_NUM)
2225: THEN
2226: x_okl_parameters_tl_rec.created_by := l_okl_parameters_tl_rec.created_by;
2227: END IF;
2228: IF (x_okl_parameters_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2229: THEN
2230: x_okl_parameters_tl_rec.creation_date := l_okl_parameters_tl_rec.creation_date;
2224: IF (x_okl_parameters_tl_rec.created_by = OKC_API.G_MISS_NUM)
2225: THEN
2226: x_okl_parameters_tl_rec.created_by := l_okl_parameters_tl_rec.created_by;
2227: END IF;
2228: IF (x_okl_parameters_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2229: THEN
2230: x_okl_parameters_tl_rec.creation_date := l_okl_parameters_tl_rec.creation_date;
2231: END IF;
2232: IF (x_okl_parameters_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2226: x_okl_parameters_tl_rec.created_by := l_okl_parameters_tl_rec.created_by;
2227: END IF;
2228: IF (x_okl_parameters_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2229: THEN
2230: x_okl_parameters_tl_rec.creation_date := l_okl_parameters_tl_rec.creation_date;
2231: END IF;
2232: IF (x_okl_parameters_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2233: THEN
2234: x_okl_parameters_tl_rec.last_updated_by := l_okl_parameters_tl_rec.last_updated_by;
2228: IF (x_okl_parameters_tl_rec.creation_date = OKC_API.G_MISS_DATE)
2229: THEN
2230: x_okl_parameters_tl_rec.creation_date := l_okl_parameters_tl_rec.creation_date;
2231: END IF;
2232: IF (x_okl_parameters_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2233: THEN
2234: x_okl_parameters_tl_rec.last_updated_by := l_okl_parameters_tl_rec.last_updated_by;
2235: END IF;
2236: IF (x_okl_parameters_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2230: x_okl_parameters_tl_rec.creation_date := l_okl_parameters_tl_rec.creation_date;
2231: END IF;
2232: IF (x_okl_parameters_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2233: THEN
2234: x_okl_parameters_tl_rec.last_updated_by := l_okl_parameters_tl_rec.last_updated_by;
2235: END IF;
2236: IF (x_okl_parameters_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2237: THEN
2238: x_okl_parameters_tl_rec.last_update_date := l_okl_parameters_tl_rec.last_update_date;
2232: IF (x_okl_parameters_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
2233: THEN
2234: x_okl_parameters_tl_rec.last_updated_by := l_okl_parameters_tl_rec.last_updated_by;
2235: END IF;
2236: IF (x_okl_parameters_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2237: THEN
2238: x_okl_parameters_tl_rec.last_update_date := l_okl_parameters_tl_rec.last_update_date;
2239: END IF;
2240: IF (x_okl_parameters_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2234: x_okl_parameters_tl_rec.last_updated_by := l_okl_parameters_tl_rec.last_updated_by;
2235: END IF;
2236: IF (x_okl_parameters_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2237: THEN
2238: x_okl_parameters_tl_rec.last_update_date := l_okl_parameters_tl_rec.last_update_date;
2239: END IF;
2240: IF (x_okl_parameters_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2241: THEN
2242: x_okl_parameters_tl_rec.last_update_login := l_okl_parameters_tl_rec.last_update_login;
2236: IF (x_okl_parameters_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
2237: THEN
2238: x_okl_parameters_tl_rec.last_update_date := l_okl_parameters_tl_rec.last_update_date;
2239: END IF;
2240: IF (x_okl_parameters_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2241: THEN
2242: x_okl_parameters_tl_rec.last_update_login := l_okl_parameters_tl_rec.last_update_login;
2243: END IF;
2244: RETURN(l_return_status);
2238: x_okl_parameters_tl_rec.last_update_date := l_okl_parameters_tl_rec.last_update_date;
2239: END IF;
2240: IF (x_okl_parameters_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
2241: THEN
2242: x_okl_parameters_tl_rec.last_update_login := l_okl_parameters_tl_rec.last_update_login;
2243: END IF;
2244: RETURN(l_return_status);
2245: END populate_new_record;
2246: ------------------------------------------
2243: END IF;
2244: RETURN(l_return_status);
2245: END populate_new_record;
2246: ------------------------------------------
2247: -- Set_Attributes for:OKL_PARAMETERS_TL --
2248: ------------------------------------------
2249: FUNCTION Set_Attributes (
2250: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2251: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2246: ------------------------------------------
2247: -- Set_Attributes for:OKL_PARAMETERS_TL --
2248: ------------------------------------------
2249: FUNCTION Set_Attributes (
2250: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2251: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2252: ) RETURN VARCHAR2 IS
2253: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2254: BEGIN
2247: -- Set_Attributes for:OKL_PARAMETERS_TL --
2248: ------------------------------------------
2249: FUNCTION Set_Attributes (
2250: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2251: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2252: ) RETURN VARCHAR2 IS
2253: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2254: BEGIN
2255: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2251: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2252: ) RETURN VARCHAR2 IS
2253: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2254: BEGIN
2255: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2256: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
2257: x_okl_parameters_tl_rec.SOURCE_LANG := USERENV('LANG');
2258: RETURN(l_return_status);
2259: END Set_Attributes;
2252: ) RETURN VARCHAR2 IS
2253: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2254: BEGIN
2255: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2256: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
2257: x_okl_parameters_tl_rec.SOURCE_LANG := USERENV('LANG');
2258: RETURN(l_return_status);
2259: END Set_Attributes;
2260: BEGIN
2253: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2254: BEGIN
2255: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2256: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
2257: x_okl_parameters_tl_rec.SOURCE_LANG := USERENV('LANG');
2258: RETURN(l_return_status);
2259: END Set_Attributes;
2260: BEGIN
2261: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2268: RAISE OKC_API.G_EXCEPTION_ERROR;
2269: END IF;
2270: --- Setting item attributes
2271: l_return_status := Set_Attributes(
2272: p_okl_parameters_tl_rec, -- IN
2273: l_okl_parameters_tl_rec); -- OUT
2274: --- If any errors happen abort API
2275: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2269: END IF;
2270: --- Setting item attributes
2271: l_return_status := Set_Attributes(
2272: p_okl_parameters_tl_rec, -- IN
2273: l_okl_parameters_tl_rec); -- OUT
2274: --- If any errors happen abort API
2275: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2277: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2276: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2277: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2278: RAISE OKC_API.G_EXCEPTION_ERROR;
2279: END IF;
2280: l_return_status := populate_new_record(l_okl_parameters_tl_rec, l_def_okl_parameters_tl_rec);
2281: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2284: RAISE OKC_API.G_EXCEPTION_ERROR;
2282: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2283: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2284: RAISE OKC_API.G_EXCEPTION_ERROR;
2285: END IF;
2286: UPDATE OKL_PARAMETERS_TL
2287: SET
2288: DESCRIPTION = l_def_okl_parameters_tl_rec.description,
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2284: RAISE OKC_API.G_EXCEPTION_ERROR;
2285: END IF;
2286: UPDATE OKL_PARAMETERS_TL
2287: SET
2288: DESCRIPTION = l_def_okl_parameters_tl_rec.description,
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2285: END IF;
2286: UPDATE OKL_PARAMETERS_TL
2287: SET
2288: DESCRIPTION = l_def_okl_parameters_tl_rec.description,
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2286: UPDATE OKL_PARAMETERS_TL
2287: SET
2288: DESCRIPTION = l_def_okl_parameters_tl_rec.description,
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2294: LAST_UPDATE_LOGIN = l_def_okl_parameters_tl_rec.last_update_login
2287: SET
2288: DESCRIPTION = l_def_okl_parameters_tl_rec.description,
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2294: LAST_UPDATE_LOGIN = l_def_okl_parameters_tl_rec.last_update_login
2295: WHERE ID = l_def_okl_parameters_tl_rec.id
2288: DESCRIPTION = l_def_okl_parameters_tl_rec.description,
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2294: LAST_UPDATE_LOGIN = l_def_okl_parameters_tl_rec.last_update_login
2295: WHERE ID = l_def_okl_parameters_tl_rec.id
2296: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2289: CREATED_BY = l_def_okl_parameters_tl_rec.created_by,
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2294: LAST_UPDATE_LOGIN = l_def_okl_parameters_tl_rec.last_update_login
2295: WHERE ID = l_def_okl_parameters_tl_rec.id
2296: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2297: --AND SOURCE_LANG = USERENV('LANG');
2290: SOURCE_LANG = l_def_okl_parameters_tl_rec.source_lang,
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2294: LAST_UPDATE_LOGIN = l_def_okl_parameters_tl_rec.last_update_login
2295: WHERE ID = l_def_okl_parameters_tl_rec.id
2296: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2297: --AND SOURCE_LANG = USERENV('LANG');
2298:
2291: CREATION_DATE = l_def_okl_parameters_tl_rec.creation_date,
2292: LAST_UPDATED_BY = l_def_okl_parameters_tl_rec.last_updated_by,
2293: LAST_UPDATE_DATE = l_def_okl_parameters_tl_rec.last_update_date,
2294: LAST_UPDATE_LOGIN = l_def_okl_parameters_tl_rec.last_update_login
2295: WHERE ID = l_def_okl_parameters_tl_rec.id
2296: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2297: --AND SOURCE_LANG = USERENV('LANG');
2298:
2299: UPDATE OKL_PARAMETERS_TL
2295: WHERE ID = l_def_okl_parameters_tl_rec.id
2296: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2297: --AND SOURCE_LANG = USERENV('LANG');
2298:
2299: UPDATE OKL_PARAMETERS_TL
2300: SET SFWT_FLAG = 'Y'
2301: WHERE ID = l_def_okl_parameters_tl_rec.id
2302: AND SOURCE_LANG <> USERENV('LANG');
2303:
2297: --AND SOURCE_LANG = USERENV('LANG');
2298:
2299: UPDATE OKL_PARAMETERS_TL
2300: SET SFWT_FLAG = 'Y'
2301: WHERE ID = l_def_okl_parameters_tl_rec.id
2302: AND SOURCE_LANG <> USERENV('LANG');
2303:
2304: x_okl_parameters_tl_rec := l_def_okl_parameters_tl_rec;
2305: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2300: SET SFWT_FLAG = 'Y'
2301: WHERE ID = l_def_okl_parameters_tl_rec.id
2302: AND SOURCE_LANG <> USERENV('LANG');
2303:
2304: x_okl_parameters_tl_rec := l_def_okl_parameters_tl_rec;
2305: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2306: EXCEPTION
2307: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2308: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2351: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2352: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2353: l_pmrv_rec pmrv_rec_type := p_pmrv_rec;
2354: l_def_pmrv_rec pmrv_rec_type;
2355: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2356: lx_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2357: l_pmr_rec pmr_rec_type;
2358: lx_pmr_rec pmr_rec_type;
2359: -------------------------------
2352: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2353: l_pmrv_rec pmrv_rec_type := p_pmrv_rec;
2354: l_def_pmrv_rec pmrv_rec_type;
2355: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2356: lx_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2357: l_pmr_rec pmr_rec_type;
2358: lx_pmr_rec pmr_rec_type;
2359: -------------------------------
2360: -- FUNCTION fill_who_columns --
2500:
2501: --------------------------------------
2502: -- Move VIEW record to "Child" records
2503: --------------------------------------
2504: migrate(l_def_pmrv_rec, l_okl_parameters_tl_rec);
2505: migrate(l_def_pmrv_rec, l_pmr_rec);
2506: --------------------------------------------
2507: -- Call the UPDATE_ROW for each child record
2508: --------------------------------------------
2510: p_init_msg_list,
2511: x_return_status,
2512: x_msg_count,
2513: x_msg_data,
2514: l_okl_parameters_tl_rec,
2515: lx_okl_parameters_tl_rec
2516: );
2517: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2518: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2511: x_return_status,
2512: x_msg_count,
2513: x_msg_data,
2514: l_okl_parameters_tl_rec,
2515: lx_okl_parameters_tl_rec
2516: );
2517: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2518: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2519: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2518: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2519: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2520: RAISE OKC_API.G_EXCEPTION_ERROR;
2521: END IF;
2522: migrate(lx_okl_parameters_tl_rec, l_def_pmrv_rec);
2523: update_row(
2524: p_init_msg_list,
2525: x_return_status,
2526: x_msg_count,
2710: '_PVT'
2711: );
2712: END delete_row;
2713: --------------------------------------
2714: -- delete_row for:OKL_PARAMETERS_TL --
2715: --------------------------------------
2716: PROCEDURE delete_row(
2717: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2718: x_return_status OUT NOCOPY VARCHAR2,
2717: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2718: x_return_status OUT NOCOPY VARCHAR2,
2719: x_msg_count OUT NOCOPY NUMBER,
2720: x_msg_data OUT NOCOPY VARCHAR2,
2721: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type) IS
2722:
2723: l_api_version CONSTANT NUMBER := 1;
2724: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
2725: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2722:
2723: l_api_version CONSTANT NUMBER := 1;
2724: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
2725: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2726: l_okl_parameters_tl_rec okl_parameters_tl_rec_type:= p_okl_parameters_tl_rec;
2727: l_row_notfound BOOLEAN := TRUE;
2728: ------------------------------------------
2729: -- Set_Attributes for:OKL_PARAMETERS_TL --
2730: ------------------------------------------
2725: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2726: l_okl_parameters_tl_rec okl_parameters_tl_rec_type:= p_okl_parameters_tl_rec;
2727: l_row_notfound BOOLEAN := TRUE;
2728: ------------------------------------------
2729: -- Set_Attributes for:OKL_PARAMETERS_TL --
2730: ------------------------------------------
2731: FUNCTION Set_Attributes (
2732: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2733: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2728: ------------------------------------------
2729: -- Set_Attributes for:OKL_PARAMETERS_TL --
2730: ------------------------------------------
2731: FUNCTION Set_Attributes (
2732: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2733: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2734: ) RETURN VARCHAR2 IS
2735: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2736: BEGIN
2729: -- Set_Attributes for:OKL_PARAMETERS_TL --
2730: ------------------------------------------
2731: FUNCTION Set_Attributes (
2732: p_okl_parameters_tl_rec IN okl_parameters_tl_rec_type,
2733: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2734: ) RETURN VARCHAR2 IS
2735: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2736: BEGIN
2737: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2733: x_okl_parameters_tl_rec OUT NOCOPY okl_parameters_tl_rec_type
2734: ) RETURN VARCHAR2 IS
2735: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2736: BEGIN
2737: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2738: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
2739: RETURN(l_return_status);
2740: END Set_Attributes;
2741: BEGIN
2734: ) RETURN VARCHAR2 IS
2735: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2736: BEGIN
2737: x_okl_parameters_tl_rec := p_okl_parameters_tl_rec;
2738: x_okl_parameters_tl_rec.LANGUAGE := USERENV('LANG');
2739: RETURN(l_return_status);
2740: END Set_Attributes;
2741: BEGIN
2742: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2749: RAISE OKC_API.G_EXCEPTION_ERROR;
2750: END IF;
2751: --- Setting item attributes
2752: l_return_status := Set_Attributes(
2753: p_okl_parameters_tl_rec, -- IN
2754: l_okl_parameters_tl_rec); -- OUT
2755: --- If any errors happen abort API
2756: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2750: END IF;
2751: --- Setting item attributes
2752: l_return_status := Set_Attributes(
2753: p_okl_parameters_tl_rec, -- IN
2754: l_okl_parameters_tl_rec); -- OUT
2755: --- If any errors happen abort API
2756: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2759: RAISE OKC_API.G_EXCEPTION_ERROR;
2760: END IF;
2761: DELETE FROM OKL_PARAMETERS_TL
2762: WHERE ID = l_okl_parameters_tl_rec.id;
2763:
2764: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2765: EXCEPTION
2758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2759: RAISE OKC_API.G_EXCEPTION_ERROR;
2760: END IF;
2761: DELETE FROM OKL_PARAMETERS_TL
2762: WHERE ID = l_okl_parameters_tl_rec.id;
2763:
2764: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2765: EXCEPTION
2766: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2808: l_api_version CONSTANT NUMBER := 1;
2809: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2810: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2811: l_pmrv_rec pmrv_rec_type := p_pmrv_rec;
2812: l_okl_parameters_tl_rec okl_parameters_tl_rec_type;
2813: l_pmr_rec pmr_rec_type;
2814: BEGIN
2815: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2816: G_PKG_NAME,
2826: END IF;
2827: --------------------------------------
2828: -- Move VIEW record to "Child" records
2829: --------------------------------------
2830: migrate(l_pmrv_rec, l_okl_parameters_tl_rec);
2831: migrate(l_pmrv_rec, l_pmr_rec);
2832: --------------------------------------------
2833: -- Call the DELETE_ROW for each child record
2834: --------------------------------------------
2836: p_init_msg_list,
2837: x_return_status,
2838: x_msg_count,
2839: x_msg_data,
2840: l_okl_parameters_tl_rec
2841: );
2842: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2843: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2844: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2987: f_ludate := nvl(to_date(p_last_update_date, 'YYYY/MM/DD'), sysdate);
2988:
2989: SELECT LAST_UPDATED_BY, LAST_UPDATE_DATE
2990: INTO db_luby, db_ludate
2991: FROM OKL_PARAMETERS_TL
2992: where ID = to_number(p_pmrv_rec.id)
2993: and USERENV('LANG') =language;
2994:
2995: IF(fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
2994:
2995: IF(fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
2996: db_ludate, '')) then
2997:
2998: UPDATE OKL_PARAMETERS_TL
2999: SET DESCRIPTION = p_pmrv_rec.description,
3000: LAST_UPDATE_DATE = f_ludate,
3001: LAST_UPDATED_BY = f_luby,
3002: LAST_UPDATE_LOGIN = 0,
3045: LAST_UPDATED_BY = f_luby,
3046: LAST_UPDATE_LOGIN = 0
3047: WHERE ID = to_number(p_pmrv_rec.id);
3048: --Update _TL
3049: UPDATE OKL_PARAMETERS_TL
3050: SET DESCRIPTION = p_pmrv_rec.description,
3051: LAST_UPDATE_DATE = f_ludate,
3052: LAST_UPDATED_BY = f_luby,
3053: LAST_UPDATE_LOGIN = 0,
3056: AND USERENV('LANG') IN (language,source_lang);
3057:
3058: IF(sql%notfound) THEN
3059:
3060: INSERT INTO OKL_PARAMETERS_TL
3061: (
3062: ID,
3063: LANGUAGE,
3064: SOURCE_LANG,
3084: FROM FND_LANGUAGES L
3085: WHERE L.INSTALLED_FLAG IN ('I','B')
3086: AND NOT EXISTS
3087: (SELECT NULL
3088: FROM OKL_PARAMETERS_TL TL
3089: WHERE TL.ID = TO_NUMBER(p_pmrv_rec.id)
3090: AND TL.LANGUAGE = L.LANGUAGE_CODE);
3091: END IF;
3092: END IF;
3122: WHERE NOT EXISTS (SELECT 1
3123: from OKL_PARAMETERS_B
3124: where ( ID = TO_NUMBER(p_pmrv_rec.id) OR (NAME = p_pmrv_rec.name)));
3125:
3126: INSERT INTO OKL_PARAMETERS_TL
3127: (
3128: ID,
3129: LANGUAGE,
3130: SOURCE_LANG,
3149: FROM FND_LANGUAGES L
3150: WHERE L.INSTALLED_FLAG IN ('I','B')
3151: AND NOT EXISTS
3152: (SELECT NULL
3153: FROM OKL_PARAMETERS_TL TL
3154: WHERE TL.ID = TO_NUMBER(p_pmrv_rec.id)
3155: AND TL.LANGUAGE = L.LANGUAGE_CODE);
3156:
3157: END LOAD_ROW;