[Home] [Help]
203: -- PROCEDURE add_language
204: ---------------------------------------------------------------------------
205: PROCEDURE add_language IS
206: BEGIN
207: DELETE FROM OKL_EXT_SELL_INVS_TL T
208: WHERE NOT EXISTS (
209: SELECT NULL
210: FROM OKL_EXT_SELL_INVS_ALL_B B
211: WHERE B.ID = T.ID
211: WHERE B.ID = T.ID
212: AND T.LANGUAGE = USERENV('LANG')
213: );
214:
215: UPDATE OKL_EXT_SELL_INVS_TL T SET (
216: XTRX_CONS_INVOICE_NUMBER,
217: XTRX_FORMAT_TYPE,
218: XTRX_PRIVATE_LABEL,
219: INVOICE_MESSAGE,
222: B.XTRX_FORMAT_TYPE,
223: B.XTRX_PRIVATE_LABEL,
224: B.INVOICE_MESSAGE,
225: B.DESCRIPTION
226: FROM OKL_EXT_SELL_INVS_TL B
227: WHERE B.ID = T.ID
228: AND B.LANGUAGE = T.SOURCE_LANG)
229: WHERE (
230: T.ID,
231: T.LANGUAGE)
232: IN (SELECT
233: SUBT.ID,
234: SUBT.LANGUAGE
235: FROM OKL_EXT_SELL_INVS_TL SUBB, OKL_EXT_SELL_INVS_TL SUBT
236: WHERE SUBB.ID = SUBT.ID
237: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
238: AND (SUBB.XTRX_CONS_INVOICE_NUMBER <> SUBT.XTRX_CONS_INVOICE_NUMBER
239: OR SUBB.XTRX_FORMAT_TYPE <> SUBT.XTRX_FORMAT_TYPE
251: OR (SUBB.DESCRIPTION IS NULL AND SUBT.DESCRIPTION IS NOT NULL)
252: OR (SUBB.DESCRIPTION IS NOT NULL AND SUBT.DESCRIPTION IS NULL)
253: ));
254:
255: INSERT INTO OKL_EXT_SELL_INVS_TL (
256: ID,
257: LANGUAGE,
258: SOURCE_LANG,
259: SFWT_FLAG,
281: B.CREATION_DATE,
282: B.LAST_UPDATED_BY,
283: B.LAST_UPDATE_DATE,
284: B.LAST_UPDATE_LOGIN
285: FROM OKL_EXT_SELL_INVS_TL B, FND_LANGUAGES L
286: WHERE L.INSTALLED_FLAG IN ('I', 'B')
287: AND B.LANGUAGE = USERENV('LANG')
288: AND NOT EXISTS(
289: SELECT NULL
286: WHERE L.INSTALLED_FLAG IN ('I', 'B')
287: AND B.LANGUAGE = USERENV('LANG')
288: AND NOT EXISTS(
289: SELECT NULL
290: FROM OKL_EXT_SELL_INVS_TL T
291: WHERE T.ID = B.ID
292: AND T.LANGUAGE = L.LANGUAGE_CODE
293: );
294:
434: BEGIN
435: RETURN(get_rec(p_xsi_rec, l_row_notfound));
436: END get_rec;
437: ---------------------------------------------------------------------------
438: -- FUNCTION get_rec for: OKL_EXT_SELL_INVS_TL
439: ---------------------------------------------------------------------------
440: FUNCTION get_rec (
441: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
442: x_no_data_found OUT NOCOPY BOOLEAN
437: ---------------------------------------------------------------------------
438: -- FUNCTION get_rec for: OKL_EXT_SELL_INVS_TL
439: ---------------------------------------------------------------------------
440: FUNCTION get_rec (
441: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
442: x_no_data_found OUT NOCOPY BOOLEAN
443: ) RETURN okl_ext_sell_invs_tl_rec_type IS
444: CURSOR okl_ext_sell_invs_tl_pk_csr (p_id IN NUMBER,
445: p_language IN VARCHAR2) IS
439: ---------------------------------------------------------------------------
440: FUNCTION get_rec (
441: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
442: x_no_data_found OUT NOCOPY BOOLEAN
443: ) RETURN okl_ext_sell_invs_tl_rec_type IS
444: CURSOR okl_ext_sell_invs_tl_pk_csr (p_id IN NUMBER,
445: p_language IN VARCHAR2) IS
446: SELECT
447: ID,
440: FUNCTION get_rec (
441: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
442: x_no_data_found OUT NOCOPY BOOLEAN
443: ) RETURN okl_ext_sell_invs_tl_rec_type IS
444: CURSOR okl_ext_sell_invs_tl_pk_csr (p_id IN NUMBER,
445: p_language IN VARCHAR2) IS
446: SELECT
447: ID,
448: LANGUAGE,
457: CREATION_DATE,
458: LAST_UPDATED_BY,
459: LAST_UPDATE_DATE,
460: LAST_UPDATE_LOGIN
461: FROM Okl_Ext_Sell_Invs_Tl
462: WHERE okl_ext_sell_invs_tl.id = p_id
463: AND okl_ext_sell_invs_tl.LANGUAGE = p_language;
464: l_okl_ext_sell_invs_tl_pk okl_ext_sell_invs_tl_pk_csr%ROWTYPE;
465: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
458: LAST_UPDATED_BY,
459: LAST_UPDATE_DATE,
460: LAST_UPDATE_LOGIN
461: FROM Okl_Ext_Sell_Invs_Tl
462: WHERE okl_ext_sell_invs_tl.id = p_id
463: AND okl_ext_sell_invs_tl.LANGUAGE = p_language;
464: l_okl_ext_sell_invs_tl_pk okl_ext_sell_invs_tl_pk_csr%ROWTYPE;
465: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
466: BEGIN
459: LAST_UPDATE_DATE,
460: LAST_UPDATE_LOGIN
461: FROM Okl_Ext_Sell_Invs_Tl
462: WHERE okl_ext_sell_invs_tl.id = p_id
463: AND okl_ext_sell_invs_tl.LANGUAGE = p_language;
464: l_okl_ext_sell_invs_tl_pk okl_ext_sell_invs_tl_pk_csr%ROWTYPE;
465: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
466: BEGIN
467: x_no_data_found := TRUE;
460: LAST_UPDATE_LOGIN
461: FROM Okl_Ext_Sell_Invs_Tl
462: WHERE okl_ext_sell_invs_tl.id = p_id
463: AND okl_ext_sell_invs_tl.LANGUAGE = p_language;
464: l_okl_ext_sell_invs_tl_pk okl_ext_sell_invs_tl_pk_csr%ROWTYPE;
465: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
466: BEGIN
467: x_no_data_found := TRUE;
468: -- Get current database values
461: FROM Okl_Ext_Sell_Invs_Tl
462: WHERE okl_ext_sell_invs_tl.id = p_id
463: AND okl_ext_sell_invs_tl.LANGUAGE = p_language;
464: l_okl_ext_sell_invs_tl_pk okl_ext_sell_invs_tl_pk_csr%ROWTYPE;
465: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
466: BEGIN
467: x_no_data_found := TRUE;
468: -- Get current database values
469: OPEN okl_ext_sell_invs_tl_pk_csr (p_okl_ext_sell_invs_tl_rec.id,
465: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
466: BEGIN
467: x_no_data_found := TRUE;
468: -- Get current database values
469: OPEN okl_ext_sell_invs_tl_pk_csr (p_okl_ext_sell_invs_tl_rec.id,
470: p_okl_ext_sell_invs_tl_rec.LANGUAGE);
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
466: BEGIN
467: x_no_data_found := TRUE;
468: -- Get current database values
469: OPEN okl_ext_sell_invs_tl_pk_csr (p_okl_ext_sell_invs_tl_rec.id,
470: p_okl_ext_sell_invs_tl_rec.LANGUAGE);
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
467: x_no_data_found := TRUE;
468: -- Get current database values
469: OPEN okl_ext_sell_invs_tl_pk_csr (p_okl_ext_sell_invs_tl_rec.id,
470: p_okl_ext_sell_invs_tl_rec.LANGUAGE);
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
468: -- Get current database values
469: OPEN okl_ext_sell_invs_tl_pk_csr (p_okl_ext_sell_invs_tl_rec.id,
470: p_okl_ext_sell_invs_tl_rec.LANGUAGE);
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
469: OPEN okl_ext_sell_invs_tl_pk_csr (p_okl_ext_sell_invs_tl_rec.id,
470: p_okl_ext_sell_invs_tl_rec.LANGUAGE);
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
470: p_okl_ext_sell_invs_tl_rec.LANGUAGE);
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
471: FETCH okl_ext_sell_invs_tl_pk_csr INTO
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
472: l_okl_ext_sell_invs_tl_rec.ID,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
473: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
474: l_okl_ext_sell_invs_tl_rec.SOURCE_LANG,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
475: l_okl_ext_sell_invs_tl_rec.SFWT_FLAG,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
476: l_okl_ext_sell_invs_tl_rec.XTRX_CONS_INVOICE_NUMBER,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
477: l_okl_ext_sell_invs_tl_rec.XTRX_FORMAT_TYPE,
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
478: l_okl_ext_sell_invs_tl_rec.XTRX_PRIVATE_LABEL,
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
479: l_okl_ext_sell_invs_tl_rec.INVOICE_MESSAGE,
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
487: CLOSE okl_ext_sell_invs_tl_pk_csr;
480: l_okl_ext_sell_invs_tl_rec.DESCRIPTION,
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
487: CLOSE okl_ext_sell_invs_tl_pk_csr;
488: RETURN(l_okl_ext_sell_invs_tl_rec);
481: l_okl_ext_sell_invs_tl_rec.CREATED_BY,
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
487: CLOSE okl_ext_sell_invs_tl_pk_csr;
488: RETURN(l_okl_ext_sell_invs_tl_rec);
489: END get_rec;
482: l_okl_ext_sell_invs_tl_rec.CREATION_DATE,
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
487: CLOSE okl_ext_sell_invs_tl_pk_csr;
488: RETURN(l_okl_ext_sell_invs_tl_rec);
489: END get_rec;
490:
483: l_okl_ext_sell_invs_tl_rec.LAST_UPDATED_BY,
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
487: CLOSE okl_ext_sell_invs_tl_pk_csr;
488: RETURN(l_okl_ext_sell_invs_tl_rec);
489: END get_rec;
490:
491: FUNCTION get_rec (
484: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_DATE,
485: l_okl_ext_sell_invs_tl_rec.LAST_UPDATE_LOGIN;
486: x_no_data_found := okl_ext_sell_invs_tl_pk_csr%NOTFOUND;
487: CLOSE okl_ext_sell_invs_tl_pk_csr;
488: RETURN(l_okl_ext_sell_invs_tl_rec);
489: END get_rec;
490:
491: FUNCTION get_rec (
492: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type
488: RETURN(l_okl_ext_sell_invs_tl_rec);
489: END get_rec;
490:
491: FUNCTION get_rec (
492: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type
493: ) RETURN okl_ext_sell_invs_tl_rec_type IS
494: l_row_notfound BOOLEAN := TRUE;
495: BEGIN
496: RETURN(get_rec(p_okl_ext_sell_invs_tl_rec, l_row_notfound));
489: END get_rec;
490:
491: FUNCTION get_rec (
492: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type
493: ) RETURN okl_ext_sell_invs_tl_rec_type IS
494: l_row_notfound BOOLEAN := TRUE;
495: BEGIN
496: RETURN(get_rec(p_okl_ext_sell_invs_tl_rec, l_row_notfound));
497: END get_rec;
492: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type
493: ) RETURN okl_ext_sell_invs_tl_rec_type IS
494: l_row_notfound BOOLEAN := TRUE;
495: BEGIN
496: RETURN(get_rec(p_okl_ext_sell_invs_tl_rec, l_row_notfound));
497: END get_rec;
498: ---------------------------------------------------------------------------
499: -- FUNCTION get_rec for: OKL_EXT_SELL_INVS_V
500: ---------------------------------------------------------------------------
1065: p_to.last_update_login := p_from.last_update_login;
1066: END migrate;
1067: PROCEDURE migrate (
1068: p_from IN xsiv_rec_type,
1069: p_to IN OUT NOCOPY okl_ext_sell_invs_tl_rec_type
1070: ) IS
1071: BEGIN
1072: p_to.id := p_from.id;
1073: p_to.sfwt_flag := p_from.sfwt_flag;
1082: p_to.last_update_date := p_from.last_update_date;
1083: p_to.last_update_login := p_from.last_update_login;
1084: END migrate;
1085: PROCEDURE migrate (
1086: p_from IN okl_ext_sell_invs_tl_rec_type,
1087: p_to IN OUT NOCOPY xsiv_rec_type
1088: ) IS
1089: BEGIN
1090: p_to.id := p_from.id;
1119: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
1120: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1121: l_xsiv_rec xsiv_rec_type := p_xsiv_rec;
1122: l_xsi_rec xsi_rec_type;
1123: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
1124: BEGIN
1125: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
1126: G_PKG_NAME,
1127: p_init_msg_list,
1466: '_PVT'
1467: );
1468: END insert_row;
1469: -----------------------------------------
1470: -- insert_row for:OKL_EXT_SELL_INVS_TL --
1471: -----------------------------------------
1472: PROCEDURE insert_row(
1473: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1474: x_return_status OUT NOCOPY VARCHAR2,
1473: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1474: x_return_status OUT NOCOPY VARCHAR2,
1475: x_msg_count OUT NOCOPY NUMBER,
1476: x_msg_data OUT NOCOPY VARCHAR2,
1477: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
1478: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type) IS
1479:
1480: l_api_version CONSTANT NUMBER := 1;
1481: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1474: x_return_status OUT NOCOPY VARCHAR2,
1475: x_msg_count OUT NOCOPY NUMBER,
1476: x_msg_data OUT NOCOPY VARCHAR2,
1477: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
1478: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type) IS
1479:
1480: l_api_version CONSTANT NUMBER := 1;
1481: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1482: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1479:
1480: l_api_version CONSTANT NUMBER := 1;
1481: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1482: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1483: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type := p_okl_ext_sell_invs_tl_rec;
1484: ldefoklextsellinvstlrec okl_ext_sell_invs_tl_rec_type;
1485: CURSOR get_languages IS
1486: SELECT *
1487: FROM FND_LANGUAGES
1480: l_api_version CONSTANT NUMBER := 1;
1481: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
1482: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1483: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type := p_okl_ext_sell_invs_tl_rec;
1484: ldefoklextsellinvstlrec okl_ext_sell_invs_tl_rec_type;
1485: CURSOR get_languages IS
1486: SELECT *
1487: FROM FND_LANGUAGES
1488: WHERE INSTALLED_FLAG IN ('I', 'B');
1486: SELECT *
1487: FROM FND_LANGUAGES
1488: WHERE INSTALLED_FLAG IN ('I', 'B');
1489: ---------------------------------------------
1490: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
1491: ---------------------------------------------
1492: FUNCTION Set_Attributes (
1493: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
1494: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
1489: ---------------------------------------------
1490: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
1491: ---------------------------------------------
1492: FUNCTION Set_Attributes (
1493: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
1494: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
1495: ) RETURN VARCHAR2 IS
1496: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1497: BEGIN
1490: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
1491: ---------------------------------------------
1492: FUNCTION Set_Attributes (
1493: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
1494: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
1495: ) RETURN VARCHAR2 IS
1496: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1497: BEGIN
1498: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
1494: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
1495: ) RETURN VARCHAR2 IS
1496: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1497: BEGIN
1498: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
1499: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
1500: x_okl_ext_sell_invs_tl_rec.SOURCE_LANG := USERENV('LANG');
1501: RETURN(l_return_status);
1502: END Set_Attributes;
1495: ) RETURN VARCHAR2 IS
1496: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1497: BEGIN
1498: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
1499: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
1500: x_okl_ext_sell_invs_tl_rec.SOURCE_LANG := USERENV('LANG');
1501: RETURN(l_return_status);
1502: END Set_Attributes;
1503: BEGIN
1496: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1497: BEGIN
1498: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
1499: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
1500: x_okl_ext_sell_invs_tl_rec.SOURCE_LANG := USERENV('LANG');
1501: RETURN(l_return_status);
1502: END Set_Attributes;
1503: BEGIN
1504: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
1511: RAISE Okl_Api.G_EXCEPTION_ERROR;
1512: END IF;
1513: --- Setting item attributes
1514: l_return_status := Set_Attributes(
1515: p_okl_ext_sell_invs_tl_rec, -- IN
1516: l_okl_ext_sell_invs_tl_rec); -- OUT
1517: --- If any errors happen abort API
1518: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1519: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1512: END IF;
1513: --- Setting item attributes
1514: l_return_status := Set_Attributes(
1515: p_okl_ext_sell_invs_tl_rec, -- IN
1516: l_okl_ext_sell_invs_tl_rec); -- OUT
1517: --- If any errors happen abort API
1518: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1519: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1520: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1520: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1521: RAISE Okl_Api.G_EXCEPTION_ERROR;
1522: END IF;
1523: FOR l_lang_rec IN get_languages LOOP
1524: l_okl_ext_sell_invs_tl_rec.LANGUAGE := l_lang_rec.language_code;
1525: INSERT INTO OKL_EXT_SELL_INVS_TL(
1526: id,
1527: LANGUAGE,
1528: source_lang,
1521: RAISE Okl_Api.G_EXCEPTION_ERROR;
1522: END IF;
1523: FOR l_lang_rec IN get_languages LOOP
1524: l_okl_ext_sell_invs_tl_rec.LANGUAGE := l_lang_rec.language_code;
1525: INSERT INTO OKL_EXT_SELL_INVS_TL(
1526: id,
1527: LANGUAGE,
1528: source_lang,
1529: sfwt_flag,
1537: last_updated_by,
1538: last_update_date,
1539: last_update_login)
1540: VALUES (
1541: l_okl_ext_sell_invs_tl_rec.id,
1542: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1538: last_update_date,
1539: last_update_login)
1540: VALUES (
1541: l_okl_ext_sell_invs_tl_rec.id,
1542: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1539: last_update_login)
1540: VALUES (
1541: l_okl_ext_sell_invs_tl_rec.id,
1542: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1540: VALUES (
1541: l_okl_ext_sell_invs_tl_rec.id,
1542: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1541: l_okl_ext_sell_invs_tl_rec.id,
1542: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1542: l_okl_ext_sell_invs_tl_rec.LANGUAGE,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1543: l_okl_ext_sell_invs_tl_rec.source_lang,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1544: l_okl_ext_sell_invs_tl_rec.sfwt_flag,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1545: l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1546: l_okl_ext_sell_invs_tl_rec.xtrx_format_type,
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1554: l_okl_ext_sell_invs_tl_rec.last_update_login);
1547: l_okl_ext_sell_invs_tl_rec.xtrx_private_label,
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1554: l_okl_ext_sell_invs_tl_rec.last_update_login);
1555: END LOOP;
1548: l_okl_ext_sell_invs_tl_rec.invoice_message,
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1554: l_okl_ext_sell_invs_tl_rec.last_update_login);
1555: END LOOP;
1556: -- Set OUT values
1549: l_okl_ext_sell_invs_tl_rec.description,
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1554: l_okl_ext_sell_invs_tl_rec.last_update_login);
1555: END LOOP;
1556: -- Set OUT values
1557: x_okl_ext_sell_invs_tl_rec := l_okl_ext_sell_invs_tl_rec;
1550: l_okl_ext_sell_invs_tl_rec.created_by,
1551: l_okl_ext_sell_invs_tl_rec.creation_date,
1552: l_okl_ext_sell_invs_tl_rec.last_updated_by,
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1554: l_okl_ext_sell_invs_tl_rec.last_update_login);
1555: END LOOP;
1556: -- Set OUT values
1557: x_okl_ext_sell_invs_tl_rec := l_okl_ext_sell_invs_tl_rec;
1558: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1553: l_okl_ext_sell_invs_tl_rec.last_update_date,
1554: l_okl_ext_sell_invs_tl_rec.last_update_login);
1555: END LOOP;
1556: -- Set OUT values
1557: x_okl_ext_sell_invs_tl_rec := l_okl_ext_sell_invs_tl_rec;
1558: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1559: EXCEPTION
1560: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
1561: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
1606: l_xsiv_rec xsiv_rec_type;
1607: l_def_xsiv_rec xsiv_rec_type;
1608: l_xsi_rec xsi_rec_type;
1609: lx_xsi_rec xsi_rec_type;
1610: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
1611: lx_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
1612: -------------------------------
1613: -- FUNCTION fill_who_columns --
1614: -------------------------------
1607: l_def_xsiv_rec xsiv_rec_type;
1608: l_xsi_rec xsi_rec_type;
1609: lx_xsi_rec xsi_rec_type;
1610: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
1611: lx_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
1612: -------------------------------
1613: -- FUNCTION fill_who_columns --
1614: -------------------------------
1615: FUNCTION fill_who_columns (
1698: --------------------------------------
1699: -- Move VIEW record to "Child" records
1700: --------------------------------------
1701: migrate(l_def_xsiv_rec, l_xsi_rec);
1702: migrate(l_def_xsiv_rec, l_okl_ext_sell_invs_tl_rec);
1703: --------------------------------------------
1704: -- Call the INSERT_ROW for each child record
1705: --------------------------------------------
1706: insert_row(
1721: p_init_msg_list,
1722: x_return_status,
1723: x_msg_count,
1724: x_msg_data,
1725: l_okl_ext_sell_invs_tl_rec,
1726: lx_okl_ext_sell_invs_tl_rec
1727: );
1728: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1729: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1722: x_return_status,
1723: x_msg_count,
1724: x_msg_data,
1725: l_okl_ext_sell_invs_tl_rec,
1726: lx_okl_ext_sell_invs_tl_rec
1727: );
1728: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
1729: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1730: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1729: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1730: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1731: RAISE Okl_Api.G_EXCEPTION_ERROR;
1732: END IF;
1733: migrate(lx_okl_ext_sell_invs_tl_rec, l_def_xsiv_rec);
1734: -- Set OUT values
1735: x_xsiv_rec := l_def_xsiv_rec;
1736: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
1737: EXCEPTION
1962: '_PVT'
1963: );
1964: END lock_row;
1965: ---------------------------------------
1966: -- lock_row for:OKL_EXT_SELL_INVS_TL --
1967: ---------------------------------------
1968: PROCEDURE lock_row(
1969: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1970: x_return_status OUT NOCOPY VARCHAR2,
1969: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
1970: x_return_status OUT NOCOPY VARCHAR2,
1971: x_msg_count OUT NOCOPY NUMBER,
1972: x_msg_data OUT NOCOPY VARCHAR2,
1973: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
1974:
1975: E_Resource_Busy EXCEPTION;
1976: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1977: CURSOR lock_csr (p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
1973: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
1974:
1975: E_Resource_Busy EXCEPTION;
1976: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1977: CURSOR lock_csr (p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
1978: SELECT *
1979: FROM OKL_EXT_SELL_INVS_TL
1980: WHERE ID = p_okl_ext_sell_invs_tl_rec.id
1981: FOR UPDATE NOWAIT;
1975: E_Resource_Busy EXCEPTION;
1976: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1977: CURSOR lock_csr (p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
1978: SELECT *
1979: FROM OKL_EXT_SELL_INVS_TL
1980: WHERE ID = p_okl_ext_sell_invs_tl_rec.id
1981: FOR UPDATE NOWAIT;
1982:
1983: l_api_version CONSTANT NUMBER := 1;
1976: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1977: CURSOR lock_csr (p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
1978: SELECT *
1979: FROM OKL_EXT_SELL_INVS_TL
1980: WHERE ID = p_okl_ext_sell_invs_tl_rec.id
1981: FOR UPDATE NOWAIT;
1982:
1983: l_api_version CONSTANT NUMBER := 1;
1984: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
1996: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
1997: RAISE Okl_Api.G_EXCEPTION_ERROR;
1998: END IF;
1999: BEGIN
2000: OPEN lock_csr(p_okl_ext_sell_invs_tl_rec);
2001: FETCH lock_csr INTO l_lock_var;
2002: l_row_notfound := lock_csr%NOTFOUND;
2003: CLOSE lock_csr;
2004: EXCEPTION
2061: l_api_version CONSTANT NUMBER := 1;
2062: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
2063: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2064: l_xsi_rec xsi_rec_type;
2065: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2066: BEGIN
2067: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
2068: G_PKG_NAME,
2069: p_init_msg_list,
2079: --------------------------------------
2080: -- Move VIEW record to "Child" records
2081: --------------------------------------
2082: migrate(p_xsiv_rec, l_xsi_rec);
2083: migrate(p_xsiv_rec, l_okl_ext_sell_invs_tl_rec);
2084: --------------------------------------------
2085: -- Call the LOCK_ROW for each child record
2086: --------------------------------------------
2087: lock_row(
2100: p_init_msg_list,
2101: x_return_status,
2102: x_msg_count,
2103: x_msg_data,
2104: l_okl_ext_sell_invs_tl_rec
2105: );
2106: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2107: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2108: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2617: '_PVT'
2618: );
2619: END update_row;
2620: -----------------------------------------
2621: -- update_row for:OKL_EXT_SELL_INVS_TL --
2622: -----------------------------------------
2623: PROCEDURE update_row(
2624: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
2625: x_return_status OUT NOCOPY VARCHAR2,
2624: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
2625: x_return_status OUT NOCOPY VARCHAR2,
2626: x_msg_count OUT NOCOPY NUMBER,
2627: x_msg_data OUT NOCOPY VARCHAR2,
2628: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2629: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type) IS
2630:
2631: l_api_version CONSTANT NUMBER := 1;
2632: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2625: x_return_status OUT NOCOPY VARCHAR2,
2626: x_msg_count OUT NOCOPY NUMBER,
2627: x_msg_data OUT NOCOPY VARCHAR2,
2628: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2629: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type) IS
2630:
2631: l_api_version CONSTANT NUMBER := 1;
2632: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2633: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2630:
2631: l_api_version CONSTANT NUMBER := 1;
2632: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2633: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2634: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type := p_okl_ext_sell_invs_tl_rec;
2635: ldefoklextsellinvstlrec okl_ext_sell_invs_tl_rec_type;
2636: l_row_notfound BOOLEAN := TRUE;
2637: ----------------------------------
2638: -- FUNCTION populate_new_record --
2631: l_api_version CONSTANT NUMBER := 1;
2632: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
2633: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2634: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type := p_okl_ext_sell_invs_tl_rec;
2635: ldefoklextsellinvstlrec okl_ext_sell_invs_tl_rec_type;
2636: l_row_notfound BOOLEAN := TRUE;
2637: ----------------------------------
2638: -- FUNCTION populate_new_record --
2639: ----------------------------------
2637: ----------------------------------
2638: -- FUNCTION populate_new_record --
2639: ----------------------------------
2640: FUNCTION populate_new_record (
2641: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2642: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2643: ) RETURN VARCHAR2 IS
2644: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2645: l_row_notfound BOOLEAN := TRUE;
2638: -- FUNCTION populate_new_record --
2639: ----------------------------------
2640: FUNCTION populate_new_record (
2641: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2642: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2643: ) RETURN VARCHAR2 IS
2644: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2645: l_row_notfound BOOLEAN := TRUE;
2646: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2640: FUNCTION populate_new_record (
2641: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2642: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2643: ) RETURN VARCHAR2 IS
2644: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2645: l_row_notfound BOOLEAN := TRUE;
2646: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2647: BEGIN
2648: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2644: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2645: l_row_notfound BOOLEAN := TRUE;
2646: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2647: BEGIN
2648: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2649: -- Get current database values
2650: l_okl_ext_sell_invs_tl_rec := get_rec(p_okl_ext_sell_invs_tl_rec, l_row_notfound);
2651: IF (l_row_notfound) THEN
2652: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2646: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2647: BEGIN
2648: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2649: -- Get current database values
2650: l_okl_ext_sell_invs_tl_rec := get_rec(p_okl_ext_sell_invs_tl_rec, l_row_notfound);
2651: IF (l_row_notfound) THEN
2652: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2653: END IF;
2654: IF (x_okl_ext_sell_invs_tl_rec.id = Okl_Api.G_MISS_NUM)
2650: l_okl_ext_sell_invs_tl_rec := get_rec(p_okl_ext_sell_invs_tl_rec, l_row_notfound);
2651: IF (l_row_notfound) THEN
2652: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2653: END IF;
2654: IF (x_okl_ext_sell_invs_tl_rec.id = Okl_Api.G_MISS_NUM)
2655: THEN
2656: x_okl_ext_sell_invs_tl_rec.id := l_okl_ext_sell_invs_tl_rec.id;
2657: END IF;
2658: IF (x_okl_ext_sell_invs_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2652: l_return_status := Okl_Api.G_RET_STS_UNEXP_ERROR;
2653: END IF;
2654: IF (x_okl_ext_sell_invs_tl_rec.id = Okl_Api.G_MISS_NUM)
2655: THEN
2656: x_okl_ext_sell_invs_tl_rec.id := l_okl_ext_sell_invs_tl_rec.id;
2657: END IF;
2658: IF (x_okl_ext_sell_invs_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2659: THEN
2660: x_okl_ext_sell_invs_tl_rec.LANGUAGE := l_okl_ext_sell_invs_tl_rec.LANGUAGE;
2654: IF (x_okl_ext_sell_invs_tl_rec.id = Okl_Api.G_MISS_NUM)
2655: THEN
2656: x_okl_ext_sell_invs_tl_rec.id := l_okl_ext_sell_invs_tl_rec.id;
2657: END IF;
2658: IF (x_okl_ext_sell_invs_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2659: THEN
2660: x_okl_ext_sell_invs_tl_rec.LANGUAGE := l_okl_ext_sell_invs_tl_rec.LANGUAGE;
2661: END IF;
2662: IF (x_okl_ext_sell_invs_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2656: x_okl_ext_sell_invs_tl_rec.id := l_okl_ext_sell_invs_tl_rec.id;
2657: END IF;
2658: IF (x_okl_ext_sell_invs_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2659: THEN
2660: x_okl_ext_sell_invs_tl_rec.LANGUAGE := l_okl_ext_sell_invs_tl_rec.LANGUAGE;
2661: END IF;
2662: IF (x_okl_ext_sell_invs_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2663: THEN
2664: x_okl_ext_sell_invs_tl_rec.source_lang := l_okl_ext_sell_invs_tl_rec.source_lang;
2658: IF (x_okl_ext_sell_invs_tl_rec.LANGUAGE = Okl_Api.G_MISS_CHAR)
2659: THEN
2660: x_okl_ext_sell_invs_tl_rec.LANGUAGE := l_okl_ext_sell_invs_tl_rec.LANGUAGE;
2661: END IF;
2662: IF (x_okl_ext_sell_invs_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2663: THEN
2664: x_okl_ext_sell_invs_tl_rec.source_lang := l_okl_ext_sell_invs_tl_rec.source_lang;
2665: END IF;
2666: IF (x_okl_ext_sell_invs_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2660: x_okl_ext_sell_invs_tl_rec.LANGUAGE := l_okl_ext_sell_invs_tl_rec.LANGUAGE;
2661: END IF;
2662: IF (x_okl_ext_sell_invs_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2663: THEN
2664: x_okl_ext_sell_invs_tl_rec.source_lang := l_okl_ext_sell_invs_tl_rec.source_lang;
2665: END IF;
2666: IF (x_okl_ext_sell_invs_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2667: THEN
2668: x_okl_ext_sell_invs_tl_rec.sfwt_flag := l_okl_ext_sell_invs_tl_rec.sfwt_flag;
2662: IF (x_okl_ext_sell_invs_tl_rec.source_lang = Okl_Api.G_MISS_CHAR)
2663: THEN
2664: x_okl_ext_sell_invs_tl_rec.source_lang := l_okl_ext_sell_invs_tl_rec.source_lang;
2665: END IF;
2666: IF (x_okl_ext_sell_invs_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2667: THEN
2668: x_okl_ext_sell_invs_tl_rec.sfwt_flag := l_okl_ext_sell_invs_tl_rec.sfwt_flag;
2669: END IF;
2670: IF (x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number = Okl_Api.G_MISS_CHAR)
2664: x_okl_ext_sell_invs_tl_rec.source_lang := l_okl_ext_sell_invs_tl_rec.source_lang;
2665: END IF;
2666: IF (x_okl_ext_sell_invs_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2667: THEN
2668: x_okl_ext_sell_invs_tl_rec.sfwt_flag := l_okl_ext_sell_invs_tl_rec.sfwt_flag;
2669: END IF;
2670: IF (x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number = Okl_Api.G_MISS_CHAR)
2671: THEN
2672: x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number := l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number;
2666: IF (x_okl_ext_sell_invs_tl_rec.sfwt_flag = Okl_Api.G_MISS_CHAR)
2667: THEN
2668: x_okl_ext_sell_invs_tl_rec.sfwt_flag := l_okl_ext_sell_invs_tl_rec.sfwt_flag;
2669: END IF;
2670: IF (x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number = Okl_Api.G_MISS_CHAR)
2671: THEN
2672: x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number := l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number;
2673: END IF;
2674: IF (x_okl_ext_sell_invs_tl_rec.xtrx_format_type = Okl_Api.G_MISS_CHAR)
2668: x_okl_ext_sell_invs_tl_rec.sfwt_flag := l_okl_ext_sell_invs_tl_rec.sfwt_flag;
2669: END IF;
2670: IF (x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number = Okl_Api.G_MISS_CHAR)
2671: THEN
2672: x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number := l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number;
2673: END IF;
2674: IF (x_okl_ext_sell_invs_tl_rec.xtrx_format_type = Okl_Api.G_MISS_CHAR)
2675: THEN
2676: x_okl_ext_sell_invs_tl_rec.xtrx_format_type := l_okl_ext_sell_invs_tl_rec.xtrx_format_type;
2670: IF (x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number = Okl_Api.G_MISS_CHAR)
2671: THEN
2672: x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number := l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number;
2673: END IF;
2674: IF (x_okl_ext_sell_invs_tl_rec.xtrx_format_type = Okl_Api.G_MISS_CHAR)
2675: THEN
2676: x_okl_ext_sell_invs_tl_rec.xtrx_format_type := l_okl_ext_sell_invs_tl_rec.xtrx_format_type;
2677: END IF;
2678: IF (x_okl_ext_sell_invs_tl_rec.xtrx_private_label = Okl_Api.G_MISS_CHAR)
2672: x_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number := l_okl_ext_sell_invs_tl_rec.xtrx_cons_invoice_number;
2673: END IF;
2674: IF (x_okl_ext_sell_invs_tl_rec.xtrx_format_type = Okl_Api.G_MISS_CHAR)
2675: THEN
2676: x_okl_ext_sell_invs_tl_rec.xtrx_format_type := l_okl_ext_sell_invs_tl_rec.xtrx_format_type;
2677: END IF;
2678: IF (x_okl_ext_sell_invs_tl_rec.xtrx_private_label = Okl_Api.G_MISS_CHAR)
2679: THEN
2680: x_okl_ext_sell_invs_tl_rec.xtrx_private_label := l_okl_ext_sell_invs_tl_rec.xtrx_private_label;
2674: IF (x_okl_ext_sell_invs_tl_rec.xtrx_format_type = Okl_Api.G_MISS_CHAR)
2675: THEN
2676: x_okl_ext_sell_invs_tl_rec.xtrx_format_type := l_okl_ext_sell_invs_tl_rec.xtrx_format_type;
2677: END IF;
2678: IF (x_okl_ext_sell_invs_tl_rec.xtrx_private_label = Okl_Api.G_MISS_CHAR)
2679: THEN
2680: x_okl_ext_sell_invs_tl_rec.xtrx_private_label := l_okl_ext_sell_invs_tl_rec.xtrx_private_label;
2681: END IF;
2682: IF (x_okl_ext_sell_invs_tl_rec.invoice_message = Okl_Api.G_MISS_CHAR)
2676: x_okl_ext_sell_invs_tl_rec.xtrx_format_type := l_okl_ext_sell_invs_tl_rec.xtrx_format_type;
2677: END IF;
2678: IF (x_okl_ext_sell_invs_tl_rec.xtrx_private_label = Okl_Api.G_MISS_CHAR)
2679: THEN
2680: x_okl_ext_sell_invs_tl_rec.xtrx_private_label := l_okl_ext_sell_invs_tl_rec.xtrx_private_label;
2681: END IF;
2682: IF (x_okl_ext_sell_invs_tl_rec.invoice_message = Okl_Api.G_MISS_CHAR)
2683: THEN
2684: x_okl_ext_sell_invs_tl_rec.invoice_message := l_okl_ext_sell_invs_tl_rec.invoice_message;
2678: IF (x_okl_ext_sell_invs_tl_rec.xtrx_private_label = Okl_Api.G_MISS_CHAR)
2679: THEN
2680: x_okl_ext_sell_invs_tl_rec.xtrx_private_label := l_okl_ext_sell_invs_tl_rec.xtrx_private_label;
2681: END IF;
2682: IF (x_okl_ext_sell_invs_tl_rec.invoice_message = Okl_Api.G_MISS_CHAR)
2683: THEN
2684: x_okl_ext_sell_invs_tl_rec.invoice_message := l_okl_ext_sell_invs_tl_rec.invoice_message;
2685: END IF;
2686: IF (x_okl_ext_sell_invs_tl_rec.description = Okl_Api.G_MISS_CHAR)
2680: x_okl_ext_sell_invs_tl_rec.xtrx_private_label := l_okl_ext_sell_invs_tl_rec.xtrx_private_label;
2681: END IF;
2682: IF (x_okl_ext_sell_invs_tl_rec.invoice_message = Okl_Api.G_MISS_CHAR)
2683: THEN
2684: x_okl_ext_sell_invs_tl_rec.invoice_message := l_okl_ext_sell_invs_tl_rec.invoice_message;
2685: END IF;
2686: IF (x_okl_ext_sell_invs_tl_rec.description = Okl_Api.G_MISS_CHAR)
2687: THEN
2688: x_okl_ext_sell_invs_tl_rec.description := l_okl_ext_sell_invs_tl_rec.description;
2682: IF (x_okl_ext_sell_invs_tl_rec.invoice_message = Okl_Api.G_MISS_CHAR)
2683: THEN
2684: x_okl_ext_sell_invs_tl_rec.invoice_message := l_okl_ext_sell_invs_tl_rec.invoice_message;
2685: END IF;
2686: IF (x_okl_ext_sell_invs_tl_rec.description = Okl_Api.G_MISS_CHAR)
2687: THEN
2688: x_okl_ext_sell_invs_tl_rec.description := l_okl_ext_sell_invs_tl_rec.description;
2689: END IF;
2690: IF (x_okl_ext_sell_invs_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2684: x_okl_ext_sell_invs_tl_rec.invoice_message := l_okl_ext_sell_invs_tl_rec.invoice_message;
2685: END IF;
2686: IF (x_okl_ext_sell_invs_tl_rec.description = Okl_Api.G_MISS_CHAR)
2687: THEN
2688: x_okl_ext_sell_invs_tl_rec.description := l_okl_ext_sell_invs_tl_rec.description;
2689: END IF;
2690: IF (x_okl_ext_sell_invs_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2691: THEN
2692: x_okl_ext_sell_invs_tl_rec.created_by := l_okl_ext_sell_invs_tl_rec.created_by;
2686: IF (x_okl_ext_sell_invs_tl_rec.description = Okl_Api.G_MISS_CHAR)
2687: THEN
2688: x_okl_ext_sell_invs_tl_rec.description := l_okl_ext_sell_invs_tl_rec.description;
2689: END IF;
2690: IF (x_okl_ext_sell_invs_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2691: THEN
2692: x_okl_ext_sell_invs_tl_rec.created_by := l_okl_ext_sell_invs_tl_rec.created_by;
2693: END IF;
2694: IF (x_okl_ext_sell_invs_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2688: x_okl_ext_sell_invs_tl_rec.description := l_okl_ext_sell_invs_tl_rec.description;
2689: END IF;
2690: IF (x_okl_ext_sell_invs_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2691: THEN
2692: x_okl_ext_sell_invs_tl_rec.created_by := l_okl_ext_sell_invs_tl_rec.created_by;
2693: END IF;
2694: IF (x_okl_ext_sell_invs_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2695: THEN
2696: x_okl_ext_sell_invs_tl_rec.creation_date := l_okl_ext_sell_invs_tl_rec.creation_date;
2690: IF (x_okl_ext_sell_invs_tl_rec.created_by = Okl_Api.G_MISS_NUM)
2691: THEN
2692: x_okl_ext_sell_invs_tl_rec.created_by := l_okl_ext_sell_invs_tl_rec.created_by;
2693: END IF;
2694: IF (x_okl_ext_sell_invs_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2695: THEN
2696: x_okl_ext_sell_invs_tl_rec.creation_date := l_okl_ext_sell_invs_tl_rec.creation_date;
2697: END IF;
2698: IF (x_okl_ext_sell_invs_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2692: x_okl_ext_sell_invs_tl_rec.created_by := l_okl_ext_sell_invs_tl_rec.created_by;
2693: END IF;
2694: IF (x_okl_ext_sell_invs_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2695: THEN
2696: x_okl_ext_sell_invs_tl_rec.creation_date := l_okl_ext_sell_invs_tl_rec.creation_date;
2697: END IF;
2698: IF (x_okl_ext_sell_invs_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2699: THEN
2700: x_okl_ext_sell_invs_tl_rec.last_updated_by := l_okl_ext_sell_invs_tl_rec.last_updated_by;
2694: IF (x_okl_ext_sell_invs_tl_rec.creation_date = Okl_Api.G_MISS_DATE)
2695: THEN
2696: x_okl_ext_sell_invs_tl_rec.creation_date := l_okl_ext_sell_invs_tl_rec.creation_date;
2697: END IF;
2698: IF (x_okl_ext_sell_invs_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2699: THEN
2700: x_okl_ext_sell_invs_tl_rec.last_updated_by := l_okl_ext_sell_invs_tl_rec.last_updated_by;
2701: END IF;
2702: IF (x_okl_ext_sell_invs_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2696: x_okl_ext_sell_invs_tl_rec.creation_date := l_okl_ext_sell_invs_tl_rec.creation_date;
2697: END IF;
2698: IF (x_okl_ext_sell_invs_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2699: THEN
2700: x_okl_ext_sell_invs_tl_rec.last_updated_by := l_okl_ext_sell_invs_tl_rec.last_updated_by;
2701: END IF;
2702: IF (x_okl_ext_sell_invs_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2703: THEN
2704: x_okl_ext_sell_invs_tl_rec.last_update_date := l_okl_ext_sell_invs_tl_rec.last_update_date;
2698: IF (x_okl_ext_sell_invs_tl_rec.last_updated_by = Okl_Api.G_MISS_NUM)
2699: THEN
2700: x_okl_ext_sell_invs_tl_rec.last_updated_by := l_okl_ext_sell_invs_tl_rec.last_updated_by;
2701: END IF;
2702: IF (x_okl_ext_sell_invs_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2703: THEN
2704: x_okl_ext_sell_invs_tl_rec.last_update_date := l_okl_ext_sell_invs_tl_rec.last_update_date;
2705: END IF;
2706: IF (x_okl_ext_sell_invs_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2700: x_okl_ext_sell_invs_tl_rec.last_updated_by := l_okl_ext_sell_invs_tl_rec.last_updated_by;
2701: END IF;
2702: IF (x_okl_ext_sell_invs_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2703: THEN
2704: x_okl_ext_sell_invs_tl_rec.last_update_date := l_okl_ext_sell_invs_tl_rec.last_update_date;
2705: END IF;
2706: IF (x_okl_ext_sell_invs_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2707: THEN
2708: x_okl_ext_sell_invs_tl_rec.last_update_login := l_okl_ext_sell_invs_tl_rec.last_update_login;
2702: IF (x_okl_ext_sell_invs_tl_rec.last_update_date = Okl_Api.G_MISS_DATE)
2703: THEN
2704: x_okl_ext_sell_invs_tl_rec.last_update_date := l_okl_ext_sell_invs_tl_rec.last_update_date;
2705: END IF;
2706: IF (x_okl_ext_sell_invs_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2707: THEN
2708: x_okl_ext_sell_invs_tl_rec.last_update_login := l_okl_ext_sell_invs_tl_rec.last_update_login;
2709: END IF;
2710: RETURN(l_return_status);
2704: x_okl_ext_sell_invs_tl_rec.last_update_date := l_okl_ext_sell_invs_tl_rec.last_update_date;
2705: END IF;
2706: IF (x_okl_ext_sell_invs_tl_rec.last_update_login = Okl_Api.G_MISS_NUM)
2707: THEN
2708: x_okl_ext_sell_invs_tl_rec.last_update_login := l_okl_ext_sell_invs_tl_rec.last_update_login;
2709: END IF;
2710: RETURN(l_return_status);
2711: END populate_new_record;
2712: ---------------------------------------------
2709: END IF;
2710: RETURN(l_return_status);
2711: END populate_new_record;
2712: ---------------------------------------------
2713: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
2714: ---------------------------------------------
2715: FUNCTION Set_Attributes (
2716: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2717: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2712: ---------------------------------------------
2713: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
2714: ---------------------------------------------
2715: FUNCTION Set_Attributes (
2716: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2717: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2718: ) RETURN VARCHAR2 IS
2719: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2720: BEGIN
2713: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
2714: ---------------------------------------------
2715: FUNCTION Set_Attributes (
2716: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
2717: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2718: ) RETURN VARCHAR2 IS
2719: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2720: BEGIN
2721: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2717: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
2718: ) RETURN VARCHAR2 IS
2719: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2720: BEGIN
2721: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2722: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
2723: x_okl_ext_sell_invs_tl_rec.SOURCE_LANG := USERENV('LANG');
2724: RETURN(l_return_status);
2725: END Set_Attributes;
2718: ) RETURN VARCHAR2 IS
2719: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2720: BEGIN
2721: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2722: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
2723: x_okl_ext_sell_invs_tl_rec.SOURCE_LANG := USERENV('LANG');
2724: RETURN(l_return_status);
2725: END Set_Attributes;
2726: BEGIN
2719: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2720: BEGIN
2721: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
2722: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
2723: x_okl_ext_sell_invs_tl_rec.SOURCE_LANG := USERENV('LANG');
2724: RETURN(l_return_status);
2725: END Set_Attributes;
2726: BEGIN
2727: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
2734: RAISE Okl_Api.G_EXCEPTION_ERROR;
2735: END IF;
2736: --- Setting item attributes
2737: l_return_status := Set_Attributes(
2738: p_okl_ext_sell_invs_tl_rec, -- IN
2739: l_okl_ext_sell_invs_tl_rec); -- OUT
2740: --- If any errors happen abort API
2741: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2742: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2735: END IF;
2736: --- Setting item attributes
2737: l_return_status := Set_Attributes(
2738: p_okl_ext_sell_invs_tl_rec, -- IN
2739: l_okl_ext_sell_invs_tl_rec); -- OUT
2740: --- If any errors happen abort API
2741: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2742: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2743: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2742: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2743: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2744: RAISE Okl_Api.G_EXCEPTION_ERROR;
2745: END IF;
2746: l_return_status := populate_new_record(l_okl_ext_sell_invs_tl_rec, ldefoklextsellinvstlrec);
2747: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
2748: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2749: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2750: RAISE Okl_Api.G_EXCEPTION_ERROR;
2748: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2749: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
2750: RAISE Okl_Api.G_EXCEPTION_ERROR;
2751: END IF;
2752: UPDATE OKL_EXT_SELL_INVS_TL
2753: SET XTRX_CONS_INVOICE_NUMBER = ldefoklextsellinvstlrec.xtrx_cons_invoice_number,
2754: XTRX_FORMAT_TYPE = ldefoklextsellinvstlrec.xtrx_format_type,
2755: XTRX_PRIVATE_LABEL = ldefoklextsellinvstlrec.xtrx_private_label,
2756: INVOICE_MESSAGE = ldefoklextsellinvstlrec.invoice_message,
2763: LAST_UPDATE_LOGIN = ldefoklextsellinvstlrec.last_update_login
2764: WHERE ID = ldefoklextsellinvstlrec.id
2765: AND USERENV('LANG') in (SOURCE_LANG, LANGUAGE);
2766:
2767: UPDATE OKL_EXT_SELL_INVS_TL
2768: SET SFWT_FLAG = 'Y'
2769: WHERE ID = ldefoklextsellinvstlrec.id
2770: AND SOURCE_LANG <> USERENV('LANG');
2771:
2768: SET SFWT_FLAG = 'Y'
2769: WHERE ID = ldefoklextsellinvstlrec.id
2770: AND SOURCE_LANG <> USERENV('LANG');
2771:
2772: x_okl_ext_sell_invs_tl_rec := ldefoklextsellinvstlrec;
2773: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2774: EXCEPTION
2775: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
2776: x_return_status := Okl_Api.HANDLE_EXCEPTIONS
2819: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2820: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2821: l_xsiv_rec xsiv_rec_type := p_xsiv_rec;
2822: l_def_xsiv_rec xsiv_rec_type;
2823: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2824: lx_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2825: l_xsi_rec xsi_rec_type;
2826: lx_xsi_rec xsi_rec_type;
2827: -------------------------------
2820: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
2821: l_xsiv_rec xsiv_rec_type := p_xsiv_rec;
2822: l_def_xsiv_rec xsiv_rec_type;
2823: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2824: lx_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
2825: l_xsi_rec xsi_rec_type;
2826: lx_xsi_rec xsi_rec_type;
2827: -------------------------------
2828: -- FUNCTION fill_who_columns --
3183:
3184: --------------------------------------
3185: -- Move VIEW record to "Child" records
3186: --------------------------------------
3187: migrate(l_def_xsiv_rec, l_okl_ext_sell_invs_tl_rec);
3188: migrate(l_def_xsiv_rec, l_xsi_rec);
3189: --------------------------------------------
3190: -- Call the UPDATE_ROW for each child record
3191: --------------------------------------------
3193: p_init_msg_list,
3194: x_return_status,
3195: x_msg_count,
3196: x_msg_data,
3197: l_okl_ext_sell_invs_tl_rec,
3198: lx_okl_ext_sell_invs_tl_rec
3199: );
3200: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3201: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3194: x_return_status,
3195: x_msg_count,
3196: x_msg_data,
3197: l_okl_ext_sell_invs_tl_rec,
3198: lx_okl_ext_sell_invs_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
3201: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3202: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3203: RAISE Okl_Api.G_EXCEPTION_ERROR;
3204: END IF;
3205: migrate(lx_okl_ext_sell_invs_tl_rec, l_def_xsiv_rec);
3206: update_row(
3207: p_init_msg_list,
3208: x_return_status,
3209: x_msg_count,
3402: '_PVT'
3403: );
3404: END delete_row;
3405: -----------------------------------------
3406: -- delete_row for:OKL_EXT_SELL_INVS_TL --
3407: -----------------------------------------
3408: PROCEDURE delete_row(
3409: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
3410: x_return_status OUT NOCOPY VARCHAR2,
3409: p_init_msg_list IN VARCHAR2 DEFAULT Okl_Api.G_FALSE,
3410: x_return_status OUT NOCOPY VARCHAR2,
3411: x_msg_count OUT NOCOPY NUMBER,
3412: x_msg_data OUT NOCOPY VARCHAR2,
3413: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type) IS
3414:
3415: l_api_version CONSTANT NUMBER := 1;
3416: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3417: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3414:
3415: l_api_version CONSTANT NUMBER := 1;
3416: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
3417: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3418: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type:= p_okl_ext_sell_invs_tl_rec;
3419: l_row_notfound BOOLEAN := TRUE;
3420: ---------------------------------------------
3421: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
3422: ---------------------------------------------
3417: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3418: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type:= p_okl_ext_sell_invs_tl_rec;
3419: l_row_notfound BOOLEAN := TRUE;
3420: ---------------------------------------------
3421: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
3422: ---------------------------------------------
3423: FUNCTION Set_Attributes (
3424: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
3425: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
3420: ---------------------------------------------
3421: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
3422: ---------------------------------------------
3423: FUNCTION Set_Attributes (
3424: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
3425: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
3426: ) RETURN VARCHAR2 IS
3427: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3428: BEGIN
3421: -- Set_Attributes for:OKL_EXT_SELL_INVS_TL --
3422: ---------------------------------------------
3423: FUNCTION Set_Attributes (
3424: p_okl_ext_sell_invs_tl_rec IN okl_ext_sell_invs_tl_rec_type,
3425: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
3426: ) RETURN VARCHAR2 IS
3427: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3428: BEGIN
3429: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
3425: x_okl_ext_sell_invs_tl_rec OUT NOCOPY okl_ext_sell_invs_tl_rec_type
3426: ) RETURN VARCHAR2 IS
3427: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3428: BEGIN
3429: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
3430: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
3431: RETURN(l_return_status);
3432: END Set_Attributes;
3433: BEGIN
3426: ) RETURN VARCHAR2 IS
3427: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3428: BEGIN
3429: x_okl_ext_sell_invs_tl_rec := p_okl_ext_sell_invs_tl_rec;
3430: x_okl_ext_sell_invs_tl_rec.LANGUAGE := USERENV('LANG');
3431: RETURN(l_return_status);
3432: END Set_Attributes;
3433: BEGIN
3434: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
3441: RAISE Okl_Api.G_EXCEPTION_ERROR;
3442: END IF;
3443: --- Setting item attributes
3444: l_return_status := Set_Attributes(
3445: p_okl_ext_sell_invs_tl_rec, -- IN
3446: l_okl_ext_sell_invs_tl_rec); -- OUT
3447: --- If any errors happen abort API
3448: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3449: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3442: END IF;
3443: --- Setting item attributes
3444: l_return_status := Set_Attributes(
3445: p_okl_ext_sell_invs_tl_rec, -- IN
3446: l_okl_ext_sell_invs_tl_rec); -- OUT
3447: --- If any errors happen abort API
3448: IF (l_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3449: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3450: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3449: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3450: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3451: RAISE Okl_Api.G_EXCEPTION_ERROR;
3452: END IF;
3453: DELETE FROM OKL_EXT_SELL_INVS_TL
3454: WHERE ID = l_okl_ext_sell_invs_tl_rec.id;
3455:
3456: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3457: EXCEPTION
3450: ELSIF (l_return_status = Okl_Api.G_RET_STS_ERROR) THEN
3451: RAISE Okl_Api.G_EXCEPTION_ERROR;
3452: END IF;
3453: DELETE FROM OKL_EXT_SELL_INVS_TL
3454: WHERE ID = l_okl_ext_sell_invs_tl_rec.id;
3455:
3456: Okl_Api.END_ACTIVITY(x_msg_count, x_msg_data);
3457: EXCEPTION
3458: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
3500: l_api_version CONSTANT NUMBER := 1;
3501: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
3502: l_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
3503: l_xsiv_rec xsiv_rec_type := p_xsiv_rec;
3504: l_okl_ext_sell_invs_tl_rec okl_ext_sell_invs_tl_rec_type;
3505: l_xsi_rec xsi_rec_type;
3506: BEGIN
3507: l_return_status := Okl_Api.START_ACTIVITY(l_api_name,
3508: G_PKG_NAME,
3518: END IF;
3519: --------------------------------------
3520: -- Move VIEW record to "Child" records
3521: --------------------------------------
3522: migrate(l_xsiv_rec, l_okl_ext_sell_invs_tl_rec);
3523: migrate(l_xsiv_rec, l_xsi_rec);
3524: --------------------------------------------
3525: -- Call the DELETE_ROW for each child record
3526: --------------------------------------------
3528: p_init_msg_list,
3529: x_return_status,
3530: x_msg_count,
3531: x_msg_data,
3532: l_okl_ext_sell_invs_tl_rec
3533: );
3534: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3535: RAISE Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR;
3536: ELSIF (x_return_status = Okl_Api.G_RET_STS_ERROR) THEN