DBA Data[Home] [Help]

APPS.AMS_DS_TCA_ENTITY_COLS_PKG dependencies on AMS_DS_TCA_ENTITY_COLS

Line 1: package body AMS_DS_TCA_ENTITY_COLS_PKG as

1: package body AMS_DS_TCA_ENTITY_COLS_PKG as
2: /* $Header: amsltecb.pls 120.0 2005/05/31 13:59:07 appldev noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out NOCOPY VARCHAR2,
5: X_ENTITY_COLUMN_ID in NUMBER,

Line 20: cursor C is select ROWID from AMS_DS_TCA_ENTITY_COLS

16: X_LAST_UPDATE_DATE in DATE,
17: X_LAST_UPDATED_BY in NUMBER,
18: X_LAST_UPDATE_LOGIN in NUMBER
19: ) is
20: cursor C is select ROWID from AMS_DS_TCA_ENTITY_COLS
21: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID
22: ;
23: begin
24: insert into AMS_DS_TCA_ENTITY_COLS (

Line 24: insert into AMS_DS_TCA_ENTITY_COLS (

20: cursor C is select ROWID from AMS_DS_TCA_ENTITY_COLS
21: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID
22: ;
23: begin
24: insert into AMS_DS_TCA_ENTITY_COLS (
25: SOURCE_CATEGORY,
26: ENTITY_COLUMN_ID,
27: ENTITY_ID,
28: COLUMN_NAME,

Line 54: insert into AMS_DS_TCA_ENTITY_COLS_TL (

50: X_LAST_UPDATED_BY,
51: X_LAST_UPDATE_LOGIN
52: );
53:
54: insert into AMS_DS_TCA_ENTITY_COLS_TL (
55: LAST_UPDATED_BY,
56: ENTITY_COLUMN_ID,
57: LAST_UPDATE_DATE,
58: CREATION_DATE,

Line 78: from AMS_DS_TCA_ENTITY_COLS_TL T

74: from FND_LANGUAGES L
75: where L.INSTALLED_FLAG in ('I', 'B')
76: and not exists
77: (select NULL
78: from AMS_DS_TCA_ENTITY_COLS_TL T
79: where T.ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID
80: and T.LANGUAGE = L.LANGUAGE_CODE);
81:
82: open c;

Line 111: from AMS_DS_TCA_ENTITY_COLS

107: DATATYPE,
108: FIELD_SIZE,
109: RECORD_STUCTURE,
110: ENABLED_FLAG
111: from AMS_DS_TCA_ENTITY_COLS
112: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID
113: for update of ENTITY_COLUMN_ID nowait;
114: recinfo c%rowtype;
115:

Line 119: from AMS_DS_TCA_ENTITY_COLS_TL

115:
116: cursor c1 is select
117: DESCRIPTION,
118: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
119: from AMS_DS_TCA_ENTITY_COLS_TL
120: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID
121: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
122: for update of ENTITY_COLUMN_ID nowait;
123: begin

Line 181: update AMS_DS_TCA_ENTITY_COLS set

177: X_LAST_UPDATED_BY in NUMBER,
178: X_LAST_UPDATE_LOGIN in NUMBER
179: ) is
180: begin
181: update AMS_DS_TCA_ENTITY_COLS set
182: SOURCE_CATEGORY = X_SOURCE_CATEGORY,
183: ENTITY_ID = X_ENTITY_ID,
184: COLUMN_NAME = X_COLUMN_NAME,
185: DATATYPE = X_DATATYPE,

Line 198: update AMS_DS_TCA_ENTITY_COLS_TL set

194: if (sql%notfound) then
195: raise no_data_found;
196: end if;
197:
198: update AMS_DS_TCA_ENTITY_COLS_TL set
199: DESCRIPTION = X_DESCRIPTION,
200: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
201: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
202: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,

Line 216: delete from AMS_DS_TCA_ENTITY_COLS_TL

212: procedure DELETE_ROW (
213: X_ENTITY_COLUMN_ID in NUMBER
214: ) is
215: begin
216: delete from AMS_DS_TCA_ENTITY_COLS_TL
217: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID;
218:
219: if (sql%notfound) then
220: raise no_data_found;

Line 223: delete from AMS_DS_TCA_ENTITY_COLS

219: if (sql%notfound) then
220: raise no_data_found;
221: end if;
222:
223: delete from AMS_DS_TCA_ENTITY_COLS
224: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID;
225:
226: if (sql%notfound) then
227: raise no_data_found;

Line 260: from AMS_DS_TCA_ENTITY_COLS

256: l_db_luby_id number;
257:
258: cursor c_chk_col_exists is
259: select 'x'
260: from AMS_DS_TCA_ENTITY_COLS
261: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID;
262:
263: cursor c_get_col_mapping_id is
264: select AMS_DS_TCA_ENTITY_COLS_s.nextval

Line 264: select AMS_DS_TCA_ENTITY_COLS_s.nextval

260: from AMS_DS_TCA_ENTITY_COLS
261: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID;
262:
263: cursor c_get_col_mapping_id is
264: select AMS_DS_TCA_ENTITY_COLS_s.nextval
265: from dual;
266:
267: cursor c_get_luby is
268: select last_updated_by

Line 269: from AMS_DS_TCA_ENTITY_COLS

265: from dual;
266:
267: cursor c_get_luby is
268: select last_updated_by
269: from AMS_DS_TCA_ENTITY_COLS
270: where ENTITY_COLUMN_ID = X_ENTITY_COLUMN_ID;
271:
272: BEGIN
273: if X_OWNER = 'SEED' then

Line 294: AMS_DS_TCA_ENTITY_COLS_PKG.INSERT_ROW (

290: close c_get_col_mapping_id;
291: else
292: l_colmap_id := X_ENTITY_COLUMN_ID;
293: end if;
294: AMS_DS_TCA_ENTITY_COLS_PKG.INSERT_ROW (
295: X_ROWID => l_row_id,
296: X_ENTITY_COLUMN_ID => l_colmap_id,
297: X_SOURCE_CATEGORY => X_SOURCE_CATEGORY,
298: X_ENTITY_ID => X_ENTITY_ID,

Line 324: AMS_DS_TCA_ENTITY_COLS_PKG.UPDATE_ROW (

320: then
321:
322:
323: l_colmap_id := X_ENTITY_COLUMN_ID ;
324: AMS_DS_TCA_ENTITY_COLS_PKG.UPDATE_ROW (
325: X_ENTITY_COLUMN_ID => X_ENTITY_COLUMN_ID,
326: X_SOURCE_CATEGORY => X_SOURCE_CATEGORY,
327: X_ENTITY_ID => X_ENTITY_ID,
328: X_COLUMN_NAME => X_COLUMN_NAME,

Line 347: delete from AMS_DS_TCA_ENTITY_COLS_TL T

343:
344: procedure ADD_LANGUAGE
345: is
346: begin
347: delete from AMS_DS_TCA_ENTITY_COLS_TL T
348: where not exists
349: (select NULL
350: from AMS_DS_TCA_ENTITY_COLS B
351: where B.ENTITY_COLUMN_ID= T.ENTITY_COLUMN_ID

Line 350: from AMS_DS_TCA_ENTITY_COLS B

346: begin
347: delete from AMS_DS_TCA_ENTITY_COLS_TL T
348: where not exists
349: (select NULL
350: from AMS_DS_TCA_ENTITY_COLS B
351: where B.ENTITY_COLUMN_ID= T.ENTITY_COLUMN_ID
352: );
353:
354: update AMS_DS_TCA_ENTITY_COLS_TL T set (

Line 354: update AMS_DS_TCA_ENTITY_COLS_TL T set (

350: from AMS_DS_TCA_ENTITY_COLS B
351: where B.ENTITY_COLUMN_ID= T.ENTITY_COLUMN_ID
352: );
353:
354: update AMS_DS_TCA_ENTITY_COLS_TL T set (
355: DESCRIPTION
356: ) = (select
357: B.DESCRIPTION
358: from AMS_DS_TCA_ENTITY_COLS_TL B

Line 358: from AMS_DS_TCA_ENTITY_COLS_TL B

354: update AMS_DS_TCA_ENTITY_COLS_TL T set (
355: DESCRIPTION
356: ) = (select
357: B.DESCRIPTION
358: from AMS_DS_TCA_ENTITY_COLS_TL B
359: where B.ENTITY_COLUMN_ID= T.ENTITY_COLUMN_ID
360: and B.LANGUAGE = T.SOURCE_LANG)
361: where (
362: T.ENTITY_COLUMN_ID,

Line 367: from AMS_DS_TCA_ENTITY_COLS_TL SUBB, AMS_DS_TCA_ENTITY_COLS_TL SUBT

363: T.LANGUAGE
364: ) in (select
365: SUBT.ENTITY_COLUMN_ID,
366: SUBT.LANGUAGE
367: from AMS_DS_TCA_ENTITY_COLS_TL SUBB, AMS_DS_TCA_ENTITY_COLS_TL SUBT
368: where SUBB.ENTITY_COLUMN_ID= SUBT.ENTITY_COLUMN_ID
369: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
370: and (
371: SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 376: insert into AMS_DS_TCA_ENTITY_COLS_TL (

372: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
373: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
374: ));
375:
376: insert into AMS_DS_TCA_ENTITY_COLS_TL (
377: LAST_UPDATED_BY,
378: ENTITY_COLUMN_ID,
379: LAST_UPDATE_DATE,
380: CREATION_DATE,

Line 396: from FND_LANGUAGES L, AMS_DS_TCA_ENTITY_COLS_TL B

392: B.LAST_UPDATE_LOGIN,
393: B.DESCRIPTION,
394: L.LANGUAGE_CODE,
395: B.SOURCE_LANG
396: from FND_LANGUAGES L, AMS_DS_TCA_ENTITY_COLS_TL B
397: where L.INSTALLED_FLAG in ('I', 'B')
398: and B.LANGUAGE = userenv('LANG')
399: and not exists
400: (select NULL

Line 401: from AMS_DS_TCA_ENTITY_COLS_TL T

397: where L.INSTALLED_FLAG in ('I', 'B')
398: and B.LANGUAGE = userenv('LANG')
399: and not exists
400: (select NULL
401: from AMS_DS_TCA_ENTITY_COLS_TL T
402: where T.ENTITY_COLUMN_ID = B.ENTITY_COLUMN_ID
403: and T.LANGUAGE = L.LANGUAGE_CODE);
404:
405: end ADD_LANGUAGE;

Line 416: from AMS_DS_TCA_ENTITY_COLS_TL

412: ) IS
413:
414: cursor c_last_updated_by is
415: select last_updated_by
416: from AMS_DS_TCA_ENTITY_COLS_TL
417: where ENTITY_COLUMN_ID = x_ENTITY_COLUMN_ID
418: and USERENV('LANG') = LANGUAGE;
419:
420: l_luby number; --last updated by

Line 431: UPDATE AMS_DS_TCA_ENTITY_COLS_TL

427:
428: if (l_luby IN (0, 1, 2) or NVL(x_custom_mode, 'PRESERVE')='FORCE')
429: then
430:
431: UPDATE AMS_DS_TCA_ENTITY_COLS_TL
432: SET
433: DESCRIPTION = NVL(X_DESCRIPTION, DESCRIPTION),
434: SOURCE_LANG = userenv('LANG'),
435: LAST_UPDATE_DATE = SYSDATE,

Line 444: end AMS_DS_TCA_ENTITY_COLS_PKG;

440:
441: end if;
442: END TRANSLATE_ROW;
443:
444: end AMS_DS_TCA_ENTITY_COLS_PKG;