[Home] [Help]
14: X_LAST_UPDATE_DATE in DATE,
15: X_LAST_UPDATED_BY in NUMBER,
16: X_LAST_UPDATE_LOGIN in NUMBER
17: ) is
18: cursor C is select ROWID from GME_TEXT_TABLE_TL
19: where TEXT_CODE = X_TEXT_CODE
20: and LANG_CODE = X_LANG_CODE
21: and PARAGRAPH_CODE = X_PARAGRAPH_CODE
22: and SUB_PARACODE = X_SUB_PARACODE
23: and LINE_NO = X_LINE_NO
24: and LANGUAGE = userenv('LANG')
25: ;
26: begin
27: insert into GME_TEXT_TABLE_TL (
28: TEXT_CODE,
29: LANG_CODE,
30: PARAGRAPH_CODE,
31: SUB_PARACODE,
55: from FND_LANGUAGES L
56: where L.INSTALLED_FLAG in ('I', 'B')
57: and not exists
58: (select NULL
59: from GME_TEXT_TABLE_TL T
60: where T.TEXT_CODE = X_TEXT_CODE
61: and T.LANG_CODE = X_LANG_CODE
62: and T.PARAGRAPH_CODE = X_PARAGRAPH_CODE
63: and T.SUB_PARACODE = X_SUB_PARACODE
84: ) is
85: cursor c1 is select
86: TEXT,
87: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
88: from GME_TEXT_TABLE_TL
89: where TEXT_CODE = X_TEXT_CODE
90: and LANG_CODE = X_LANG_CODE
91: and PARAGRAPH_CODE = X_PARAGRAPH_CODE
92: and SUB_PARACODE = X_SUB_PARACODE
125: begin
126:
127: -- added this select to retrieve the old line number with ROWID
128: select LINE_NO INTO L_LINE_NO
129: from GME_TEXT_TABLE_TL
130: where ROWID=X_ROW_ID;
131:
132: update GME_TEXT_TABLE_TL set
133: TEXT = X_TEXT,
128: select LINE_NO INTO L_LINE_NO
129: from GME_TEXT_TABLE_TL
130: where ROWID=X_ROW_ID;
131:
132: update GME_TEXT_TABLE_TL set
133: TEXT = X_TEXT,
134: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
135: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
136: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
160: X_LINE_NO in NUMBER,
161: X_ROW_ID in VARCHAR2
162: ) is
163: begin
164: delete from GME_TEXT_TABLE_TL
165: where TEXT_CODE = X_TEXT_CODE
166: and LANG_CODE = X_LANG_CODE
167: and PARAGRAPH_CODE = X_PARAGRAPH_CODE
168: and SUB_PARACODE = X_SUB_PARACODE
180:
181: procedure ADD_LANGUAGE
182: is
183: begin
184: update GME_TEXT_TABLE_TL T set (
185: TEXT
186: ) = (select
187: B.TEXT
188: from GME_TEXT_TABLE_TL B
184: update GME_TEXT_TABLE_TL T set (
185: TEXT
186: ) = (select
187: B.TEXT
188: from GME_TEXT_TABLE_TL B
189: where B.TEXT_CODE = T.TEXT_CODE
190: and B.LANG_CODE = T.LANG_CODE
191: and B.PARAGRAPH_CODE = T.PARAGRAPH_CODE
192: and B.SUB_PARACODE = T.SUB_PARACODE
205: SUBT.PARAGRAPH_CODE,
206: SUBT.SUB_PARACODE,
207: SUBT.LINE_NO,
208: SUBT.LANGUAGE
209: from GME_TEXT_TABLE_TL SUBB, GME_TEXT_TABLE_TL SUBT
210: where SUBB.TEXT_CODE = SUBT.TEXT_CODE
211: and SUBB.LANG_CODE = SUBT.LANG_CODE
212: and SUBB.PARAGRAPH_CODE = SUBT.PARAGRAPH_CODE
213: and SUBB.SUB_PARACODE = SUBT.SUB_PARACODE
217: or (SUBB.TEXT is null and SUBT.TEXT is not null)
218: or (SUBB.TEXT is not null and SUBT.TEXT is null)
219: ));
220:
221: insert into GME_TEXT_TABLE_TL (
222: TEXT_CODE,
223: LANG_CODE,
224: PARAGRAPH_CODE,
225: SUB_PARACODE,
245: B.CREATION_DATE,
246: B.LAST_UPDATE_LOGIN,
247: L.LANGUAGE_CODE,
248: B.SOURCE_LANG
249: from GME_TEXT_TABLE_TL B, FND_LANGUAGES L
250: where L.INSTALLED_FLAG in ('I', 'B')
251: and B.LANGUAGE = userenv('LANG')
252: and not exists
253: (select NULL
250: where L.INSTALLED_FLAG in ('I', 'B')
251: and B.LANGUAGE = userenv('LANG')
252: and not exists
253: (select NULL
254: from GME_TEXT_TABLE_TL T
255: where T.TEXT_CODE = B.TEXT_CODE
256: and T.LANG_CODE = B.LANG_CODE
257: and T.PARAGRAPH_CODE = B.PARAGRAPH_CODE
258: and T.SUB_PARACODE = B.SUB_PARACODE
269: X_TEXT in VARCHAR2,
270: X_OWNER in VARCHAR2
271: ) IS
272: BEGIN
273: update GME_TEXT_TABLE_TL set
274: TEXT = X_TEXT,
275: SOURCE_LANG = userenv('LANG'),
276: LAST_UPDATE_DATE = sysdate,
277: LAST_UPDATED_BY = decode(X_OWNER,'SEED',1,0),
301: l_user_id :=1;
302: END IF;
303:
304: SELECT text_code, rowid into l_text_code, l_row_id
305: FROM GME_TEXT_TABLE_TL
306: WHERE TEXT_CODE = X_TEXT_CODE
307: and LANG_CODE = X_LANG_CODE
308: and PARAGRAPH_CODE = X_PARAGRAPH_CODE
309: and SUB_PARACODE = X_SUB_PARACODE