1633: -- PROCEDURE add_language
1634: ---------------------------------------------------------------------------
1635: PROCEDURE add_language IS
1636: BEGIN
1637: DELETE FROM OKL_ASSET_RETURNS_TL T
1638: WHERE NOT EXISTS (
1639: SELECT NULL
1640: FROM OKL_ASSET_RETURNS_ALL_B B
1641: WHERE B.ID = T.ID
1640: FROM OKL_ASSET_RETURNS_ALL_B B
1641: WHERE B.ID = T.ID
1642: );
1643:
1644: UPDATE OKL_ASSET_RETURNS_TL T SET (
1645: COMMENTS) = (SELECT
1646: B.COMMENTS
1647: FROM OKL_ASSET_RETURNS_TL B
1648: WHERE B.ID = T.ID
1643:
1644: UPDATE OKL_ASSET_RETURNS_TL T SET (
1645: COMMENTS) = (SELECT
1646: B.COMMENTS
1647: FROM OKL_ASSET_RETURNS_TL B
1648: WHERE B.ID = T.ID
1649: AND B.LANGUAGE = T.SOURCE_LANG)
1650: WHERE (
1651: T.ID,
1652: T.LANGUAGE)
1653: IN (SELECT
1654: SUBT.ID,
1655: SUBT.LANGUAGE
1656: FROM OKL_ASSET_RETURNS_TL SUBB, OKL_ASSET_RETURNS_TL SUBT
1657: WHERE SUBB.ID = SUBT.ID
1658: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
1659: AND (SUBB.COMMENTS <> SUBT.COMMENTS
1660: OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
1660: OR (SUBB.COMMENTS IS NULL AND SUBT.COMMENTS IS NOT NULL)
1661: OR (SUBB.COMMENTS IS NOT NULL AND SUBT.COMMENTS IS NULL)
1662: ));
1663:
1664: INSERT INTO OKL_ASSET_RETURNS_TL (
1665: ID,
1666: LANGUAGE,
1667: SOURCE_LANG,
1668: SFWT_FLAG,
1684: B.LAST_UPDATED_BY,
1685: B.LAST_UPDATE_DATE,
1686: B.LAST_UPDATE_LOGIN,
1687: B.NEW_ITEM_DESCRIPTION
1688: FROM OKL_ASSET_RETURNS_TL B, FND_LANGUAGES L
1689: WHERE L.INSTALLED_FLAG IN ('I', 'B')
1690: AND B.LANGUAGE = USERENV('LANG')
1691: AND NOT EXISTS(
1692: SELECT NULL
1689: WHERE L.INSTALLED_FLAG IN ('I', 'B')
1690: AND B.LANGUAGE = USERENV('LANG')
1691: AND NOT EXISTS(
1692: SELECT NULL
1693: FROM OKL_ASSET_RETURNS_TL T
1694: WHERE T.ID = B.ID
1695: AND T.LANGUAGE = L.LANGUAGE_CODE
1696: );
1697:
1869: BEGIN
1870: RETURN(get_rec(p_art_rec, l_row_notfound));
1871: END get_rec;
1872: ---------------------------------------------------------------------------
1873: -- FUNCTION get_rec for: OKL_ASSET_RETURNS_TL
1874: ---------------------------------------------------------------------------
1875: FUNCTION get_rec (
1876: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
1877: x_no_data_found OUT NOCOPY BOOLEAN
1872: ---------------------------------------------------------------------------
1873: -- FUNCTION get_rec for: OKL_ASSET_RETURNS_TL
1874: ---------------------------------------------------------------------------
1875: FUNCTION get_rec (
1876: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
1877: x_no_data_found OUT NOCOPY BOOLEAN
1878: ) RETURN okl_asset_returns_tl_rec_type IS
1879: CURSOR okl_asset_returns_tl_pk_csr (p_id IN NUMBER,
1880: p_language IN VARCHAR2) IS
1874: ---------------------------------------------------------------------------
1875: FUNCTION get_rec (
1876: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
1877: x_no_data_found OUT NOCOPY BOOLEAN
1878: ) RETURN okl_asset_returns_tl_rec_type IS
1879: CURSOR okl_asset_returns_tl_pk_csr (p_id IN NUMBER,
1880: p_language IN VARCHAR2) IS
1881: SELECT
1882: ID,
1875: FUNCTION get_rec (
1876: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
1877: x_no_data_found OUT NOCOPY BOOLEAN
1878: ) RETURN okl_asset_returns_tl_rec_type IS
1879: CURSOR okl_asset_returns_tl_pk_csr (p_id IN NUMBER,
1880: p_language IN VARCHAR2) IS
1881: SELECT
1882: ID,
1883: LANGUAGE,
1889: LAST_UPDATED_BY,
1890: LAST_UPDATE_DATE,
1891: LAST_UPDATE_LOGIN,
1892: NEW_ITEM_DESCRIPTION
1893: FROM Okl_Asset_Returns_Tl
1894: WHERE okl_asset_returns_tl.id = p_id
1895: AND okl_asset_returns_tl.language = p_language;
1896: l_okl_asset_returns_tl_pk okl_asset_returns_tl_pk_csr%ROWTYPE;
1897: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
1890: LAST_UPDATE_DATE,
1891: LAST_UPDATE_LOGIN,
1892: NEW_ITEM_DESCRIPTION
1893: FROM Okl_Asset_Returns_Tl
1894: WHERE okl_asset_returns_tl.id = p_id
1895: AND okl_asset_returns_tl.language = p_language;
1896: l_okl_asset_returns_tl_pk okl_asset_returns_tl_pk_csr%ROWTYPE;
1897: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
1898: BEGIN
1891: LAST_UPDATE_LOGIN,
1892: NEW_ITEM_DESCRIPTION
1893: FROM Okl_Asset_Returns_Tl
1894: WHERE okl_asset_returns_tl.id = p_id
1895: AND okl_asset_returns_tl.language = p_language;
1896: l_okl_asset_returns_tl_pk okl_asset_returns_tl_pk_csr%ROWTYPE;
1897: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
1898: BEGIN
1899: x_no_data_found := TRUE;
1892: NEW_ITEM_DESCRIPTION
1893: FROM Okl_Asset_Returns_Tl
1894: WHERE okl_asset_returns_tl.id = p_id
1895: AND okl_asset_returns_tl.language = p_language;
1896: l_okl_asset_returns_tl_pk okl_asset_returns_tl_pk_csr%ROWTYPE;
1897: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
1898: BEGIN
1899: x_no_data_found := TRUE;
1900: -- Get current database values
1893: FROM Okl_Asset_Returns_Tl
1894: WHERE okl_asset_returns_tl.id = p_id
1895: AND okl_asset_returns_tl.language = p_language;
1896: l_okl_asset_returns_tl_pk okl_asset_returns_tl_pk_csr%ROWTYPE;
1897: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
1898: BEGIN
1899: x_no_data_found := TRUE;
1900: -- Get current database values
1901: OPEN okl_asset_returns_tl_pk_csr (p_okl_asset_returns_tl_rec.id,
1897: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
1898: BEGIN
1899: x_no_data_found := TRUE;
1900: -- Get current database values
1901: OPEN okl_asset_returns_tl_pk_csr (p_okl_asset_returns_tl_rec.id,
1902: p_okl_asset_returns_tl_rec.language);
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1898: BEGIN
1899: x_no_data_found := TRUE;
1900: -- Get current database values
1901: OPEN okl_asset_returns_tl_pk_csr (p_okl_asset_returns_tl_rec.id,
1902: p_okl_asset_returns_tl_rec.language);
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1899: x_no_data_found := TRUE;
1900: -- Get current database values
1901: OPEN okl_asset_returns_tl_pk_csr (p_okl_asset_returns_tl_rec.id,
1902: p_okl_asset_returns_tl_rec.language);
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1900: -- Get current database values
1901: OPEN okl_asset_returns_tl_pk_csr (p_okl_asset_returns_tl_rec.id,
1902: p_okl_asset_returns_tl_rec.language);
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1901: OPEN okl_asset_returns_tl_pk_csr (p_okl_asset_returns_tl_rec.id,
1902: p_okl_asset_returns_tl_rec.language);
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1902: p_okl_asset_returns_tl_rec.language);
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1903: FETCH okl_asset_returns_tl_pk_csr INTO
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1904: l_okl_asset_returns_tl_rec.ID,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1905: l_okl_asset_returns_tl_rec.LANGUAGE,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1906: l_okl_asset_returns_tl_rec.SOURCE_LANG,
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1907: l_okl_asset_returns_tl_rec.SFWT_FLAG,
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1908: l_okl_asset_returns_tl_rec.COMMENTS,
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1916: CLOSE okl_asset_returns_tl_pk_csr;
1909: l_okl_asset_returns_tl_rec.CREATED_BY,
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1916: CLOSE okl_asset_returns_tl_pk_csr;
1917: RETURN(l_okl_asset_returns_tl_rec);
1910: l_okl_asset_returns_tl_rec.CREATION_DATE,
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1916: CLOSE okl_asset_returns_tl_pk_csr;
1917: RETURN(l_okl_asset_returns_tl_rec);
1918: END get_rec;
1911: l_okl_asset_returns_tl_rec.LAST_UPDATED_BY,
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1916: CLOSE okl_asset_returns_tl_pk_csr;
1917: RETURN(l_okl_asset_returns_tl_rec);
1918: END get_rec;
1919:
1912: l_okl_asset_returns_tl_rec.LAST_UPDATE_DATE,
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1916: CLOSE okl_asset_returns_tl_pk_csr;
1917: RETURN(l_okl_asset_returns_tl_rec);
1918: END get_rec;
1919:
1920: FUNCTION get_rec (
1913: l_okl_asset_returns_tl_rec.LAST_UPDATE_LOGIN,
1914: l_okl_asset_returns_tl_rec.NEW_ITEM_DESCRIPTION;
1915: x_no_data_found := okl_asset_returns_tl_pk_csr%NOTFOUND;
1916: CLOSE okl_asset_returns_tl_pk_csr;
1917: RETURN(l_okl_asset_returns_tl_rec);
1918: END get_rec;
1919:
1920: FUNCTION get_rec (
1921: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type
1917: RETURN(l_okl_asset_returns_tl_rec);
1918: END get_rec;
1919:
1920: FUNCTION get_rec (
1921: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type
1922: ) RETURN okl_asset_returns_tl_rec_type IS
1923: l_row_notfound BOOLEAN := TRUE;
1924: BEGIN
1925: RETURN(get_rec(p_okl_asset_returns_tl_rec, l_row_notfound));
1918: END get_rec;
1919:
1920: FUNCTION get_rec (
1921: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type
1922: ) RETURN okl_asset_returns_tl_rec_type IS
1923: l_row_notfound BOOLEAN := TRUE;
1924: BEGIN
1925: RETURN(get_rec(p_okl_asset_returns_tl_rec, l_row_notfound));
1926: END get_rec;
1921: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type
1922: ) RETURN okl_asset_returns_tl_rec_type IS
1923: l_row_notfound BOOLEAN := TRUE;
1924: BEGIN
1925: RETURN(get_rec(p_okl_asset_returns_tl_rec, l_row_notfound));
1926: END get_rec;
1927: ---------------------------------------------------------------------------
1928: -- FUNCTION get_rec for: OKL_ASSET_RETURNS_V
1929: ---------------------------------------------------------------------------
2792: -- Loan Repossession proj end
2793: END migrate;
2794: PROCEDURE migrate (
2795: p_from IN artv_rec_type,
2796: p_to IN OUT NOCOPY okl_asset_returns_tl_rec_type
2797: ) IS
2798: BEGIN
2799: p_to.id := p_from.id;
2800: p_to.sfwt_flag := p_from.sfwt_flag;
2807:
2808: p_to.new_item_description := p_from.new_item_description;
2809: END migrate;
2810: PROCEDURE migrate (
2811: p_from IN okl_asset_returns_tl_rec_type,
2812: p_to IN OUT NOCOPY artv_rec_type
2813: ) IS
2814: BEGIN
2815: p_to.id := p_from.id;
2842: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
2843: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2844: l_artv_rec artv_rec_type := p_artv_rec;
2845: l_art_rec art_rec_type;
2846: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
2847: BEGIN
2848: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2849: G_PKG_NAME,
2850: p_init_msg_list,
3220: '_PVT'
3221: );
3222: END insert_row;
3223: -----------------------------------------
3224: -- insert_row for:OKL_ASSET_RETURNS_TL --
3225: -----------------------------------------
3226: PROCEDURE insert_row(
3227: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3228: x_return_status OUT NOCOPY VARCHAR2,
3227: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3228: x_return_status OUT NOCOPY VARCHAR2,
3229: x_msg_count OUT NOCOPY NUMBER,
3230: x_msg_data OUT NOCOPY VARCHAR2,
3231: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
3232: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type) IS
3233:
3234: l_api_version CONSTANT NUMBER := 1;
3235: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3228: x_return_status OUT NOCOPY VARCHAR2,
3229: x_msg_count OUT NOCOPY NUMBER,
3230: x_msg_data OUT NOCOPY VARCHAR2,
3231: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
3232: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type) IS
3233:
3234: l_api_version CONSTANT NUMBER := 1;
3235: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3236: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3233:
3234: l_api_version CONSTANT NUMBER := 1;
3235: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3236: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3237: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type := p_okl_asset_returns_tl_rec;
3238: ldefoklassetreturnstlrec okl_asset_returns_tl_rec_type;
3239: CURSOR get_languages IS
3240: SELECT *
3241: FROM FND_LANGUAGES
3234: l_api_version CONSTANT NUMBER := 1;
3235: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3236: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3237: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type := p_okl_asset_returns_tl_rec;
3238: ldefoklassetreturnstlrec okl_asset_returns_tl_rec_type;
3239: CURSOR get_languages IS
3240: SELECT *
3241: FROM FND_LANGUAGES
3242: WHERE INSTALLED_FLAG IN ('I', 'B');
3240: SELECT *
3241: FROM FND_LANGUAGES
3242: WHERE INSTALLED_FLAG IN ('I', 'B');
3243: ---------------------------------------------
3244: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
3245: ---------------------------------------------
3246: FUNCTION Set_Attributes (
3247: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
3248: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
3243: ---------------------------------------------
3244: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
3245: ---------------------------------------------
3246: FUNCTION Set_Attributes (
3247: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
3248: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
3249: ) RETURN VARCHAR2 IS
3250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3251: BEGIN
3244: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
3245: ---------------------------------------------
3246: FUNCTION Set_Attributes (
3247: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
3248: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
3249: ) RETURN VARCHAR2 IS
3250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3251: BEGIN
3252: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
3248: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
3249: ) RETURN VARCHAR2 IS
3250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3251: BEGIN
3252: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
3253: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
3254: x_okl_asset_returns_tl_rec.SOURCE_LANG := USERENV('LANG');
3255: RETURN(l_return_status);
3256: END Set_Attributes;
3249: ) RETURN VARCHAR2 IS
3250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3251: BEGIN
3252: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
3253: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
3254: x_okl_asset_returns_tl_rec.SOURCE_LANG := USERENV('LANG');
3255: RETURN(l_return_status);
3256: END Set_Attributes;
3257: BEGIN
3250: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3251: BEGIN
3252: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
3253: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
3254: x_okl_asset_returns_tl_rec.SOURCE_LANG := USERENV('LANG');
3255: RETURN(l_return_status);
3256: END Set_Attributes;
3257: BEGIN
3258: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3265: RAISE OKC_API.G_EXCEPTION_ERROR;
3266: END IF;
3267: --- Setting item attributes
3268: l_return_status := Set_Attributes(
3269: p_okl_asset_returns_tl_rec, -- IN
3270: l_okl_asset_returns_tl_rec); -- OUT
3271: --- If any errors happen abort API
3272: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3273: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3266: END IF;
3267: --- Setting item attributes
3268: l_return_status := Set_Attributes(
3269: p_okl_asset_returns_tl_rec, -- IN
3270: l_okl_asset_returns_tl_rec); -- OUT
3271: --- If any errors happen abort API
3272: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3273: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3274: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3274: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3275: RAISE OKC_API.G_EXCEPTION_ERROR;
3276: END IF;
3277: FOR l_lang_rec IN get_languages LOOP
3278: l_okl_asset_returns_tl_rec.language := l_lang_rec.language_code;
3279: INSERT INTO OKL_ASSET_RETURNS_TL(
3280: id,
3281: language,
3282: source_lang,
3275: RAISE OKC_API.G_EXCEPTION_ERROR;
3276: END IF;
3277: FOR l_lang_rec IN get_languages LOOP
3278: l_okl_asset_returns_tl_rec.language := l_lang_rec.language_code;
3279: INSERT INTO OKL_ASSET_RETURNS_TL(
3280: id,
3281: language,
3282: source_lang,
3283: sfwt_flag,
3288: last_update_date,
3289: last_update_login,
3290: new_item_description)
3291: VALUES (
3292: l_okl_asset_returns_tl_rec.id,
3293: l_okl_asset_returns_tl_rec.language,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3289: last_update_login,
3290: new_item_description)
3291: VALUES (
3292: l_okl_asset_returns_tl_rec.id,
3293: l_okl_asset_returns_tl_rec.language,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3290: new_item_description)
3291: VALUES (
3292: l_okl_asset_returns_tl_rec.id,
3293: l_okl_asset_returns_tl_rec.language,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3291: VALUES (
3292: l_okl_asset_returns_tl_rec.id,
3293: l_okl_asset_returns_tl_rec.language,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3292: l_okl_asset_returns_tl_rec.id,
3293: l_okl_asset_returns_tl_rec.language,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3293: l_okl_asset_returns_tl_rec.language,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3301: l_okl_asset_returns_tl_rec.last_update_login,
3294: l_okl_asset_returns_tl_rec.source_lang,
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3301: l_okl_asset_returns_tl_rec.last_update_login,
3302: l_okl_asset_returns_tl_rec.new_item_description);
3295: l_okl_asset_returns_tl_rec.sfwt_flag,
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3301: l_okl_asset_returns_tl_rec.last_update_login,
3302: l_okl_asset_returns_tl_rec.new_item_description);
3303: END LOOP;
3296: l_okl_asset_returns_tl_rec.comments,
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3301: l_okl_asset_returns_tl_rec.last_update_login,
3302: l_okl_asset_returns_tl_rec.new_item_description);
3303: END LOOP;
3304: -- Set OUT values
3297: l_okl_asset_returns_tl_rec.created_by,
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3301: l_okl_asset_returns_tl_rec.last_update_login,
3302: l_okl_asset_returns_tl_rec.new_item_description);
3303: END LOOP;
3304: -- Set OUT values
3305: x_okl_asset_returns_tl_rec := l_okl_asset_returns_tl_rec;
3298: l_okl_asset_returns_tl_rec.creation_date,
3299: l_okl_asset_returns_tl_rec.last_updated_by,
3300: l_okl_asset_returns_tl_rec.last_update_date,
3301: l_okl_asset_returns_tl_rec.last_update_login,
3302: l_okl_asset_returns_tl_rec.new_item_description);
3303: END LOOP;
3304: -- Set OUT values
3305: x_okl_asset_returns_tl_rec := l_okl_asset_returns_tl_rec;
3306: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3301: l_okl_asset_returns_tl_rec.last_update_login,
3302: l_okl_asset_returns_tl_rec.new_item_description);
3303: END LOOP;
3304: -- Set OUT values
3305: x_okl_asset_returns_tl_rec := l_okl_asset_returns_tl_rec;
3306: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3307: EXCEPTION
3308: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3309: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3364: l_artv_rec artv_rec_type;
3365: l_def_artv_rec artv_rec_type;
3366: l_art_rec art_rec_type;
3367: lx_art_rec art_rec_type;
3368: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
3369: lx_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
3370: -------------------------------
3371: -- FUNCTION fill_who_columns --
3372: -------------------------------
3365: l_def_artv_rec artv_rec_type;
3366: l_art_rec art_rec_type;
3367: lx_art_rec art_rec_type;
3368: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
3369: lx_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
3370: -------------------------------
3371: -- FUNCTION fill_who_columns --
3372: -------------------------------
3373: FUNCTION fill_who_columns (
3483: --------------------------------------
3484: -- Move VIEW record to "Child" records
3485: --------------------------------------
3486: migrate(l_def_artv_rec, l_art_rec);
3487: migrate(l_def_artv_rec, l_okl_asset_returns_tl_rec);
3488: --------------------------------------------
3489: -- Call the INSERT_ROW for each child record
3490: --------------------------------------------
3491: insert_row(
3506: p_init_msg_list,
3507: x_return_status,
3508: x_msg_count,
3509: x_msg_data,
3510: l_okl_asset_returns_tl_rec,
3511: lx_okl_asset_returns_tl_rec
3512: );
3513: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3507: x_return_status,
3508: x_msg_count,
3509: x_msg_data,
3510: l_okl_asset_returns_tl_rec,
3511: lx_okl_asset_returns_tl_rec
3512: );
3513: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3515: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3514: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3515: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3516: RAISE OKC_API.G_EXCEPTION_ERROR;
3517: END IF;
3518: migrate(lx_okl_asset_returns_tl_rec, l_def_artv_rec);
3519: -- Set OUT values
3520: x_artv_rec := l_def_artv_rec;
3521: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3522: EXCEPTION
3743: '_PVT'
3744: );
3745: END lock_row;
3746: ---------------------------------------
3747: -- lock_row for:OKL_ASSET_RETURNS_TL --
3748: ---------------------------------------
3749: PROCEDURE lock_row(
3750: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3751: x_return_status OUT NOCOPY VARCHAR2,
3750: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
3751: x_return_status OUT NOCOPY VARCHAR2,
3752: x_msg_count OUT NOCOPY NUMBER,
3753: x_msg_data OUT NOCOPY VARCHAR2,
3754: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
3755:
3756: E_Resource_Busy EXCEPTION;
3757: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3758: CURSOR lock_csr (p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
3754: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
3755:
3756: E_Resource_Busy EXCEPTION;
3757: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3758: CURSOR lock_csr (p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
3759: SELECT *
3760: FROM OKL_ASSET_RETURNS_TL
3761: WHERE ID = p_okl_asset_returns_tl_rec.id
3762: FOR UPDATE NOWAIT;
3756: E_Resource_Busy EXCEPTION;
3757: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3758: CURSOR lock_csr (p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
3759: SELECT *
3760: FROM OKL_ASSET_RETURNS_TL
3761: WHERE ID = p_okl_asset_returns_tl_rec.id
3762: FOR UPDATE NOWAIT;
3763:
3764: l_api_version CONSTANT NUMBER := 1;
3757: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3758: CURSOR lock_csr (p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
3759: SELECT *
3760: FROM OKL_ASSET_RETURNS_TL
3761: WHERE ID = p_okl_asset_returns_tl_rec.id
3762: FOR UPDATE NOWAIT;
3763:
3764: l_api_version CONSTANT NUMBER := 1;
3765: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
3777: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3778: RAISE OKC_API.G_EXCEPTION_ERROR;
3779: END IF;
3780: BEGIN
3781: OPEN lock_csr(p_okl_asset_returns_tl_rec);
3782: FETCH lock_csr INTO l_lock_var;
3783: l_row_notfound := lock_csr%NOTFOUND;
3784: CLOSE lock_csr;
3785: EXCEPTION
3842: l_api_version CONSTANT NUMBER := 1;
3843: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3844: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3845: l_art_rec art_rec_type;
3846: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
3847: BEGIN
3848: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3849: G_PKG_NAME,
3850: p_init_msg_list,
3860: --------------------------------------
3861: -- Move VIEW record to "Child" records
3862: --------------------------------------
3863: migrate(p_artv_rec, l_art_rec);
3864: migrate(p_artv_rec, l_okl_asset_returns_tl_rec);
3865: --------------------------------------------
3866: -- Call the LOCK_ROW for each child record
3867: --------------------------------------------
3868: lock_row(
3881: p_init_msg_list,
3882: x_return_status,
3883: x_msg_count,
3884: x_msg_data,
3885: l_okl_asset_returns_tl_rec
3886: );
3887: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3888: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3889: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4443: '_PVT'
4444: );
4445: END update_row;
4446: -----------------------------------------
4447: -- update_row for:OKL_ASSET_RETURNS_TL --
4448: -----------------------------------------
4449: PROCEDURE update_row(
4450: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4451: x_return_status OUT NOCOPY VARCHAR2,
4450: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
4451: x_return_status OUT NOCOPY VARCHAR2,
4452: x_msg_count OUT NOCOPY NUMBER,
4453: x_msg_data OUT NOCOPY VARCHAR2,
4454: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4455: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type) IS
4456:
4457: l_api_version CONSTANT NUMBER := 1;
4458: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4451: x_return_status OUT NOCOPY VARCHAR2,
4452: x_msg_count OUT NOCOPY NUMBER,
4453: x_msg_data OUT NOCOPY VARCHAR2,
4454: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4455: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type) IS
4456:
4457: l_api_version CONSTANT NUMBER := 1;
4458: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4459: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4456:
4457: l_api_version CONSTANT NUMBER := 1;
4458: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4459: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4460: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type := p_okl_asset_returns_tl_rec;
4461: ldefoklassetreturnstlrec okl_asset_returns_tl_rec_type;
4462: l_row_notfound BOOLEAN := TRUE;
4463: ----------------------------------
4464: -- FUNCTION populate_new_record --
4457: l_api_version CONSTANT NUMBER := 1;
4458: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4459: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4460: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type := p_okl_asset_returns_tl_rec;
4461: ldefoklassetreturnstlrec okl_asset_returns_tl_rec_type;
4462: l_row_notfound BOOLEAN := TRUE;
4463: ----------------------------------
4464: -- FUNCTION populate_new_record --
4465: ----------------------------------
4463: ----------------------------------
4464: -- FUNCTION populate_new_record --
4465: ----------------------------------
4466: FUNCTION populate_new_record (
4467: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4468: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4469: ) RETURN VARCHAR2 IS
4470: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4471: l_row_notfound BOOLEAN := TRUE;
4464: -- FUNCTION populate_new_record --
4465: ----------------------------------
4466: FUNCTION populate_new_record (
4467: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4468: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4469: ) RETURN VARCHAR2 IS
4470: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4471: l_row_notfound BOOLEAN := TRUE;
4472: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4466: FUNCTION populate_new_record (
4467: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4468: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4469: ) RETURN VARCHAR2 IS
4470: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4471: l_row_notfound BOOLEAN := TRUE;
4472: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4473: BEGIN
4474: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4470: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4471: l_row_notfound BOOLEAN := TRUE;
4472: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4473: BEGIN
4474: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4475: -- Get current database values
4476: l_okl_asset_returns_tl_rec := get_rec(p_okl_asset_returns_tl_rec, l_row_notfound);
4477: IF (l_row_notfound) THEN
4478: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4472: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4473: BEGIN
4474: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4475: -- Get current database values
4476: l_okl_asset_returns_tl_rec := get_rec(p_okl_asset_returns_tl_rec, l_row_notfound);
4477: IF (l_row_notfound) THEN
4478: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4479: END IF;
4480: IF (x_okl_asset_returns_tl_rec.id = OKC_API.G_MISS_NUM)
4476: l_okl_asset_returns_tl_rec := get_rec(p_okl_asset_returns_tl_rec, l_row_notfound);
4477: IF (l_row_notfound) THEN
4478: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4479: END IF;
4480: IF (x_okl_asset_returns_tl_rec.id = OKC_API.G_MISS_NUM)
4481: THEN
4482: x_okl_asset_returns_tl_rec.id := l_okl_asset_returns_tl_rec.id;
4483: END IF;
4484: IF (x_okl_asset_returns_tl_rec.language = OKC_API.G_MISS_CHAR)
4478: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4479: END IF;
4480: IF (x_okl_asset_returns_tl_rec.id = OKC_API.G_MISS_NUM)
4481: THEN
4482: x_okl_asset_returns_tl_rec.id := l_okl_asset_returns_tl_rec.id;
4483: END IF;
4484: IF (x_okl_asset_returns_tl_rec.language = OKC_API.G_MISS_CHAR)
4485: THEN
4486: x_okl_asset_returns_tl_rec.language := l_okl_asset_returns_tl_rec.language;
4480: IF (x_okl_asset_returns_tl_rec.id = OKC_API.G_MISS_NUM)
4481: THEN
4482: x_okl_asset_returns_tl_rec.id := l_okl_asset_returns_tl_rec.id;
4483: END IF;
4484: IF (x_okl_asset_returns_tl_rec.language = OKC_API.G_MISS_CHAR)
4485: THEN
4486: x_okl_asset_returns_tl_rec.language := l_okl_asset_returns_tl_rec.language;
4487: END IF;
4488: IF (x_okl_asset_returns_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4482: x_okl_asset_returns_tl_rec.id := l_okl_asset_returns_tl_rec.id;
4483: END IF;
4484: IF (x_okl_asset_returns_tl_rec.language = OKC_API.G_MISS_CHAR)
4485: THEN
4486: x_okl_asset_returns_tl_rec.language := l_okl_asset_returns_tl_rec.language;
4487: END IF;
4488: IF (x_okl_asset_returns_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4489: THEN
4490: x_okl_asset_returns_tl_rec.source_lang := l_okl_asset_returns_tl_rec.source_lang;
4484: IF (x_okl_asset_returns_tl_rec.language = OKC_API.G_MISS_CHAR)
4485: THEN
4486: x_okl_asset_returns_tl_rec.language := l_okl_asset_returns_tl_rec.language;
4487: END IF;
4488: IF (x_okl_asset_returns_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4489: THEN
4490: x_okl_asset_returns_tl_rec.source_lang := l_okl_asset_returns_tl_rec.source_lang;
4491: END IF;
4492: IF (x_okl_asset_returns_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4486: x_okl_asset_returns_tl_rec.language := l_okl_asset_returns_tl_rec.language;
4487: END IF;
4488: IF (x_okl_asset_returns_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4489: THEN
4490: x_okl_asset_returns_tl_rec.source_lang := l_okl_asset_returns_tl_rec.source_lang;
4491: END IF;
4492: IF (x_okl_asset_returns_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4493: THEN
4494: x_okl_asset_returns_tl_rec.sfwt_flag := l_okl_asset_returns_tl_rec.sfwt_flag;
4488: IF (x_okl_asset_returns_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4489: THEN
4490: x_okl_asset_returns_tl_rec.source_lang := l_okl_asset_returns_tl_rec.source_lang;
4491: END IF;
4492: IF (x_okl_asset_returns_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4493: THEN
4494: x_okl_asset_returns_tl_rec.sfwt_flag := l_okl_asset_returns_tl_rec.sfwt_flag;
4495: END IF;
4496: IF (x_okl_asset_returns_tl_rec.comments = OKC_API.G_MISS_CHAR)
4490: x_okl_asset_returns_tl_rec.source_lang := l_okl_asset_returns_tl_rec.source_lang;
4491: END IF;
4492: IF (x_okl_asset_returns_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4493: THEN
4494: x_okl_asset_returns_tl_rec.sfwt_flag := l_okl_asset_returns_tl_rec.sfwt_flag;
4495: END IF;
4496: IF (x_okl_asset_returns_tl_rec.comments = OKC_API.G_MISS_CHAR)
4497: THEN
4498: x_okl_asset_returns_tl_rec.comments := l_okl_asset_returns_tl_rec.comments;
4492: IF (x_okl_asset_returns_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4493: THEN
4494: x_okl_asset_returns_tl_rec.sfwt_flag := l_okl_asset_returns_tl_rec.sfwt_flag;
4495: END IF;
4496: IF (x_okl_asset_returns_tl_rec.comments = OKC_API.G_MISS_CHAR)
4497: THEN
4498: x_okl_asset_returns_tl_rec.comments := l_okl_asset_returns_tl_rec.comments;
4499: END IF;
4500: IF (x_okl_asset_returns_tl_rec.created_by = OKC_API.G_MISS_NUM)
4494: x_okl_asset_returns_tl_rec.sfwt_flag := l_okl_asset_returns_tl_rec.sfwt_flag;
4495: END IF;
4496: IF (x_okl_asset_returns_tl_rec.comments = OKC_API.G_MISS_CHAR)
4497: THEN
4498: x_okl_asset_returns_tl_rec.comments := l_okl_asset_returns_tl_rec.comments;
4499: END IF;
4500: IF (x_okl_asset_returns_tl_rec.created_by = OKC_API.G_MISS_NUM)
4501: THEN
4502: x_okl_asset_returns_tl_rec.created_by := l_okl_asset_returns_tl_rec.created_by;
4496: IF (x_okl_asset_returns_tl_rec.comments = OKC_API.G_MISS_CHAR)
4497: THEN
4498: x_okl_asset_returns_tl_rec.comments := l_okl_asset_returns_tl_rec.comments;
4499: END IF;
4500: IF (x_okl_asset_returns_tl_rec.created_by = OKC_API.G_MISS_NUM)
4501: THEN
4502: x_okl_asset_returns_tl_rec.created_by := l_okl_asset_returns_tl_rec.created_by;
4503: END IF;
4504: IF (x_okl_asset_returns_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4498: x_okl_asset_returns_tl_rec.comments := l_okl_asset_returns_tl_rec.comments;
4499: END IF;
4500: IF (x_okl_asset_returns_tl_rec.created_by = OKC_API.G_MISS_NUM)
4501: THEN
4502: x_okl_asset_returns_tl_rec.created_by := l_okl_asset_returns_tl_rec.created_by;
4503: END IF;
4504: IF (x_okl_asset_returns_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4505: THEN
4506: x_okl_asset_returns_tl_rec.creation_date := l_okl_asset_returns_tl_rec.creation_date;
4500: IF (x_okl_asset_returns_tl_rec.created_by = OKC_API.G_MISS_NUM)
4501: THEN
4502: x_okl_asset_returns_tl_rec.created_by := l_okl_asset_returns_tl_rec.created_by;
4503: END IF;
4504: IF (x_okl_asset_returns_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4505: THEN
4506: x_okl_asset_returns_tl_rec.creation_date := l_okl_asset_returns_tl_rec.creation_date;
4507: END IF;
4508: IF (x_okl_asset_returns_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4502: x_okl_asset_returns_tl_rec.created_by := l_okl_asset_returns_tl_rec.created_by;
4503: END IF;
4504: IF (x_okl_asset_returns_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4505: THEN
4506: x_okl_asset_returns_tl_rec.creation_date := l_okl_asset_returns_tl_rec.creation_date;
4507: END IF;
4508: IF (x_okl_asset_returns_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4509: THEN
4510: x_okl_asset_returns_tl_rec.last_updated_by := l_okl_asset_returns_tl_rec.last_updated_by;
4504: IF (x_okl_asset_returns_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4505: THEN
4506: x_okl_asset_returns_tl_rec.creation_date := l_okl_asset_returns_tl_rec.creation_date;
4507: END IF;
4508: IF (x_okl_asset_returns_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4509: THEN
4510: x_okl_asset_returns_tl_rec.last_updated_by := l_okl_asset_returns_tl_rec.last_updated_by;
4511: END IF;
4512: IF (x_okl_asset_returns_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4506: x_okl_asset_returns_tl_rec.creation_date := l_okl_asset_returns_tl_rec.creation_date;
4507: END IF;
4508: IF (x_okl_asset_returns_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4509: THEN
4510: x_okl_asset_returns_tl_rec.last_updated_by := l_okl_asset_returns_tl_rec.last_updated_by;
4511: END IF;
4512: IF (x_okl_asset_returns_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4513: THEN
4514: x_okl_asset_returns_tl_rec.last_update_date := l_okl_asset_returns_tl_rec.last_update_date;
4508: IF (x_okl_asset_returns_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4509: THEN
4510: x_okl_asset_returns_tl_rec.last_updated_by := l_okl_asset_returns_tl_rec.last_updated_by;
4511: END IF;
4512: IF (x_okl_asset_returns_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4513: THEN
4514: x_okl_asset_returns_tl_rec.last_update_date := l_okl_asset_returns_tl_rec.last_update_date;
4515: END IF;
4516: IF (x_okl_asset_returns_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4510: x_okl_asset_returns_tl_rec.last_updated_by := l_okl_asset_returns_tl_rec.last_updated_by;
4511: END IF;
4512: IF (x_okl_asset_returns_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4513: THEN
4514: x_okl_asset_returns_tl_rec.last_update_date := l_okl_asset_returns_tl_rec.last_update_date;
4515: END IF;
4516: IF (x_okl_asset_returns_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4517: THEN
4518: x_okl_asset_returns_tl_rec.last_update_login := l_okl_asset_returns_tl_rec.last_update_login;
4512: IF (x_okl_asset_returns_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4513: THEN
4514: x_okl_asset_returns_tl_rec.last_update_date := l_okl_asset_returns_tl_rec.last_update_date;
4515: END IF;
4516: IF (x_okl_asset_returns_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4517: THEN
4518: x_okl_asset_returns_tl_rec.last_update_login := l_okl_asset_returns_tl_rec.last_update_login;
4519: END IF;
4520:
4514: x_okl_asset_returns_tl_rec.last_update_date := l_okl_asset_returns_tl_rec.last_update_date;
4515: END IF;
4516: IF (x_okl_asset_returns_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4517: THEN
4518: x_okl_asset_returns_tl_rec.last_update_login := l_okl_asset_returns_tl_rec.last_update_login;
4519: END IF;
4520:
4521: IF (x_okl_asset_returns_tl_rec.new_item_description = OKC_API.G_MISS_CHAR)
4522: THEN
4517: THEN
4518: x_okl_asset_returns_tl_rec.last_update_login := l_okl_asset_returns_tl_rec.last_update_login;
4519: END IF;
4520:
4521: IF (x_okl_asset_returns_tl_rec.new_item_description = OKC_API.G_MISS_CHAR)
4522: THEN
4523: x_okl_asset_returns_tl_rec.new_item_description := l_okl_asset_returns_tl_rec.new_item_description;
4524: END IF;
4525: RETURN(l_return_status);
4519: END IF;
4520:
4521: IF (x_okl_asset_returns_tl_rec.new_item_description = OKC_API.G_MISS_CHAR)
4522: THEN
4523: x_okl_asset_returns_tl_rec.new_item_description := l_okl_asset_returns_tl_rec.new_item_description;
4524: END IF;
4525: RETURN(l_return_status);
4526: END populate_new_record;
4527: ---------------------------------------------
4524: END IF;
4525: RETURN(l_return_status);
4526: END populate_new_record;
4527: ---------------------------------------------
4528: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
4529: ---------------------------------------------
4530: FUNCTION Set_Attributes (
4531: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4532: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4527: ---------------------------------------------
4528: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
4529: ---------------------------------------------
4530: FUNCTION Set_Attributes (
4531: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4532: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4533: ) RETURN VARCHAR2 IS
4534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4535: BEGIN
4528: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
4529: ---------------------------------------------
4530: FUNCTION Set_Attributes (
4531: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
4532: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4533: ) RETURN VARCHAR2 IS
4534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4535: BEGIN
4536: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4532: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
4533: ) RETURN VARCHAR2 IS
4534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4535: BEGIN
4536: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4537: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
4538: x_okl_asset_returns_tl_rec.SOURCE_LANG := USERENV('LANG');
4539: RETURN(l_return_status);
4540: END Set_Attributes;
4533: ) RETURN VARCHAR2 IS
4534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4535: BEGIN
4536: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4537: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
4538: x_okl_asset_returns_tl_rec.SOURCE_LANG := USERENV('LANG');
4539: RETURN(l_return_status);
4540: END Set_Attributes;
4541: BEGIN
4534: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4535: BEGIN
4536: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
4537: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
4538: x_okl_asset_returns_tl_rec.SOURCE_LANG := USERENV('LANG');
4539: RETURN(l_return_status);
4540: END Set_Attributes;
4541: BEGIN
4542: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4549: RAISE OKC_API.G_EXCEPTION_ERROR;
4550: END IF;
4551: --- Setting item attributes
4552: l_return_status := Set_Attributes(
4553: p_okl_asset_returns_tl_rec, -- IN
4554: l_okl_asset_returns_tl_rec); -- OUT
4555: --- If any errors happen abort API
4556: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4557: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4550: END IF;
4551: --- Setting item attributes
4552: l_return_status := Set_Attributes(
4553: p_okl_asset_returns_tl_rec, -- IN
4554: l_okl_asset_returns_tl_rec); -- OUT
4555: --- If any errors happen abort API
4556: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4557: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4558: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4557: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4558: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4559: RAISE OKC_API.G_EXCEPTION_ERROR;
4560: END IF;
4561: l_return_status := populate_new_record(l_okl_asset_returns_tl_rec, ldefoklassetreturnstlrec);
4562: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4563: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4564: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4565: RAISE OKC_API.G_EXCEPTION_ERROR;
4563: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4564: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4565: RAISE OKC_API.G_EXCEPTION_ERROR;
4566: END IF;
4567: UPDATE OKL_ASSET_RETURNS_TL
4568: SET COMMENTS = ldefoklassetreturnstlrec.comments,
4569: SOURCE_LANG = ldefoklassetreturnstlrec.source_lang, --Fix for bug 3637102
4570: CREATED_BY = ldefoklassetreturnstlrec.created_by,
4571: CREATION_DATE = ldefoklassetreturnstlrec.creation_date,
4576: WHERE ID = ldefoklassetreturnstlrec.id
4577: AND USERENV('LANG') in (SOURCE_LANG,LANGUAGE);-- Fix for bug 3637102
4578: --AND SOURCE_LANG = USERENV('LANG');
4579:
4580: UPDATE OKL_ASSET_RETURNS_TL
4581: SET SFWT_FLAG = 'Y'
4582: WHERE ID = ldefoklassetreturnstlrec.id
4583: AND SOURCE_LANG <> USERENV('LANG');
4584:
4581: SET SFWT_FLAG = 'Y'
4582: WHERE ID = ldefoklassetreturnstlrec.id
4583: AND SOURCE_LANG <> USERENV('LANG');
4584:
4585: x_okl_asset_returns_tl_rec := ldefoklassetreturnstlrec;
4586: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4587: EXCEPTION
4588: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4589: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4642: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
4643: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4644: l_artv_rec artv_rec_type := p_artv_rec;
4645: l_def_artv_rec artv_rec_type;
4646: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4647: lx_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4648: l_art_rec art_rec_type;
4649: lx_art_rec art_rec_type;
4650: -------------------------------
4643: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4644: l_artv_rec artv_rec_type := p_artv_rec;
4645: l_def_artv_rec artv_rec_type;
4646: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4647: lx_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
4648: l_art_rec art_rec_type;
4649: lx_art_rec art_rec_type;
4650: -------------------------------
4651: -- FUNCTION fill_who_columns --
4998:
4999: --------------------------------------
5000: -- Move VIEW record to "Child" records
5001: --------------------------------------
5002: migrate(l_def_artv_rec, l_okl_asset_returns_tl_rec);
5003: migrate(l_def_artv_rec, l_art_rec);
5004: --------------------------------------------
5005: -- Call the UPDATE_ROW for each child record
5006: --------------------------------------------
5008: p_init_msg_list,
5009: x_return_status,
5010: x_msg_count,
5011: x_msg_data,
5012: l_okl_asset_returns_tl_rec,
5013: lx_okl_asset_returns_tl_rec
5014: );
5015: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5009: x_return_status,
5010: x_msg_count,
5011: x_msg_data,
5012: l_okl_asset_returns_tl_rec,
5013: lx_okl_asset_returns_tl_rec
5014: );
5015: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5017: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5017: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5018: RAISE OKC_API.G_EXCEPTION_ERROR;
5019: END IF;
5020: migrate(lx_okl_asset_returns_tl_rec, l_def_artv_rec);
5021: update_row(
5022: p_init_msg_list,
5023: x_return_status,
5024: x_msg_count,
5213: '_PVT'
5214: );
5215: END delete_row;
5216: -----------------------------------------
5217: -- delete_row for:OKL_ASSET_RETURNS_TL --
5218: -----------------------------------------
5219: PROCEDURE delete_row(
5220: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
5221: x_return_status OUT NOCOPY VARCHAR2,
5220: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
5221: x_return_status OUT NOCOPY VARCHAR2,
5222: x_msg_count OUT NOCOPY NUMBER,
5223: x_msg_data OUT NOCOPY VARCHAR2,
5224: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type) IS
5225:
5226: l_api_version CONSTANT NUMBER := 1;
5227: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
5228: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5225:
5226: l_api_version CONSTANT NUMBER := 1;
5227: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
5228: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5229: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type:= p_okl_asset_returns_tl_rec;
5230: l_row_notfound BOOLEAN := TRUE;
5231: ---------------------------------------------
5232: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
5233: ---------------------------------------------
5228: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5229: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type:= p_okl_asset_returns_tl_rec;
5230: l_row_notfound BOOLEAN := TRUE;
5231: ---------------------------------------------
5232: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
5233: ---------------------------------------------
5234: FUNCTION Set_Attributes (
5235: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
5236: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
5231: ---------------------------------------------
5232: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
5233: ---------------------------------------------
5234: FUNCTION Set_Attributes (
5235: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
5236: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
5237: ) RETURN VARCHAR2 IS
5238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5239: BEGIN
5232: -- Set_Attributes for:OKL_ASSET_RETURNS_TL --
5233: ---------------------------------------------
5234: FUNCTION Set_Attributes (
5235: p_okl_asset_returns_tl_rec IN okl_asset_returns_tl_rec_type,
5236: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
5237: ) RETURN VARCHAR2 IS
5238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5239: BEGIN
5240: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
5236: x_okl_asset_returns_tl_rec OUT NOCOPY okl_asset_returns_tl_rec_type
5237: ) RETURN VARCHAR2 IS
5238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5239: BEGIN
5240: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
5241: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
5242: RETURN(l_return_status);
5243: END Set_Attributes;
5244: BEGIN
5237: ) RETURN VARCHAR2 IS
5238: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5239: BEGIN
5240: x_okl_asset_returns_tl_rec := p_okl_asset_returns_tl_rec;
5241: x_okl_asset_returns_tl_rec.LANGUAGE := USERENV('LANG');
5242: RETURN(l_return_status);
5243: END Set_Attributes;
5244: BEGIN
5245: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
5252: RAISE OKC_API.G_EXCEPTION_ERROR;
5253: END IF;
5254: --- Setting item attributes
5255: l_return_status := Set_Attributes(
5256: p_okl_asset_returns_tl_rec, -- IN
5257: l_okl_asset_returns_tl_rec); -- OUT
5258: --- If any errors happen abort API
5259: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5253: END IF;
5254: --- Setting item attributes
5255: l_return_status := Set_Attributes(
5256: p_okl_asset_returns_tl_rec, -- IN
5257: l_okl_asset_returns_tl_rec); -- OUT
5258: --- If any errors happen abort API
5259: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5260: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5262: RAISE OKC_API.G_EXCEPTION_ERROR;
5263: END IF;
5264: DELETE FROM OKL_ASSET_RETURNS_TL
5265: WHERE ID = l_okl_asset_returns_tl_rec.id;
5266:
5267: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5268: EXCEPTION
5261: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
5262: RAISE OKC_API.G_EXCEPTION_ERROR;
5263: END IF;
5264: DELETE FROM OKL_ASSET_RETURNS_TL
5265: WHERE ID = l_okl_asset_returns_tl_rec.id;
5266:
5267: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
5268: EXCEPTION
5269: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5311: l_api_version CONSTANT NUMBER := 1;
5312: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
5313: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5314: l_artv_rec artv_rec_type := p_artv_rec;
5315: l_okl_asset_returns_tl_rec okl_asset_returns_tl_rec_type;
5316: l_art_rec art_rec_type;
5317: BEGIN
5318: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
5319: G_PKG_NAME,
5329: END IF;
5330: --------------------------------------
5331: -- Move VIEW record to "Child" records
5332: --------------------------------------
5333: migrate(l_artv_rec, l_okl_asset_returns_tl_rec);
5334: migrate(l_artv_rec, l_art_rec);
5335: --------------------------------------------
5336: -- Call the DELETE_ROW for each child record
5337: --------------------------------------------
5339: p_init_msg_list,
5340: x_return_status,
5341: x_msg_count,
5342: x_msg_data,
5343: l_okl_asset_returns_tl_rec
5344: );
5345: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5346: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5347: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN