DBA Data[Home] [Help]

APPS.AMS_LIST_SRC_TYPES_PKG dependencies on AMS_LIST_SRC_TYPES

Line 1: PACKAGE BODY ams_list_src_types_pkg AS

1: PACKAGE BODY ams_list_src_types_pkg AS
2: /* $Header: amsllstb.pls 120.2 2006/06/07 08:41:17 bmuthukr noship $ */
3:
4: AMS_DEBUG_HIGH_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
5: AMS_DEBUG_LOW_ON boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);

Line 33: CURSOR c IS SELECT rowid FROM ams_list_src_types

29: x_last_update_login IN NUMBER,
30: x_BASED_ON_TCA_FLAG IN varchar2
31: ) IS
32: l_import_type VARCHAR2(30);
33: CURSOR c IS SELECT rowid FROM ams_list_src_types
34: WHERE list_source_type_id = x_list_source_type_id;
35:
36: CURSOR c_import_type(code IN VARCHAR2) IS SELECT lookup_code FROM ams_lookups
37: WHERE lookup_type = 'AMS_IMPORT_TYPE' and enabled_flag='Y'

Line 52: INSERT INTO ams_list_src_types (

48: END IF;
49: CLOSE c_import_type;
50: end if;
51:
52: INSERT INTO ams_list_src_types (
53: list_source_type_id,
54: last_update_date,
55: last_updated_by,
56: creation_date,

Line 98: insert into AMS_LIST_SRC_TYPES_TL (

94: x_SOURCE_CATEGORY ,
95: x_IMPORT_TYPE,
96: x_BASED_ON_TCA_FLAG
97: );
98: insert into AMS_LIST_SRC_TYPES_TL (
99: LANGUAGE,
100: SOURCE_LANG,
101: LIST_SOURCE_NAME,
102: DESCRIPTION,

Line 132: from AMS_LIST_SRC_TYPES_TL T

128: from FND_LANGUAGES L
129: where L.INSTALLED_FLAG in ('I', 'B')
130: and not exists
131: (select NULL
132: from AMS_LIST_SRC_TYPES_TL T
133: where T.LIST_SOURCE_TYPE_ID = x_list_source_type_id
134: and T.LANGUAGE = L.LANGUAGE_CODE);
135:
136:

Line 181: FROM ams_list_src_types

177: ARC_ACT_SRC_USED_BY ,
178: SOURCE_CATEGORY ,
179: IMPORT_TYPE,
180: BASED_ON_TCA_FLAG
181: FROM ams_list_src_types
182: WHERE list_source_type_id = x_list_source_type_id
183: FOR UPDATE OF list_source_type_id NOWAIT;
184: BEGIN
185: FOR TLINFO IN C1 LOOP

Line 247: UPDATE ams_list_src_types SET

243: END IF;
244: CLOSE c_import_type;
245: end if;
246:
247: UPDATE ams_list_src_types SET
248: object_version_number = x_object_version_number,
249: list_source_name = x_list_source_name,
250: list_source_type = x_list_source_type,
251: source_type_code = x_source_type_code,

Line 268: update AMS_LIST_SRC_TYPES_TL set

264: last_update_login = x_last_update_login,
265: BASED_ON_TCA_FLAG = X_BASED_ON_TCA_FLAG
266: WHERE list_source_type_id = x_list_source_type_id;
267:
268: update AMS_LIST_SRC_TYPES_TL set
269: LIST_SOURCE_NAME = x_list_source_name,
270: DESCRIPTION = x_description,
271: LAST_UPDATE_DATE = sysdate,
272: --for bug 5237401

Line 289: DELETE FROM ams_list_src_types

285: PROCEDURE delete_row (
286: x_list_source_type_id IN NUMBER
287: ) IS
288: BEGIN
289: DELETE FROM ams_list_src_types
290: WHERE list_source_type_id = x_list_source_type_id;
291:
292: IF (SQL%NOTFOUND) THEN
293: RAISE NO_DATA_FOUND;

Line 327: FROM ams_list_src_types

323: l_last_updated_by number;
324:
325: CURSOR c_obj_verno IS
326: SELECT object_version_number, last_updated_by
327: FROM ams_list_src_types
328: WHERE list_source_type_id = x_list_source_type_id;
329:
330: CURSOR c_chk_exists is
331: SELECT 'x'

Line 332: FROM ams_list_src_types

328: WHERE list_source_type_id = x_list_source_type_id;
329:
330: CURSOR c_chk_exists is
331: SELECT 'x'
332: FROM ams_list_src_types
333: WHERE list_source_type_id = x_list_source_type_id;
334:
335: CURSOR c_get_id is
336: SELECT ams_list_src_types_s.NEXTVAL

Line 336: SELECT ams_list_src_types_s.NEXTVAL

332: FROM ams_list_src_types
333: WHERE list_source_type_id = x_list_source_type_id;
334:
335: CURSOR c_get_id is
336: SELECT ams_list_src_types_s.NEXTVAL
337: FROM DUAL;
338: BEGIN
339: if X_OWNER = 'SEED' then
340: l_user_id := 1;

Line 361: ams_list_src_types_pkg.Insert_Row (

357: l_list_source_type_id := x_list_source_type_id;
358: END IF;
359: l_obj_verno := 1;
360:
361: ams_list_src_types_pkg.Insert_Row (
362: X_ROWID => l_row_id,
363: X_LIST_SOURCE_TYPE_ID => l_list_source_type_id,
364: X_OBJECT_VERSION_NUMBER => l_obj_verno,
365: X_LIST_SOURCE_NAME => x_list_source_name,

Line 395: ams_list_src_types_pkg.Update_Row (

391:
392: if (l_last_updated_by in (1,2,0) OR
393: NVL(x_custom_mode,'PRESERVE')='FORCE') THEN
394:
395: ams_list_src_types_pkg.Update_Row (
396: X_LIST_SOURCE_TYPE_ID => x_list_source_type_id,
397: X_OBJECT_VERSION_NUMBER => l_obj_verno,
398: X_LIST_SOURCE_NAME => x_list_source_name,
399: X_LIST_SOURCE_TYPE => x_list_source_type,

Line 424: delete from AMS_LIST_SRC_TYPES_TL T

420:
421: procedure ADD_LANGUAGE
422: is
423: begin
424: delete from AMS_LIST_SRC_TYPES_TL T
425: where not exists
426: (select NULL
427: from AMS_LIST_SRC_TYPES B
428: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID

Line 427: from AMS_LIST_SRC_TYPES B

423: begin
424: delete from AMS_LIST_SRC_TYPES_TL T
425: where not exists
426: (select NULL
427: from AMS_LIST_SRC_TYPES B
428: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID
429: );
430:
431: update AMS_LIST_SRC_TYPES_TL T set (

Line 431: update AMS_LIST_SRC_TYPES_TL T set (

427: from AMS_LIST_SRC_TYPES B
428: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID
429: );
430:
431: update AMS_LIST_SRC_TYPES_TL T set (
432: LIST_SOURCE_NAME,
433: DESCRIPTION
434: ) = (select
435: B.LIST_SOURCE_NAME,

Line 437: from AMS_LIST_SRC_TYPES_TL B

433: DESCRIPTION
434: ) = (select
435: B.LIST_SOURCE_NAME,
436: B.DESCRIPTION
437: from AMS_LIST_SRC_TYPES_TL B
438: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID
439: and B.LANGUAGE = T.SOURCE_LANG)
440: where (
441: T.LIST_SOURCE_TYPE_ID,

Line 446: from AMS_LIST_SRC_TYPES_TL SUBB, AMS_LIST_SRC_TYPES_TL SUBT

442: T.LANGUAGE
443: ) in (select
444: SUBT.LIST_SOURCE_TYPE_ID,
445: SUBT.LANGUAGE
446: from AMS_LIST_SRC_TYPES_TL SUBB, AMS_LIST_SRC_TYPES_TL SUBT
447: where SUBB.LIST_SOURCE_TYPE_ID = SUBT.LIST_SOURCE_TYPE_ID
448: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
449: and (SUBB.LIST_SOURCE_NAME <> SUBT.LIST_SOURCE_NAME
450: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 455: insert into AMS_LIST_SRC_TYPES_TL (

451: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
452: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
453: ));
454:
455: insert into AMS_LIST_SRC_TYPES_TL (
456: LIST_SOURCE_TYPE_ID,
457: LAST_UPDATE_DATE,
458: LAST_UPDATE_BY,
459: CREATION_DATE,

Line 477: from AMS_LIST_SRC_TYPES_TL B, FND_LANGUAGES L

473: B.LIST_SOURCE_NAME,
474: B.DESCRIPTION,
475: L.LANGUAGE_CODE,
476: B.SOURCE_LANG
477: from AMS_LIST_SRC_TYPES_TL B, FND_LANGUAGES L
478: where L.INSTALLED_FLAG in ('I', 'B')
479: and B.LANGUAGE = userenv('LANG')
480: and not exists
481: (select NULL

Line 482: from AMS_LIST_SRC_TYPES_TL T

478: where L.INSTALLED_FLAG in ('I', 'B')
479: and B.LANGUAGE = userenv('LANG')
480: and not exists
481: (select NULL
482: from AMS_LIST_SRC_TYPES_TL T
483: where T.LIST_SOURCE_TYPE_ID = B.LIST_SOURCE_TYPE_ID
484: and T.LANGUAGE = L.LANGUAGE_CODE);
485: end ADD_LANGUAGE;
486: procedure TRANSLATE_ROW(

Line 496: FROM ams_list_src_types_tl

492: ) is
493:
494: cursor c_last_updated_by is
495: select last_update_by
496: FROM ams_list_src_types_tl
497: where list_source_type_id = x_list_source_type_id
498: and USERENV('LANG') = LANGUAGE;
499:
500: l_last_updated_by number;

Line 513: update AMS_LIST_SRC_TYPES_TL set

509:
510: if (l_last_updated_by in (1,2,0) OR
511: NVL(x_custom_mode,'PRESERVE')='FORCE') THEN
512:
513: update AMS_LIST_SRC_TYPES_TL set
514: list_source_name = nvl(x_list_source_name, list_source_name),
515: description = nvl(x_description, description),
516: source_lang = userenv('LANG'),
517: last_update_date = sysdate,

Line 526: END ams_list_src_types_pkg;

522:
523: end if;
524: end TRANSLATE_ROW;
525:
526: END ams_list_src_types_pkg;