46: /* as a quick workaround to fix the time-consuming table handler issue */
47: /* Eventually we'll need to turn them into a separate fix_language procedure */
48: /*
49:
50: DELETE FROM OKC_CONDITION_LINES_TL T
51: WHERE NOT EXISTS (
52: SELECT NULL
53: FROM OKC_CONDITION_LINES_B B
54: WHERE B.ID = T.ID
53: FROM OKC_CONDITION_LINES_B B
54: WHERE B.ID = T.ID
55: );
56:
57: UPDATE OKC_CONDITION_LINES_TL T SET (
58: DESCRIPTION) = (SELECT
59: B.DESCRIPTION
60: FROM OKC_CONDITION_LINES_TL B
61: WHERE B.ID = T.ID
56:
57: UPDATE OKC_CONDITION_LINES_TL T SET (
58: DESCRIPTION) = (SELECT
59: B.DESCRIPTION
60: FROM OKC_CONDITION_LINES_TL B
61: WHERE B.ID = T.ID
62: AND B.LANGUAGE = T.SOURCE_LANG)
63: WHERE (
64: T.ID,
65: T.LANGUAGE)
66: IN (SELECT
67: SUBT.ID,
68: SUBT.LANGUAGE
69: FROM OKC_CONDITION_LINES_TL SUBB, OKC_CONDITION_LINES_TL SUBT
70: WHERE SUBB.ID = SUBT.ID
71: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
72: AND (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
73: OR (SUBB.DESCRIPTION IS NULL AND SUBT.DESCRIPTION IS NOT NULL)
74: OR (SUBB.DESCRIPTION IS NOT NULL AND SUBT.DESCRIPTION IS NULL)
75: ));
76: */
77:
78: INSERT INTO OKC_CONDITION_LINES_TL (
79: ID,
80: LANGUAGE,
81: SOURCE_LANG,
82: SFWT_FLAG,
96: B.CREATION_DATE,
97: B.LAST_UPDATED_BY,
98: B.LAST_UPDATE_DATE,
99: B.LAST_UPDATE_LOGIN
100: FROM OKC_CONDITION_LINES_TL B, FND_LANGUAGES L
101: WHERE L.INSTALLED_FLAG IN ('I', 'B')
102: AND B.LANGUAGE = USERENV('LANG')
103: AND NOT EXISTS(
104: SELECT NULL
101: WHERE L.INSTALLED_FLAG IN ('I', 'B')
102: AND B.LANGUAGE = USERENV('LANG')
103: AND NOT EXISTS(
104: SELECT NULL
105: FROM OKC_CONDITION_LINES_TL T
106: WHERE T.ID = B.ID
107: AND T.LANGUAGE = L.LANGUAGE_CODE
108: );
109: DELETE FROM OKC_CONDITION_LINES_TLH T
105: FROM OKC_CONDITION_LINES_TL T
106: WHERE T.ID = B.ID
107: AND T.LANGUAGE = L.LANGUAGE_CODE
108: );
109: DELETE FROM OKC_CONDITION_LINES_TLH T
110: WHERE NOT EXISTS (
111: SELECT NULL
112: FROM OKC_CONDITION_LINES_BH B
113: WHERE B.ID = T.ID
114: AND B.MAJOR_VERSION = T.MAJOR_VERSION
115: );
116:
117:
118: UPDATE OKC_CONDITION_LINES_TLH T SET (
119: DESCRIPTION) = (SELECT
120: B.DESCRIPTION
121: FROM OKC_CONDITION_LINES_TLH B
122: WHERE B.ID = T.ID
117:
118: UPDATE OKC_CONDITION_LINES_TLH T SET (
119: DESCRIPTION) = (SELECT
120: B.DESCRIPTION
121: FROM OKC_CONDITION_LINES_TLH B
122: WHERE B.ID = T.ID
123: AND B.MAJOR_VERSION = T.MAJOR_VERSION
124: AND B.LANGUAGE = T.SOURCE_LANG)
125: WHERE (
129: IN (SELECT
130: SUBT.ID,
131: SUBT.MAJOR_VERSION,
132: SUBT.LANGUAGE
133: FROM OKC_CONDITION_LINES_TLH SUBB, OKC_CONDITION_LINES_TLH SUBT
134:
135: WHERE SUBB.ID = SUBT.ID
136: AND SUBB.MAJOR_VERSION = SUBT.MAJOR_VERSION
137: AND SUBB.LANGUAGE = SUBT.SOURCE_LANG
140: IS NOT NULL)
141: OR (SUBB.DESCRIPTION IS NOT NULL AND SUBT.DESCRIPTION
142: IS NULL)
143: ));
144: INSERT INTO OKC_CONDITION_LINES_TLH (
145: ID,
146: LANGUAGE,
147: MAJOR_VERSION,
148: SOURCE_LANG,
164: B.CREATION_DATE,
165: B.LAST_UPDATED_BY,
166: B.LAST_UPDATE_DATE,
167: B.LAST_UPDATE_LOGIN
168: FROM OKC_CONDITION_LINES_TLH B, FND_LANGUAGES L
169: WHERE L.INSTALLED_FLAG IN ('I', 'B')
170: AND B.LANGUAGE = USERENV('LANG')
171: AND NOT EXISTS(
172: SELECT NULL
169: WHERE L.INSTALLED_FLAG IN ('I', 'B')
170: AND B.LANGUAGE = USERENV('LANG')
171: AND NOT EXISTS(
172: SELECT NULL
173: FROM OKC_CONDITION_LINES_TLH T
174: WHERE T.ID = B.ID
175: AND B.MAJOR_VERSION = T.MAJOR_VERSION
176: AND T.LANGUAGE = L.LANGUAGE_CODE
177: );
293: BEGIN
294: RETURN(get_rec(p_cnl_rec, l_row_notfound));
295: END get_rec;
296: ---------------------------------------------------------------------------
297: -- FUNCTION get_rec for: OKC_CONDITION_LINES_TL
298: ---------------------------------------------------------------------------
299: FUNCTION get_rec (
300: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
301: x_no_data_found OUT NOCOPY BOOLEAN
296: ---------------------------------------------------------------------------
297: -- FUNCTION get_rec for: OKC_CONDITION_LINES_TL
298: ---------------------------------------------------------------------------
299: FUNCTION get_rec (
300: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
301: x_no_data_found OUT NOCOPY BOOLEAN
302: ) RETURN OkcConditionLinesTlRecType IS
303: CURSOR okc_condition_lines_tl_pk_csr (p_id IN NUMBER,
304: p_language IN VARCHAR2) IS
299: FUNCTION get_rec (
300: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
301: x_no_data_found OUT NOCOPY BOOLEAN
302: ) RETURN OkcConditionLinesTlRecType IS
303: CURSOR okc_condition_lines_tl_pk_csr (p_id IN NUMBER,
304: p_language IN VARCHAR2) IS
305: SELECT
306: ID,
307: LANGUAGE,
312: CREATION_DATE,
313: LAST_UPDATED_BY,
314: LAST_UPDATE_DATE,
315: LAST_UPDATE_LOGIN
316: FROM Okc_Condition_Lines_Tl
317: WHERE okc_condition_lines_tl.id = p_id
318: AND okc_condition_lines_tl.language = p_language;
319: l_okc_condition_lines_tl_pk okc_condition_lines_tl_pk_csr%ROWTYPE;
320: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
313: LAST_UPDATED_BY,
314: LAST_UPDATE_DATE,
315: LAST_UPDATE_LOGIN
316: FROM Okc_Condition_Lines_Tl
317: WHERE okc_condition_lines_tl.id = p_id
318: AND okc_condition_lines_tl.language = p_language;
319: l_okc_condition_lines_tl_pk okc_condition_lines_tl_pk_csr%ROWTYPE;
320: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
321: BEGIN
314: LAST_UPDATE_DATE,
315: LAST_UPDATE_LOGIN
316: FROM Okc_Condition_Lines_Tl
317: WHERE okc_condition_lines_tl.id = p_id
318: AND okc_condition_lines_tl.language = p_language;
319: l_okc_condition_lines_tl_pk okc_condition_lines_tl_pk_csr%ROWTYPE;
320: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
321: BEGIN
322: x_no_data_found := TRUE;
315: LAST_UPDATE_LOGIN
316: FROM Okc_Condition_Lines_Tl
317: WHERE okc_condition_lines_tl.id = p_id
318: AND okc_condition_lines_tl.language = p_language;
319: l_okc_condition_lines_tl_pk okc_condition_lines_tl_pk_csr%ROWTYPE;
320: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
321: BEGIN
322: x_no_data_found := TRUE;
323: -- Get current database values
316: FROM Okc_Condition_Lines_Tl
317: WHERE okc_condition_lines_tl.id = p_id
318: AND okc_condition_lines_tl.language = p_language;
319: l_okc_condition_lines_tl_pk okc_condition_lines_tl_pk_csr%ROWTYPE;
320: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
321: BEGIN
322: x_no_data_found := TRUE;
323: -- Get current database values
324: OPEN okc_condition_lines_tl_pk_csr (p_okc_condition_lines_tl_rec.id,
320: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
321: BEGIN
322: x_no_data_found := TRUE;
323: -- Get current database values
324: OPEN okc_condition_lines_tl_pk_csr (p_okc_condition_lines_tl_rec.id,
325: p_okc_condition_lines_tl_rec.language);
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
321: BEGIN
322: x_no_data_found := TRUE;
323: -- Get current database values
324: OPEN okc_condition_lines_tl_pk_csr (p_okc_condition_lines_tl_rec.id,
325: p_okc_condition_lines_tl_rec.language);
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
322: x_no_data_found := TRUE;
323: -- Get current database values
324: OPEN okc_condition_lines_tl_pk_csr (p_okc_condition_lines_tl_rec.id,
325: p_okc_condition_lines_tl_rec.language);
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
323: -- Get current database values
324: OPEN okc_condition_lines_tl_pk_csr (p_okc_condition_lines_tl_rec.id,
325: p_okc_condition_lines_tl_rec.language);
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
324: OPEN okc_condition_lines_tl_pk_csr (p_okc_condition_lines_tl_rec.id,
325: p_okc_condition_lines_tl_rec.language);
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
325: p_okc_condition_lines_tl_rec.language);
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
326: FETCH okc_condition_lines_tl_pk_csr INTO
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
327: l_okc_condition_lines_tl_rec.ID,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
328: l_okc_condition_lines_tl_rec.LANGUAGE,
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
329: l_okc_condition_lines_tl_rec.SOURCE_LANG,
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
330: l_okc_condition_lines_tl_rec.SFWT_FLAG,
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
338: CLOSE okc_condition_lines_tl_pk_csr;
331: l_okc_condition_lines_tl_rec.DESCRIPTION,
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
338: CLOSE okc_condition_lines_tl_pk_csr;
339: RETURN(l_okc_condition_lines_tl_rec);
332: l_okc_condition_lines_tl_rec.CREATED_BY,
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
338: CLOSE okc_condition_lines_tl_pk_csr;
339: RETURN(l_okc_condition_lines_tl_rec);
340: END get_rec;
333: l_okc_condition_lines_tl_rec.CREATION_DATE,
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
338: CLOSE okc_condition_lines_tl_pk_csr;
339: RETURN(l_okc_condition_lines_tl_rec);
340: END get_rec;
341:
334: l_okc_condition_lines_tl_rec.LAST_UPDATED_BY,
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
338: CLOSE okc_condition_lines_tl_pk_csr;
339: RETURN(l_okc_condition_lines_tl_rec);
340: END get_rec;
341:
342: FUNCTION get_rec (
335: l_okc_condition_lines_tl_rec.LAST_UPDATE_DATE,
336: l_okc_condition_lines_tl_rec.LAST_UPDATE_LOGIN;
337: x_no_data_found := okc_condition_lines_tl_pk_csr%NOTFOUND;
338: CLOSE okc_condition_lines_tl_pk_csr;
339: RETURN(l_okc_condition_lines_tl_rec);
340: END get_rec;
341:
342: FUNCTION get_rec (
343: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType
339: RETURN(l_okc_condition_lines_tl_rec);
340: END get_rec;
341:
342: FUNCTION get_rec (
343: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType
344: ) RETURN OkcConditionLinesTlRecType IS
345: l_row_notfound BOOLEAN := TRUE;
346: BEGIN
347: RETURN(get_rec(p_okc_condition_lines_tl_rec, l_row_notfound));
343: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType
344: ) RETURN OkcConditionLinesTlRecType IS
345: l_row_notfound BOOLEAN := TRUE;
346: BEGIN
347: RETURN(get_rec(p_okc_condition_lines_tl_rec, l_row_notfound));
348: END get_rec;
349: ---------------------------------------------------------------------------
350: -- FUNCTION get_rec for: OKC_CONDITION_LINES_V
351: ---------------------------------------------------------------------------
2951: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
2952: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2953: l_cnlv_rec cnlv_rec_type := p_cnlv_rec;
2954: l_cnl_rec cnl_rec_type;
2955: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
2956: BEGIN
2957: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2958: G_PKG_NAME,
2959: p_init_msg_list,
3250: '_PVT'
3251: );
3252: END insert_row;
3253: -------------------------------------------
3254: -- insert_row for:OKC_CONDITION_LINES_TL --
3255: -------------------------------------------
3256: PROCEDURE insert_row(
3257: p_init_msg_list IN VARCHAR2 ,
3258: x_return_status OUT NOCOPY VARCHAR2,
3257: p_init_msg_list IN VARCHAR2 ,
3258: x_return_status OUT NOCOPY VARCHAR2,
3259: x_msg_count OUT NOCOPY NUMBER,
3260: x_msg_data OUT NOCOPY VARCHAR2,
3261: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
3262: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType) IS
3263:
3264: l_api_version CONSTANT NUMBER := 1;
3265: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3258: x_return_status OUT NOCOPY VARCHAR2,
3259: x_msg_count OUT NOCOPY NUMBER,
3260: x_msg_data OUT NOCOPY VARCHAR2,
3261: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
3262: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType) IS
3263:
3264: l_api_version CONSTANT NUMBER := 1;
3265: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3266: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3263:
3264: l_api_version CONSTANT NUMBER := 1;
3265: l_api_name CONSTANT VARCHAR2(30) := 'TL_insert_row';
3266: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3267: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType := p_okc_condition_lines_tl_rec;
3268: ldefokcconditionlinestlrec OkcConditionLinesTlRecType;
3269: CURSOR get_languages IS
3270: SELECT *
3271: FROM FND_LANGUAGES
3270: SELECT *
3271: FROM FND_LANGUAGES
3272: WHERE INSTALLED_FLAG IN ('I', 'B');
3273: -----------------------------------------------
3274: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
3275: -----------------------------------------------
3276: FUNCTION Set_Attributes (
3277: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
3278: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
3273: -----------------------------------------------
3274: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
3275: -----------------------------------------------
3276: FUNCTION Set_Attributes (
3277: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
3278: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
3279: ) RETURN VARCHAR2 IS
3280: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3281: BEGIN
3274: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
3275: -----------------------------------------------
3276: FUNCTION Set_Attributes (
3277: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
3278: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
3279: ) RETURN VARCHAR2 IS
3280: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3281: BEGIN
3282: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
3278: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
3279: ) RETURN VARCHAR2 IS
3280: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3281: BEGIN
3282: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
3283: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
3284: x_okc_condition_lines_tl_rec.SOURCE_LANG := l_lang;
3285: RETURN(l_return_status);
3286: END Set_Attributes;
3279: ) RETURN VARCHAR2 IS
3280: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3281: BEGIN
3282: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
3283: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
3284: x_okc_condition_lines_tl_rec.SOURCE_LANG := l_lang;
3285: RETURN(l_return_status);
3286: END Set_Attributes;
3287: BEGIN
3280: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3281: BEGIN
3282: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
3283: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
3284: x_okc_condition_lines_tl_rec.SOURCE_LANG := l_lang;
3285: RETURN(l_return_status);
3286: END Set_Attributes;
3287: BEGIN
3288: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3295: RAISE OKC_API.G_EXCEPTION_ERROR;
3296: END IF;
3297: --- Setting item attributes
3298: l_return_status := Set_Attributes(
3299: p_okc_condition_lines_tl_rec, -- IN
3300: l_okc_condition_lines_tl_rec); -- OUT
3301: --- If any errors happen abort API
3302: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3303: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3296: END IF;
3297: --- Setting item attributes
3298: l_return_status := Set_Attributes(
3299: p_okc_condition_lines_tl_rec, -- IN
3300: l_okc_condition_lines_tl_rec); -- OUT
3301: --- If any errors happen abort API
3302: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3303: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3304: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3304: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3305: RAISE OKC_API.G_EXCEPTION_ERROR;
3306: END IF;
3307: FOR l_lang_rec IN get_languages LOOP
3308: l_okc_condition_lines_tl_rec.language := l_lang_rec.language_code;
3309: INSERT INTO OKC_CONDITION_LINES_TL(
3310: id,
3311: language,
3312: source_lang,
3305: RAISE OKC_API.G_EXCEPTION_ERROR;
3306: END IF;
3307: FOR l_lang_rec IN get_languages LOOP
3308: l_okc_condition_lines_tl_rec.language := l_lang_rec.language_code;
3309: INSERT INTO OKC_CONDITION_LINES_TL(
3310: id,
3311: language,
3312: source_lang,
3313: sfwt_flag,
3317: last_updated_by,
3318: last_update_date,
3319: last_update_login)
3320: VALUES (
3321: l_okc_condition_lines_tl_rec.id,
3322: l_okc_condition_lines_tl_rec.language,
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3318: last_update_date,
3319: last_update_login)
3320: VALUES (
3321: l_okc_condition_lines_tl_rec.id,
3322: l_okc_condition_lines_tl_rec.language,
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3319: last_update_login)
3320: VALUES (
3321: l_okc_condition_lines_tl_rec.id,
3322: l_okc_condition_lines_tl_rec.language,
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3320: VALUES (
3321: l_okc_condition_lines_tl_rec.id,
3322: l_okc_condition_lines_tl_rec.language,
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3321: l_okc_condition_lines_tl_rec.id,
3322: l_okc_condition_lines_tl_rec.language,
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3329: l_okc_condition_lines_tl_rec.last_update_date,
3322: l_okc_condition_lines_tl_rec.language,
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3329: l_okc_condition_lines_tl_rec.last_update_date,
3330: l_okc_condition_lines_tl_rec.last_update_login);
3323: l_okc_condition_lines_tl_rec.source_lang,
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3329: l_okc_condition_lines_tl_rec.last_update_date,
3330: l_okc_condition_lines_tl_rec.last_update_login);
3331: END LOOP;
3324: l_okc_condition_lines_tl_rec.sfwt_flag,
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3329: l_okc_condition_lines_tl_rec.last_update_date,
3330: l_okc_condition_lines_tl_rec.last_update_login);
3331: END LOOP;
3332: -- Set OUT values
3325: l_okc_condition_lines_tl_rec.description,
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3329: l_okc_condition_lines_tl_rec.last_update_date,
3330: l_okc_condition_lines_tl_rec.last_update_login);
3331: END LOOP;
3332: -- Set OUT values
3333: x_okc_condition_lines_tl_rec := l_okc_condition_lines_tl_rec;
3326: l_okc_condition_lines_tl_rec.created_by,
3327: l_okc_condition_lines_tl_rec.creation_date,
3328: l_okc_condition_lines_tl_rec.last_updated_by,
3329: l_okc_condition_lines_tl_rec.last_update_date,
3330: l_okc_condition_lines_tl_rec.last_update_login);
3331: END LOOP;
3332: -- Set OUT values
3333: x_okc_condition_lines_tl_rec := l_okc_condition_lines_tl_rec;
3334: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3329: l_okc_condition_lines_tl_rec.last_update_date,
3330: l_okc_condition_lines_tl_rec.last_update_login);
3331: END LOOP;
3332: -- Set OUT values
3333: x_okc_condition_lines_tl_rec := l_okc_condition_lines_tl_rec;
3334: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3335: EXCEPTION
3336: WHEN OKC_API.G_EXCEPTION_ERROR THEN
3337: x_return_status := OKC_API.HANDLE_EXCEPTIONS
3383: l_cnlv_rec cnlv_rec_type;
3384: l_def_cnlv_rec cnlv_rec_type;
3385: l_cnl_rec cnl_rec_type;
3386: lx_cnl_rec cnl_rec_type;
3387: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
3388: lx_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
3389: -------------------------------
3390: -- FUNCTION fill_who_columns --
3391: -------------------------------
3384: l_def_cnlv_rec cnlv_rec_type;
3385: l_cnl_rec cnl_rec_type;
3386: lx_cnl_rec cnl_rec_type;
3387: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
3388: lx_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
3389: -------------------------------
3390: -- FUNCTION fill_who_columns --
3391: -------------------------------
3392: FUNCTION fill_who_columns (
3469: --------------------------------------
3470: -- Move VIEW record to "Child" records
3471: --------------------------------------
3472: migrate(l_def_cnlv_rec, l_cnl_rec);
3473: migrate(l_def_cnlv_rec, l_okc_condition_lines_tl_rec);
3474: --------------------------------------------
3475: -- Call the INSERT_ROW for each child record
3476: --------------------------------------------
3477: insert_row(
3492: p_init_msg_list,
3493: x_return_status,
3494: x_msg_count,
3495: x_msg_data,
3496: l_okc_condition_lines_tl_rec,
3497: lx_okc_condition_lines_tl_rec
3498: );
3499: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3500: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3493: x_return_status,
3494: x_msg_count,
3495: x_msg_data,
3496: l_okc_condition_lines_tl_rec,
3497: lx_okc_condition_lines_tl_rec
3498: );
3499: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3500: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3501: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3500: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3501: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
3502: RAISE OKC_API.G_EXCEPTION_ERROR;
3503: END IF;
3504: migrate(lx_okc_condition_lines_tl_rec, l_def_cnlv_rec);
3505: -- Set OUT values
3506: x_cnlv_rec := l_def_cnlv_rec;
3507: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
3508: EXCEPTION
3713: '_PVT'
3714: );
3715: END lock_row;
3716: -----------------------------------------
3717: -- lock_row for:OKC_CONDITION_LINES_TL --
3718: -----------------------------------------
3719: PROCEDURE lock_row(
3720: p_init_msg_list IN VARCHAR2 ,
3721: x_return_status OUT NOCOPY VARCHAR2,
3720: p_init_msg_list IN VARCHAR2 ,
3721: x_return_status OUT NOCOPY VARCHAR2,
3722: x_msg_count OUT NOCOPY NUMBER,
3723: x_msg_data OUT NOCOPY VARCHAR2,
3724: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
3725:
3726: E_Resource_Busy EXCEPTION;
3727: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3728: CURSOR lock_csr (p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
3724: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
3725:
3726: E_Resource_Busy EXCEPTION;
3727: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3728: CURSOR lock_csr (p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
3729: SELECT *
3730: FROM OKC_CONDITION_LINES_TL
3731: WHERE ID = p_okc_condition_lines_tl_rec.id
3732: FOR UPDATE NOWAIT;
3726: E_Resource_Busy EXCEPTION;
3727: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3728: CURSOR lock_csr (p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
3729: SELECT *
3730: FROM OKC_CONDITION_LINES_TL
3731: WHERE ID = p_okc_condition_lines_tl_rec.id
3732: FOR UPDATE NOWAIT;
3733:
3734: l_api_version CONSTANT NUMBER := 1;
3727: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3728: CURSOR lock_csr (p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
3729: SELECT *
3730: FROM OKC_CONDITION_LINES_TL
3731: WHERE ID = p_okc_condition_lines_tl_rec.id
3732: FOR UPDATE NOWAIT;
3733:
3734: l_api_version CONSTANT NUMBER := 1;
3735: l_api_name CONSTANT VARCHAR2(30) := 'TL_lock_row';
3747: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
3748: RAISE OKC_API.G_EXCEPTION_ERROR;
3749: END IF;
3750: BEGIN
3751: OPEN lock_csr(p_okc_condition_lines_tl_rec);
3752: FETCH lock_csr INTO l_lock_var;
3753: l_row_notfound := lock_csr%NOTFOUND;
3754: CLOSE lock_csr;
3755: EXCEPTION
3812: l_api_version CONSTANT NUMBER := 1;
3813: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3814: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
3815: l_cnl_rec cnl_rec_type;
3816: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
3817: BEGIN
3818: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
3819: G_PKG_NAME,
3820: p_init_msg_list,
3830: --------------------------------------
3831: -- Move VIEW record to "Child" records
3832: --------------------------------------
3833: migrate(p_cnlv_rec, l_cnl_rec);
3834: migrate(p_cnlv_rec, l_okc_condition_lines_tl_rec);
3835: --------------------------------------------
3836: -- Call the LOCK_ROW for each child record
3837: --------------------------------------------
3838: lock_row(
3851: p_init_msg_list,
3852: x_return_status,
3853: x_msg_count,
3854: x_msg_data,
3855: l_okc_condition_lines_tl_rec
3856: );
3857: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
3858: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
3859: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4280: '_PVT'
4281: );
4282: END update_row;
4283: -------------------------------------------
4284: -- update_row for:OKC_CONDITION_LINES_TL --
4285: -------------------------------------------
4286: PROCEDURE update_row(
4287: p_init_msg_list IN VARCHAR2 ,
4288: x_return_status OUT NOCOPY VARCHAR2,
4287: p_init_msg_list IN VARCHAR2 ,
4288: x_return_status OUT NOCOPY VARCHAR2,
4289: x_msg_count OUT NOCOPY NUMBER,
4290: x_msg_data OUT NOCOPY VARCHAR2,
4291: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4292: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType) IS
4293:
4294: l_api_version CONSTANT NUMBER := 1;
4295: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4288: x_return_status OUT NOCOPY VARCHAR2,
4289: x_msg_count OUT NOCOPY NUMBER,
4290: x_msg_data OUT NOCOPY VARCHAR2,
4291: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4292: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType) IS
4293:
4294: l_api_version CONSTANT NUMBER := 1;
4295: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4296: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4293:
4294: l_api_version CONSTANT NUMBER := 1;
4295: l_api_name CONSTANT VARCHAR2(30) := 'TL_update_row';
4296: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4297: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType := p_okc_condition_lines_tl_rec;
4298: ldefokcconditionlinestlrec OkcConditionLinesTlRecType;
4299: l_row_notfound BOOLEAN := TRUE;
4300: ----------------------------------
4301: -- FUNCTION populate_new_record --
4300: ----------------------------------
4301: -- FUNCTION populate_new_record --
4302: ----------------------------------
4303: FUNCTION populate_new_record (
4304: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4305: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4306: ) RETURN VARCHAR2 IS
4307: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4308: l_row_notfound BOOLEAN := TRUE;
4301: -- FUNCTION populate_new_record --
4302: ----------------------------------
4303: FUNCTION populate_new_record (
4304: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4305: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4306: ) RETURN VARCHAR2 IS
4307: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4308: l_row_notfound BOOLEAN := TRUE;
4309: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4303: FUNCTION populate_new_record (
4304: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4305: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4306: ) RETURN VARCHAR2 IS
4307: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4308: l_row_notfound BOOLEAN := TRUE;
4309: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4310: BEGIN
4311: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4307: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4308: l_row_notfound BOOLEAN := TRUE;
4309: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4310: BEGIN
4311: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4312: -- Get current database values
4313: l_okc_condition_lines_tl_rec := get_rec(p_okc_condition_lines_tl_rec, l_row_notfound);
4314: IF (l_row_notfound) THEN
4315: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4309: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4310: BEGIN
4311: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4312: -- Get current database values
4313: l_okc_condition_lines_tl_rec := get_rec(p_okc_condition_lines_tl_rec, l_row_notfound);
4314: IF (l_row_notfound) THEN
4315: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4316: END IF;
4317: IF (x_okc_condition_lines_tl_rec.id = OKC_API.G_MISS_NUM)
4313: l_okc_condition_lines_tl_rec := get_rec(p_okc_condition_lines_tl_rec, l_row_notfound);
4314: IF (l_row_notfound) THEN
4315: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4316: END IF;
4317: IF (x_okc_condition_lines_tl_rec.id = OKC_API.G_MISS_NUM)
4318: THEN
4319: x_okc_condition_lines_tl_rec.id := l_okc_condition_lines_tl_rec.id;
4320: END IF;
4321: IF (x_okc_condition_lines_tl_rec.language = OKC_API.G_MISS_CHAR)
4315: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
4316: END IF;
4317: IF (x_okc_condition_lines_tl_rec.id = OKC_API.G_MISS_NUM)
4318: THEN
4319: x_okc_condition_lines_tl_rec.id := l_okc_condition_lines_tl_rec.id;
4320: END IF;
4321: IF (x_okc_condition_lines_tl_rec.language = OKC_API.G_MISS_CHAR)
4322: THEN
4323: x_okc_condition_lines_tl_rec.language := l_okc_condition_lines_tl_rec.language;
4317: IF (x_okc_condition_lines_tl_rec.id = OKC_API.G_MISS_NUM)
4318: THEN
4319: x_okc_condition_lines_tl_rec.id := l_okc_condition_lines_tl_rec.id;
4320: END IF;
4321: IF (x_okc_condition_lines_tl_rec.language = OKC_API.G_MISS_CHAR)
4322: THEN
4323: x_okc_condition_lines_tl_rec.language := l_okc_condition_lines_tl_rec.language;
4324: END IF;
4325: IF (x_okc_condition_lines_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4319: x_okc_condition_lines_tl_rec.id := l_okc_condition_lines_tl_rec.id;
4320: END IF;
4321: IF (x_okc_condition_lines_tl_rec.language = OKC_API.G_MISS_CHAR)
4322: THEN
4323: x_okc_condition_lines_tl_rec.language := l_okc_condition_lines_tl_rec.language;
4324: END IF;
4325: IF (x_okc_condition_lines_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4326: THEN
4327: x_okc_condition_lines_tl_rec.source_lang := l_okc_condition_lines_tl_rec.source_lang;
4321: IF (x_okc_condition_lines_tl_rec.language = OKC_API.G_MISS_CHAR)
4322: THEN
4323: x_okc_condition_lines_tl_rec.language := l_okc_condition_lines_tl_rec.language;
4324: END IF;
4325: IF (x_okc_condition_lines_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4326: THEN
4327: x_okc_condition_lines_tl_rec.source_lang := l_okc_condition_lines_tl_rec.source_lang;
4328: END IF;
4329: IF (x_okc_condition_lines_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4323: x_okc_condition_lines_tl_rec.language := l_okc_condition_lines_tl_rec.language;
4324: END IF;
4325: IF (x_okc_condition_lines_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4326: THEN
4327: x_okc_condition_lines_tl_rec.source_lang := l_okc_condition_lines_tl_rec.source_lang;
4328: END IF;
4329: IF (x_okc_condition_lines_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4330: THEN
4331: x_okc_condition_lines_tl_rec.sfwt_flag := l_okc_condition_lines_tl_rec.sfwt_flag;
4325: IF (x_okc_condition_lines_tl_rec.source_lang = OKC_API.G_MISS_CHAR)
4326: THEN
4327: x_okc_condition_lines_tl_rec.source_lang := l_okc_condition_lines_tl_rec.source_lang;
4328: END IF;
4329: IF (x_okc_condition_lines_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4330: THEN
4331: x_okc_condition_lines_tl_rec.sfwt_flag := l_okc_condition_lines_tl_rec.sfwt_flag;
4332: END IF;
4333: IF (x_okc_condition_lines_tl_rec.description = OKC_API.G_MISS_CHAR)
4327: x_okc_condition_lines_tl_rec.source_lang := l_okc_condition_lines_tl_rec.source_lang;
4328: END IF;
4329: IF (x_okc_condition_lines_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4330: THEN
4331: x_okc_condition_lines_tl_rec.sfwt_flag := l_okc_condition_lines_tl_rec.sfwt_flag;
4332: END IF;
4333: IF (x_okc_condition_lines_tl_rec.description = OKC_API.G_MISS_CHAR)
4334: THEN
4335: x_okc_condition_lines_tl_rec.description := l_okc_condition_lines_tl_rec.description;
4329: IF (x_okc_condition_lines_tl_rec.sfwt_flag = OKC_API.G_MISS_CHAR)
4330: THEN
4331: x_okc_condition_lines_tl_rec.sfwt_flag := l_okc_condition_lines_tl_rec.sfwt_flag;
4332: END IF;
4333: IF (x_okc_condition_lines_tl_rec.description = OKC_API.G_MISS_CHAR)
4334: THEN
4335: x_okc_condition_lines_tl_rec.description := l_okc_condition_lines_tl_rec.description;
4336: END IF;
4337: IF (x_okc_condition_lines_tl_rec.created_by = OKC_API.G_MISS_NUM)
4331: x_okc_condition_lines_tl_rec.sfwt_flag := l_okc_condition_lines_tl_rec.sfwt_flag;
4332: END IF;
4333: IF (x_okc_condition_lines_tl_rec.description = OKC_API.G_MISS_CHAR)
4334: THEN
4335: x_okc_condition_lines_tl_rec.description := l_okc_condition_lines_tl_rec.description;
4336: END IF;
4337: IF (x_okc_condition_lines_tl_rec.created_by = OKC_API.G_MISS_NUM)
4338: THEN
4339: x_okc_condition_lines_tl_rec.created_by := l_okc_condition_lines_tl_rec.created_by;
4333: IF (x_okc_condition_lines_tl_rec.description = OKC_API.G_MISS_CHAR)
4334: THEN
4335: x_okc_condition_lines_tl_rec.description := l_okc_condition_lines_tl_rec.description;
4336: END IF;
4337: IF (x_okc_condition_lines_tl_rec.created_by = OKC_API.G_MISS_NUM)
4338: THEN
4339: x_okc_condition_lines_tl_rec.created_by := l_okc_condition_lines_tl_rec.created_by;
4340: END IF;
4341: IF (x_okc_condition_lines_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4335: x_okc_condition_lines_tl_rec.description := l_okc_condition_lines_tl_rec.description;
4336: END IF;
4337: IF (x_okc_condition_lines_tl_rec.created_by = OKC_API.G_MISS_NUM)
4338: THEN
4339: x_okc_condition_lines_tl_rec.created_by := l_okc_condition_lines_tl_rec.created_by;
4340: END IF;
4341: IF (x_okc_condition_lines_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4342: THEN
4343: x_okc_condition_lines_tl_rec.creation_date := l_okc_condition_lines_tl_rec.creation_date;
4337: IF (x_okc_condition_lines_tl_rec.created_by = OKC_API.G_MISS_NUM)
4338: THEN
4339: x_okc_condition_lines_tl_rec.created_by := l_okc_condition_lines_tl_rec.created_by;
4340: END IF;
4341: IF (x_okc_condition_lines_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4342: THEN
4343: x_okc_condition_lines_tl_rec.creation_date := l_okc_condition_lines_tl_rec.creation_date;
4344: END IF;
4345: IF (x_okc_condition_lines_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4339: x_okc_condition_lines_tl_rec.created_by := l_okc_condition_lines_tl_rec.created_by;
4340: END IF;
4341: IF (x_okc_condition_lines_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4342: THEN
4343: x_okc_condition_lines_tl_rec.creation_date := l_okc_condition_lines_tl_rec.creation_date;
4344: END IF;
4345: IF (x_okc_condition_lines_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4346: THEN
4347: x_okc_condition_lines_tl_rec.last_updated_by := l_okc_condition_lines_tl_rec.last_updated_by;
4341: IF (x_okc_condition_lines_tl_rec.creation_date = OKC_API.G_MISS_DATE)
4342: THEN
4343: x_okc_condition_lines_tl_rec.creation_date := l_okc_condition_lines_tl_rec.creation_date;
4344: END IF;
4345: IF (x_okc_condition_lines_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4346: THEN
4347: x_okc_condition_lines_tl_rec.last_updated_by := l_okc_condition_lines_tl_rec.last_updated_by;
4348: END IF;
4349: IF (x_okc_condition_lines_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4343: x_okc_condition_lines_tl_rec.creation_date := l_okc_condition_lines_tl_rec.creation_date;
4344: END IF;
4345: IF (x_okc_condition_lines_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4346: THEN
4347: x_okc_condition_lines_tl_rec.last_updated_by := l_okc_condition_lines_tl_rec.last_updated_by;
4348: END IF;
4349: IF (x_okc_condition_lines_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4350: THEN
4351: x_okc_condition_lines_tl_rec.last_update_date := l_okc_condition_lines_tl_rec.last_update_date;
4345: IF (x_okc_condition_lines_tl_rec.last_updated_by = OKC_API.G_MISS_NUM)
4346: THEN
4347: x_okc_condition_lines_tl_rec.last_updated_by := l_okc_condition_lines_tl_rec.last_updated_by;
4348: END IF;
4349: IF (x_okc_condition_lines_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4350: THEN
4351: x_okc_condition_lines_tl_rec.last_update_date := l_okc_condition_lines_tl_rec.last_update_date;
4352: END IF;
4353: IF (x_okc_condition_lines_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4347: x_okc_condition_lines_tl_rec.last_updated_by := l_okc_condition_lines_tl_rec.last_updated_by;
4348: END IF;
4349: IF (x_okc_condition_lines_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4350: THEN
4351: x_okc_condition_lines_tl_rec.last_update_date := l_okc_condition_lines_tl_rec.last_update_date;
4352: END IF;
4353: IF (x_okc_condition_lines_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4354: THEN
4355: x_okc_condition_lines_tl_rec.last_update_login := l_okc_condition_lines_tl_rec.last_update_login;
4349: IF (x_okc_condition_lines_tl_rec.last_update_date = OKC_API.G_MISS_DATE)
4350: THEN
4351: x_okc_condition_lines_tl_rec.last_update_date := l_okc_condition_lines_tl_rec.last_update_date;
4352: END IF;
4353: IF (x_okc_condition_lines_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4354: THEN
4355: x_okc_condition_lines_tl_rec.last_update_login := l_okc_condition_lines_tl_rec.last_update_login;
4356: END IF;
4357: RETURN(l_return_status);
4351: x_okc_condition_lines_tl_rec.last_update_date := l_okc_condition_lines_tl_rec.last_update_date;
4352: END IF;
4353: IF (x_okc_condition_lines_tl_rec.last_update_login = OKC_API.G_MISS_NUM)
4354: THEN
4355: x_okc_condition_lines_tl_rec.last_update_login := l_okc_condition_lines_tl_rec.last_update_login;
4356: END IF;
4357: RETURN(l_return_status);
4358: END populate_new_record;
4359: -----------------------------------------------
4356: END IF;
4357: RETURN(l_return_status);
4358: END populate_new_record;
4359: -----------------------------------------------
4360: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4361: -----------------------------------------------
4362: FUNCTION Set_Attributes (
4363: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4364: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4359: -----------------------------------------------
4360: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4361: -----------------------------------------------
4362: FUNCTION Set_Attributes (
4363: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4364: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4365: ) RETURN VARCHAR2 IS
4366: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4367: BEGIN
4360: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4361: -----------------------------------------------
4362: FUNCTION Set_Attributes (
4363: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4364: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4365: ) RETURN VARCHAR2 IS
4366: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4367: BEGIN
4368: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4364: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4365: ) RETURN VARCHAR2 IS
4366: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4367: BEGIN
4368: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4369: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
4370: x_okc_condition_lines_tl_rec.SOURCE_LANG := l_lang;
4371: RETURN(l_return_status);
4372: END Set_Attributes;
4365: ) RETURN VARCHAR2 IS
4366: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4367: BEGIN
4368: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4369: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
4370: x_okc_condition_lines_tl_rec.SOURCE_LANG := l_lang;
4371: RETURN(l_return_status);
4372: END Set_Attributes;
4373: BEGIN
4366: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4367: BEGIN
4368: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4369: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
4370: x_okc_condition_lines_tl_rec.SOURCE_LANG := l_lang;
4371: RETURN(l_return_status);
4372: END Set_Attributes;
4373: BEGIN
4374: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4381: RAISE OKC_API.G_EXCEPTION_ERROR;
4382: END IF;
4383: --- Setting item attributes
4384: l_return_status := Set_Attributes(
4385: p_okc_condition_lines_tl_rec, -- IN
4386: l_okc_condition_lines_tl_rec); -- OUT
4387: --- If any errors happen abort API
4388: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4389: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4382: END IF;
4383: --- Setting item attributes
4384: l_return_status := Set_Attributes(
4385: p_okc_condition_lines_tl_rec, -- IN
4386: l_okc_condition_lines_tl_rec); -- OUT
4387: --- If any errors happen abort API
4388: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4389: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4390: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4389: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4390: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4391: RAISE OKC_API.G_EXCEPTION_ERROR;
4392: END IF;
4393: l_return_status := populate_new_record(l_okc_condition_lines_tl_rec, ldefokcconditionlinestlrec);
4394: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4395: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4396: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4397: RAISE OKC_API.G_EXCEPTION_ERROR;
4395: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4396: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4397: RAISE OKC_API.G_EXCEPTION_ERROR;
4398: END IF;
4399: UPDATE OKC_CONDITION_LINES_TL
4400: SET DESCRIPTION = ldefokcconditionlinestlrec.description,
4401: SOURCE_LANG = ldefokcconditionlinestlrec.source_lang,
4402: CREATED_BY = ldefokcconditionlinestlrec.created_by,
4403: CREATION_DATE = ldefokcconditionlinestlrec.creation_date,
4407: WHERE ID = ldefokcconditionlinestlrec.id
4408: AND USERENV('LANG') IN (LANGUAGE,SOURCE_LANG);
4409: --AND SOURCE_LANG = USERENV('LANG');
4410:
4411: UPDATE OKC_CONDITION_LINES_TL
4412: SET SFWT_FLAG = 'Y'
4413: WHERE ID = ldefokcconditionlinestlrec.id
4414: AND SOURCE_LANG <> USERENV('LANG');
4415:
4412: SET SFWT_FLAG = 'Y'
4413: WHERE ID = ldefokcconditionlinestlrec.id
4414: AND SOURCE_LANG <> USERENV('LANG');
4415:
4416: x_okc_condition_lines_tl_rec := ldefokcconditionlinestlrec;
4417: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4418: EXCEPTION
4419: WHEN OKC_API.G_EXCEPTION_ERROR THEN
4420: x_return_status := OKC_API.HANDLE_EXCEPTIONS
4463: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
4464: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4465: l_cnlv_rec cnlv_rec_type := p_cnlv_rec;
4466: l_def_cnlv_rec cnlv_rec_type;
4467: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4468: lx_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4469: l_cnl_rec cnl_rec_type;
4470: lx_cnl_rec cnl_rec_type;
4471: -------------------------------
4464: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4465: l_cnlv_rec cnlv_rec_type := p_cnlv_rec;
4466: l_def_cnlv_rec cnlv_rec_type;
4467: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4468: lx_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
4469: l_cnl_rec cnl_rec_type;
4470: lx_cnl_rec cnl_rec_type;
4471: -------------------------------
4472: -- FUNCTION fill_who_columns --
4744:
4745: --------------------------------------
4746: -- Move VIEW record to "Child" records
4747: --------------------------------------
4748: migrate(l_def_cnlv_rec, l_okc_condition_lines_tl_rec);
4749: migrate(l_def_cnlv_rec, l_cnl_rec);
4750: --------------------------------------------
4751: -- Call the UPDATE_ROW for each child record
4752: --------------------------------------------
4754: p_init_msg_list,
4755: x_return_status,
4756: x_msg_count,
4757: x_msg_data,
4758: l_okc_condition_lines_tl_rec,
4759: lx_okc_condition_lines_tl_rec
4760: );
4761: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4755: x_return_status,
4756: x_msg_count,
4757: x_msg_data,
4758: l_okc_condition_lines_tl_rec,
4759: lx_okc_condition_lines_tl_rec
4760: );
4761: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4763: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4762: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4763: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
4764: RAISE OKC_API.G_EXCEPTION_ERROR;
4765: END IF;
4766: migrate(lx_okc_condition_lines_tl_rec, l_def_cnlv_rec);
4767: update_row(
4768: p_init_msg_list,
4769: x_return_status,
4770: x_msg_count,
4943: '_PVT'
4944: );
4945: END delete_row;
4946: -------------------------------------------
4947: -- delete_row for:OKC_CONDITION_LINES_TL --
4948: -------------------------------------------
4949: PROCEDURE delete_row(
4950: p_init_msg_list IN VARCHAR2 ,
4951: x_return_status OUT NOCOPY VARCHAR2,
4950: p_init_msg_list IN VARCHAR2 ,
4951: x_return_status OUT NOCOPY VARCHAR2,
4952: x_msg_count OUT NOCOPY NUMBER,
4953: x_msg_data OUT NOCOPY VARCHAR2,
4954: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType) IS
4955:
4956: l_api_version CONSTANT NUMBER := 1;
4957: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
4958: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4955:
4956: l_api_version CONSTANT NUMBER := 1;
4957: l_api_name CONSTANT VARCHAR2(30) := 'TL_delete_row';
4958: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4959: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType:= p_okc_condition_lines_tl_rec;
4960: l_row_notfound BOOLEAN := TRUE;
4961: -----------------------------------------------
4962: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4963: -----------------------------------------------
4958: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4959: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType:= p_okc_condition_lines_tl_rec;
4960: l_row_notfound BOOLEAN := TRUE;
4961: -----------------------------------------------
4962: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4963: -----------------------------------------------
4964: FUNCTION Set_Attributes (
4965: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4966: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4961: -----------------------------------------------
4962: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4963: -----------------------------------------------
4964: FUNCTION Set_Attributes (
4965: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4966: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4967: ) RETURN VARCHAR2 IS
4968: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4969: BEGIN
4962: -- Set_Attributes for:OKC_CONDITION_LINES_TL --
4963: -----------------------------------------------
4964: FUNCTION Set_Attributes (
4965: p_okc_condition_lines_tl_rec IN OkcConditionLinesTlRecType,
4966: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4967: ) RETURN VARCHAR2 IS
4968: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4969: BEGIN
4970: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4966: x_okc_condition_lines_tl_rec OUT NOCOPY OkcConditionLinesTlRecType
4967: ) RETURN VARCHAR2 IS
4968: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4969: BEGIN
4970: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4971: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
4972: RETURN(l_return_status);
4973: END Set_Attributes;
4974: BEGIN
4967: ) RETURN VARCHAR2 IS
4968: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
4969: BEGIN
4970: x_okc_condition_lines_tl_rec := p_okc_condition_lines_tl_rec;
4971: x_okc_condition_lines_tl_rec.LANGUAGE := l_lang;
4972: RETURN(l_return_status);
4973: END Set_Attributes;
4974: BEGIN
4975: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
4982: RAISE OKC_API.G_EXCEPTION_ERROR;
4983: END IF;
4984: --- Setting item attributes
4985: l_return_status := Set_Attributes(
4986: p_okc_condition_lines_tl_rec, -- IN
4987: l_okc_condition_lines_tl_rec); -- OUT
4988: --- If any errors happen abort API
4989: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4983: END IF;
4984: --- Setting item attributes
4985: l_return_status := Set_Attributes(
4986: p_okc_condition_lines_tl_rec, -- IN
4987: l_okc_condition_lines_tl_rec); -- OUT
4988: --- If any errors happen abort API
4989: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
4990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4991: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4990: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
4991: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4992: RAISE OKC_API.G_EXCEPTION_ERROR;
4993: END IF;
4994: DELETE FROM OKC_CONDITION_LINES_TL
4995: WHERE ID = l_okc_condition_lines_tl_rec.id;
4996:
4997: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4998: EXCEPTION
4991: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
4992: RAISE OKC_API.G_EXCEPTION_ERROR;
4993: END IF;
4994: DELETE FROM OKC_CONDITION_LINES_TL
4995: WHERE ID = l_okc_condition_lines_tl_rec.id;
4996:
4997: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
4998: EXCEPTION
4999: WHEN OKC_API.G_EXCEPTION_ERROR THEN
5041: l_api_version CONSTANT NUMBER := 1;
5042: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
5043: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
5044: l_cnlv_rec cnlv_rec_type := p_cnlv_rec;
5045: l_okc_condition_lines_tl_rec OkcConditionLinesTlRecType;
5046: l_cnl_rec cnl_rec_type;
5047: BEGIN
5048: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
5049: G_PKG_NAME,
5067: END IF;
5068: --------------------------------------
5069: -- Move VIEW record to "Child" records
5070: --------------------------------------
5071: migrate(l_cnlv_rec, l_okc_condition_lines_tl_rec);
5072: migrate(l_cnlv_rec, l_cnl_rec);
5073: --------------------------------------------
5074: -- Call the DELETE_ROW for each child record
5075: --------------------------------------------
5077: p_init_msg_list,
5078: x_return_status,
5079: x_msg_count,
5080: x_msg_data,
5081: l_okc_condition_lines_tl_rec
5082: );
5083: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
5084: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
5085: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
5395: );
5396:
5397: FOR lang_i IN OKC_UTIL.g_language_code.FIRST..OKC_UTIL.g_language_code.LAST LOOP
5398: FORALL i in 1..l_tabsize
5399: INSERT INTO OKC_CONDITION_LINES_TL(
5400: id,
5401: language,
5402: source_lang,
5403: sfwt_flag,
5545: ---------------------------------------
5546: -- Versioning TL Table
5547: ---------------------------------------
5548:
5549: INSERT INTO okc_condition_lines_tlh
5550: (
5551: major_version,
5552: id,
5553: language,
5571: creation_date,
5572: last_updated_by,
5573: last_update_date,
5574: last_update_login
5575: FROM okc_condition_lines_tl
5576: WHERE id in (select id from okc_condition_lines_b
5577: where dnz_chr_id = p_chr_id);
5578:
5579: RETURN l_return_status;
5604:
5605: l_return_status VARCHAR2(1):= OKC_API.G_RET_STS_SUCCESS;
5606:
5607: BEGIN
5608: INSERT INTO okc_condition_lines_tl
5609: (
5610: id,
5611: language,
5612: source_lang,
5628: creation_date,
5629: last_updated_by,
5630: last_update_date,
5631: last_update_login
5632: FROM okc_condition_lines_tlh
5633: WHERE id in (SELECT id
5634: FROM okc_condition_lines_bh
5635: WHERE dnz_chr_id = p_chr_id)
5636: AND major_version = p_major_version;