DBA Data[Home] [Help]

APPS.AMS_LIST_SRC_TYPES_NEW_PKG dependencies on AMS_LIST_SRC_TYPES

Line 1: package body AMS_LIST_SRC_TYPES_NEW_PKG as

1: package body AMS_LIST_SRC_TYPES_NEW_PKG as
2: /* $Header: amstlstb.pls 120.3 2005/09/12 05:40:21 rmbhanda noship $ */
3: procedure INSERT_ROW (
4: X_ROWID in out nocopy VARCHAR2,
5: X_LIST_SOURCE_TYPE_ID in NUMBER,

Line 31: cursor C is select ROWID from AMS_LIST_SRC_TYPES

27: X_LAST_UPDATED_BY in NUMBER,
28: X_LAST_UPDATE_LOGIN in NUMBER,
29: X_BASED_ON_TCA_FLAG in VARCHAR2
30: ) is
31: cursor C is select ROWID from AMS_LIST_SRC_TYPES
32: where LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID
33: ;
34: begin
35: insert into AMS_LIST_SRC_TYPES (

Line 35: insert into AMS_LIST_SRC_TYPES (

31: cursor C is select ROWID from AMS_LIST_SRC_TYPES
32: where LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID
33: ;
34: begin
35: insert into AMS_LIST_SRC_TYPES (
36: REMOTE_FLAG,
37: DATABASE_LINK,
38: SEEDED_FLAG,
39: VIEW_APPLICATION_ID,

Line 85: insert into AMS_LIST_SRC_TYPES_TL (

81: X_LAST_UPDATE_LOGIN,
82: X_BASED_ON_TCA_FLAG
83: );
84:
85: insert into AMS_LIST_SRC_TYPES_TL (
86: LIST_SOURCE_TYPE_ID,
87: LAST_UPDATE_DATE,
88: LAST_UPDATE_BY,
89: CREATION_DATE,

Line 113: from AMS_LIST_SRC_TYPES_TL T

109: from FND_LANGUAGES L
110: where L.INSTALLED_FLAG in ('I', 'B')
111: and not exists
112: (select NULL
113: from AMS_LIST_SRC_TYPES_TL T
114: where T.LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID
115: and T.LANGUAGE = L.LANGUAGE_CODE);
116:
117: open c;

Line 167: from AMS_LIST_SRC_TYPES

163: SOURCE_OBJECT_PK_FIELD,
164: ENABLED_FLAG,
165: SECURITY_GROUP_ID,
166: BASED_ON_TCA_FLAG --rmbhanda bug#4604219
167: from AMS_LIST_SRC_TYPES
168: where LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID
169: for update of LIST_SOURCE_TYPE_ID nowait;
170: recinfo c%rowtype;
171:

Line 176: from AMS_LIST_SRC_TYPES_TL

172: cursor c1 is select
173: LIST_SOURCE_NAME,
174: DESCRIPTION,
175: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
176: from AMS_LIST_SRC_TYPES_TL
177: where LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID
178: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
179: for update of LIST_SOURCE_TYPE_ID nowait;
180: begin

Line 269: update AMS_LIST_SRC_TYPES set

265: X_LAST_UPDATE_LOGIN in NUMBER,
266: X_BASED_ON_TCA_FLAG in VARCHAR2
267: ) is
268: begin
269: update AMS_LIST_SRC_TYPES set
270: REMOTE_FLAG = X_REMOTE_FLAG,
271: DATABASE_LINK = X_DATABASE_LINK,
272: SEEDED_FLAG = X_SEEDED_FLAG,
273: VIEW_APPLICATION_ID = X_VIEW_APPLICATION_ID,

Line 296: update AMS_LIST_SRC_TYPES_TL set

292: if (sql%notfound) then
293: raise no_data_found;
294: end if;
295:
296: update AMS_LIST_SRC_TYPES_TL set
297: LIST_SOURCE_NAME = X_LIST_SOURCE_NAME,
298: DESCRIPTION = X_DESCRIPTION,
299: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
300: LAST_UPDATE_BY = X_LAST_UPDATED_BY,

Line 315: delete from AMS_LIST_SRC_TYPES_TL

311: procedure DELETE_ROW (
312: X_LIST_SOURCE_TYPE_ID in NUMBER
313: ) is
314: begin
315: delete from AMS_LIST_SRC_TYPES_TL
316: where LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID;
317:
318: if (sql%notfound) then
319: raise no_data_found;

Line 322: delete from AMS_LIST_SRC_TYPES

318: if (sql%notfound) then
319: raise no_data_found;
320: end if;
321:
322: delete from AMS_LIST_SRC_TYPES
323: where LIST_SOURCE_TYPE_ID = X_LIST_SOURCE_TYPE_ID;
324:
325: if (sql%notfound) then
326: raise no_data_found;

Line 333: delete from AMS_LIST_SRC_TYPES_TL T

329:
330: procedure ADD_LANGUAGE
331: is
332: begin
333: delete from AMS_LIST_SRC_TYPES_TL T
334: where not exists
335: (select NULL
336: from AMS_LIST_SRC_TYPES B
337: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID

Line 336: from AMS_LIST_SRC_TYPES B

332: begin
333: delete from AMS_LIST_SRC_TYPES_TL T
334: where not exists
335: (select NULL
336: from AMS_LIST_SRC_TYPES B
337: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID
338: );
339:
340: update AMS_LIST_SRC_TYPES_TL T set (

Line 340: update AMS_LIST_SRC_TYPES_TL T set (

336: from AMS_LIST_SRC_TYPES B
337: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID
338: );
339:
340: update AMS_LIST_SRC_TYPES_TL T set (
341: LIST_SOURCE_NAME,
342: DESCRIPTION
343: ) = (select
344: B.LIST_SOURCE_NAME,

Line 346: from AMS_LIST_SRC_TYPES_TL B

342: DESCRIPTION
343: ) = (select
344: B.LIST_SOURCE_NAME,
345: B.DESCRIPTION
346: from AMS_LIST_SRC_TYPES_TL B
347: where B.LIST_SOURCE_TYPE_ID = T.LIST_SOURCE_TYPE_ID
348: and B.LANGUAGE = T.SOURCE_LANG)
349: where (
350: T.LIST_SOURCE_TYPE_ID,

Line 355: from AMS_LIST_SRC_TYPES_TL SUBB, AMS_LIST_SRC_TYPES_TL SUBT

351: T.LANGUAGE
352: ) in (select
353: SUBT.LIST_SOURCE_TYPE_ID,
354: SUBT.LANGUAGE
355: from AMS_LIST_SRC_TYPES_TL SUBB, AMS_LIST_SRC_TYPES_TL SUBT
356: where SUBB.LIST_SOURCE_TYPE_ID = SUBT.LIST_SOURCE_TYPE_ID
357: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
358: and (SUBB.LIST_SOURCE_NAME <> SUBT.LIST_SOURCE_NAME
359: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 364: insert into AMS_LIST_SRC_TYPES_TL (

360: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
361: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
362: ));
363:
364: insert into AMS_LIST_SRC_TYPES_TL (
365: LIST_SOURCE_TYPE_ID,
366: LAST_UPDATE_DATE,
367: LAST_UPDATE_BY,
368: CREATION_DATE,

Line 388: from AMS_LIST_SRC_TYPES_TL B, FND_LANGUAGES L

384: B.DESCRIPTION,
385: B.SECURITY_GROUP_ID,
386: L.LANGUAGE_CODE,
387: B.SOURCE_LANG
388: from AMS_LIST_SRC_TYPES_TL B, FND_LANGUAGES L
389: where L.INSTALLED_FLAG in ('I', 'B')
390: and B.LANGUAGE = userenv('LANG')
391: and not exists
392: (select NULL

Line 393: from AMS_LIST_SRC_TYPES_TL T

389: where L.INSTALLED_FLAG in ('I', 'B')
390: and B.LANGUAGE = userenv('LANG')
391: and not exists
392: (select NULL
393: from AMS_LIST_SRC_TYPES_TL T
394: where T.LIST_SOURCE_TYPE_ID = B.LIST_SOURCE_TYPE_ID
395: and T.LANGUAGE = L.LANGUAGE_CODE);
396: end ADD_LANGUAGE;
397:

Line 405: -- SELECT 'Y' FROM AMS_LIST_SRC_TYPES_VL

401: IS
402: l_disable_delete VARCHAR2(1):='N';
403:
404: -- CURSOR SEEDED_CUR(c_list_source_type_id IN NUMBER) IS
405: -- SELECT 'Y' FROM AMS_LIST_SRC_TYPES_VL
406: -- WHERE p_list_source_type_id < 10000;
407:
408: CURSOR LIST_CUR(c_list_source_type_id IN NUMBER) IS
409: SELECT 'Y' FROM AMS_LIST_HEADERS_ALL

Line 411: FROM AMS_LIST_SRC_TYPES

407:
408: CURSOR LIST_CUR(c_list_source_type_id IN NUMBER) IS
409: SELECT 'Y' FROM AMS_LIST_HEADERS_ALL
410: WHERE LIST_SOURCE_TYPE = (SELECT SOURCE_TYPE_CODE
411: FROM AMS_LIST_SRC_TYPES
412: WHERE LIST_SOURCE_TYPE_ID = c_list_source_type_id);
413:
414: CURSOR TARGET_CUR(c_list_source_type_id IN NUMBER) IS
415: SELECT 'Y' FROM DUAL

Line 426: FROM AMS_LIST_SRC_TYPES

422:
423: CURSOR QRY_TEMPL_CUR(c_list_source_type_id IN NUMBER) IS
424: SELECT 'Y' FROM AMS_QUERY_TEMPLATE_ALL
425: WHERE LIST_SRC_TYPE = ( SELECT SOURCE_TYPE_CODE
426: FROM AMS_LIST_SRC_TYPES
427: WHERE LIST_SOURCE_TYPE_ID = c_list_source_type_id);
428:
429: CURSOR DEDUP_CUR(c_list_source_type_id IN NUMBER) IS
430: SELECT 'Y' FROM AMS_LIST_RULES_ALL

Line 432: FROM AMS_LIST_SRC_TYPES

428:
429: CURSOR DEDUP_CUR(c_list_source_type_id IN NUMBER) IS
430: SELECT 'Y' FROM AMS_LIST_RULES_ALL
431: WHERE LIST_SOURCE_TYPE = (SELECT SOURCE_TYPE_CODE
432: FROM AMS_LIST_SRC_TYPES
433: WHERE LIST_SOURCE_TYPE_ID = c_list_source_type_id);
434:
435: CURSOR ASSOCS_CUR(c_list_source_type_id IN NUMBER) IS
436: SELECT DISTINCT 'Y' FROM AMS_LIST_SRC_TYPE_ASSOCS

Line 502: end AMS_LIST_SRC_TYPES_NEW_PKG;

498: WHEN OTHERS THEN
499: RETURN 'N';
500: END get_ams_ds_disable_delete;
501:
502: end AMS_LIST_SRC_TYPES_NEW_PKG;