DBA Data[Home] [Help]

APPS.XDP_DQ_CONFIGURATION_PKG dependencies on XDP_DQ_CONFIGURATION

Line 1: PACKAGE BODY XDP_DQ_CONFIGURATION_PKG AS

1: PACKAGE BODY XDP_DQ_CONFIGURATION_PKG AS
2: /* $Header: XDPDQCNB.pls 120.1 2005/06/15 22:47:12 appldev $ */
3: procedure INSERT_ROW (
4: X_ROWID in OUT NOCOPY VARCHAR2,
5: X_INTERNAL_Q_NAME in VARCHAR2,

Line 25: cursor C is select ROWID from XDP_DQ_CONFIGURATION

21: X_LAST_UPDATE_DATE in DATE,
22: X_LAST_UPDATED_BY in NUMBER,
23: X_LAST_UPDATE_LOGIN in NUMBER
24: ) is
25: cursor C is select ROWID from XDP_DQ_CONFIGURATION
26: where INTERNAL_Q_NAME = X_INTERNAL_Q_NAME
27: ;
28: begin
29: insert into XDP_DQ_CONFIGURATION (

Line 29: insert into XDP_DQ_CONFIGURATION (

25: cursor C is select ROWID from XDP_DQ_CONFIGURATION
26: where INTERNAL_Q_NAME = X_INTERNAL_Q_NAME
27: ;
28: begin
29: insert into XDP_DQ_CONFIGURATION (
30: INTERNAL_Q_NAME,
31: Q_ALIAS,
32: QUEUE_TABLE_NAME,
33: PAYLOAD_TYPE,

Line 67: insert into XDP_DQ_CONFIGURATION_TL (

63: X_LAST_UPDATED_BY,
64: X_LAST_UPDATE_LOGIN
65: );
66:
67: insert into XDP_DQ_CONFIGURATION_TL (
68: LAST_UPDATE_DATE,
69: LAST_UPDATE_LOGIN,
70: INTERNAL_Q_NAME,
71: DISPLAY_NAME,

Line 93: from XDP_DQ_CONFIGURATION_TL T

89: from FND_LANGUAGES L
90: where L.INSTALLED_FLAG in ('I', 'B')
91: and not exists
92: (select NULL
93: from XDP_DQ_CONFIGURATION_TL T
94: where T.INTERNAL_Q_NAME = X_INTERNAL_Q_NAME
95: and T.LANGUAGE = L.LANGUAGE_CODE);
96:
97: open c;

Line 135: from XDP_DQ_CONFIGURATION

131: STATE,
132: DISPLAY_SEQUENCE,
133: EXCEPTION_QUEUE_NAME,
134: MAX_RETRIES
135: from XDP_DQ_CONFIGURATION
136: where INTERNAL_Q_NAME = X_INTERNAL_Q_NAME
137: for update of INTERNAL_Q_NAME nowait;
138: recinfo c%rowtype;
139:

Line 144: from XDP_DQ_CONFIGURATION_TL

140: cursor c1 is select
141: DISPLAY_NAME,
142: DESCRIPTION,
143: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
144: from XDP_DQ_CONFIGURATION_TL
145: where INTERNAL_Q_NAME = X_INTERNAL_Q_NAME
146: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
147: for update of INTERNAL_Q_NAME nowait;
148: begin

Line 214: update XDP_DQ_CONFIGURATION set

210: X_LAST_UPDATED_BY in NUMBER,
211: X_LAST_UPDATE_LOGIN in NUMBER
212: ) is
213: begin
214: update XDP_DQ_CONFIGURATION set
215: Q_ALIAS = X_Q_ALIAS,
216: QUEUE_TABLE_NAME = X_QUEUE_TABLE_NAME,
217: PAYLOAD_TYPE = X_PAYLOAD_TYPE,
218: NUM_OF_DQER = X_NUM_OF_DQER,

Line 235: update XDP_DQ_CONFIGURATION_TL set

231: if (sql%notfound) then
232: raise no_data_found;
233: end if;
234:
235: update XDP_DQ_CONFIGURATION_TL set
236: DISPLAY_NAME = X_DISPLAY_NAME,
237: DESCRIPTION = X_DESCRIPTION,
238: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
239: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 254: delete from XDP_DQ_CONFIGURATION_TL

250: procedure DELETE_ROW (
251: X_INTERNAL_Q_NAME in VARCHAR2
252: ) is
253: begin
254: delete from XDP_DQ_CONFIGURATION_TL
255: where INTERNAL_Q_NAME = X_INTERNAL_Q_NAME;
256:
257: if (sql%notfound) then
258: raise no_data_found;

Line 261: delete from XDP_DQ_CONFIGURATION

257: if (sql%notfound) then
258: raise no_data_found;
259: end if;
260:
261: delete from XDP_DQ_CONFIGURATION
262: where INTERNAL_Q_NAME = X_INTERNAL_Q_NAME;
263:
264: if (sql%notfound) then
265: raise no_data_found;

Line 272: delete from XDP_DQ_CONFIGURATION_TL T

268:
269: procedure ADD_LANGUAGE
270: is
271: begin
272: delete from XDP_DQ_CONFIGURATION_TL T
273: where not exists
274: (select NULL
275: from XDP_DQ_CONFIGURATION B
276: where B.INTERNAL_Q_NAME = T.INTERNAL_Q_NAME

Line 275: from XDP_DQ_CONFIGURATION B

271: begin
272: delete from XDP_DQ_CONFIGURATION_TL T
273: where not exists
274: (select NULL
275: from XDP_DQ_CONFIGURATION B
276: where B.INTERNAL_Q_NAME = T.INTERNAL_Q_NAME
277: );
278:
279: update XDP_DQ_CONFIGURATION_TL T set (

Line 279: update XDP_DQ_CONFIGURATION_TL T set (

275: from XDP_DQ_CONFIGURATION B
276: where B.INTERNAL_Q_NAME = T.INTERNAL_Q_NAME
277: );
278:
279: update XDP_DQ_CONFIGURATION_TL T set (
280: DISPLAY_NAME,
281: DESCRIPTION
282: ) = (select
283: B.DISPLAY_NAME,

Line 285: from XDP_DQ_CONFIGURATION_TL B

281: DESCRIPTION
282: ) = (select
283: B.DISPLAY_NAME,
284: B.DESCRIPTION
285: from XDP_DQ_CONFIGURATION_TL B
286: where B.INTERNAL_Q_NAME = T.INTERNAL_Q_NAME
287: and B.LANGUAGE = T.SOURCE_LANG)
288: where (
289: T.INTERNAL_Q_NAME,

Line 294: from XDP_DQ_CONFIGURATION_TL SUBB, XDP_DQ_CONFIGURATION_TL SUBT

290: T.LANGUAGE
291: ) in (select
292: SUBT.INTERNAL_Q_NAME,
293: SUBT.LANGUAGE
294: from XDP_DQ_CONFIGURATION_TL SUBB, XDP_DQ_CONFIGURATION_TL SUBT
295: where SUBB.INTERNAL_Q_NAME = SUBT.INTERNAL_Q_NAME
296: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
297: and (SUBB.DISPLAY_NAME <> SUBT.DISPLAY_NAME
298: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 303: insert into XDP_DQ_CONFIGURATION_TL (

299: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
300: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
301: ));
302:
303: insert into XDP_DQ_CONFIGURATION_TL (
304: LAST_UPDATE_DATE,
305: LAST_UPDATE_LOGIN,
306: INTERNAL_Q_NAME,
307: DISPLAY_NAME,

Line 325: from XDP_DQ_CONFIGURATION_TL B, FND_LANGUAGES L

321: B.CREATION_DATE,
322: B.LAST_UPDATED_BY,
323: L.LANGUAGE_CODE,
324: B.SOURCE_LANG
325: from XDP_DQ_CONFIGURATION_TL B, FND_LANGUAGES L
326: where L.INSTALLED_FLAG in ('I', 'B')
327: and B.LANGUAGE = userenv('LANG')
328: and not exists
329: (select NULL

Line 330: from XDP_DQ_CONFIGURATION_TL T

326: where L.INSTALLED_FLAG in ('I', 'B')
327: and B.LANGUAGE = userenv('LANG')
328: and not exists
329: (select NULL
330: from XDP_DQ_CONFIGURATION_TL T
331: where T.INTERNAL_Q_NAME = B.INTERNAL_Q_NAME
332: and T.LANGUAGE = L.LANGUAGE_CODE);
333: end ADD_LANGUAGE;
334:

Line 363: XDP_DQ_CONFIGURATION_PKG.UPDATE_ROW (

359: if (X_OWNER = 'SEED') then
360: user_id := 1;
361: end if;
362:
363: XDP_DQ_CONFIGURATION_PKG.UPDATE_ROW (
364: X_INTERNAL_Q_NAME => X_INTERNAL_Q_NAME,
365: X_Q_ALIAS => X_Q_ALIAS,
366: X_QUEUE_TABLE_NAME => X_QUEUE_TABLE_NAME,
367: X_PAYLOAD_TYPE => X_PAYLOAD_TYPE,

Line 384: XDP_DQ_CONFIGURATION_PKG.INSERT_ROW (

380: X_LAST_UPDATE_LOGIN => 0);
381:
382: exception
383: when NO_DATA_FOUND then
384: XDP_DQ_CONFIGURATION_PKG.INSERT_ROW (
385: X_ROWID => row_id,
386: X_INTERNAL_Q_NAME => X_INTERNAL_Q_NAME,
387: X_Q_ALIAS => X_Q_ALIAS,
388: X_QUEUE_TABLE_NAME => X_QUEUE_TABLE_NAME,

Line 418: update XDP_DQ_CONFIGURATION_TL

414: begin
415:
416: -- only update rows that have not been altered by user
417:
418: update XDP_DQ_CONFIGURATION_TL
419: set display_name = X_DISPLAY_NAME,
420: description = X_DESCRIPTION,
421: source_lang = userenv('LANG'),
422: last_update_date = sysdate,

Line 431: end XDP_DQ_CONFIGURATION_PKG;

427:
428: end TRANSLATE_ROW;
429:
430:
431: end XDP_DQ_CONFIGURATION_PKG;