DBA Data[Home] [Help]

APPS.ECX_STANDARDS_PKG dependencies on ECX_STANDARDS

Line 1: package body ECX_STANDARDS_PKG as

1: package body ECX_STANDARDS_PKG as
2: /* $Header: ECXSTDSB.pls 120.2 2005/06/30 11:18:01 appldev ship $ */
3:
4: procedure TRANSLATE_ROW
5: (

Line 31: from ecx_standards

27:
28: begin
29: select standard_id
30: into l_standard_id
31: from ecx_standards
32: where STANDARD_CODE = X_STANDARD_CODE
33: and STANDARD_TYPE = X_STANDARD_TYPE;
34:
35: select LAST_UPDATED_BY,

Line 39: from ECX_STANDARDS_TL

35: select LAST_UPDATED_BY,
36: LAST_UPDATE_DATE
37: into l_db_luby,
38: l_db_ludate
39: from ECX_STANDARDS_TL
40: where STANDARD_ID = l_standard_id
41: and LANGUAGE = userenv('LANG');
42:
43: -- Update record, honoring customization mode.

Line 52: update ECX_STANDARDS_TL set

48: if ((x_custom_mode = 'FORCE') or
49: ((l_luby = 0) and (l_db_luby = 1)) or
50: ((l_luby = l_db_luby) and (l_ludate > l_db_ludate)))
51: then
52: update ECX_STANDARDS_TL set
53: STANDARD_DESC = nvl(X_STANDARD_DESC, STANDARD_DESC),
54: SOURCE_LANG = userenv('LANG'),
55: LAST_UPDATE_DATE = l_ludate,
56: LAST_UPDATED_BY = l_luby,

Line 107: from ECX_STANDARDS_B

103: LAST_UPDATE_DATE
104: into l_standard_id,
105: l_db_luby,
106: l_db_ludate
107: from ECX_STANDARDS_B
108: where STANDARD_CODE = X_STANDARD_CODE
109: and STANDARD_TYPE = X_STANDARD_TYPE;
110:
111: -- Update record, honoring customization mode.

Line 167: cursor C is select ROWID from ECX_STANDARDS_B

163: X_LAST_UPDATE_DATE in DATE,
164: X_LAST_UPDATED_BY in NUMBER,
165: X_LAST_UPDATE_LOGIN in NUMBER
166: ) is
167: cursor C is select ROWID from ECX_STANDARDS_B
168: where STANDARD_ID = X_STANDARD_ID
169: ;
170: begin
171: insert into ECX_STANDARDS_B (

Line 171: insert into ECX_STANDARDS_B (

167: cursor C is select ROWID from ECX_STANDARDS_B
168: where STANDARD_ID = X_STANDARD_ID
169: ;
170: begin
171: insert into ECX_STANDARDS_B (
172: STANDARD_ID,
173: STANDARD_CODE,
174: STANDARD_TYPE,
175: DATA_SEEDED,

Line 193: insert into ECX_STANDARDS_TL (

189: X_LAST_UPDATED_BY,
190: X_LAST_UPDATE_LOGIN
191: );
192:
193: insert into ECX_STANDARDS_TL (
194: STANDARD_DESC,
195: CREATED_BY,
196: LAST_UPDATED_BY,
197: CREATION_DATE,

Line 217: from ECX_STANDARDS_TL T

213: from WF_LANGUAGES L
214: where L.INSTALLED_FLAG = 'Y'
215: and not exists
216: (select NULL
217: from ECX_STANDARDS_TL T
218: where T.STANDARD_ID = X_STANDARD_ID
219: and T.LANGUAGE = L.CODE);
220:
221: open c;

Line 242: from ECX_STANDARDS_B

238: cursor c is select
239: STANDARD_CODE,
240: STANDARD_TYPE,
241: DATA_SEEDED
242: from ECX_STANDARDS_B
243: where STANDARD_ID = X_STANDARD_ID
244: for update of STANDARD_ID nowait;
245: recinfo c%rowtype;
246:

Line 250: from ECX_STANDARDS_TL

246:
247: cursor c1 is select
248: STANDARD_DESC,
249: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
250: from ECX_STANDARDS_TL
251: where STANDARD_ID = X_STANDARD_ID
252: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
253: for update of STANDARD_ID nowait;
254: begin

Line 301: update ECX_STANDARDS_B set

297: X_LAST_UPDATED_BY in NUMBER,
298: X_LAST_UPDATE_LOGIN in NUMBER
299: ) is
300: begin
301: update ECX_STANDARDS_B set
302: STANDARD_CODE = X_STANDARD_CODE,
303: STANDARD_TYPE = X_STANDARD_TYPE,
304: DATA_SEEDED = X_DATA_SEEDED,
305: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,

Line 314: update ECX_STANDARDS_TL set

310: if (sql%notfound) then
311: raise no_data_found;
312: end if;
313:
314: update ECX_STANDARDS_TL set
315: STANDARD_DESC = X_STANDARD_DESC,
316: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
317: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
318: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,

Line 332: delete from ECX_STANDARDS_TL

328: procedure DELETE_ROW (
329: X_STANDARD_ID in NUMBER
330: ) is
331: begin
332: delete from ECX_STANDARDS_TL
333: where STANDARD_ID = X_STANDARD_ID;
334:
335: if (sql%notfound) then
336: raise no_data_found;

Line 339: delete from ECX_STANDARDS_B

335: if (sql%notfound) then
336: raise no_data_found;
337: end if;
338:
339: delete from ECX_STANDARDS_B
340: where STANDARD_ID = X_STANDARD_ID;
341:
342: if (sql%notfound) then
343: raise no_data_found;

Line 350: delete from ECX_STANDARDS_TL T

346:
347: procedure ADD_LANGUAGE
348: is
349: begin
350: delete from ECX_STANDARDS_TL T
351: where not exists
352: (select NULL
353: from ECX_STANDARDS_B B
354: where B.STANDARD_ID = T.STANDARD_ID

Line 353: from ECX_STANDARDS_B B

349: begin
350: delete from ECX_STANDARDS_TL T
351: where not exists
352: (select NULL
353: from ECX_STANDARDS_B B
354: where B.STANDARD_ID = T.STANDARD_ID
355: );
356:
357: update ECX_STANDARDS_TL T set (

Line 357: update ECX_STANDARDS_TL T set (

353: from ECX_STANDARDS_B B
354: where B.STANDARD_ID = T.STANDARD_ID
355: );
356:
357: update ECX_STANDARDS_TL T set (
358: STANDARD_DESC
359: ) = (select
360: B.STANDARD_DESC
361: from ECX_STANDARDS_TL B

Line 361: from ECX_STANDARDS_TL B

357: update ECX_STANDARDS_TL T set (
358: STANDARD_DESC
359: ) = (select
360: B.STANDARD_DESC
361: from ECX_STANDARDS_TL B
362: where B.STANDARD_ID = T.STANDARD_ID
363: and B.LANGUAGE = T.SOURCE_LANG)
364: where (
365: T.STANDARD_ID,

Line 370: from ECX_STANDARDS_TL SUBB, ECX_STANDARDS_TL SUBT

366: T.LANGUAGE
367: ) in (select
368: SUBT.STANDARD_ID,
369: SUBT.LANGUAGE
370: from ECX_STANDARDS_TL SUBB, ECX_STANDARDS_TL SUBT
371: where SUBB.STANDARD_ID = SUBT.STANDARD_ID
372: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
373: and (SUBB.STANDARD_DESC <> SUBT.STANDARD_DESC
374: or (SUBB.STANDARD_DESC is null and SUBT.STANDARD_DESC is not null)

Line 378: insert into ECX_STANDARDS_TL (

374: or (SUBB.STANDARD_DESC is null and SUBT.STANDARD_DESC is not null)
375: or (SUBB.STANDARD_DESC is not null and SUBT.STANDARD_DESC is null)
376: ));
377:
378: insert into ECX_STANDARDS_TL (
379: STANDARD_DESC,
380: CREATED_BY,
381: LAST_UPDATED_BY,
382: CREATION_DATE,

Line 398: from ECX_STANDARDS_TL B, WF_LANGUAGES L

394: B.LAST_UPDATE_LOGIN,
395: B.STANDARD_ID,
396: L.CODE,
397: B.SOURCE_LANG
398: from ECX_STANDARDS_TL B, WF_LANGUAGES L
399: where L.INSTALLED_FLAG = 'Y'
400: and B.LANGUAGE = userenv('LANG')
401: and not exists
402: (select NULL

Line 403: from ECX_STANDARDS_TL T

399: where L.INSTALLED_FLAG = 'Y'
400: and B.LANGUAGE = userenv('LANG')
401: and not exists
402: (select NULL
403: from ECX_STANDARDS_TL T
404: where T.STANDARD_ID = B.STANDARD_ID
405: and T.LANGUAGE = L.CODE);
406: end ADD_LANGUAGE;
407:

Line 408: end ECX_STANDARDS_PKG;

404: where T.STANDARD_ID = B.STANDARD_ID
405: and T.LANGUAGE = L.CODE);
406: end ADD_LANGUAGE;
407:
408: end ECX_STANDARDS_PKG;