36: -- PROCEDURE add_language
37: ---------------------------------------------------------------------------
38: PROCEDURE add_language IS
39: BEGIN
40: DELETE FROM OKL_XTL_CSH_APPS_TL T
41: WHERE NOT EXISTS (
42: SELECT NULL
43: FROM OKL_XTL_CSH_APPS_ALL_B B --fixed bug 3321017 by kmotepal
44: WHERE B.ID = T.ID
49: T.LANGUAGE)
50: IN (SELECT
51: SUBT.ID,
52: SUBT.LANGUAGE
53: FROM OKL_XTL_CSH_APPS_TL SUBB, OKL_XTL_CSH_APPS_TL SUBT
54: WHERE SUBB.ID = SUBT.ID
55: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
56: */
57: -- TAPI code generated code that doesn't compile. Reason - no columns defined
56: */
57: -- TAPI code generated code that doesn't compile. Reason - no columns defined
58: -- in translation table.
59:
60: INSERT INTO OKL_XTL_CSH_APPS_TL (
61: ID,
62: LANGUAGE,
63: SOURCE_LANG,
64: SFWT_FLAG,
76: B.CREATION_DATE,
77: B.LAST_UPDATED_BY,
78: B.LAST_UPDATE_DATE,
79: B.LAST_UPDATE_LOGIN
80: FROM OKL_XTL_CSH_APPS_TL B, FND_LANGUAGES L
81: WHERE L.INSTALLED_FLAG IN ('I', 'B')
82: AND B.LANGUAGE = USERENV('LANG')
83: AND NOT EXISTS(
84: SELECT NULL
81: WHERE L.INSTALLED_FLAG IN ('I', 'B')
82: AND B.LANGUAGE = USERENV('LANG')
83: AND NOT EXISTS(
84: SELECT NULL
85: FROM OKL_XTL_CSH_APPS_TL T
86: WHERE T.ID = B.ID
87: AND T.LANGUAGE = L.LANGUAGE_CODE
88: );
89:
199: BEGIN
200: RETURN(get_rec(p_xca_rec, l_row_notfound));
201: END get_rec;
202: ---------------------------------------------------------------------------
203: -- FUNCTION get_rec for: OKL_XTL_CSH_APPS_TL
204: ---------------------------------------------------------------------------
205: FUNCTION get_rec (
206: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
207: x_no_data_found OUT NOCOPY BOOLEAN
202: ---------------------------------------------------------------------------
203: -- FUNCTION get_rec for: OKL_XTL_CSH_APPS_TL
204: ---------------------------------------------------------------------------
205: FUNCTION get_rec (
206: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
207: x_no_data_found OUT NOCOPY BOOLEAN
208: ) RETURN okl_xtl_csh_apps_tl_rec_type IS
209: CURSOR okl_xtl_csh_apps_tl_pk_csr (p_id IN NUMBER,
210: p_language IN VARCHAR2) IS
204: ---------------------------------------------------------------------------
205: FUNCTION get_rec (
206: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
207: x_no_data_found OUT NOCOPY BOOLEAN
208: ) RETURN okl_xtl_csh_apps_tl_rec_type IS
209: CURSOR okl_xtl_csh_apps_tl_pk_csr (p_id IN NUMBER,
210: p_language IN VARCHAR2) IS
211: SELECT
212: ID,
205: FUNCTION get_rec (
206: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
207: x_no_data_found OUT NOCOPY BOOLEAN
208: ) RETURN okl_xtl_csh_apps_tl_rec_type IS
209: CURSOR okl_xtl_csh_apps_tl_pk_csr (p_id IN NUMBER,
210: p_language IN VARCHAR2) IS
211: SELECT
212: ID,
213: LANGUAGE,
217: CREATION_DATE,
218: LAST_UPDATED_BY,
219: LAST_UPDATE_DATE,
220: LAST_UPDATE_LOGIN
221: FROM Okl_Xtl_Csh_Apps_Tl
222: WHERE okl_xtl_csh_apps_tl.id = p_id
223: AND okl_xtl_csh_apps_tl.LANGUAGE = p_language;
224: l_okl_xtl_csh_apps_tl_pk okl_xtl_csh_apps_tl_pk_csr%ROWTYPE;
225: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
218: LAST_UPDATED_BY,
219: LAST_UPDATE_DATE,
220: LAST_UPDATE_LOGIN
221: FROM Okl_Xtl_Csh_Apps_Tl
222: WHERE okl_xtl_csh_apps_tl.id = p_id
223: AND okl_xtl_csh_apps_tl.LANGUAGE = p_language;
224: l_okl_xtl_csh_apps_tl_pk okl_xtl_csh_apps_tl_pk_csr%ROWTYPE;
225: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
226: BEGIN
219: LAST_UPDATE_DATE,
220: LAST_UPDATE_LOGIN
221: FROM Okl_Xtl_Csh_Apps_Tl
222: WHERE okl_xtl_csh_apps_tl.id = p_id
223: AND okl_xtl_csh_apps_tl.LANGUAGE = p_language;
224: l_okl_xtl_csh_apps_tl_pk okl_xtl_csh_apps_tl_pk_csr%ROWTYPE;
225: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
226: BEGIN
227: x_no_data_found := TRUE;
220: LAST_UPDATE_LOGIN
221: FROM Okl_Xtl_Csh_Apps_Tl
222: WHERE okl_xtl_csh_apps_tl.id = p_id
223: AND okl_xtl_csh_apps_tl.LANGUAGE = p_language;
224: l_okl_xtl_csh_apps_tl_pk okl_xtl_csh_apps_tl_pk_csr%ROWTYPE;
225: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
226: BEGIN
227: x_no_data_found := TRUE;
228: -- Get current database values
221: FROM Okl_Xtl_Csh_Apps_Tl
222: WHERE okl_xtl_csh_apps_tl.id = p_id
223: AND okl_xtl_csh_apps_tl.LANGUAGE = p_language;
224: l_okl_xtl_csh_apps_tl_pk okl_xtl_csh_apps_tl_pk_csr%ROWTYPE;
225: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
226: BEGIN
227: x_no_data_found := TRUE;
228: -- Get current database values
229: OPEN okl_xtl_csh_apps_tl_pk_csr (p_okl_xtl_csh_apps_tl_rec.id,
225: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
226: BEGIN
227: x_no_data_found := TRUE;
228: -- Get current database values
229: OPEN okl_xtl_csh_apps_tl_pk_csr (p_okl_xtl_csh_apps_tl_rec.id,
230: p_okl_xtl_csh_apps_tl_rec.LANGUAGE);
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
226: BEGIN
227: x_no_data_found := TRUE;
228: -- Get current database values
229: OPEN okl_xtl_csh_apps_tl_pk_csr (p_okl_xtl_csh_apps_tl_rec.id,
230: p_okl_xtl_csh_apps_tl_rec.LANGUAGE);
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
227: x_no_data_found := TRUE;
228: -- Get current database values
229: OPEN okl_xtl_csh_apps_tl_pk_csr (p_okl_xtl_csh_apps_tl_rec.id,
230: p_okl_xtl_csh_apps_tl_rec.LANGUAGE);
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
228: -- Get current database values
229: OPEN okl_xtl_csh_apps_tl_pk_csr (p_okl_xtl_csh_apps_tl_rec.id,
230: p_okl_xtl_csh_apps_tl_rec.LANGUAGE);
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
229: OPEN okl_xtl_csh_apps_tl_pk_csr (p_okl_xtl_csh_apps_tl_rec.id,
230: p_okl_xtl_csh_apps_tl_rec.LANGUAGE);
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
230: p_okl_xtl_csh_apps_tl_rec.LANGUAGE);
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
231: FETCH okl_xtl_csh_apps_tl_pk_csr INTO
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
232: l_okl_xtl_csh_apps_tl_rec.ID,
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
233: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
234: l_okl_xtl_csh_apps_tl_rec.SOURCE_LANG,
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
242: CLOSE okl_xtl_csh_apps_tl_pk_csr;
235: l_okl_xtl_csh_apps_tl_rec.SFWT_FLAG,
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
242: CLOSE okl_xtl_csh_apps_tl_pk_csr;
243: RETURN(l_okl_xtl_csh_apps_tl_rec);
236: l_okl_xtl_csh_apps_tl_rec.CREATED_BY,
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
242: CLOSE okl_xtl_csh_apps_tl_pk_csr;
243: RETURN(l_okl_xtl_csh_apps_tl_rec);
244: END get_rec;
237: l_okl_xtl_csh_apps_tl_rec.CREATION_DATE,
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
242: CLOSE okl_xtl_csh_apps_tl_pk_csr;
243: RETURN(l_okl_xtl_csh_apps_tl_rec);
244: END get_rec;
245:
238: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATED_BY,
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
242: CLOSE okl_xtl_csh_apps_tl_pk_csr;
243: RETURN(l_okl_xtl_csh_apps_tl_rec);
244: END get_rec;
245:
246: FUNCTION get_rec (
239: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_DATE,
240: l_okl_xtl_csh_apps_tl_rec.LAST_UPDATE_LOGIN;
241: x_no_data_found := okl_xtl_csh_apps_tl_pk_csr%NOTFOUND;
242: CLOSE okl_xtl_csh_apps_tl_pk_csr;
243: RETURN(l_okl_xtl_csh_apps_tl_rec);
244: END get_rec;
245:
246: FUNCTION get_rec (
247: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type
243: RETURN(l_okl_xtl_csh_apps_tl_rec);
244: END get_rec;
245:
246: FUNCTION get_rec (
247: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type
248: ) RETURN okl_xtl_csh_apps_tl_rec_type IS
249: l_row_notfound BOOLEAN := TRUE;
250: BEGIN
251: RETURN(get_rec(p_okl_xtl_csh_apps_tl_rec, l_row_notfound));
244: END get_rec;
245:
246: FUNCTION get_rec (
247: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type
248: ) RETURN okl_xtl_csh_apps_tl_rec_type IS
249: l_row_notfound BOOLEAN := TRUE;
250: BEGIN
251: RETURN(get_rec(p_okl_xtl_csh_apps_tl_rec, l_row_notfound));
252: END get_rec;
247: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type
248: ) RETURN okl_xtl_csh_apps_tl_rec_type IS
249: l_row_notfound BOOLEAN := TRUE;
250: BEGIN
251: RETURN(get_rec(p_okl_xtl_csh_apps_tl_rec, l_row_notfound));
252: END get_rec;
253: ---------------------------------------------------------------------------
254: -- FUNCTION get_rec for: OKL_XTL_CSH_APPS_V
255: ---------------------------------------------------------------------------
960: p_to.last_update_login := p_from.last_update_login;
961: END migrate;
962: PROCEDURE migrate (
963: p_from IN xcav_rec_type,
964: p_to IN OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
965: ) IS
966: BEGIN
967: p_to.id := p_from.id;
968: p_to.sfwt_flag := p_from.sfwt_flag;
972: p_to.last_update_date := p_from.last_update_date;
973: p_to.last_update_login := p_from.last_update_login;
974: END migrate;
975: PROCEDURE migrate (
976: p_from IN okl_xtl_csh_apps_tl_rec_type,
977: p_to IN OUT NOCOPY xcav_rec_type
978: ) IS
979: BEGIN
980: p_to.id := p_from.id;
1004: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
1005: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1006: l_xcav_rec xcav_rec_type := p_xcav_rec;
1007: l_xca_rec xca_rec_type;
1008: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
1009: BEGIN
1010: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
1011: G_PKG_NAME,
1012: p_init_msg_list,
1319: '_PVT'
1320: );
1321: END insert_row;
1322: ----------------------------------------
1323: -- insert_row for:OKL_XTL_CSH_APPS_TL --
1324: ----------------------------------------
1325: PROCEDURE insert_row(
1326: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1327: x_return_status OUT NOCOPY VARCHAR2,
1326: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1327: x_return_status OUT NOCOPY VARCHAR2,
1328: x_msg_count OUT NOCOPY NUMBER,
1329: x_msg_data OUT NOCOPY VARCHAR2,
1330: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
1331: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type) IS
1332:
1333: l_api_version CONSTANT NUMBER := 1;
1334: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1327: x_return_status OUT NOCOPY VARCHAR2,
1328: x_msg_count OUT NOCOPY NUMBER,
1329: x_msg_data OUT NOCOPY VARCHAR2,
1330: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
1331: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type) IS
1332:
1333: l_api_version CONSTANT NUMBER := 1;
1334: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1335: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1332:
1333: l_api_version CONSTANT NUMBER := 1;
1334: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1335: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1336: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type := p_okl_xtl_csh_apps_tl_rec;
1337: ldefoklxtlcshappstlrec okl_xtl_csh_apps_tl_rec_type;
1338: CURSOR get_languages IS
1339: SELECT *
1340: FROM FND_LANGUAGES
1333: l_api_version CONSTANT NUMBER := 1;
1334: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1335: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1336: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type := p_okl_xtl_csh_apps_tl_rec;
1337: ldefoklxtlcshappstlrec okl_xtl_csh_apps_tl_rec_type;
1338: CURSOR get_languages IS
1339: SELECT *
1340: FROM FND_LANGUAGES
1341: WHERE INSTALLED_FLAG IN ('I', 'B');
1339: SELECT *
1340: FROM FND_LANGUAGES
1341: WHERE INSTALLED_FLAG IN ('I', 'B');
1342: --------------------------------------------
1343: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
1344: --------------------------------------------
1345: FUNCTION Set_Attributes (
1346: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
1347: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
1342: --------------------------------------------
1343: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
1344: --------------------------------------------
1345: FUNCTION Set_Attributes (
1346: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
1347: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
1348: ) RETURN VARCHAR2 IS
1349: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1350: BEGIN
1343: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
1344: --------------------------------------------
1345: FUNCTION Set_Attributes (
1346: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
1347: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
1348: ) RETURN VARCHAR2 IS
1349: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1350: BEGIN
1351: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
1347: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
1348: ) RETURN VARCHAR2 IS
1349: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1350: BEGIN
1351: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
1352: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
1353: x_okl_xtl_csh_apps_tl_rec.SOURCE_LANG := USERENV('LANG');
1354: RETURN(l_return_status);
1355: END Set_Attributes;
1348: ) RETURN VARCHAR2 IS
1349: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1350: BEGIN
1351: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
1352: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
1353: x_okl_xtl_csh_apps_tl_rec.SOURCE_LANG := USERENV('LANG');
1354: RETURN(l_return_status);
1355: END Set_Attributes;
1356: BEGIN
1349: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1350: BEGIN
1351: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
1352: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
1353: x_okl_xtl_csh_apps_tl_rec.SOURCE_LANG := USERENV('LANG');
1354: RETURN(l_return_status);
1355: END Set_Attributes;
1356: BEGIN
1357: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
1364: RAISE Okl_Api.G_EXCEPTION_ERROR;
1365: END IF;
1366: --- Setting item attributes
1367: l_return_status := Set_Attributes(
1368: p_okl_xtl_csh_apps_tl_rec, -- IN
1369: l_okl_xtl_csh_apps_tl_rec); -- OUT
1370: --- If any errors happen abort API
1371: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1365: END IF;
1366: --- Setting item attributes
1367: l_return_status := Set_Attributes(
1368: p_okl_xtl_csh_apps_tl_rec, -- IN
1369: l_okl_xtl_csh_apps_tl_rec); -- OUT
1370: --- If any errors happen abort API
1371: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1372: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1373: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1373: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1374: RAISE Okl_Api.G_EXCEPTION_ERROR;
1375: END IF;
1376: FOR l_lang_rec IN get_languages LOOP
1377: l_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_lang_rec.language_code;
1378: INSERT INTO OKL_XTL_CSH_APPS_TL(
1379: id,
1380: LANGUAGE,
1381: source_lang,
1374: RAISE Okl_Api.G_EXCEPTION_ERROR;
1375: END IF;
1376: FOR l_lang_rec IN get_languages LOOP
1377: l_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_lang_rec.language_code;
1378: INSERT INTO OKL_XTL_CSH_APPS_TL(
1379: id,
1380: LANGUAGE,
1381: source_lang,
1382: sfwt_flag,
1385: last_updated_by,
1386: last_update_date,
1387: last_update_login)
1388: VALUES (
1389: l_okl_xtl_csh_apps_tl_rec.id,
1390: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1386: last_update_date,
1387: last_update_login)
1388: VALUES (
1389: l_okl_xtl_csh_apps_tl_rec.id,
1390: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1387: last_update_login)
1388: VALUES (
1389: l_okl_xtl_csh_apps_tl_rec.id,
1390: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1388: VALUES (
1389: l_okl_xtl_csh_apps_tl_rec.id,
1390: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1389: l_okl_xtl_csh_apps_tl_rec.id,
1390: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1397: l_okl_xtl_csh_apps_tl_rec.last_update_login);
1390: l_okl_xtl_csh_apps_tl_rec.LANGUAGE,
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1397: l_okl_xtl_csh_apps_tl_rec.last_update_login);
1398: END LOOP;
1391: l_okl_xtl_csh_apps_tl_rec.source_lang,
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1397: l_okl_xtl_csh_apps_tl_rec.last_update_login);
1398: END LOOP;
1399: -- Set OUT values
1392: l_okl_xtl_csh_apps_tl_rec.sfwt_flag,
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1397: l_okl_xtl_csh_apps_tl_rec.last_update_login);
1398: END LOOP;
1399: -- Set OUT values
1400: x_okl_xtl_csh_apps_tl_rec := l_okl_xtl_csh_apps_tl_rec;
1393: l_okl_xtl_csh_apps_tl_rec.created_by,
1394: l_okl_xtl_csh_apps_tl_rec.creation_date,
1395: l_okl_xtl_csh_apps_tl_rec.last_updated_by,
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1397: l_okl_xtl_csh_apps_tl_rec.last_update_login);
1398: END LOOP;
1399: -- Set OUT values
1400: x_okl_xtl_csh_apps_tl_rec := l_okl_xtl_csh_apps_tl_rec;
1401: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1396: l_okl_xtl_csh_apps_tl_rec.last_update_date,
1397: l_okl_xtl_csh_apps_tl_rec.last_update_login);
1398: END LOOP;
1399: -- Set OUT values
1400: x_okl_xtl_csh_apps_tl_rec := l_okl_xtl_csh_apps_tl_rec;
1401: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1402: EXCEPTION
1403: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1404: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
1449: l_xcav_rec xcav_rec_type;
1450: l_def_xcav_rec xcav_rec_type;
1451: l_xca_rec xca_rec_type;
1452: lx_xca_rec xca_rec_type;
1453: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
1454: lx_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
1455: -------------------------------
1456: -- FUNCTION fill_who_columns --
1457: -------------------------------
1450: l_def_xcav_rec xcav_rec_type;
1451: l_xca_rec xca_rec_type;
1452: lx_xca_rec xca_rec_type;
1453: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
1454: lx_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
1455: -------------------------------
1456: -- FUNCTION fill_who_columns --
1457: -------------------------------
1458: FUNCTION fill_who_columns (
1547: --------------------------------------
1548: -- Move VIEW record to "Child" records
1549: --------------------------------------
1550: migrate(l_def_xcav_rec, l_xca_rec);
1551: migrate(l_def_xcav_rec, l_okl_xtl_csh_apps_tl_rec);
1552: --------------------------------------------
1553: -- Call the INSERT_ROW for each child record
1554: --------------------------------------------
1555: insert_row(
1570: p_init_msg_list,
1571: x_return_status,
1572: x_msg_count,
1573: x_msg_data,
1574: l_okl_xtl_csh_apps_tl_rec,
1575: lx_okl_xtl_csh_apps_tl_rec
1576: );
1577: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1578: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1571: x_return_status,
1572: x_msg_count,
1573: x_msg_data,
1574: l_okl_xtl_csh_apps_tl_rec,
1575: lx_okl_xtl_csh_apps_tl_rec
1576: );
1577: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1578: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1579: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1578: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1579: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1580: RAISE Okl_Api.G_EXCEPTION_ERROR;
1581: END IF;
1582: migrate(lx_okl_xtl_csh_apps_tl_rec, l_def_xcav_rec);
1583: -- Set OUT values
1584: x_xcav_rec := l_def_xcav_rec;
1585: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1586: EXCEPTION
1811: '_PVT'
1812: );
1813: END lock_row;
1814: --------------------------------------
1815: -- lock_row for:OKL_XTL_CSH_APPS_TL --
1816: --------------------------------------
1817: PROCEDURE lock_row(
1818: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1819: x_return_status OUT NOCOPY VARCHAR2,
1818: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1819: x_return_status OUT NOCOPY VARCHAR2,
1820: x_msg_count OUT NOCOPY NUMBER,
1821: x_msg_data OUT NOCOPY VARCHAR2,
1822: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
1823:
1824: E_Resource_Busy EXCEPTION;
1825: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1826: CURSOR lock_csr (p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
1822: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
1823:
1824: E_Resource_Busy EXCEPTION;
1825: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1826: CURSOR lock_csr (p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
1827: SELECT *
1828: FROM OKL_XTL_CSH_APPS_TL
1829: WHERE ID = p_okl_xtl_csh_apps_tl_rec.id
1830: FOR UPDATE NOWAIT;
1824: E_Resource_Busy EXCEPTION;
1825: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1826: CURSOR lock_csr (p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
1827: SELECT *
1828: FROM OKL_XTL_CSH_APPS_TL
1829: WHERE ID = p_okl_xtl_csh_apps_tl_rec.id
1830: FOR UPDATE NOWAIT;
1831:
1832: l_api_version CONSTANT NUMBER := 1;
1825: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1826: CURSOR lock_csr (p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
1827: SELECT *
1828: FROM OKL_XTL_CSH_APPS_TL
1829: WHERE ID = p_okl_xtl_csh_apps_tl_rec.id
1830: FOR UPDATE NOWAIT;
1831:
1832: l_api_version CONSTANT NUMBER := 1;
1833: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
1845: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1846: RAISE Okl_Api.G_EXCEPTION_ERROR;
1847: END IF;
1848: BEGIN
1849: OPEN lock_csr(p_okl_xtl_csh_apps_tl_rec);
1850: FETCH lock_csr INTO l_lock_var;
1851: l_row_notfound := lock_csr%NOTFOUND;
1852: CLOSE lock_csr;
1853: EXCEPTION
1910: l_api_version CONSTANT NUMBER := 1;
1911: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1912: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1913: l_xca_rec xca_rec_type;
1914: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
1915: BEGIN
1916: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
1917: G_PKG_NAME,
1918: p_init_msg_list,
1928: --------------------------------------
1929: -- Move VIEW record to "Child" records
1930: --------------------------------------
1931: migrate(p_xcav_rec, l_xca_rec);
1932: migrate(p_xcav_rec, l_okl_xtl_csh_apps_tl_rec);
1933: --------------------------------------------
1934: -- Call the LOCK_ROW for each child record
1935: --------------------------------------------
1936: lock_row(
1949: p_init_msg_list,
1950: x_return_status,
1951: x_msg_count,
1952: x_msg_data,
1953: l_okl_xtl_csh_apps_tl_rec
1954: );
1955: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1956: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1957: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2389: '_PVT'
2390: );
2391: END update_row;
2392: ----------------------------------------
2393: -- update_row for:OKL_XTL_CSH_APPS_TL --
2394: ----------------------------------------
2395: PROCEDURE update_row(
2396: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
2397: x_return_status OUT NOCOPY VARCHAR2,
2396: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
2397: x_return_status OUT NOCOPY VARCHAR2,
2398: x_msg_count OUT NOCOPY NUMBER,
2399: x_msg_data OUT NOCOPY VARCHAR2,
2400: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2401: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type) IS
2402:
2403: l_api_version CONSTANT NUMBER := 1;
2404: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2397: x_return_status OUT NOCOPY VARCHAR2,
2398: x_msg_count OUT NOCOPY NUMBER,
2399: x_msg_data OUT NOCOPY VARCHAR2,
2400: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2401: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type) IS
2402:
2403: l_api_version CONSTANT NUMBER := 1;
2404: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2405: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2402:
2403: l_api_version CONSTANT NUMBER := 1;
2404: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2405: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2406: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type := p_okl_xtl_csh_apps_tl_rec;
2407: ldefoklxtlcshappstlrec okl_xtl_csh_apps_tl_rec_type;
2408: l_row_notfound BOOLEAN := TRUE;
2409: ----------------------------------
2410: -- FUNCTION populate_new_record --
2403: l_api_version CONSTANT NUMBER := 1;
2404: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2405: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2406: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type := p_okl_xtl_csh_apps_tl_rec;
2407: ldefoklxtlcshappstlrec okl_xtl_csh_apps_tl_rec_type;
2408: l_row_notfound BOOLEAN := TRUE;
2409: ----------------------------------
2410: -- FUNCTION populate_new_record --
2411: ----------------------------------
2409: ----------------------------------
2410: -- FUNCTION populate_new_record --
2411: ----------------------------------
2412: FUNCTION populate_new_record (
2413: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2414: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2415: ) RETURN VARCHAR2 IS
2416: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2417: l_row_notfound BOOLEAN := TRUE;
2410: -- FUNCTION populate_new_record --
2411: ----------------------------------
2412: FUNCTION populate_new_record (
2413: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2414: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2415: ) RETURN VARCHAR2 IS
2416: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2417: l_row_notfound BOOLEAN := TRUE;
2418: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2412: FUNCTION populate_new_record (
2413: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2414: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2415: ) RETURN VARCHAR2 IS
2416: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2417: l_row_notfound BOOLEAN := TRUE;
2418: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2419: BEGIN
2420: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2416: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2417: l_row_notfound BOOLEAN := TRUE;
2418: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2419: BEGIN
2420: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2421: -- Get current database values
2422: l_okl_xtl_csh_apps_tl_rec := get_rec(p_okl_xtl_csh_apps_tl_rec, l_row_notfound);
2423: IF (l_row_notfound) THEN
2424: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2418: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2419: BEGIN
2420: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2421: -- Get current database values
2422: l_okl_xtl_csh_apps_tl_rec := get_rec(p_okl_xtl_csh_apps_tl_rec, l_row_notfound);
2423: IF (l_row_notfound) THEN
2424: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2425: END IF;
2426: IF (x_okl_xtl_csh_apps_tl_rec.id = Okl_Api.G_MISS_NUM)
2422: l_okl_xtl_csh_apps_tl_rec := get_rec(p_okl_xtl_csh_apps_tl_rec, l_row_notfound);
2423: IF (l_row_notfound) THEN
2424: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2425: END IF;
2426: IF (x_okl_xtl_csh_apps_tl_rec.id = Okl_Api.G_MISS_NUM)
2427: THEN
2428: x_okl_xtl_csh_apps_tl_rec.id := l_okl_xtl_csh_apps_tl_rec.id;
2429: END IF;
2430: IF (x_okl_xtl_csh_apps_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2424: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2425: END IF;
2426: IF (x_okl_xtl_csh_apps_tl_rec.id = Okl_Api.G_MISS_NUM)
2427: THEN
2428: x_okl_xtl_csh_apps_tl_rec.id := l_okl_xtl_csh_apps_tl_rec.id;
2429: END IF;
2430: IF (x_okl_xtl_csh_apps_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2431: THEN
2432: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_okl_xtl_csh_apps_tl_rec.LANGUAGE;
2426: IF (x_okl_xtl_csh_apps_tl_rec.id = Okl_Api.G_MISS_NUM)
2427: THEN
2428: x_okl_xtl_csh_apps_tl_rec.id := l_okl_xtl_csh_apps_tl_rec.id;
2429: END IF;
2430: IF (x_okl_xtl_csh_apps_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2431: THEN
2432: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_okl_xtl_csh_apps_tl_rec.LANGUAGE;
2433: END IF;
2434: IF (x_okl_xtl_csh_apps_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2428: x_okl_xtl_csh_apps_tl_rec.id := l_okl_xtl_csh_apps_tl_rec.id;
2429: END IF;
2430: IF (x_okl_xtl_csh_apps_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2431: THEN
2432: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_okl_xtl_csh_apps_tl_rec.LANGUAGE;
2433: END IF;
2434: IF (x_okl_xtl_csh_apps_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2435: THEN
2436: x_okl_xtl_csh_apps_tl_rec.source_lang := l_okl_xtl_csh_apps_tl_rec.source_lang;
2430: IF (x_okl_xtl_csh_apps_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2431: THEN
2432: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_okl_xtl_csh_apps_tl_rec.LANGUAGE;
2433: END IF;
2434: IF (x_okl_xtl_csh_apps_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2435: THEN
2436: x_okl_xtl_csh_apps_tl_rec.source_lang := l_okl_xtl_csh_apps_tl_rec.source_lang;
2437: END IF;
2438: IF (x_okl_xtl_csh_apps_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2432: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := l_okl_xtl_csh_apps_tl_rec.LANGUAGE;
2433: END IF;
2434: IF (x_okl_xtl_csh_apps_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2435: THEN
2436: x_okl_xtl_csh_apps_tl_rec.source_lang := l_okl_xtl_csh_apps_tl_rec.source_lang;
2437: END IF;
2438: IF (x_okl_xtl_csh_apps_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2439: THEN
2440: x_okl_xtl_csh_apps_tl_rec.sfwt_flag := l_okl_xtl_csh_apps_tl_rec.sfwt_flag;
2434: IF (x_okl_xtl_csh_apps_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2435: THEN
2436: x_okl_xtl_csh_apps_tl_rec.source_lang := l_okl_xtl_csh_apps_tl_rec.source_lang;
2437: END IF;
2438: IF (x_okl_xtl_csh_apps_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2439: THEN
2440: x_okl_xtl_csh_apps_tl_rec.sfwt_flag := l_okl_xtl_csh_apps_tl_rec.sfwt_flag;
2441: END IF;
2442: IF (x_okl_xtl_csh_apps_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2436: x_okl_xtl_csh_apps_tl_rec.source_lang := l_okl_xtl_csh_apps_tl_rec.source_lang;
2437: END IF;
2438: IF (x_okl_xtl_csh_apps_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2439: THEN
2440: x_okl_xtl_csh_apps_tl_rec.sfwt_flag := l_okl_xtl_csh_apps_tl_rec.sfwt_flag;
2441: END IF;
2442: IF (x_okl_xtl_csh_apps_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2443: THEN
2444: x_okl_xtl_csh_apps_tl_rec.created_by := l_okl_xtl_csh_apps_tl_rec.created_by;
2438: IF (x_okl_xtl_csh_apps_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2439: THEN
2440: x_okl_xtl_csh_apps_tl_rec.sfwt_flag := l_okl_xtl_csh_apps_tl_rec.sfwt_flag;
2441: END IF;
2442: IF (x_okl_xtl_csh_apps_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2443: THEN
2444: x_okl_xtl_csh_apps_tl_rec.created_by := l_okl_xtl_csh_apps_tl_rec.created_by;
2445: END IF;
2446: IF (x_okl_xtl_csh_apps_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2440: x_okl_xtl_csh_apps_tl_rec.sfwt_flag := l_okl_xtl_csh_apps_tl_rec.sfwt_flag;
2441: END IF;
2442: IF (x_okl_xtl_csh_apps_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2443: THEN
2444: x_okl_xtl_csh_apps_tl_rec.created_by := l_okl_xtl_csh_apps_tl_rec.created_by;
2445: END IF;
2446: IF (x_okl_xtl_csh_apps_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2447: THEN
2448: x_okl_xtl_csh_apps_tl_rec.creation_date := l_okl_xtl_csh_apps_tl_rec.creation_date;
2442: IF (x_okl_xtl_csh_apps_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2443: THEN
2444: x_okl_xtl_csh_apps_tl_rec.created_by := l_okl_xtl_csh_apps_tl_rec.created_by;
2445: END IF;
2446: IF (x_okl_xtl_csh_apps_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2447: THEN
2448: x_okl_xtl_csh_apps_tl_rec.creation_date := l_okl_xtl_csh_apps_tl_rec.creation_date;
2449: END IF;
2450: IF (x_okl_xtl_csh_apps_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2444: x_okl_xtl_csh_apps_tl_rec.created_by := l_okl_xtl_csh_apps_tl_rec.created_by;
2445: END IF;
2446: IF (x_okl_xtl_csh_apps_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2447: THEN
2448: x_okl_xtl_csh_apps_tl_rec.creation_date := l_okl_xtl_csh_apps_tl_rec.creation_date;
2449: END IF;
2450: IF (x_okl_xtl_csh_apps_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2451: THEN
2452: x_okl_xtl_csh_apps_tl_rec.last_updated_by := l_okl_xtl_csh_apps_tl_rec.last_updated_by;
2446: IF (x_okl_xtl_csh_apps_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2447: THEN
2448: x_okl_xtl_csh_apps_tl_rec.creation_date := l_okl_xtl_csh_apps_tl_rec.creation_date;
2449: END IF;
2450: IF (x_okl_xtl_csh_apps_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2451: THEN
2452: x_okl_xtl_csh_apps_tl_rec.last_updated_by := l_okl_xtl_csh_apps_tl_rec.last_updated_by;
2453: END IF;
2454: IF (x_okl_xtl_csh_apps_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2448: x_okl_xtl_csh_apps_tl_rec.creation_date := l_okl_xtl_csh_apps_tl_rec.creation_date;
2449: END IF;
2450: IF (x_okl_xtl_csh_apps_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2451: THEN
2452: x_okl_xtl_csh_apps_tl_rec.last_updated_by := l_okl_xtl_csh_apps_tl_rec.last_updated_by;
2453: END IF;
2454: IF (x_okl_xtl_csh_apps_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2455: THEN
2456: x_okl_xtl_csh_apps_tl_rec.last_update_date := l_okl_xtl_csh_apps_tl_rec.last_update_date;
2450: IF (x_okl_xtl_csh_apps_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2451: THEN
2452: x_okl_xtl_csh_apps_tl_rec.last_updated_by := l_okl_xtl_csh_apps_tl_rec.last_updated_by;
2453: END IF;
2454: IF (x_okl_xtl_csh_apps_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2455: THEN
2456: x_okl_xtl_csh_apps_tl_rec.last_update_date := l_okl_xtl_csh_apps_tl_rec.last_update_date;
2457: END IF;
2458: IF (x_okl_xtl_csh_apps_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2452: x_okl_xtl_csh_apps_tl_rec.last_updated_by := l_okl_xtl_csh_apps_tl_rec.last_updated_by;
2453: END IF;
2454: IF (x_okl_xtl_csh_apps_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2455: THEN
2456: x_okl_xtl_csh_apps_tl_rec.last_update_date := l_okl_xtl_csh_apps_tl_rec.last_update_date;
2457: END IF;
2458: IF (x_okl_xtl_csh_apps_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2459: THEN
2460: x_okl_xtl_csh_apps_tl_rec.last_update_login := l_okl_xtl_csh_apps_tl_rec.last_update_login;
2454: IF (x_okl_xtl_csh_apps_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2455: THEN
2456: x_okl_xtl_csh_apps_tl_rec.last_update_date := l_okl_xtl_csh_apps_tl_rec.last_update_date;
2457: END IF;
2458: IF (x_okl_xtl_csh_apps_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2459: THEN
2460: x_okl_xtl_csh_apps_tl_rec.last_update_login := l_okl_xtl_csh_apps_tl_rec.last_update_login;
2461: END IF;
2462: RETURN(l_return_status);
2456: x_okl_xtl_csh_apps_tl_rec.last_update_date := l_okl_xtl_csh_apps_tl_rec.last_update_date;
2457: END IF;
2458: IF (x_okl_xtl_csh_apps_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2459: THEN
2460: x_okl_xtl_csh_apps_tl_rec.last_update_login := l_okl_xtl_csh_apps_tl_rec.last_update_login;
2461: END IF;
2462: RETURN(l_return_status);
2463: END populate_new_record;
2464: --------------------------------------------
2461: END IF;
2462: RETURN(l_return_status);
2463: END populate_new_record;
2464: --------------------------------------------
2465: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
2466: --------------------------------------------
2467: FUNCTION Set_Attributes (
2468: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2469: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2464: --------------------------------------------
2465: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
2466: --------------------------------------------
2467: FUNCTION Set_Attributes (
2468: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2469: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2470: ) RETURN VARCHAR2 IS
2471: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2472: BEGIN
2465: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
2466: --------------------------------------------
2467: FUNCTION Set_Attributes (
2468: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
2469: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2470: ) RETURN VARCHAR2 IS
2471: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2472: BEGIN
2473: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2469: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
2470: ) RETURN VARCHAR2 IS
2471: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2472: BEGIN
2473: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2474: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
2475: x_okl_xtl_csh_apps_tl_rec.SOURCE_LANG := USERENV('LANG');
2476: RETURN(l_return_status);
2477: END Set_Attributes;
2470: ) RETURN VARCHAR2 IS
2471: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2472: BEGIN
2473: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2474: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
2475: x_okl_xtl_csh_apps_tl_rec.SOURCE_LANG := USERENV('LANG');
2476: RETURN(l_return_status);
2477: END Set_Attributes;
2478: BEGIN
2471: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2472: BEGIN
2473: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
2474: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
2475: x_okl_xtl_csh_apps_tl_rec.SOURCE_LANG := USERENV('LANG');
2476: RETURN(l_return_status);
2477: END Set_Attributes;
2478: BEGIN
2479: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
2486: RAISE Okl_Api.G_EXCEPTION_ERROR;
2487: END IF;
2488: --- Setting item attributes
2489: l_return_status := Set_Attributes(
2490: p_okl_xtl_csh_apps_tl_rec, -- IN
2491: l_okl_xtl_csh_apps_tl_rec); -- OUT
2492: --- If any errors happen abort API
2493: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2487: END IF;
2488: --- Setting item attributes
2489: l_return_status := Set_Attributes(
2490: p_okl_xtl_csh_apps_tl_rec, -- IN
2491: l_okl_xtl_csh_apps_tl_rec); -- OUT
2492: --- If any errors happen abort API
2493: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2494: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2495: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2494: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2495: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2496: RAISE Okl_Api.G_EXCEPTION_ERROR;
2497: END IF;
2498: l_return_status := populate_new_record(l_okl_xtl_csh_apps_tl_rec, ldefoklxtlcshappstlrec);
2499: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2500: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2501: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2502: RAISE Okl_Api.G_EXCEPTION_ERROR;
2500: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2501: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2502: RAISE Okl_Api.G_EXCEPTION_ERROR;
2503: END IF;
2504: UPDATE OKL_XTL_CSH_APPS_TL
2505: SET SOURCE_LANG = ldefoklxtlcshappstlrec.source_lang,
2506: CREATED_BY = ldefoklxtlcshappstlrec.created_by,
2507: CREATION_DATE = ldefoklxtlcshappstlrec.creation_date,
2508: LAST_UPDATED_BY = ldefoklxtlcshappstlrec.last_updated_by,
2510: LAST_UPDATE_LOGIN = ldefoklxtlcshappstlrec.last_update_login
2511: WHERE ID = ldefoklxtlcshappstlrec.id
2512: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2513:
2514: UPDATE OKL_XTL_CSH_APPS_TL
2515: SET SFWT_FLAG = 'Y'
2516: WHERE ID = ldefoklxtlcshappstlrec.id
2517: AND SOURCE_LANG <> USERENV('LANG');
2518:
2515: SET SFWT_FLAG = 'Y'
2516: WHERE ID = ldefoklxtlcshappstlrec.id
2517: AND SOURCE_LANG <> USERENV('LANG');
2518:
2519: x_okl_xtl_csh_apps_tl_rec := ldefoklxtlcshappstlrec;
2520: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2521: EXCEPTION
2522: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
2523: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
2566: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2567: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2568: l_xcav_rec xcav_rec_type := p_xcav_rec;
2569: l_def_xcav_rec xcav_rec_type;
2570: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2571: lx_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2572: l_xca_rec xca_rec_type;
2573: lx_xca_rec xca_rec_type;
2574: -------------------------------
2567: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2568: l_xcav_rec xcav_rec_type := p_xcav_rec;
2569: l_def_xcav_rec xcav_rec_type;
2570: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2571: lx_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
2572: l_xca_rec xca_rec_type;
2573: lx_xca_rec xca_rec_type;
2574: -------------------------------
2575: -- FUNCTION fill_who_columns --
2849:
2850: --------------------------------------
2851: -- Move VIEW record to "Child" records
2852: --------------------------------------
2853: migrate(l_def_xcav_rec, l_okl_xtl_csh_apps_tl_rec);
2854: migrate(l_def_xcav_rec, l_xca_rec);
2855: --------------------------------------------
2856: -- Call the UPDATE_ROW for each child record
2857: --------------------------------------------
2859: p_init_msg_list,
2860: x_return_status,
2861: x_msg_count,
2862: x_msg_data,
2863: l_okl_xtl_csh_apps_tl_rec,
2864: lx_okl_xtl_csh_apps_tl_rec
2865: );
2866: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2867: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2860: x_return_status,
2861: x_msg_count,
2862: x_msg_data,
2863: l_okl_xtl_csh_apps_tl_rec,
2864: lx_okl_xtl_csh_apps_tl_rec
2865: );
2866: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2867: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2868: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2867: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2868: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2869: RAISE Okl_Api.G_EXCEPTION_ERROR;
2870: END IF;
2871: migrate(lx_okl_xtl_csh_apps_tl_rec, l_def_xcav_rec);
2872: update_row(
2873: p_init_msg_list,
2874: x_return_status,
2875: x_msg_count,
3068: '_PVT'
3069: );
3070: END delete_row;
3071: ----------------------------------------
3072: -- delete_row for:OKL_XTL_CSH_APPS_TL --
3073: ----------------------------------------
3074: PROCEDURE delete_row(
3075: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
3076: x_return_status OUT NOCOPY VARCHAR2,
3075: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
3076: x_return_status OUT NOCOPY VARCHAR2,
3077: x_msg_count OUT NOCOPY NUMBER,
3078: x_msg_data OUT NOCOPY VARCHAR2,
3079: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type) IS
3080:
3081: l_api_version CONSTANT NUMBER := 1;
3082: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3083: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3080:
3081: l_api_version CONSTANT NUMBER := 1;
3082: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3083: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3084: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type:= p_okl_xtl_csh_apps_tl_rec;
3085: l_row_notfound BOOLEAN := TRUE;
3086: --------------------------------------------
3087: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
3088: --------------------------------------------
3083: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3084: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type:= p_okl_xtl_csh_apps_tl_rec;
3085: l_row_notfound BOOLEAN := TRUE;
3086: --------------------------------------------
3087: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
3088: --------------------------------------------
3089: FUNCTION Set_Attributes (
3090: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
3091: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
3086: --------------------------------------------
3087: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
3088: --------------------------------------------
3089: FUNCTION Set_Attributes (
3090: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
3091: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
3092: ) RETURN VARCHAR2 IS
3093: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3094: BEGIN
3087: -- Set_Attributes for:OKL_XTL_CSH_APPS_TL --
3088: --------------------------------------------
3089: FUNCTION Set_Attributes (
3090: p_okl_xtl_csh_apps_tl_rec IN okl_xtl_csh_apps_tl_rec_type,
3091: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
3092: ) RETURN VARCHAR2 IS
3093: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3094: BEGIN
3095: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
3091: x_okl_xtl_csh_apps_tl_rec OUT NOCOPY okl_xtl_csh_apps_tl_rec_type
3092: ) RETURN VARCHAR2 IS
3093: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3094: BEGIN
3095: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
3096: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
3097: RETURN(l_return_status);
3098: END Set_Attributes;
3099: BEGIN
3092: ) RETURN VARCHAR2 IS
3093: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3094: BEGIN
3095: x_okl_xtl_csh_apps_tl_rec := p_okl_xtl_csh_apps_tl_rec;
3096: x_okl_xtl_csh_apps_tl_rec.LANGUAGE := USERENV('LANG');
3097: RETURN(l_return_status);
3098: END Set_Attributes;
3099: BEGIN
3100: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
3107: RAISE Okl_Api.G_EXCEPTION_ERROR;
3108: END IF;
3109: --- Setting item attributes
3110: l_return_status := Set_Attributes(
3111: p_okl_xtl_csh_apps_tl_rec, -- IN
3112: l_okl_xtl_csh_apps_tl_rec); -- OUT
3113: --- If any errors happen abort API
3114: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3115: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3108: END IF;
3109: --- Setting item attributes
3110: l_return_status := Set_Attributes(
3111: p_okl_xtl_csh_apps_tl_rec, -- IN
3112: l_okl_xtl_csh_apps_tl_rec); -- OUT
3113: --- If any errors happen abort API
3114: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3115: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3116: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3115: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3116: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3117: RAISE Okl_Api.G_EXCEPTION_ERROR;
3118: END IF;
3119: DELETE FROM OKL_XTL_CSH_APPS_TL
3120: WHERE ID = l_okl_xtl_csh_apps_tl_rec.id;
3121:
3122: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3123: EXCEPTION
3116: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3117: RAISE Okl_Api.G_EXCEPTION_ERROR;
3118: END IF;
3119: DELETE FROM OKL_XTL_CSH_APPS_TL
3120: WHERE ID = l_okl_xtl_csh_apps_tl_rec.id;
3121:
3122: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3123: EXCEPTION
3124: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
3166: l_api_version CONSTANT NUMBER := 1;
3167: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
3168: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3169: l_xcav_rec xcav_rec_type := p_xcav_rec;
3170: l_okl_xtl_csh_apps_tl_rec okl_xtl_csh_apps_tl_rec_type;
3171: l_xca_rec xca_rec_type;
3172: BEGIN
3173: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
3174: G_PKG_NAME,
3184: END IF;
3185: --------------------------------------
3186: -- Move VIEW record to "Child" records
3187: --------------------------------------
3188: migrate(l_xcav_rec, l_okl_xtl_csh_apps_tl_rec);
3189: migrate(l_xcav_rec, l_xca_rec);
3190: --------------------------------------------
3191: -- Call the DELETE_ROW for each child record
3192: --------------------------------------------
3194: p_init_msg_list,
3195: x_return_status,
3196: x_msg_count,
3197: x_msg_data,
3198: l_okl_xtl_csh_apps_tl_rec
3199: );
3200: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3201: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3202: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN