DBA Data[Home] [Help]

APPS.AR_STANDARD_TEXT_PKG dependencies on STANDARD

Line 1: package body AR_STANDARD_TEXT_PKG as

1: package body AR_STANDARD_TEXT_PKG as
2: /* $Header: ARPASTSB.pls 115.6 2002/11/15 02:37:23 anukumar ship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_STANDARD_TEXT_ID in NUMBER,

Line 5: X_STANDARD_TEXT_ID in NUMBER,

1: package body AR_STANDARD_TEXT_PKG as
2: /* $Header: ARPASTSB.pls 115.6 2002/11/15 02:37:23 anukumar ship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_STANDARD_TEXT_ID in NUMBER,
6: X_START_DATE in DATE,
7: X_END_DATE in DATE,
8: X_NAME in VARCHAR2,
9: X_TEXT_TYPE in VARCHAR2,

Line 34: cursor C is select ROWID from AR_STANDARD_TEXT_B

30: X_LAST_UPDATE_DATE in DATE,
31: X_LAST_UPDATED_BY in NUMBER,
32: X_LAST_UPDATE_LOGIN in NUMBER
33: ) is
34: cursor C is select ROWID from AR_STANDARD_TEXT_B
35: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
36: ;
37: begin
38: insert into AR_STANDARD_TEXT_B (

Line 35: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID

31: X_LAST_UPDATED_BY in NUMBER,
32: X_LAST_UPDATE_LOGIN in NUMBER
33: ) is
34: cursor C is select ROWID from AR_STANDARD_TEXT_B
35: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
36: ;
37: begin
38: insert into AR_STANDARD_TEXT_B (
39: STANDARD_TEXT_ID,

Line 38: insert into AR_STANDARD_TEXT_B (

34: cursor C is select ROWID from AR_STANDARD_TEXT_B
35: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
36: ;
37: begin
38: insert into AR_STANDARD_TEXT_B (
39: STANDARD_TEXT_ID,
40: START_DATE,
41: END_DATE,
42: NAME,

Line 39: STANDARD_TEXT_ID,

35: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
36: ;
37: begin
38: insert into AR_STANDARD_TEXT_B (
39: STANDARD_TEXT_ID,
40: START_DATE,
41: END_DATE,
42: NAME,
43: TEXT_TYPE,

Line 67: X_STANDARD_TEXT_ID,

63: LAST_UPDATE_DATE,
64: LAST_UPDATED_BY,
65: LAST_UPDATE_LOGIN
66: ) values (
67: X_STANDARD_TEXT_ID,
68: X_START_DATE,
69: X_END_DATE,
70: X_NAME,
71: X_TEXT_TYPE,

Line 96: insert into AR_STANDARD_TEXT_TL (

92: X_LAST_UPDATED_BY,
93: X_LAST_UPDATE_LOGIN
94: );
95:
96: insert into AR_STANDARD_TEXT_TL (
97: STANDARD_TEXT_ID,
98: TEXT,
99: LAST_UPDATE_DATE,
100: CREATION_DATE,

Line 97: STANDARD_TEXT_ID,

93: X_LAST_UPDATE_LOGIN
94: );
95:
96: insert into AR_STANDARD_TEXT_TL (
97: STANDARD_TEXT_ID,
98: TEXT,
99: LAST_UPDATE_DATE,
100: CREATION_DATE,
101: CREATED_BY,

Line 107: X_STANDARD_TEXT_ID,

103: LAST_UPDATE_LOGIN,
104: LANGUAGE,
105: SOURCE_LANG
106: ) select
107: X_STANDARD_TEXT_ID,
108: X_TEXT,
109: X_LAST_UPDATE_DATE,
110: X_CREATION_DATE,
111: X_CREATED_BY,

Line 120: from AR_STANDARD_TEXT_TL T

116: from FND_LANGUAGES L
117: where L.INSTALLED_FLAG in ('I', 'B')
118: and not exists
119: (select NULL
120: from AR_STANDARD_TEXT_TL T
121: where T.STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
122: and T.LANGUAGE = L.LANGUAGE_CODE);
123:
124: open c;

Line 121: where T.STANDARD_TEXT_ID = X_STANDARD_TEXT_ID

117: where L.INSTALLED_FLAG in ('I', 'B')
118: and not exists
119: (select NULL
120: from AR_STANDARD_TEXT_TL T
121: where T.STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
122: and T.LANGUAGE = L.LANGUAGE_CODE);
123:
124: open c;
125: fetch c into X_ROWID;

Line 135: X_STANDARD_TEXT_ID in NUMBER,

131:
132: end INSERT_ROW;
133:
134: procedure LOCK_ROW (
135: X_STANDARD_TEXT_ID in NUMBER,
136: X_START_DATE in DATE,
137: X_END_DATE in DATE,
138: X_NAME in VARCHAR2,
139: X_TEXT_TYPE in VARCHAR2,

Line 181: from AR_STANDARD_TEXT_B

177: ATTRIBUTE12,
178: ATTRIBUTE13,
179: ATTRIBUTE14,
180: ATTRIBUTE15
181: from AR_STANDARD_TEXT_B
182: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
183: for update of STANDARD_TEXT_ID nowait;
184: recinfo c%rowtype;
185:

Line 182: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID

178: ATTRIBUTE13,
179: ATTRIBUTE14,
180: ATTRIBUTE15
181: from AR_STANDARD_TEXT_B
182: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
183: for update of STANDARD_TEXT_ID nowait;
184: recinfo c%rowtype;
185:
186: cursor c1 is select

Line 183: for update of STANDARD_TEXT_ID nowait;

179: ATTRIBUTE14,
180: ATTRIBUTE15
181: from AR_STANDARD_TEXT_B
182: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
183: for update of STANDARD_TEXT_ID nowait;
184: recinfo c%rowtype;
185:
186: cursor c1 is select
187: TEXT,

Line 189: from AR_STANDARD_TEXT_TL

185:
186: cursor c1 is select
187: TEXT,
188: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
189: from AR_STANDARD_TEXT_TL
190: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
191: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
192: for update of STANDARD_TEXT_ID nowait;
193: begin

Line 190: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID

186: cursor c1 is select
187: TEXT,
188: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
189: from AR_STANDARD_TEXT_TL
190: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
191: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
192: for update of STANDARD_TEXT_ID nowait;
193: begin
194: open c;

Line 192: for update of STANDARD_TEXT_ID nowait;

188: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
189: from AR_STANDARD_TEXT_TL
190: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
191: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
192: for update of STANDARD_TEXT_ID nowait;
193: begin
194: open c;
195: fetch c into recinfo;
196: if (c%notfound) then

Line 265: X_STANDARD_TEXT_ID in NUMBER,

261: return;
262: end LOCK_ROW;
263:
264: procedure UPDATE_ROW (
265: X_STANDARD_TEXT_ID in NUMBER,
266: X_START_DATE in DATE,
267: X_END_DATE in DATE,
268: X_NAME in VARCHAR2,
269: X_TEXT_TYPE in VARCHAR2,

Line 293: update AR_STANDARD_TEXT_B set

289: X_LAST_UPDATED_BY in NUMBER,
290: X_LAST_UPDATE_LOGIN in NUMBER
291: ) is
292: begin
293: update AR_STANDARD_TEXT_B set
294: START_DATE = X_START_DATE,
295: END_DATE = X_END_DATE,
296: NAME = X_NAME,
297: TEXT_TYPE = X_TEXT_TYPE,

Line 318: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;

314: ATTRIBUTE15 = X_ATTRIBUTE15,
315: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
316: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
317: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
318: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;
319:
320: if (sql%notfound) then
321: raise no_data_found;
322: end if;

Line 324: update AR_STANDARD_TEXT_TL set

320: if (sql%notfound) then
321: raise no_data_found;
322: end if;
323:
324: update AR_STANDARD_TEXT_TL set
325: TEXT = X_TEXT,
326: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
327: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
328: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,

Line 330: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID

326: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
327: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
328: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
329: SOURCE_LANG = userenv('LANG')
330: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID
331: and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
332:
333: if (sql%notfound) then
334: raise no_data_found;

Line 339: X_STANDARD_TEXT_ID in NUMBER

335: end if;
336: end UPDATE_ROW;
337:
338: procedure DELETE_ROW (
339: X_STANDARD_TEXT_ID in NUMBER
340: ) is
341: begin
342: delete from AR_STANDARD_TEXT_TL
343: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;

Line 342: delete from AR_STANDARD_TEXT_TL

338: procedure DELETE_ROW (
339: X_STANDARD_TEXT_ID in NUMBER
340: ) is
341: begin
342: delete from AR_STANDARD_TEXT_TL
343: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;
344:
345: if (sql%notfound) then
346: raise no_data_found;

Line 343: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;

339: X_STANDARD_TEXT_ID in NUMBER
340: ) is
341: begin
342: delete from AR_STANDARD_TEXT_TL
343: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;
344:
345: if (sql%notfound) then
346: raise no_data_found;
347: end if;

Line 349: delete from AR_STANDARD_TEXT_B

345: if (sql%notfound) then
346: raise no_data_found;
347: end if;
348:
349: delete from AR_STANDARD_TEXT_B
350: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;
351:
352: if (sql%notfound) then
353: raise no_data_found;

Line 350: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;

346: raise no_data_found;
347: end if;
348:
349: delete from AR_STANDARD_TEXT_B
350: where STANDARD_TEXT_ID = X_STANDARD_TEXT_ID;
351:
352: if (sql%notfound) then
353: raise no_data_found;
354: end if;

Line 360: delete from AR_STANDARD_TEXT_TL T

356:
357: procedure ADD_LANGUAGE
358: is
359: begin
360: delete from AR_STANDARD_TEXT_TL T
361: where not exists
362: (select NULL
363: from AR_STANDARD_TEXT_B B
364: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID

Line 363: from AR_STANDARD_TEXT_B B

359: begin
360: delete from AR_STANDARD_TEXT_TL T
361: where not exists
362: (select NULL
363: from AR_STANDARD_TEXT_B B
364: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID
365: );
366:
367: update AR_STANDARD_TEXT_TL T set (

Line 364: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID

360: delete from AR_STANDARD_TEXT_TL T
361: where not exists
362: (select NULL
363: from AR_STANDARD_TEXT_B B
364: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID
365: );
366:
367: update AR_STANDARD_TEXT_TL T set (
368: TEXT

Line 367: update AR_STANDARD_TEXT_TL T set (

363: from AR_STANDARD_TEXT_B B
364: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID
365: );
366:
367: update AR_STANDARD_TEXT_TL T set (
368: TEXT
369: ) = (select
370: B.TEXT
371: from AR_STANDARD_TEXT_TL B

Line 371: from AR_STANDARD_TEXT_TL B

367: update AR_STANDARD_TEXT_TL T set (
368: TEXT
369: ) = (select
370: B.TEXT
371: from AR_STANDARD_TEXT_TL B
372: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID
373: and B.LANGUAGE = T.SOURCE_LANG)
374: where (
375: T.STANDARD_TEXT_ID,

Line 372: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID

368: TEXT
369: ) = (select
370: B.TEXT
371: from AR_STANDARD_TEXT_TL B
372: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID
373: and B.LANGUAGE = T.SOURCE_LANG)
374: where (
375: T.STANDARD_TEXT_ID,
376: T.LANGUAGE

Line 375: T.STANDARD_TEXT_ID,

371: from AR_STANDARD_TEXT_TL B
372: where B.STANDARD_TEXT_ID = T.STANDARD_TEXT_ID
373: and B.LANGUAGE = T.SOURCE_LANG)
374: where (
375: T.STANDARD_TEXT_ID,
376: T.LANGUAGE
377: ) in (select
378: SUBT.STANDARD_TEXT_ID,
379: SUBT.LANGUAGE

Line 378: SUBT.STANDARD_TEXT_ID,

374: where (
375: T.STANDARD_TEXT_ID,
376: T.LANGUAGE
377: ) in (select
378: SUBT.STANDARD_TEXT_ID,
379: SUBT.LANGUAGE
380: from AR_STANDARD_TEXT_TL SUBB, AR_STANDARD_TEXT_TL SUBT
381: where SUBB.STANDARD_TEXT_ID = SUBT.STANDARD_TEXT_ID
382: and SUBB.LANGUAGE = SUBT.SOURCE_LANG

Line 380: from AR_STANDARD_TEXT_TL SUBB, AR_STANDARD_TEXT_TL SUBT

376: T.LANGUAGE
377: ) in (select
378: SUBT.STANDARD_TEXT_ID,
379: SUBT.LANGUAGE
380: from AR_STANDARD_TEXT_TL SUBB, AR_STANDARD_TEXT_TL SUBT
381: where SUBB.STANDARD_TEXT_ID = SUBT.STANDARD_TEXT_ID
382: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
383: and (SUBB.TEXT <> SUBT.TEXT
384: or (SUBB.TEXT is null and SUBT.TEXT is not null)

Line 381: where SUBB.STANDARD_TEXT_ID = SUBT.STANDARD_TEXT_ID

377: ) in (select
378: SUBT.STANDARD_TEXT_ID,
379: SUBT.LANGUAGE
380: from AR_STANDARD_TEXT_TL SUBB, AR_STANDARD_TEXT_TL SUBT
381: where SUBB.STANDARD_TEXT_ID = SUBT.STANDARD_TEXT_ID
382: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
383: and (SUBB.TEXT <> SUBT.TEXT
384: or (SUBB.TEXT is null and SUBT.TEXT is not null)
385: or (SUBB.TEXT is not null and SUBT.TEXT is null)

Line 388: insert into AR_STANDARD_TEXT_TL (

384: or (SUBB.TEXT is null and SUBT.TEXT is not null)
385: or (SUBB.TEXT is not null and SUBT.TEXT is null)
386: ));
387:
388: insert into AR_STANDARD_TEXT_TL (
389: STANDARD_TEXT_ID,
390: TEXT,
391: LAST_UPDATE_DATE,
392: CREATION_DATE,

Line 389: STANDARD_TEXT_ID,

385: or (SUBB.TEXT is not null and SUBT.TEXT is null)
386: ));
387:
388: insert into AR_STANDARD_TEXT_TL (
389: STANDARD_TEXT_ID,
390: TEXT,
391: LAST_UPDATE_DATE,
392: CREATION_DATE,
393: CREATED_BY,

Line 399: B.STANDARD_TEXT_ID,

395: LAST_UPDATE_LOGIN,
396: LANGUAGE,
397: SOURCE_LANG
398: ) select
399: B.STANDARD_TEXT_ID,
400: B.TEXT,
401: B.LAST_UPDATE_DATE,
402: B.CREATION_DATE,
403: B.CREATED_BY,

Line 408: from AR_STANDARD_TEXT_TL B, FND_LANGUAGES L

404: B.LAST_UPDATED_BY,
405: B.LAST_UPDATE_LOGIN,
406: L.LANGUAGE_CODE,
407: B.SOURCE_LANG
408: from AR_STANDARD_TEXT_TL B, FND_LANGUAGES L
409: where L.INSTALLED_FLAG in ('I', 'B')
410: and B.LANGUAGE = userenv('LANG')
411: and not exists
412: (select NULL

Line 413: from AR_STANDARD_TEXT_TL T

409: where L.INSTALLED_FLAG in ('I', 'B')
410: and B.LANGUAGE = userenv('LANG')
411: and not exists
412: (select NULL
413: from AR_STANDARD_TEXT_TL T
414: where T.STANDARD_TEXT_ID = B.STANDARD_TEXT_ID
415: and T.LANGUAGE = L.LANGUAGE_CODE);
416: end ADD_LANGUAGE;
417:

Line 414: where T.STANDARD_TEXT_ID = B.STANDARD_TEXT_ID

410: and B.LANGUAGE = userenv('LANG')
411: and not exists
412: (select NULL
413: from AR_STANDARD_TEXT_TL T
414: where T.STANDARD_TEXT_ID = B.STANDARD_TEXT_ID
415: and T.LANGUAGE = L.LANGUAGE_CODE);
416: end ADD_LANGUAGE;
417:
418: procedure LOAD_ROW (

Line 419: X_STANDARD_TEXT_ID in NUMBER,

415: and T.LANGUAGE = L.LANGUAGE_CODE);
416: end ADD_LANGUAGE;
417:
418: procedure LOAD_ROW (
419: X_STANDARD_TEXT_ID in NUMBER,
420: X_START_DATE in DATE,
421: X_END_DATE in DATE,
422: X_NAME in VARCHAR2,
423: X_TEXT_TYPE in VARCHAR2,

Line 456: AR_STANDARD_TEXT_PKG.UPDATE_ROW(

452: user_id := -1;
453: end if;
454:
455: begin
456: AR_STANDARD_TEXT_PKG.UPDATE_ROW(
457: X_STANDARD_TEXT_ID => X_STANDARD_TEXT_ID,
458: X_START_DATE => X_START_DATE,
459: X_END_DATE => X_END_DATE,
460: X_NAME => X_NAME,

Line 457: X_STANDARD_TEXT_ID => X_STANDARD_TEXT_ID,

453: end if;
454:
455: begin
456: AR_STANDARD_TEXT_PKG.UPDATE_ROW(
457: X_STANDARD_TEXT_ID => X_STANDARD_TEXT_ID,
458: X_START_DATE => X_START_DATE,
459: X_END_DATE => X_END_DATE,
460: X_NAME => X_NAME,
461: X_TEXT_TYPE => X_TEXT_TYPE,

Line 486: AR_STANDARD_TEXT_PKG.INSERT_ROW (

482: X_LAST_UPDATE_LOGIN => 0 );
483:
484: exception
485: when NO_DATA_FOUND then
486: AR_STANDARD_TEXT_PKG.INSERT_ROW (
487: X_ROWID => row_id,
488: X_STANDARD_TEXT_ID => X_STANDARD_TEXT_ID,
489: X_START_DATE => X_START_DATE,
490: X_END_DATE => X_END_DATE,

Line 488: X_STANDARD_TEXT_ID => X_STANDARD_TEXT_ID,

484: exception
485: when NO_DATA_FOUND then
486: AR_STANDARD_TEXT_PKG.INSERT_ROW (
487: X_ROWID => row_id,
488: X_STANDARD_TEXT_ID => X_STANDARD_TEXT_ID,
489: X_START_DATE => X_START_DATE,
490: X_END_DATE => X_END_DATE,
491: X_NAME => X_NAME,
492: X_TEXT_TYPE => X_TEXT_TYPE,

Line 522: X_STANDARD_TEXT_ID in NUMBER,

518:
519: end LOAD_ROW;
520:
521: procedure TRANSLATE_ROW (
522: X_STANDARD_TEXT_ID in NUMBER,
523: X_TEXT in VARCHAR2 ,
524: X_OWNER in VARCHAR2 ) IS
525: begin
526:

Line 529: update AR_STANDARD_TEXT_TL

525: begin
526:
527: -- only update rows that have not been altered by user
528:
529: update AR_STANDARD_TEXT_TL
530: set text = X_TEXT,
531: source_lang = userenv('LANG'),
532: last_update_date = sysdate,
533: last_updated_by = decode(X_OWNER, 'SEED', -1, 0),

Line 535: where standard_text_id = X_STANDARD_TEXT_ID

531: source_lang = userenv('LANG'),
532: last_update_date = sysdate,
533: last_updated_by = decode(X_OWNER, 'SEED', -1, 0),
534: last_update_login = 0
535: where standard_text_id = X_STANDARD_TEXT_ID
536: and userenv('LANG') in (language, source_lang);
537:
538: end TRANSLATE_ROW;
539:

Line 540: end AR_STANDARD_TEXT_PKG;

536: and userenv('LANG') in (language, source_lang);
537:
538: end TRANSLATE_ROW;
539:
540: end AR_STANDARD_TEXT_PKG;