DBA Data[Home] [Help]

APPS.ICX_POR_ITEM_SOURCES_PKG dependencies on ICX_POR_ITEM_SOURCES

Line 1: PACKAGE BODY ICX_POR_ITEM_SOURCES_PKG AS

1: PACKAGE BODY ICX_POR_ITEM_SOURCES_PKG AS
2: /* $Header: ICXSRCB.pls 115.8 2004/03/31 18:47:15 vkartik ship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out NOCOPY VARCHAR2,

Line 19: cursor C is select ROWID from ICX_POR_ITEM_SOURCES

15: X_LAST_UPDATE_DATE in DATE,
16: X_LAST_UPDATED_BY in NUMBER,
17: X_LAST_UPDATE_LOGIN in NUMBER
18: ) is
19: cursor C is select ROWID from ICX_POR_ITEM_SOURCES
20: where ITEM_SOURCE_ID = X_ITEM_SOURCE_ID
21: ;
22: begin
23:

Line 24: insert into ICX_POR_ITEM_SOURCES (

20: where ITEM_SOURCE_ID = X_ITEM_SOURCE_ID
21: ;
22: begin
23:
24: insert into ICX_POR_ITEM_SOURCES (
25: ITEM_SOURCE_ID,
26: TYPE,
27: PROTOCOL_SUPPORTED,
28: URL,

Line 48: insert into ICX_POR_ITEM_SOURCES_TL (

44: X_LAST_UPDATED_BY,
45: X_LAST_UPDATE_LOGIN
46: );
47:
48: insert into ICX_POR_ITEM_SOURCES_TL (
49: ITEM_SOURCE_ID,
50: ITEM_SOURCE_NAME,
51: DESCRIPTION,
52: CREATION_DATE,

Line 74: from ICX_POR_ITEM_SOURCES_TL T

70: from FND_LANGUAGES L
71: where L.INSTALLED_FLAG in ('I', 'B')
72: and not exists
73: (select NULL
74: from ICX_POR_ITEM_SOURCES_TL T
75: where T.ITEM_SOURCE_ID = X_ITEM_SOURCE_ID
76: and T.LANGUAGE = L.LANGUAGE_CODE);
77:
78: open c;

Line 101: update ICX_POR_ITEM_SOURCES_TL set

97: X_LAST_UPDATED_BY in NUMBER,
98: X_LAST_UPDATE_LOGIN in NUMBER
99: ) is
100: begin
101: update ICX_POR_ITEM_SOURCES_TL set
102: ITEM_SOURCE_NAME = X_ITEM_SOURCE_NAME,
103: DESCRIPTION = X_DESCRIPTION,
104: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
105: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 112: insert into ICX_POR_ITEM_SOURCES_TL (

108: where ITEM_SOURCE_ID = X_ITEM_SOURCE_ID
109: and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
110:
111: if (sql%notfound) then
112: insert into ICX_POR_ITEM_SOURCES_TL (
113: ITEM_SOURCE_ID,
114: ITEM_SOURCE_NAME,
115: DESCRIPTION,
116: CREATION_DATE,

Line 157: from ICX_POR_ITEM_SOURCES_TL

153: f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
154:
155: select LAST_UPDATED_BY, LAST_UPDATE_DATE
156: into db_luby, db_ludate
157: from ICX_POR_ITEM_SOURCES_TL
158: where LANGUAGE = userenv('LANG')
159: and ITEM_SOURCE_ID = to_number(X_ITEM_SOURCE_ID);
160:
161: -- Update record, honoring customization mode.

Line 173: update icx_por_item_sources_tl set

169: p_db_id => db_luby,
170: p_db_lud => db_ludate,
171: p_custom_mode => X_CUSTOM_MODE))
172: then
173: update icx_por_item_sources_tl set
174: item_source_name = nvl(X_ITEM_SOURCE_NAME, ITEM_SOURCE_NAME),
175: description = nvl(X_DESCRIPTION, DESCRIPTION),
176: last_update_date = sysdate,
177: last_updated_by = f_luby,

Line 215: from ICX_POR_ITEM_SOURCES_TL

211: f_ludate := nvl(to_date(X_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
212:
213: select LAST_UPDATED_BY, LAST_UPDATE_DATE
214: into db_luby, db_ludate
215: from ICX_POR_ITEM_SOURCES_TL
216: where LANGUAGE = userenv('LANG')
217: and ITEM_SOURCE_ID = to_number(X_ITEM_SOURCE_ID);
218:
219: -- Bug#3219138

Line 223: update ICX_POR_ITEM_SOURCES set

219: -- Bug#3219138
220: -- Always update the Type+Protocol_supported
221: -- irrespective of customization. Cst should not change the
222: -- type+protocol_supported values.
223: update ICX_POR_ITEM_SOURCES set
224: TYPE = X_TYPE,
225: PROTOCOL_SUPPORTED = X_PROTOCOL_SUPPORTED,
226: URL = X_URL,
227: IMAGE_URL = X_IMAGE_URL,

Line 249: ICX_POR_ITEM_SOURCES_PKG.UPDATE_ROW (

245: p_db_id => db_luby,
246: p_db_lud => db_ludate,
247: p_custom_mode => X_CUSTOM_MODE))
248: then
249: ICX_POR_ITEM_SOURCES_PKG.UPDATE_ROW (
250: X_ITEM_SOURCE_ID => to_number(X_ITEM_SOURCE_ID),
251: X_TYPE => X_TYPE,
252: X_PROTOCOL_SUPPORTED => X_PROTOCOL_SUPPORTED,
253: X_URL => X_URL,

Line 263: ICX_POR_ITEM_SOURCES_PKG.INSERT_ROW (

259: X_LAST_UPDATE_LOGIN => 0 );
260: end if;
261: exception
262: when NO_DATA_FOUND then
263: ICX_POR_ITEM_SOURCES_PKG.INSERT_ROW (
264: X_ROWID => row_id,
265: X_ITEM_SOURCE_ID => to_number(X_ITEM_SOURCE_ID),
266: X_TYPE => X_TYPE,
267: X_PROTOCOL_SUPPORTED => X_PROTOCOL_SUPPORTED,

Line 284: delete from ICX_POR_ITEM_SOURCES_TL T

280:
281: procedure ADD_LANGUAGE
282: is
283: begin
284: delete from ICX_POR_ITEM_SOURCES_TL T
285: where not exists
286: (select NULL
287: from ICX_POR_ITEM_SOURCES B
288: where B.ITEM_SOURCE_ID = T.ITEM_SOURCE_ID

Line 287: from ICX_POR_ITEM_SOURCES B

283: begin
284: delete from ICX_POR_ITEM_SOURCES_TL T
285: where not exists
286: (select NULL
287: from ICX_POR_ITEM_SOURCES B
288: where B.ITEM_SOURCE_ID = T.ITEM_SOURCE_ID
289: );
290:
291: /*

Line 292: update ICX_POR_ITEM_SOURCES_TL T set (

288: where B.ITEM_SOURCE_ID = T.ITEM_SOURCE_ID
289: );
290:
291: /*
292: update ICX_POR_ITEM_SOURCES_TL T set (
293: ITEM_SOURCE_NAME,
294: DESCRIPTION
295: ) = (select
296: B.ITEM_SOURCE_NAME,

Line 298: from ICX_POR_ITEM_SOURCES_TL B

294: DESCRIPTION
295: ) = (select
296: B.ITEM_SOURCE_NAME,
297: B.DESCRIPTION
298: from ICX_POR_ITEM_SOURCES_TL B
299: where B.ITEM_SOURCE_ID = T.ITEM_SOURCE_ID
300: and B.LANGUAGE = T.SOURCE_LANG)
301: where (
302: T.ITEM_SOURCE_ID,

Line 307: from ICX_POR_ITEM_SOURCES_TL SUBB, ICX_POR_ITEM_SOURCES_TL SUBT

303: T.LANGUAGE
304: ) in (select
305: SUBT.ITEM_SOURCE_ID,
306: SUBT.LANGUAGE
307: from ICX_POR_ITEM_SOURCES_TL SUBB, ICX_POR_ITEM_SOURCES_TL SUBT
308: where SUBB.ITEM_SOURCE_ID = SUBT.ITEM_SOURCE_ID
309: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
310: and (SUBB.ITEM_SOURCE_NAME <> SUBT.ITEM_SOURCE_NAME
311: or (SUBB.ITEM_SOURCE_NAME is null and SUBT.ITEM_SOURCE_NAME is not null)

Line 319: insert into ICX_POR_ITEM_SOURCES_TL (

315: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
316: ));
317: */
318:
319: insert into ICX_POR_ITEM_SOURCES_TL (
320: LAST_UPDATE_LOGIN,
321: LAST_UPDATE_DATE,
322: LAST_UPDATED_BY,
323: CREATION_DATE,

Line 341: from ICX_POR_ITEM_SOURCES_TL B, FND_LANGUAGES L

337: B.ITEM_SOURCE_NAME,
338: B.DESCRIPTION,
339: L.LANGUAGE_CODE,
340: B.SOURCE_LANG
341: from ICX_POR_ITEM_SOURCES_TL B, FND_LANGUAGES L
342: where L.INSTALLED_FLAG in ('I', 'B')
343: and B.LANGUAGE = userenv('LANG')
344: and not exists
345: (select NULL

Line 346: from ICX_POR_ITEM_SOURCES_TL T

342: where L.INSTALLED_FLAG in ('I', 'B')
343: and B.LANGUAGE = userenv('LANG')
344: and not exists
345: (select NULL
346: from ICX_POR_ITEM_SOURCES_TL T
347: where T.ITEM_SOURCE_ID = B.ITEM_SOURCE_ID
348: and T.LANGUAGE = L.LANGUAGE_CODE);
349: end ADD_LANGUAGE;
350:

Line 351: end ICX_POR_ITEM_SOURCES_PKG;

347: where T.ITEM_SOURCE_ID = B.ITEM_SOURCE_ID
348: and T.LANGUAGE = L.LANGUAGE_CODE);
349: end ADD_LANGUAGE;
350:
351: end ICX_POR_ITEM_SOURCES_PKG;