249: -- PROCEDURE add_language
250: ---------------------------------------------------------------------------
251: PROCEDURE add_language IS
252: BEGIN
253: DELETE FROM OKL_INVOICE_FORMATS_TL T
254: WHERE NOT EXISTS (
255: SELECT NULL
256: FROM OKL_INV_FORMATS_ALL_B B --fixed bug 3321017 by kmotepal
257: WHERE B.ID = T.ID
256: FROM OKL_INV_FORMATS_ALL_B B --fixed bug 3321017 by kmotepal
257: WHERE B.ID = T.ID
258: );
259:
260: UPDATE OKL_INVOICE_FORMATS_TL T SET (
261: NAME,
262: DESCRIPTION) = (SELECT
263: B.NAME,
264: B.DESCRIPTION
261: NAME,
262: DESCRIPTION) = (SELECT
263: B.NAME,
264: B.DESCRIPTION
265: FROM OKL_INVOICE_FORMATS_TL B
266: WHERE B.ID = T.ID
267: AND B.LANGUAGE = T.SOURCE_LANG)
268: WHERE (
269: T.ID,
270: T.LANGUAGE)
271: IN (SELECT
272: SUBT.ID,
273: SUBT.LANGUAGE
274: FROM OKL_INVOICE_FORMATS_TL SUBB, OKL_INVOICE_FORMATS_TL SUBT
275: WHERE SUBB.ID = SUBT.ID
276: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
277: AND (SUBB.NAME <> SUBT.NAME
278: OR SUBB.DESCRIPTION <> SUBT.DESCRIPTION
279: OR (SUBB.DESCRIPTION IS NULL AND SUBT.DESCRIPTION IS NOT NULL)
280: OR (SUBB.DESCRIPTION IS NOT NULL AND SUBT.DESCRIPTION IS NULL)
281: ));
282:
283: INSERT INTO OKL_INVOICE_FORMATS_TL (
284: ID,
285: LANGUAGE,
286: SOURCE_LANG,
287: SFWT_FLAG,
303: B.CREATION_DATE,
304: B.LAST_UPDATED_BY,
305: B.LAST_UPDATE_DATE,
306: B.LAST_UPDATE_LOGIN
307: FROM OKL_INVOICE_FORMATS_TL B, FND_LANGUAGES L
308: WHERE L.INSTALLED_FLAG IN ('I', 'B')
309: AND B.LANGUAGE = USERENV('LANG')
310: AND NOT EXISTS(
311: SELECT NULL
308: WHERE L.INSTALLED_FLAG IN ('I', 'B')
309: AND B.LANGUAGE = USERENV('LANG')
310: AND NOT EXISTS(
311: SELECT NULL
312: FROM OKL_INVOICE_FORMATS_TL T
313: WHERE T.ID = B.ID
314: AND T.LANGUAGE = L.LANGUAGE_CODE
315: );
316:
400: BEGIN
401: RETURN(get_rec(p_inf_rec, l_row_notfound));
402: END get_rec;
403: ---------------------------------------------------------------------------
404: -- FUNCTION get_rec for: OKL_INVOICE_FORMATS_TL
405: ---------------------------------------------------------------------------
406: FUNCTION get_rec (
407: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
408: x_no_data_found OUT NOCOPY BOOLEAN
403: ---------------------------------------------------------------------------
404: -- FUNCTION get_rec for: OKL_INVOICE_FORMATS_TL
405: ---------------------------------------------------------------------------
406: FUNCTION get_rec (
407: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
408: x_no_data_found OUT NOCOPY BOOLEAN
409: ) RETURN OklInvoiceFormatsTlRecType IS
410: CURSOR okl_invoice_formats_tl_pk_csr (p_id IN NUMBER,
411: p_language IN VARCHAR2) IS
406: FUNCTION get_rec (
407: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
408: x_no_data_found OUT NOCOPY BOOLEAN
409: ) RETURN OklInvoiceFormatsTlRecType IS
410: CURSOR okl_invoice_formats_tl_pk_csr (p_id IN NUMBER,
411: p_language IN VARCHAR2) IS
412: SELECT
413: ID,
414: LANGUAGE,
420: CREATION_DATE,
421: LAST_UPDATED_BY,
422: LAST_UPDATE_DATE,
423: LAST_UPDATE_LOGIN
424: FROM Okl_Invoice_Formats_Tl
425: WHERE okl_invoice_formats_tl.id = p_id
426: AND okl_invoice_formats_tl.LANGUAGE = p_language;
427: l_okl_invoice_formats_tl_pk okl_invoice_formats_tl_pk_csr%ROWTYPE;
428: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
421: LAST_UPDATED_BY,
422: LAST_UPDATE_DATE,
423: LAST_UPDATE_LOGIN
424: FROM Okl_Invoice_Formats_Tl
425: WHERE okl_invoice_formats_tl.id = p_id
426: AND okl_invoice_formats_tl.LANGUAGE = p_language;
427: l_okl_invoice_formats_tl_pk okl_invoice_formats_tl_pk_csr%ROWTYPE;
428: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
429: BEGIN
422: LAST_UPDATE_DATE,
423: LAST_UPDATE_LOGIN
424: FROM Okl_Invoice_Formats_Tl
425: WHERE okl_invoice_formats_tl.id = p_id
426: AND okl_invoice_formats_tl.LANGUAGE = p_language;
427: l_okl_invoice_formats_tl_pk okl_invoice_formats_tl_pk_csr%ROWTYPE;
428: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
429: BEGIN
430: x_no_data_found := TRUE;
423: LAST_UPDATE_LOGIN
424: FROM Okl_Invoice_Formats_Tl
425: WHERE okl_invoice_formats_tl.id = p_id
426: AND okl_invoice_formats_tl.LANGUAGE = p_language;
427: l_okl_invoice_formats_tl_pk okl_invoice_formats_tl_pk_csr%ROWTYPE;
428: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
429: BEGIN
430: x_no_data_found := TRUE;
431: -- Get current database values
424: FROM Okl_Invoice_Formats_Tl
425: WHERE okl_invoice_formats_tl.id = p_id
426: AND okl_invoice_formats_tl.LANGUAGE = p_language;
427: l_okl_invoice_formats_tl_pk okl_invoice_formats_tl_pk_csr%ROWTYPE;
428: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
429: BEGIN
430: x_no_data_found := TRUE;
431: -- Get current database values
432: OPEN okl_invoice_formats_tl_pk_csr (p_okl_invoice_formats_tl_rec.id,
428: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
429: BEGIN
430: x_no_data_found := TRUE;
431: -- Get current database values
432: OPEN okl_invoice_formats_tl_pk_csr (p_okl_invoice_formats_tl_rec.id,
433: p_okl_invoice_formats_tl_rec.LANGUAGE);
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
429: BEGIN
430: x_no_data_found := TRUE;
431: -- Get current database values
432: OPEN okl_invoice_formats_tl_pk_csr (p_okl_invoice_formats_tl_rec.id,
433: p_okl_invoice_formats_tl_rec.LANGUAGE);
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
430: x_no_data_found := TRUE;
431: -- Get current database values
432: OPEN okl_invoice_formats_tl_pk_csr (p_okl_invoice_formats_tl_rec.id,
433: p_okl_invoice_formats_tl_rec.LANGUAGE);
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
431: -- Get current database values
432: OPEN okl_invoice_formats_tl_pk_csr (p_okl_invoice_formats_tl_rec.id,
433: p_okl_invoice_formats_tl_rec.LANGUAGE);
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
432: OPEN okl_invoice_formats_tl_pk_csr (p_okl_invoice_formats_tl_rec.id,
433: p_okl_invoice_formats_tl_rec.LANGUAGE);
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
433: p_okl_invoice_formats_tl_rec.LANGUAGE);
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
434: FETCH okl_invoice_formats_tl_pk_csr INTO
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
435: l_okl_invoice_formats_tl_rec.ID,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
436: l_okl_invoice_formats_tl_rec.LANGUAGE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
437: l_okl_invoice_formats_tl_rec.SOURCE_LANG,
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
438: l_okl_invoice_formats_tl_rec.SFWT_FLAG,
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
439: l_okl_invoice_formats_tl_rec.NAME,
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
447: CLOSE okl_invoice_formats_tl_pk_csr;
440: l_okl_invoice_formats_tl_rec.DESCRIPTION,
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
447: CLOSE okl_invoice_formats_tl_pk_csr;
448: RETURN(l_okl_invoice_formats_tl_rec);
441: l_okl_invoice_formats_tl_rec.CREATED_BY,
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
447: CLOSE okl_invoice_formats_tl_pk_csr;
448: RETURN(l_okl_invoice_formats_tl_rec);
449: END get_rec;
442: l_okl_invoice_formats_tl_rec.CREATION_DATE,
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
447: CLOSE okl_invoice_formats_tl_pk_csr;
448: RETURN(l_okl_invoice_formats_tl_rec);
449: END get_rec;
450:
443: l_okl_invoice_formats_tl_rec.LAST_UPDATED_BY,
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
447: CLOSE okl_invoice_formats_tl_pk_csr;
448: RETURN(l_okl_invoice_formats_tl_rec);
449: END get_rec;
450:
451: FUNCTION get_rec (
444: l_okl_invoice_formats_tl_rec.LAST_UPDATE_DATE,
445: l_okl_invoice_formats_tl_rec.LAST_UPDATE_LOGIN;
446: x_no_data_found := okl_invoice_formats_tl_pk_csr%NOTFOUND;
447: CLOSE okl_invoice_formats_tl_pk_csr;
448: RETURN(l_okl_invoice_formats_tl_rec);
449: END get_rec;
450:
451: FUNCTION get_rec (
452: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType
448: RETURN(l_okl_invoice_formats_tl_rec);
449: END get_rec;
450:
451: FUNCTION get_rec (
452: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType
453: ) RETURN OklInvoiceFormatsTlRecType IS
454: l_row_notfound BOOLEAN := TRUE;
455: BEGIN
456: RETURN(get_rec(p_okl_invoice_formats_tl_rec, l_row_notfound));
452: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType
453: ) RETURN OklInvoiceFormatsTlRecType IS
454: l_row_notfound BOOLEAN := TRUE;
455: BEGIN
456: RETURN(get_rec(p_okl_invoice_formats_tl_rec, l_row_notfound));
457: END get_rec;
458: ---------------------------------------------------------------------------
459: -- FUNCTION get_rec for: OKL_INVOICE_FORMATS_V
460: ---------------------------------------------------------------------------
848: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
849: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
850: l_infv_rec infv_rec_type := p_infv_rec;
851: l_inf_rec inf_rec_type;
852: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
853: BEGIN
854: l_return_status := okl_api.START_ACTIVITY(l_api_name,
855: G_PKG_NAME,
856: p_init_msg_list,
1140: );
1141: */
1142: END insert_row;
1143: -------------------------------------------
1144: -- insert_row for:OKL_INVOICE_FORMATS_TL --
1145: -------------------------------------------
1146: PROCEDURE insert_row(
1147: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
1148: x_return_status OUT NOCOPY VARCHAR2,
1147: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
1148: x_return_status OUT NOCOPY VARCHAR2,
1149: x_msg_count OUT NOCOPY NUMBER,
1150: x_msg_data OUT NOCOPY VARCHAR2,
1151: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
1152: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType) IS
1153:
1154: l_api_version CONSTANT NUMBER := 1;
1155: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1148: x_return_status OUT NOCOPY VARCHAR2,
1149: x_msg_count OUT NOCOPY NUMBER,
1150: x_msg_data OUT NOCOPY VARCHAR2,
1151: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
1152: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType) IS
1153:
1154: l_api_version CONSTANT NUMBER := 1;
1155: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1156: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1153:
1154: l_api_version CONSTANT NUMBER := 1;
1155: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1156: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1157: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType := p_okl_invoice_formats_tl_rec;
1158: ldefoklinvoiceformatstlrec OklInvoiceFormatsTlRecType;
1159: CURSOR get_languages IS
1160: SELECT *
1161: FROM FND_LANGUAGES
1160: SELECT *
1161: FROM FND_LANGUAGES
1162: WHERE INSTALLED_FLAG IN ('I', 'B');
1163: -----------------------------------------------
1164: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
1165: -----------------------------------------------
1166: FUNCTION Set_Attributes (
1167: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
1168: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
1163: -----------------------------------------------
1164: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
1165: -----------------------------------------------
1166: FUNCTION Set_Attributes (
1167: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
1168: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
1169: ) RETURN VARCHAR2 IS
1170: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1171: BEGIN
1164: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
1165: -----------------------------------------------
1166: FUNCTION Set_Attributes (
1167: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
1168: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
1169: ) RETURN VARCHAR2 IS
1170: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1171: BEGIN
1172: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
1168: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
1169: ) RETURN VARCHAR2 IS
1170: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1171: BEGIN
1172: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
1173: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
1174: x_okl_invoice_formats_tl_rec.SOURCE_LANG := USERENV('LANG');
1175: RETURN(l_return_status);
1176: END Set_Attributes;
1169: ) RETURN VARCHAR2 IS
1170: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1171: BEGIN
1172: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
1173: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
1174: x_okl_invoice_formats_tl_rec.SOURCE_LANG := USERENV('LANG');
1175: RETURN(l_return_status);
1176: END Set_Attributes;
1177: BEGIN
1170: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1171: BEGIN
1172: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
1173: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
1174: x_okl_invoice_formats_tl_rec.SOURCE_LANG := USERENV('LANG');
1175: RETURN(l_return_status);
1176: END Set_Attributes;
1177: BEGIN
1178: l_return_status := okl_api.START_ACTIVITY(l_api_name,
1185: RAISE okl_api.G_EXCEPTION_ERROR;
1186: END IF;
1187: --- Setting item attributes
1188: l_return_status := Set_Attributes(
1189: p_okl_invoice_formats_tl_rec, -- IN
1190: l_okl_invoice_formats_tl_rec); -- OUT
1191: --- If any errors happen abort API
1192: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
1193: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
1186: END IF;
1187: --- Setting item attributes
1188: l_return_status := Set_Attributes(
1189: p_okl_invoice_formats_tl_rec, -- IN
1190: l_okl_invoice_formats_tl_rec); -- OUT
1191: --- If any errors happen abort API
1192: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
1193: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
1194: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
1194: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
1195: RAISE okl_api.G_EXCEPTION_ERROR;
1196: END IF;
1197: FOR l_lang_rec IN get_languages LOOP
1198: l_okl_invoice_formats_tl_rec.LANGUAGE := l_lang_rec.language_code;
1199: INSERT INTO OKL_INVOICE_FORMATS_TL(
1200: id,
1201: LANGUAGE,
1202: source_lang,
1195: RAISE okl_api.G_EXCEPTION_ERROR;
1196: END IF;
1197: FOR l_lang_rec IN get_languages LOOP
1198: l_okl_invoice_formats_tl_rec.LANGUAGE := l_lang_rec.language_code;
1199: INSERT INTO OKL_INVOICE_FORMATS_TL(
1200: id,
1201: LANGUAGE,
1202: source_lang,
1203: sfwt_flag,
1208: last_updated_by,
1209: last_update_date,
1210: last_update_login)
1211: VALUES (
1212: l_okl_invoice_formats_tl_rec.id,
1213: l_okl_invoice_formats_tl_rec.LANGUAGE,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1209: last_update_date,
1210: last_update_login)
1211: VALUES (
1212: l_okl_invoice_formats_tl_rec.id,
1213: l_okl_invoice_formats_tl_rec.LANGUAGE,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1210: last_update_login)
1211: VALUES (
1212: l_okl_invoice_formats_tl_rec.id,
1213: l_okl_invoice_formats_tl_rec.LANGUAGE,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1211: VALUES (
1212: l_okl_invoice_formats_tl_rec.id,
1213: l_okl_invoice_formats_tl_rec.LANGUAGE,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1212: l_okl_invoice_formats_tl_rec.id,
1213: l_okl_invoice_formats_tl_rec.LANGUAGE,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1213: l_okl_invoice_formats_tl_rec.LANGUAGE,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1214: l_okl_invoice_formats_tl_rec.source_lang,
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1222: l_okl_invoice_formats_tl_rec.last_update_login);
1215: l_okl_invoice_formats_tl_rec.sfwt_flag,
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1222: l_okl_invoice_formats_tl_rec.last_update_login);
1223: END LOOP;
1216: l_okl_invoice_formats_tl_rec.name,
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1222: l_okl_invoice_formats_tl_rec.last_update_login);
1223: END LOOP;
1224: -- Set OUT values
1217: l_okl_invoice_formats_tl_rec.description,
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1222: l_okl_invoice_formats_tl_rec.last_update_login);
1223: END LOOP;
1224: -- Set OUT values
1225: x_okl_invoice_formats_tl_rec := l_okl_invoice_formats_tl_rec;
1218: l_okl_invoice_formats_tl_rec.created_by,
1219: l_okl_invoice_formats_tl_rec.creation_date,
1220: l_okl_invoice_formats_tl_rec.last_updated_by,
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1222: l_okl_invoice_formats_tl_rec.last_update_login);
1223: END LOOP;
1224: -- Set OUT values
1225: x_okl_invoice_formats_tl_rec := l_okl_invoice_formats_tl_rec;
1226: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1221: l_okl_invoice_formats_tl_rec.last_update_date,
1222: l_okl_invoice_formats_tl_rec.last_update_login);
1223: END LOOP;
1224: -- Set OUT values
1225: x_okl_invoice_formats_tl_rec := l_okl_invoice_formats_tl_rec;
1226: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1227: EXCEPTION
1228: WHEN okl_api.G_EXCEPTION_ERROR THEN
1229: x_return_status := 'E';
1286: l_infv_rec infv_rec_type;
1287: l_def_infv_rec infv_rec_type;
1288: l_inf_rec inf_rec_type;
1289: lx_inf_rec inf_rec_type;
1290: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
1291: lx_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
1292: -------------------------------
1293: -- FUNCTION fill_who_columns --
1294: -------------------------------
1287: l_def_infv_rec infv_rec_type;
1288: l_inf_rec inf_rec_type;
1289: lx_inf_rec inf_rec_type;
1290: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
1291: lx_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
1292: -------------------------------
1293: -- FUNCTION fill_who_columns --
1294: -------------------------------
1295: FUNCTION fill_who_columns (
1362: --------------------------------------
1363: -- Move VIEW record to "Child" records
1364: --------------------------------------
1365: migrate(l_def_infv_rec, l_inf_rec);
1366: migrate(l_def_infv_rec, l_okl_invoice_formats_tl_rec);
1367: --------------------------------------------
1368: -- Call the INSERT_ROW for each child record
1369: --------------------------------------------
1370: insert_row(
1385: p_init_msg_list,
1386: x_return_status,
1387: x_msg_count,
1388: x_msg_data,
1389: l_okl_invoice_formats_tl_rec,
1390: lx_okl_invoice_formats_tl_rec
1391: );
1392: IF (x_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
1393: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
1386: x_return_status,
1387: x_msg_count,
1388: x_msg_data,
1389: l_okl_invoice_formats_tl_rec,
1390: lx_okl_invoice_formats_tl_rec
1391: );
1392: IF (x_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
1393: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
1394: ELSIF (x_return_status = okl_api.G_RET_STS_ERROR) THEN
1393: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
1394: ELSIF (x_return_status = okl_api.G_RET_STS_ERROR) THEN
1395: RAISE okl_api.G_EXCEPTION_ERROR;
1396: END IF;
1397: migrate(lx_okl_invoice_formats_tl_rec, l_def_infv_rec);
1398: -- Set OUT values
1399: x_infv_rec := l_def_infv_rec;
1400: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
1401: EXCEPTION
1624: '_PVT'
1625: );
1626: END lock_row;
1627: -----------------------------------------
1628: -- lock_row for:OKL_INVOICE_FORMATS_TL --
1629: -----------------------------------------
1630: PROCEDURE lock_row(
1631: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
1632: x_return_status OUT NOCOPY VARCHAR2,
1631: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
1632: x_return_status OUT NOCOPY VARCHAR2,
1633: x_msg_count OUT NOCOPY NUMBER,
1634: x_msg_data OUT NOCOPY VARCHAR2,
1635: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
1636:
1637: E_Resource_Busy EXCEPTION;
1638: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1639: CURSOR lock_csr (p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
1635: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
1636:
1637: E_Resource_Busy EXCEPTION;
1638: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1639: CURSOR lock_csr (p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
1640: SELECT *
1641: FROM OKL_INVOICE_FORMATS_TL
1642: WHERE ID = p_okl_invoice_formats_tl_rec.id
1643: FOR UPDATE NOWAIT;
1637: E_Resource_Busy EXCEPTION;
1638: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1639: CURSOR lock_csr (p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
1640: SELECT *
1641: FROM OKL_INVOICE_FORMATS_TL
1642: WHERE ID = p_okl_invoice_formats_tl_rec.id
1643: FOR UPDATE NOWAIT;
1644:
1645: l_api_version CONSTANT NUMBER := 1;
1638: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1639: CURSOR lock_csr (p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
1640: SELECT *
1641: FROM OKL_INVOICE_FORMATS_TL
1642: WHERE ID = p_okl_invoice_formats_tl_rec.id
1643: FOR UPDATE NOWAIT;
1644:
1645: l_api_version CONSTANT NUMBER := 1;
1646: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
1658: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
1659: RAISE okl_api.G_EXCEPTION_ERROR;
1660: END IF;
1661: BEGIN
1662: OPEN lock_csr(p_okl_invoice_formats_tl_rec);
1663: FETCH lock_csr INTO l_lock_var;
1664: l_row_notfound := lock_csr%NOTFOUND;
1665: CLOSE lock_csr;
1666: EXCEPTION
1723: l_api_version CONSTANT NUMBER := 1;
1724: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1725: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
1726: l_inf_rec inf_rec_type;
1727: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
1728: BEGIN
1729: l_return_status := okl_api.START_ACTIVITY(l_api_name,
1730: G_PKG_NAME,
1731: p_init_msg_list,
1741: --------------------------------------
1742: -- Move VIEW record to "Child" records
1743: --------------------------------------
1744: migrate(p_infv_rec, l_inf_rec);
1745: migrate(p_infv_rec, l_okl_invoice_formats_tl_rec);
1746: --------------------------------------------
1747: -- Call the LOCK_ROW for each child record
1748: --------------------------------------------
1749: lock_row(
1762: p_init_msg_list,
1763: x_return_status,
1764: x_msg_count,
1765: x_msg_data,
1766: l_okl_invoice_formats_tl_rec
1767: );
1768: IF (x_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
1769: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
1770: ELSIF (x_return_status = okl_api.G_RET_STS_ERROR) THEN
2130: '_PVT'
2131: );
2132: END update_row;
2133: -------------------------------------------
2134: -- update_row for:OKL_INVOICE_FORMATS_TL --
2135: -------------------------------------------
2136: PROCEDURE update_row(
2137: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
2138: x_return_status OUT NOCOPY VARCHAR2,
2137: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
2138: x_return_status OUT NOCOPY VARCHAR2,
2139: x_msg_count OUT NOCOPY NUMBER,
2140: x_msg_data OUT NOCOPY VARCHAR2,
2141: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2142: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType) IS
2143:
2144: l_api_version CONSTANT NUMBER := 1;
2145: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2138: x_return_status OUT NOCOPY VARCHAR2,
2139: x_msg_count OUT NOCOPY NUMBER,
2140: x_msg_data OUT NOCOPY VARCHAR2,
2141: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2142: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType) IS
2143:
2144: l_api_version CONSTANT NUMBER := 1;
2145: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2146: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2143:
2144: l_api_version CONSTANT NUMBER := 1;
2145: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2146: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2147: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType := p_okl_invoice_formats_tl_rec;
2148: ldefoklinvoiceformatstlrec OklInvoiceFormatsTlRecType;
2149: l_row_notfound BOOLEAN := TRUE;
2150: ----------------------------------
2151: -- FUNCTION populate_new_record --
2150: ----------------------------------
2151: -- FUNCTION populate_new_record --
2152: ----------------------------------
2153: FUNCTION populate_new_record (
2154: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2155: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2156: ) RETURN VARCHAR2 IS
2157: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2158: l_row_notfound BOOLEAN := TRUE;
2151: -- FUNCTION populate_new_record --
2152: ----------------------------------
2153: FUNCTION populate_new_record (
2154: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2155: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2156: ) RETURN VARCHAR2 IS
2157: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2158: l_row_notfound BOOLEAN := TRUE;
2159: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2153: FUNCTION populate_new_record (
2154: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2155: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2156: ) RETURN VARCHAR2 IS
2157: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2158: l_row_notfound BOOLEAN := TRUE;
2159: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2160: BEGIN
2161: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2157: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2158: l_row_notfound BOOLEAN := TRUE;
2159: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2160: BEGIN
2161: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2162: -- Get current database values
2163: l_okl_invoice_formats_tl_rec := get_rec(p_okl_invoice_formats_tl_rec, l_row_notfound);
2164: IF (l_row_notfound) THEN
2165: l_return_status := okl_api.G_RET_STS_UNEXP_ERROR;
2159: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2160: BEGIN
2161: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2162: -- Get current database values
2163: l_okl_invoice_formats_tl_rec := get_rec(p_okl_invoice_formats_tl_rec, l_row_notfound);
2164: IF (l_row_notfound) THEN
2165: l_return_status := okl_api.G_RET_STS_UNEXP_ERROR;
2166: END IF;
2167: IF (x_okl_invoice_formats_tl_rec.id = okl_api.G_MISS_NUM)
2163: l_okl_invoice_formats_tl_rec := get_rec(p_okl_invoice_formats_tl_rec, l_row_notfound);
2164: IF (l_row_notfound) THEN
2165: l_return_status := okl_api.G_RET_STS_UNEXP_ERROR;
2166: END IF;
2167: IF (x_okl_invoice_formats_tl_rec.id = okl_api.G_MISS_NUM)
2168: THEN
2169: x_okl_invoice_formats_tl_rec.id := l_okl_invoice_formats_tl_rec.id;
2170: END IF;
2171: IF (x_okl_invoice_formats_tl_rec.LANGUAGE = okl_api.G_MISS_CHAR)
2165: l_return_status := okl_api.G_RET_STS_UNEXP_ERROR;
2166: END IF;
2167: IF (x_okl_invoice_formats_tl_rec.id = okl_api.G_MISS_NUM)
2168: THEN
2169: x_okl_invoice_formats_tl_rec.id := l_okl_invoice_formats_tl_rec.id;
2170: END IF;
2171: IF (x_okl_invoice_formats_tl_rec.LANGUAGE = okl_api.G_MISS_CHAR)
2172: THEN
2173: x_okl_invoice_formats_tl_rec.LANGUAGE := l_okl_invoice_formats_tl_rec.LANGUAGE;
2167: IF (x_okl_invoice_formats_tl_rec.id = okl_api.G_MISS_NUM)
2168: THEN
2169: x_okl_invoice_formats_tl_rec.id := l_okl_invoice_formats_tl_rec.id;
2170: END IF;
2171: IF (x_okl_invoice_formats_tl_rec.LANGUAGE = okl_api.G_MISS_CHAR)
2172: THEN
2173: x_okl_invoice_formats_tl_rec.LANGUAGE := l_okl_invoice_formats_tl_rec.LANGUAGE;
2174: END IF;
2175: IF (x_okl_invoice_formats_tl_rec.source_lang = okl_api.G_MISS_CHAR)
2169: x_okl_invoice_formats_tl_rec.id := l_okl_invoice_formats_tl_rec.id;
2170: END IF;
2171: IF (x_okl_invoice_formats_tl_rec.LANGUAGE = okl_api.G_MISS_CHAR)
2172: THEN
2173: x_okl_invoice_formats_tl_rec.LANGUAGE := l_okl_invoice_formats_tl_rec.LANGUAGE;
2174: END IF;
2175: IF (x_okl_invoice_formats_tl_rec.source_lang = okl_api.G_MISS_CHAR)
2176: THEN
2177: x_okl_invoice_formats_tl_rec.source_lang := l_okl_invoice_formats_tl_rec.source_lang;
2171: IF (x_okl_invoice_formats_tl_rec.LANGUAGE = okl_api.G_MISS_CHAR)
2172: THEN
2173: x_okl_invoice_formats_tl_rec.LANGUAGE := l_okl_invoice_formats_tl_rec.LANGUAGE;
2174: END IF;
2175: IF (x_okl_invoice_formats_tl_rec.source_lang = okl_api.G_MISS_CHAR)
2176: THEN
2177: x_okl_invoice_formats_tl_rec.source_lang := l_okl_invoice_formats_tl_rec.source_lang;
2178: END IF;
2179: IF (x_okl_invoice_formats_tl_rec.sfwt_flag = okl_api.G_MISS_CHAR)
2173: x_okl_invoice_formats_tl_rec.LANGUAGE := l_okl_invoice_formats_tl_rec.LANGUAGE;
2174: END IF;
2175: IF (x_okl_invoice_formats_tl_rec.source_lang = okl_api.G_MISS_CHAR)
2176: THEN
2177: x_okl_invoice_formats_tl_rec.source_lang := l_okl_invoice_formats_tl_rec.source_lang;
2178: END IF;
2179: IF (x_okl_invoice_formats_tl_rec.sfwt_flag = okl_api.G_MISS_CHAR)
2180: THEN
2181: x_okl_invoice_formats_tl_rec.sfwt_flag := l_okl_invoice_formats_tl_rec.sfwt_flag;
2175: IF (x_okl_invoice_formats_tl_rec.source_lang = okl_api.G_MISS_CHAR)
2176: THEN
2177: x_okl_invoice_formats_tl_rec.source_lang := l_okl_invoice_formats_tl_rec.source_lang;
2178: END IF;
2179: IF (x_okl_invoice_formats_tl_rec.sfwt_flag = okl_api.G_MISS_CHAR)
2180: THEN
2181: x_okl_invoice_formats_tl_rec.sfwt_flag := l_okl_invoice_formats_tl_rec.sfwt_flag;
2182: END IF;
2183: IF (x_okl_invoice_formats_tl_rec.name = okl_api.G_MISS_CHAR)
2177: x_okl_invoice_formats_tl_rec.source_lang := l_okl_invoice_formats_tl_rec.source_lang;
2178: END IF;
2179: IF (x_okl_invoice_formats_tl_rec.sfwt_flag = okl_api.G_MISS_CHAR)
2180: THEN
2181: x_okl_invoice_formats_tl_rec.sfwt_flag := l_okl_invoice_formats_tl_rec.sfwt_flag;
2182: END IF;
2183: IF (x_okl_invoice_formats_tl_rec.name = okl_api.G_MISS_CHAR)
2184: THEN
2185: x_okl_invoice_formats_tl_rec.name := l_okl_invoice_formats_tl_rec.name;
2179: IF (x_okl_invoice_formats_tl_rec.sfwt_flag = okl_api.G_MISS_CHAR)
2180: THEN
2181: x_okl_invoice_formats_tl_rec.sfwt_flag := l_okl_invoice_formats_tl_rec.sfwt_flag;
2182: END IF;
2183: IF (x_okl_invoice_formats_tl_rec.name = okl_api.G_MISS_CHAR)
2184: THEN
2185: x_okl_invoice_formats_tl_rec.name := l_okl_invoice_formats_tl_rec.name;
2186: END IF;
2187: IF (x_okl_invoice_formats_tl_rec.description = okl_api.G_MISS_CHAR)
2181: x_okl_invoice_formats_tl_rec.sfwt_flag := l_okl_invoice_formats_tl_rec.sfwt_flag;
2182: END IF;
2183: IF (x_okl_invoice_formats_tl_rec.name = okl_api.G_MISS_CHAR)
2184: THEN
2185: x_okl_invoice_formats_tl_rec.name := l_okl_invoice_formats_tl_rec.name;
2186: END IF;
2187: IF (x_okl_invoice_formats_tl_rec.description = okl_api.G_MISS_CHAR)
2188: THEN
2189: x_okl_invoice_formats_tl_rec.description := l_okl_invoice_formats_tl_rec.description;
2183: IF (x_okl_invoice_formats_tl_rec.name = okl_api.G_MISS_CHAR)
2184: THEN
2185: x_okl_invoice_formats_tl_rec.name := l_okl_invoice_formats_tl_rec.name;
2186: END IF;
2187: IF (x_okl_invoice_formats_tl_rec.description = okl_api.G_MISS_CHAR)
2188: THEN
2189: x_okl_invoice_formats_tl_rec.description := l_okl_invoice_formats_tl_rec.description;
2190: END IF;
2191: IF (x_okl_invoice_formats_tl_rec.created_by = okl_api.G_MISS_NUM)
2185: x_okl_invoice_formats_tl_rec.name := l_okl_invoice_formats_tl_rec.name;
2186: END IF;
2187: IF (x_okl_invoice_formats_tl_rec.description = okl_api.G_MISS_CHAR)
2188: THEN
2189: x_okl_invoice_formats_tl_rec.description := l_okl_invoice_formats_tl_rec.description;
2190: END IF;
2191: IF (x_okl_invoice_formats_tl_rec.created_by = okl_api.G_MISS_NUM)
2192: THEN
2193: x_okl_invoice_formats_tl_rec.created_by := l_okl_invoice_formats_tl_rec.created_by;
2187: IF (x_okl_invoice_formats_tl_rec.description = okl_api.G_MISS_CHAR)
2188: THEN
2189: x_okl_invoice_formats_tl_rec.description := l_okl_invoice_formats_tl_rec.description;
2190: END IF;
2191: IF (x_okl_invoice_formats_tl_rec.created_by = okl_api.G_MISS_NUM)
2192: THEN
2193: x_okl_invoice_formats_tl_rec.created_by := l_okl_invoice_formats_tl_rec.created_by;
2194: END IF;
2195: IF (x_okl_invoice_formats_tl_rec.creation_date = okl_api.G_MISS_DATE)
2189: x_okl_invoice_formats_tl_rec.description := l_okl_invoice_formats_tl_rec.description;
2190: END IF;
2191: IF (x_okl_invoice_formats_tl_rec.created_by = okl_api.G_MISS_NUM)
2192: THEN
2193: x_okl_invoice_formats_tl_rec.created_by := l_okl_invoice_formats_tl_rec.created_by;
2194: END IF;
2195: IF (x_okl_invoice_formats_tl_rec.creation_date = okl_api.G_MISS_DATE)
2196: THEN
2197: x_okl_invoice_formats_tl_rec.creation_date := l_okl_invoice_formats_tl_rec.creation_date;
2191: IF (x_okl_invoice_formats_tl_rec.created_by = okl_api.G_MISS_NUM)
2192: THEN
2193: x_okl_invoice_formats_tl_rec.created_by := l_okl_invoice_formats_tl_rec.created_by;
2194: END IF;
2195: IF (x_okl_invoice_formats_tl_rec.creation_date = okl_api.G_MISS_DATE)
2196: THEN
2197: x_okl_invoice_formats_tl_rec.creation_date := l_okl_invoice_formats_tl_rec.creation_date;
2198: END IF;
2199: IF (x_okl_invoice_formats_tl_rec.last_updated_by = okl_api.G_MISS_NUM)
2193: x_okl_invoice_formats_tl_rec.created_by := l_okl_invoice_formats_tl_rec.created_by;
2194: END IF;
2195: IF (x_okl_invoice_formats_tl_rec.creation_date = okl_api.G_MISS_DATE)
2196: THEN
2197: x_okl_invoice_formats_tl_rec.creation_date := l_okl_invoice_formats_tl_rec.creation_date;
2198: END IF;
2199: IF (x_okl_invoice_formats_tl_rec.last_updated_by = okl_api.G_MISS_NUM)
2200: THEN
2201: x_okl_invoice_formats_tl_rec.last_updated_by := l_okl_invoice_formats_tl_rec.last_updated_by;
2195: IF (x_okl_invoice_formats_tl_rec.creation_date = okl_api.G_MISS_DATE)
2196: THEN
2197: x_okl_invoice_formats_tl_rec.creation_date := l_okl_invoice_formats_tl_rec.creation_date;
2198: END IF;
2199: IF (x_okl_invoice_formats_tl_rec.last_updated_by = okl_api.G_MISS_NUM)
2200: THEN
2201: x_okl_invoice_formats_tl_rec.last_updated_by := l_okl_invoice_formats_tl_rec.last_updated_by;
2202: END IF;
2203: IF (x_okl_invoice_formats_tl_rec.last_update_date = okl_api.G_MISS_DATE)
2197: x_okl_invoice_formats_tl_rec.creation_date := l_okl_invoice_formats_tl_rec.creation_date;
2198: END IF;
2199: IF (x_okl_invoice_formats_tl_rec.last_updated_by = okl_api.G_MISS_NUM)
2200: THEN
2201: x_okl_invoice_formats_tl_rec.last_updated_by := l_okl_invoice_formats_tl_rec.last_updated_by;
2202: END IF;
2203: IF (x_okl_invoice_formats_tl_rec.last_update_date = okl_api.G_MISS_DATE)
2204: THEN
2205: x_okl_invoice_formats_tl_rec.last_update_date := l_okl_invoice_formats_tl_rec.last_update_date;
2199: IF (x_okl_invoice_formats_tl_rec.last_updated_by = okl_api.G_MISS_NUM)
2200: THEN
2201: x_okl_invoice_formats_tl_rec.last_updated_by := l_okl_invoice_formats_tl_rec.last_updated_by;
2202: END IF;
2203: IF (x_okl_invoice_formats_tl_rec.last_update_date = okl_api.G_MISS_DATE)
2204: THEN
2205: x_okl_invoice_formats_tl_rec.last_update_date := l_okl_invoice_formats_tl_rec.last_update_date;
2206: END IF;
2207: IF (x_okl_invoice_formats_tl_rec.last_update_login = okl_api.G_MISS_NUM)
2201: x_okl_invoice_formats_tl_rec.last_updated_by := l_okl_invoice_formats_tl_rec.last_updated_by;
2202: END IF;
2203: IF (x_okl_invoice_formats_tl_rec.last_update_date = okl_api.G_MISS_DATE)
2204: THEN
2205: x_okl_invoice_formats_tl_rec.last_update_date := l_okl_invoice_formats_tl_rec.last_update_date;
2206: END IF;
2207: IF (x_okl_invoice_formats_tl_rec.last_update_login = okl_api.G_MISS_NUM)
2208: THEN
2209: x_okl_invoice_formats_tl_rec.last_update_login := l_okl_invoice_formats_tl_rec.last_update_login;
2203: IF (x_okl_invoice_formats_tl_rec.last_update_date = okl_api.G_MISS_DATE)
2204: THEN
2205: x_okl_invoice_formats_tl_rec.last_update_date := l_okl_invoice_formats_tl_rec.last_update_date;
2206: END IF;
2207: IF (x_okl_invoice_formats_tl_rec.last_update_login = okl_api.G_MISS_NUM)
2208: THEN
2209: x_okl_invoice_formats_tl_rec.last_update_login := l_okl_invoice_formats_tl_rec.last_update_login;
2210: END IF;
2211: RETURN(l_return_status);
2205: x_okl_invoice_formats_tl_rec.last_update_date := l_okl_invoice_formats_tl_rec.last_update_date;
2206: END IF;
2207: IF (x_okl_invoice_formats_tl_rec.last_update_login = okl_api.G_MISS_NUM)
2208: THEN
2209: x_okl_invoice_formats_tl_rec.last_update_login := l_okl_invoice_formats_tl_rec.last_update_login;
2210: END IF;
2211: RETURN(l_return_status);
2212: END populate_new_record;
2213: -----------------------------------------------
2210: END IF;
2211: RETURN(l_return_status);
2212: END populate_new_record;
2213: -----------------------------------------------
2214: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2215: -----------------------------------------------
2216: FUNCTION Set_Attributes (
2217: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2218: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2213: -----------------------------------------------
2214: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2215: -----------------------------------------------
2216: FUNCTION Set_Attributes (
2217: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2218: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2219: ) RETURN VARCHAR2 IS
2220: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2221: BEGIN
2214: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2215: -----------------------------------------------
2216: FUNCTION Set_Attributes (
2217: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2218: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2219: ) RETURN VARCHAR2 IS
2220: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2221: BEGIN
2222: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2218: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2219: ) RETURN VARCHAR2 IS
2220: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2221: BEGIN
2222: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2223: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
2224: x_okl_invoice_formats_tl_rec.SOURCE_LANG := USERENV('LANG');
2225: RETURN(l_return_status);
2226: END Set_Attributes;
2219: ) RETURN VARCHAR2 IS
2220: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2221: BEGIN
2222: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2223: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
2224: x_okl_invoice_formats_tl_rec.SOURCE_LANG := USERENV('LANG');
2225: RETURN(l_return_status);
2226: END Set_Attributes;
2227: BEGIN
2220: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2221: BEGIN
2222: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2223: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
2224: x_okl_invoice_formats_tl_rec.SOURCE_LANG := USERENV('LANG');
2225: RETURN(l_return_status);
2226: END Set_Attributes;
2227: BEGIN
2228: l_return_status := okl_api.START_ACTIVITY(l_api_name,
2235: RAISE okl_api.G_EXCEPTION_ERROR;
2236: END IF;
2237: --- Setting item attributes
2238: l_return_status := Set_Attributes(
2239: p_okl_invoice_formats_tl_rec, -- IN
2240: l_okl_invoice_formats_tl_rec); -- OUT
2241: --- If any errors happen abort API
2242: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2243: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2236: END IF;
2237: --- Setting item attributes
2238: l_return_status := Set_Attributes(
2239: p_okl_invoice_formats_tl_rec, -- IN
2240: l_okl_invoice_formats_tl_rec); -- OUT
2241: --- If any errors happen abort API
2242: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2243: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2244: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2243: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2244: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2245: RAISE okl_api.G_EXCEPTION_ERROR;
2246: END IF;
2247: l_return_status := populate_new_record(l_okl_invoice_formats_tl_rec, ldefoklinvoiceformatstlrec);
2248: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2249: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2250: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2251: RAISE okl_api.G_EXCEPTION_ERROR;
2250: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2251: RAISE okl_api.G_EXCEPTION_ERROR;
2252: END IF;
2253: -- changed by zrehman for fixing FP Bug#6697145 start
2254: UPDATE OKL_INVOICE_FORMATS_TL
2255: SET NAME = ldefoklinvoiceformatstlrec.name,
2256: SOURCE_LANG = ldefoklinvoiceformatstlrec.source_lang,
2257: DESCRIPTION = ldefoklinvoiceformatstlrec.description,
2258: CREATED_BY = ldefoklinvoiceformatstlrec.created_by,
2263: WHERE ID = ldefoklinvoiceformatstlrec.id
2264: AND USERENV('LANG') IN (LANGUAGE, SOURCE_LANG);
2265: -- changed by zrehman for fixing FP Bug#6697145 end
2266:
2267: UPDATE OKL_INVOICE_FORMATS_TL
2268: SET SFWT_FLAG = 'Y'
2269: WHERE ID = ldefoklinvoiceformatstlrec.id
2270: AND SOURCE_LANG <> USERENV('LANG');
2271:
2268: SET SFWT_FLAG = 'Y'
2269: WHERE ID = ldefoklinvoiceformatstlrec.id
2270: AND SOURCE_LANG <> USERENV('LANG');
2271:
2272: x_okl_invoice_formats_tl_rec := ldefoklinvoiceformatstlrec;
2273: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
2274: EXCEPTION
2275: WHEN okl_api.G_EXCEPTION_ERROR THEN
2276: x_return_status := okl_api.HANDLE_EXCEPTIONS
2319: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2320: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2321: l_infv_rec infv_rec_type := p_infv_rec;
2322: l_def_infv_rec infv_rec_type;
2323: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2324: lx_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2325: l_inf_rec inf_rec_type;
2326: lx_inf_rec inf_rec_type;
2327: -------------------------------
2320: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2321: l_infv_rec infv_rec_type := p_infv_rec;
2322: l_def_infv_rec infv_rec_type;
2323: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2324: lx_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2325: l_inf_rec inf_rec_type;
2326: lx_inf_rec inf_rec_type;
2327: -------------------------------
2328: -- FUNCTION fill_who_columns --
2540:
2541: --------------------------------------
2542: -- Move VIEW record to "Child" records
2543: --------------------------------------
2544: migrate(l_def_infv_rec, l_okl_invoice_formats_tl_rec);
2545: migrate(l_def_infv_rec, l_inf_rec);
2546: --------------------------------------------
2547: -- Call the UPDATE_ROW for each child record
2548: --------------------------------------------
2550: p_init_msg_list,
2551: x_return_status,
2552: x_msg_count,
2553: x_msg_data,
2554: l_okl_invoice_formats_tl_rec,
2555: lx_okl_invoice_formats_tl_rec
2556: );
2557: IF (x_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2558: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2551: x_return_status,
2552: x_msg_count,
2553: x_msg_data,
2554: l_okl_invoice_formats_tl_rec,
2555: lx_okl_invoice_formats_tl_rec
2556: );
2557: IF (x_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2558: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2559: ELSIF (x_return_status = okl_api.G_RET_STS_ERROR) THEN
2558: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2559: ELSIF (x_return_status = okl_api.G_RET_STS_ERROR) THEN
2560: RAISE okl_api.G_EXCEPTION_ERROR;
2561: END IF;
2562: migrate(lx_okl_invoice_formats_tl_rec, l_def_infv_rec);
2563: update_row(
2564: p_init_msg_list,
2565: x_return_status,
2566: x_msg_count,
2748: '_PVT'
2749: );
2750: END delete_row;
2751: -------------------------------------------
2752: -- delete_row for:OKL_INVOICE_FORMATS_TL --
2753: -------------------------------------------
2754: PROCEDURE delete_row(
2755: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
2756: x_return_status OUT NOCOPY VARCHAR2,
2755: p_init_msg_list IN VARCHAR2 DEFAULT okl_api.G_FALSE,
2756: x_return_status OUT NOCOPY VARCHAR2,
2757: x_msg_count OUT NOCOPY NUMBER,
2758: x_msg_data OUT NOCOPY VARCHAR2,
2759: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType) IS
2760:
2761: l_api_version CONSTANT NUMBER := 1;
2762: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
2763: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2760:
2761: l_api_version CONSTANT NUMBER := 1;
2762: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
2763: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2764: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType:= p_okl_invoice_formats_tl_rec;
2765: l_row_notfound BOOLEAN := TRUE;
2766: -----------------------------------------------
2767: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2768: -----------------------------------------------
2763: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2764: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType:= p_okl_invoice_formats_tl_rec;
2765: l_row_notfound BOOLEAN := TRUE;
2766: -----------------------------------------------
2767: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2768: -----------------------------------------------
2769: FUNCTION Set_Attributes (
2770: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2771: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2766: -----------------------------------------------
2767: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2768: -----------------------------------------------
2769: FUNCTION Set_Attributes (
2770: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2771: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2772: ) RETURN VARCHAR2 IS
2773: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2774: BEGIN
2767: -- Set_Attributes for:OKL_INVOICE_FORMATS_TL --
2768: -----------------------------------------------
2769: FUNCTION Set_Attributes (
2770: p_okl_invoice_formats_tl_rec IN OklInvoiceFormatsTlRecType,
2771: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2772: ) RETURN VARCHAR2 IS
2773: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2774: BEGIN
2775: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2771: x_okl_invoice_formats_tl_rec OUT NOCOPY OklInvoiceFormatsTlRecType
2772: ) RETURN VARCHAR2 IS
2773: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2774: BEGIN
2775: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2776: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
2777: RETURN(l_return_status);
2778: END Set_Attributes;
2779: BEGIN
2772: ) RETURN VARCHAR2 IS
2773: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2774: BEGIN
2775: x_okl_invoice_formats_tl_rec := p_okl_invoice_formats_tl_rec;
2776: x_okl_invoice_formats_tl_rec.LANGUAGE := USERENV('LANG');
2777: RETURN(l_return_status);
2778: END Set_Attributes;
2779: BEGIN
2780: l_return_status := okl_api.START_ACTIVITY(l_api_name,
2787: RAISE okl_api.G_EXCEPTION_ERROR;
2788: END IF;
2789: --- Setting item attributes
2790: l_return_status := Set_Attributes(
2791: p_okl_invoice_formats_tl_rec, -- IN
2792: l_okl_invoice_formats_tl_rec); -- OUT
2793: --- If any errors happen abort API
2794: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2795: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2788: END IF;
2789: --- Setting item attributes
2790: l_return_status := Set_Attributes(
2791: p_okl_invoice_formats_tl_rec, -- IN
2792: l_okl_invoice_formats_tl_rec); -- OUT
2793: --- If any errors happen abort API
2794: IF (l_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2795: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2796: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2795: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2796: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2797: RAISE okl_api.G_EXCEPTION_ERROR;
2798: END IF;
2799: DELETE FROM OKL_INVOICE_FORMATS_TL
2800: WHERE ID = l_okl_invoice_formats_tl_rec.id;
2801:
2802: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
2803: EXCEPTION
2796: ELSIF (l_return_status = okl_api.G_RET_STS_ERROR) THEN
2797: RAISE okl_api.G_EXCEPTION_ERROR;
2798: END IF;
2799: DELETE FROM OKL_INVOICE_FORMATS_TL
2800: WHERE ID = l_okl_invoice_formats_tl_rec.id;
2801:
2802: okl_api.END_ACTIVITY(x_msg_count, x_msg_data);
2803: EXCEPTION
2804: WHEN okl_api.G_EXCEPTION_ERROR THEN
2846: l_api_version CONSTANT NUMBER := 1;
2847: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2848: l_return_status VARCHAR2(1) := okl_api.G_RET_STS_SUCCESS;
2849: l_infv_rec infv_rec_type := p_infv_rec;
2850: l_okl_invoice_formats_tl_rec OklInvoiceFormatsTlRecType;
2851: l_inf_rec inf_rec_type;
2852: BEGIN
2853: l_return_status := okl_api.START_ACTIVITY(l_api_name,
2854: G_PKG_NAME,
2864: END IF;
2865: --------------------------------------
2866: -- Move VIEW record to "Child" records
2867: --------------------------------------
2868: migrate(l_infv_rec, l_okl_invoice_formats_tl_rec);
2869: migrate(l_infv_rec, l_inf_rec);
2870: --------------------------------------------
2871: -- Call the DELETE_ROW for each child record
2872: --------------------------------------------
2874: p_init_msg_list,
2875: x_return_status,
2876: x_msg_count,
2877: x_msg_data,
2878: l_okl_invoice_formats_tl_rec
2879: );
2880: IF (x_return_status = okl_api.G_RET_STS_UNEXP_ERROR) THEN
2881: RAISE okl_api.G_EXCEPTION_UNEXPECTED_ERROR;
2882: ELSIF (x_return_status = okl_api.G_RET_STS_ERROR) THEN