DBA Data[Home] [Help]

APPS.FND_OBJECTS_PKG dependencies on FND_OBJECTS

Line 1: package body FND_OBJECTS_PKG as

1: package body FND_OBJECTS_PKG as
2: /* $Header: AFSCOBJB.pls 120.2 2005/10/27 18:21:01 tmorrow ship $ */
3:
4: procedure INSERT_ROW (
5: X_ROWID in out nocopy VARCHAR2,

Line 28: cursor C is select ROWID from FND_OBJECTS

24: X_LAST_UPDATE_DATE in DATE,
25: X_LAST_UPDATED_BY in NUMBER,
26: X_LAST_UPDATE_LOGIN in NUMBER
27: ) is
28: cursor C is select ROWID from FND_OBJECTS
29: where OBJECT_ID = X_OBJECT_ID
30: ;
31: begin
32: insert into FND_OBJECTS (

Line 32: insert into FND_OBJECTS (

28: cursor C is select ROWID from FND_OBJECTS
29: where OBJECT_ID = X_OBJECT_ID
30: ;
31: begin
32: insert into FND_OBJECTS (
33: PK4_COLUMN_TYPE,
34: PK5_COLUMN_TYPE,
35: PK1_COLUMN_TYPE,
36: PK2_COLUMN_TYPE,

Line 74: insert into FND_OBJECTS_TL (

70: X_LAST_UPDATED_BY,
71: X_LAST_UPDATE_LOGIN
72: );
73:
74: insert into FND_OBJECTS_TL (
75: CREATED_BY,
76: CREATION_DATE,
77: LAST_UPDATED_BY,
78: LAST_UPDATE_DATE,

Line 100: from FND_OBJECTS_TL T

96: from FND_LANGUAGES L
97: where L.INSTALLED_FLAG in ('I', 'B')
98: and not exists
99: (select NULL
100: from FND_OBJECTS_TL T
101: where T.OBJECT_ID = X_OBJECT_ID
102: and T.LANGUAGE = L.LANGUAGE_CODE);
103:
104: open c;

Line 146: from FND_OBJECTS

142: PK2_COLUMN_NAME,
143: PK3_COLUMN_NAME,
144: PK4_COLUMN_NAME,
145: PK5_COLUMN_NAME
146: from FND_OBJECTS
147: where OBJECT_ID = X_OBJECT_ID
148: for update of OBJECT_ID nowait;
149: recinfo c%rowtype;
150:

Line 155: from FND_OBJECTS_TL

151: cursor c1 is select
152: DISPLAY_NAME,
153: DESCRIPTION,
154: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
155: from FND_OBJECTS_TL
156: where OBJECT_ID = X_OBJECT_ID
157: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
158: for update of OBJECT_ID nowait;
159: begin

Line 233: update FND_OBJECTS set

229: X_LAST_UPDATED_BY in NUMBER,
230: X_LAST_UPDATE_LOGIN in NUMBER
231: ) is
232: begin
233: update FND_OBJECTS set
234: PK4_COLUMN_TYPE = X_PK4_COLUMN_TYPE,
235: PK5_COLUMN_TYPE = X_PK5_COLUMN_TYPE,
236: PK1_COLUMN_TYPE = X_PK1_COLUMN_TYPE,
237: PK2_COLUMN_TYPE = X_PK2_COLUMN_TYPE,

Line 255: update FND_OBJECTS_TL set

251: if (sql%notfound) then
252: raise no_data_found;
253: end if;
254:
255: update FND_OBJECTS_TL set
256: DISPLAY_NAME = X_DISPLAY_NAME,
257: DESCRIPTION = X_DESCRIPTION,
258: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
259: LAST_UPDATED_BY = X_LAST_UPDATED_BY,

Line 291: fnd_objects_pkg.LOAD_ROW (

287: X_DESCRIPTION in VARCHAR2,
288: X_CUSTOM_MODE in VARCHAR2
289: ) is
290: begin
291: fnd_objects_pkg.LOAD_ROW (
292: X_OBJ_NAME => X_OBJ_NAME,
293: X_OWNER => X_OWNER,
294: X_PK1_COLUMN_NAME => X_PK1_COLUMN_NAME,
295: X_PK2_COLUMN_NAME => X_PK2_COLUMN_NAME,

Line 354: from fnd_objects

350: where application_short_name = X_APPLICATION_SHORT_NAME;
351:
352: select object_id, last_updated_by, last_update_date
353: into obj_id, db_luby, db_ludate
354: from fnd_objects
355: where obj_name = X_OBJ_NAME;
356:
357: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
358: db_ludate, X_CUSTOM_MODE)) then

Line 359: fnd_objects_pkg.UPDATE_ROW (

355: where obj_name = X_OBJ_NAME;
356:
357: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
358: db_ludate, X_CUSTOM_MODE)) then
359: fnd_objects_pkg.UPDATE_ROW (
360: X_OBJECT_ID => obj_id,
361: X_OBJ_NAME => X_OBJ_NAME,
362: X_PK1_COLUMN_NAME => X_PK1_COLUMN_NAME,
363: X_PK2_COLUMN_NAME => X_PK2_COLUMN_NAME,

Line 383: select fnd_objects_s.nextval into obj_id from dual;

379: end if;
380: exception
381: when NO_DATA_FOUND then
382:
383: select fnd_objects_s.nextval into obj_id from dual;
384:
385: fnd_objects_pkg.INSERT_ROW(
386: X_ROWID => row_id,
387: X_OBJ_NAME => X_OBJ_NAME,

Line 385: fnd_objects_pkg.INSERT_ROW(

381: when NO_DATA_FOUND then
382:
383: select fnd_objects_s.nextval into obj_id from dual;
384:
385: fnd_objects_pkg.INSERT_ROW(
386: X_ROWID => row_id,
387: X_OBJ_NAME => X_OBJ_NAME,
388: X_OBJECT_ID => obj_id,
389: X_PK1_COLUMN_NAME => X_PK1_COLUMN_NAME,

Line 419: fnd_objects_pkg.TRANSLATE_ROW (

415: X_DESCRIPTION in VARCHAR2,
416: X_CUSTOM_MODE in VARCHAR2
417: ) is
418: begin
419: fnd_objects_pkg.TRANSLATE_ROW (
420: X_OBJ_NAME => X_OBJ_NAME,
421: X_OWNER => X_OWNER,
422: X_DISPLAY_NAME => X_DISPLAY_NAME,
423: X_DESCRIPTION => X_DESCRIPTION,

Line 451: from fnd_objects_tl

447: f_ludate := nvl(to_date(x_last_update_date, 'YYYY/MM/DD'), sysdate);
448:
449: select LAST_UPDATED_BY, LAST_UPDATE_DATE
450: into db_luby, db_ludate
451: from fnd_objects_tl
452: where object_id = (select o.object_id from fnd_objects o
453: where o.obj_name = X_OBJ_NAME)
454: and userenv('LANG') = LANGUAGE;
455:

Line 452: where object_id = (select o.object_id from fnd_objects o

448:
449: select LAST_UPDATED_BY, LAST_UPDATE_DATE
450: into db_luby, db_ludate
451: from fnd_objects_tl
452: where object_id = (select o.object_id from fnd_objects o
453: where o.obj_name = X_OBJ_NAME)
454: and userenv('LANG') = LANGUAGE;
455:
456: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,

Line 458: update fnd_objects_tl set

454: and userenv('LANG') = LANGUAGE;
455:
456: if (fnd_load_util.upload_test(f_luby, f_ludate, db_luby,
457: db_ludate, X_CUSTOM_MODE)) then
458: update fnd_objects_tl set
459: display_name = nvl(X_DISPLAY_NAME, display_name),
460: description = nvl(X_DESCRIPTION, description),
461: source_lang = userenv('LANG'),
462: last_update_date = f_ludate,

Line 465: where object_id = (select o.object_id from fnd_objects o

461: source_lang = userenv('LANG'),
462: last_update_date = f_ludate,
463: last_updated_by = f_luby,
464: last_update_login = 0
465: where object_id = (select o.object_id from fnd_objects o
466: where o.obj_name = X_OBJ_NAME)
467: and userenv('LANG') in (language, source_lang);
468: end if;
469:

Line 476: delete from FND_OBJECTS_TL

472: procedure DELETE_ROW (
473: X_OBJECT_ID in NUMBER
474: ) is
475: begin
476: delete from FND_OBJECTS_TL
477: where OBJECT_ID = X_OBJECT_ID;
478:
479: if (sql%notfound) then
480: raise no_data_found;

Line 483: delete from FND_OBJECTS

479: if (sql%notfound) then
480: raise no_data_found;
481: end if;
482:
483: delete from FND_OBJECTS
484: where OBJECT_ID = X_OBJECT_ID;
485:
486: if (sql%notfound) then
487: raise no_data_found;

Line 500: delete from FND_OBJECTS_TL T

496: /* as a quick workaround to fix the time-consuming table handler issue */
497: /* Eventually we'll need to turn them into a separate fix_language procedure */
498: /*
499:
500: delete from FND_OBJECTS_TL T
501: where not exists
502: (select NULL
503: from FND_OBJECTS B
504: where B.OBJECT_ID = T.OBJECT_ID

Line 503: from FND_OBJECTS B

499:
500: delete from FND_OBJECTS_TL T
501: where not exists
502: (select NULL
503: from FND_OBJECTS B
504: where B.OBJECT_ID = T.OBJECT_ID
505: );
506:
507: update FND_OBJECTS_TL T set (

Line 507: update FND_OBJECTS_TL T set (

503: from FND_OBJECTS B
504: where B.OBJECT_ID = T.OBJECT_ID
505: );
506:
507: update FND_OBJECTS_TL T set (
508: DISPLAY_NAME,
509: DESCRIPTION
510: ) = (select
511: B.DISPLAY_NAME,

Line 513: from FND_OBJECTS_TL B

509: DESCRIPTION
510: ) = (select
511: B.DISPLAY_NAME,
512: B.DESCRIPTION
513: from FND_OBJECTS_TL B
514: where B.OBJECT_ID = T.OBJECT_ID
515: and B.LANGUAGE = T.SOURCE_LANG)
516: where (
517: T.OBJECT_ID,

Line 522: from FND_OBJECTS_TL SUBB, FND_OBJECTS_TL SUBT

518: T.LANGUAGE
519: ) in (select
520: SUBT.OBJECT_ID,
521: SUBT.LANGUAGE
522: from FND_OBJECTS_TL SUBB, FND_OBJECTS_TL SUBT
523: where SUBB.OBJECT_ID = SUBT.OBJECT_ID
524: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
525: and (SUBB.DISPLAY_NAME <> SUBT.DISPLAY_NAME
526: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 530: insert into FND_OBJECTS_TL (

526: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
527: ));
528: */
529:
530: insert into FND_OBJECTS_TL (
531: CREATED_BY,
532: CREATION_DATE,
533: LAST_UPDATED_BY,
534: LAST_UPDATE_DATE,

Line 552: from FND_OBJECTS_TL B, FND_LANGUAGES L

548: B.DISPLAY_NAME,
549: B.DESCRIPTION,
550: L.LANGUAGE_CODE,
551: B.SOURCE_LANG
552: from FND_OBJECTS_TL B, FND_LANGUAGES L
553: where L.INSTALLED_FLAG in ('I', 'B')
554: and B.LANGUAGE = userenv('LANG')
555: and not exists
556: (select NULL

Line 557: from FND_OBJECTS_TL T

553: where L.INSTALLED_FLAG in ('I', 'B')
554: and B.LANGUAGE = userenv('LANG')
555: and not exists
556: (select NULL
557: from FND_OBJECTS_TL T
558: where T.OBJECT_ID = B.OBJECT_ID
559: and T.LANGUAGE = L.LANGUAGE_CODE);
560: end ADD_LANGUAGE;
561:

Line 562: end FND_OBJECTS_PKG;

558: where T.OBJECT_ID = B.OBJECT_ID
559: and T.LANGUAGE = L.LANGUAGE_CODE);
560: end ADD_LANGUAGE;
561:
562: end FND_OBJECTS_PKG;