DBA Data[Home] [Help]

APPS.GL_JE_CATEGORIES_PKG dependencies on GL_JE_CATEGORIES

Line 1: PACKAGE BODY GL_JE_CATEGORIES_PKG AS

1: PACKAGE BODY GL_JE_CATEGORIES_PKG AS
2: /* $Header: glijectb.pls 120.14 2005/05/05 01:09:27 kvora ship $ */
3:
4:
5: --

Line 19: -- gl_je_categories_pkg.select_row(recinfo)

15: -- 28-MAR-94 D. J. Ogg Created
16: -- Arguments
17: -- recinfo Various information about the row
18: -- Example
19: -- gl_je_categories_pkg.select_row(recinfo)
20: -- Notes
21: --
22: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_je_categories%ROWTYPE) IS
23: BEGIN

Line 22: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_je_categories%ROWTYPE) IS

18: -- Example
19: -- gl_je_categories_pkg.select_row(recinfo)
20: -- Notes
21: --
22: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_je_categories%ROWTYPE) IS
23: BEGIN
24: SELECT *
25: INTO recinfo
26: FROM gl_je_categories

Line 26: FROM gl_je_categories

22: PROCEDURE select_row( recinfo IN OUT NOCOPY gl_je_categories%ROWTYPE) IS
23: BEGIN
24: SELECT *
25: INTO recinfo
26: FROM gl_je_categories
27: WHERE je_category_name = recinfo.je_category_name;
28: END SELECT_ROW;
29:
30:

Line 39: FROM gl_je_categories cat

35: PROCEDURE check_unique( x_rowid VARCHAR2,
36: x_name VARCHAR2 ) IS
37: CURSOR c_dup IS
38: SELECT 'Duplicate'
39: FROM gl_je_categories cat
40: WHERE cat.user_je_category_name = x_name
41: AND ( x_rowid is NULL
42: OR
43: cat.rowid <> x_rowid );

Line 64: 'GL_JE_CATEGORIES_PKG.check_unique');

60: RAISE;
61: WHEN OTHERS THEN
62: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
63: fnd_message.set_token('PROCEDURE',
64: 'GL_JE_CATEGORIES_PKG.check_unique');
65: RAISE;
66:
67: END check_unique;
68:

Line 74: FROM gl_je_categories cat

70: PROCEDURE check_unique_key( x_rowid VARCHAR2,
71: x_key VARCHAR2 ) IS
72: CURSOR c_dup IS
73: SELECT 'Duplicate'
74: FROM gl_je_categories cat
75: WHERE cat.je_category_key = x_key
76: AND ( x_rowid is NULL
77: OR
78: cat.rowid <> x_rowid );

Line 99: 'GL_JE_CATEGORIES_PKG.check_unique_key');

95: RAISE;
96: WHEN OTHERS THEN
97: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
98: fnd_message.set_token('PROCEDURE',
99: 'GL_JE_CATEGORIES_PKG.check_unique_key');
100: RAISE;
101:
102: END check_unique_key;
103:

Line 108: SELECT gl_je_categories_s.NEXTVAL

104: -- ************************************************************************
105:
106: FUNCTION get_unique_id RETURN NUMBER IS
107: CURSOR c_getid IS
108: SELECT gl_je_categories_s.NEXTVAL
109: FROM dual;
110: id number;
111:
112: BEGIN

Line 122: fnd_message.set_token('SEQUENCE', 'gl_je_categories_s');

118: RETURN( id );
119: ELSE
120: CLOSE c_getid;
121: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
122: fnd_message.set_token('SEQUENCE', 'gl_je_categories_s');
123: app_exception.raise_exception;
124: END IF;
125:
126: EXCEPTION

Line 132: 'GL_JE_CATEGORIES_PKG.get_unique_id');

128: RAISE;
129: WHEN OTHERS THEN
130: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
131: fnd_message.set_token('PROCEDURE',
132: 'GL_JE_CATEGORIES_PKG.get_unique_id');
133: RAISE;
134:
135: END get_unique_id;
136:

Line 177: 'GL_JE_CATEGORIES_PKG.insert_fnd_cat');

173: RAISE;
174: WHEN OTHERS THEN
175: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
176: fnd_message.set_token('PROCEDURE',
177: 'GL_JE_CATEGORIES_PKG.insert_fnd_cat');
178: RAISE;
179:
180: END insert_fnd_cat;
181:

Line 217: 'GL_JE_CATEGORIES_PKG.update_fnd_cat');

213: RAISE;
214: WHEN OTHERS THEN
215: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
216: fnd_message.set_token('PROCEDURE',
217: 'GL_JE_CATEGORIES_PKG.update_fnd_cat');
218: RAISE;
219:
220: END update_fnd_cat;
221:

Line 238: from gl_je_categories_tl gcat

234: ( select gcat.description,
235: sysdate,
236: x_last_updated_by,
237: gcat.user_je_category_name
238: from gl_je_categories_tl gcat
239: where gcat.language = FND_GLOBAL.BASE_LANGUAGE
240: AND gcat.je_category_name = fcat.code )
241: WHERE fcat.application_id = 101
242: and fcat.code in ( select fcat2.code

Line 243: from gl_je_categories_tl gcat2,

239: where gcat.language = FND_GLOBAL.BASE_LANGUAGE
240: AND gcat.je_category_name = fcat.code )
241: WHERE fcat.application_id = 101
242: and fcat.code in ( select fcat2.code
243: from gl_je_categories_tl gcat2,
244: fnd_doc_sequence_categories fcat2
245: where gcat2.language = FND_GLOBAL.BASE_LANGUAGE
246: AND fcat2.application_id = 101
247: AND gcat2.je_category_name = fcat2.code

Line 257: 'GL_JE_CATEGORIES_PKG.update_fnd_cat_all');

253: RAISE;
254: WHEN OTHERS THEN
255: fnd_message.set_name('SQLGL', 'GL_UNHANDLED_EXCEPTION');
256: fnd_message.set_token('PROCEDURE',
257: 'GL_JE_CATEGORIES_PKG.update_fnd_cat_all');
258: RAISE;
259:
260: END update_fnd_cat_all;
261:

Line 293: recinfo gl_je_categories%ROWTYPE;

289: PROCEDURE select_columns(
290: x_je_category_name VARCHAR2,
291: x_user_je_category_name IN OUT NOCOPY VARCHAR2 ) IS
292:
293: recinfo gl_je_categories%ROWTYPE;
294:
295: BEGIN
296: recinfo.je_category_name := x_je_category_name;
297:

Line 326: FROM gl_je_categories_tl

322: X_Attribute5 VARCHAR2,
323: X_Context VARCHAR2,
324: X_Consolidation_Flag VARCHAR2) IS
325: CURSOR C IS SELECT rowid, language, source_lang
326: FROM gl_je_categories_tl
327: WHERE je_category_name = X_Je_Category_Name
328: and Language = userenv('LANG');
329: BEGIN
330:

Line 337: UPDATE GL_JE_CATEGORIES_TL

333: RAISE NO_DATA_FOUND;
334: end if;
335:
336: -- update previously existing columns
337: UPDATE GL_JE_CATEGORIES_TL
338: SET
339: consolidation_flag = UPPER(x_consolidation_flag)
340: WHERE
341: je_category_name = X_je_category_name;

Line 344: INSERT INTO GL_JE_CATEGORIES_TL(

340: WHERE
341: je_category_name = X_je_category_name;
342:
343: -- insert new columns
344: INSERT INTO GL_JE_CATEGORIES_TL(
345: je_category_name,
346: language,
347: source_lang,
348: last_update_date,

Line 386: from GL_JE_CATEGORIES_TL B

382: FROM FND_LANGUAGES L
383: WHERE L.Installed_Flag in ('I', 'B')
384: AND not exists
385: ( select NULL
386: from GL_JE_CATEGORIES_TL B
387: where B.Je_Category_Name = X_Je_Category_Name
388: and B.Language = L.Language_Code);
389: OPEN C;
390: FETCH C INTO X_Rowid, X_Language, X_Source_lang;

Line 397: GL_JE_CATEGORIES_PKG.insert_other_cat( x_je_category_name,

393: RAISE NO_DATA_FOUND;
394: end if;
395: CLOSE C;
396:
397: GL_JE_CATEGORIES_PKG.insert_other_cat( x_je_category_name,
398: x_user_je_category_name,
399: x_description,
400: x_last_updated_by,
401: x_created_by,

Line 421: SELECT * FROM GL_JE_CATEGORIES_TL

417: X_Attribute5 VARCHAR2,
418: X_Context VARCHAR2,
419: X_Consolidation_Flag VARCHAR2) IS
420: CURSOR C IS
421: SELECT * FROM GL_JE_CATEGORIES_TL
422: WHERE je_category_name = X_je_category_name
423: and Language = userenv('LANG')
424: FOR UPDATE OF JE_CATEGORY_NAME NOWAIT;
425: Recinfo C%ROWTYPE;

Line 506: UPDATE GL_JE_CATEGORIES_TL

502: X_Context VARCHAR2,
503: X_Consolidation_Flag VARCHAR2) IS
504: BEGIN
505: -- update non-translatable columns
506: UPDATE GL_JE_CATEGORIES_TL
507: SET
508: je_category_name = x_je_category_name,
509: je_category_key = x_je_category_key,
510: last_update_date = x_last_update_date,

Line 529: UPDATE GL_JE_CATEGORIES_TL

525: RAISE NO_DATA_FOUND;
526: end if;
527:
528: -- update the translatable columns
529: UPDATE GL_JE_CATEGORIES_TL
530: SET
531: user_je_category_name = x_user_je_category_name,
532: description = x_description,
533: source_lang = userenv('LANG')

Line 576: SELECT gl_je_categories_s.NEXTVAL

572:
573: begin
574: /* When je_category_name is null, we assume it to be a new row. */
575: if (X_je_category_name is null) then
576: SELECT gl_je_categories_s.NEXTVAL
577: INTO X_je_category_name
578: FROM dual;
579: raise no_data_found;
580: end if;

Line 586: from gl_je_categories

582: /* Check if the row exists in the database. If it does, retrieves
583: the creation date for update_row. */
584: select creation_date
585: into v_creation_date
586: from gl_je_categories
587: where je_category_name = X_je_category_name;
588:
589: /* Update only if force_edits is 'Y' or if user_id = 1 */
590: if ( user_id = 1 or X_Force_Edits = 'Y' ) then

Line 591: -- update row in GL_JE_CATEGORIES_TL if present

587: where je_category_name = X_je_category_name;
588:
589: /* Update only if force_edits is 'Y' or if user_id = 1 */
590: if ( user_id = 1 or X_Force_Edits = 'Y' ) then
591: -- update row in GL_JE_CATEGORIES_TL if present
592: GL_JE_CATEGORIES_PKG.Update_Row(
593: X_Rowid => v_rowid,
594: X_je_category_name => X_Je_Category_Name,
595: X_last_update_date => sysdate,

Line 592: GL_JE_CATEGORIES_PKG.Update_Row(

588:
589: /* Update only if force_edits is 'Y' or if user_id = 1 */
590: if ( user_id = 1 or X_Force_Edits = 'Y' ) then
591: -- update row in GL_JE_CATEGORIES_TL if present
592: GL_JE_CATEGORIES_PKG.Update_Row(
593: X_Rowid => v_rowid,
594: X_je_category_name => X_Je_Category_Name,
595: X_last_update_date => sysdate,
596: X_last_updated_by => user_id,

Line 614: GL_JE_CATEGORIES_PKG.update_fnd_cat( x_je_category_name,

610:
611: -- update FND_DOC_SEQUENCE_CATEGORIES if change is made in
612: -- the base language
613: if ( userenv('LANG') = FND_GLOBAL.BASE_LANGUAGE ) then
614: GL_JE_CATEGORIES_PKG.update_fnd_cat( x_je_category_name,
615: x_user_je_category_name,
616: x_description,
617: user_id );
618: end if;

Line 622: GL_JE_CATEGORIES_PKG.Insert_Row(

618: end if;
619: end if;
620: exception
621: when NO_DATA_FOUND then
622: GL_JE_CATEGORIES_PKG.Insert_Row(
623: X_Rowid => v_rowid,
624: X_je_category_name => X_Je_Category_Name,
625: X_language => v_language,
626: X_source_lang => v_source_lang,

Line 661: UPDATE GL_JE_CATEGORIES_TL

657: end if;
658:
659: /* Update only if force_edits is 'Y' or if user_id = 1 */
660: if ( user_id = 1 or X_Force_Edits = 'Y' ) then
661: UPDATE GL_JE_CATEGORIES_TL
662: SET
663: user_je_category_name = x_user_je_category_name,
664: description = x_description,
665: last_update_date = sysdate,

Line 675: GL_JE_CATEGORIES_PKG.update_fnd_cat( x_je_category_name,

671:
672: -- update FND_DOC_SEQUENCE_CATEGORIES if change is made in
673: -- the base language
674: if ( userenv('LANG') = FND_GLOBAL.BASE_LANGUAGE ) then
675: GL_JE_CATEGORIES_PKG.update_fnd_cat( x_je_category_name,
676: x_user_je_category_name,
677: x_description,
678: user_id );
679: end if;

Line 693: update GL_JE_CATEGORIES_TL T

689: procedure ADD_LANGUAGE
690: is
691: begin
692:
693: update GL_JE_CATEGORIES_TL T
694: set ( user_je_category_name,
695: DESCRIPTION )
696: = ( select
697: B.user_je_category_name,

Line 699: from gl_je_categories_tl B

695: DESCRIPTION )
696: = ( select
697: B.user_je_category_name,
698: B.DESCRIPTION
699: from gl_je_categories_tl B
700: where B.je_category_name = T.je_category_name
701: and B.LANGUAGE = T.SOURCE_LANG )
702: where ( T.je_category_name,
703: T.LANGUAGE ) in

Line 707: from gl_je_categories_tl SUBB,

703: T.LANGUAGE ) in
704: ( select
705: SUBT.je_category_name,
706: SUBT.LANGUAGE
707: from gl_je_categories_tl SUBB,
708: gl_je_categories_tl SUBT
709: where SUBB.je_category_name = SUBT.je_category_name
710: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
711: and (SUBB.USER_JE_CATEGORY_NAME <> SUBT.USER_JE_CATEGORY_NAME

Line 708: gl_je_categories_tl SUBT

704: ( select
705: SUBT.je_category_name,
706: SUBT.LANGUAGE
707: from gl_je_categories_tl SUBB,
708: gl_je_categories_tl SUBT
709: where SUBB.je_category_name = SUBT.je_category_name
710: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
711: and (SUBB.USER_JE_CATEGORY_NAME <> SUBT.USER_JE_CATEGORY_NAME
712: or SUBB.DESCRIPTION <> SUBT.DESCRIPTION

Line 717: insert into gl_je_categories_tl (

713: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
714: or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null))
715: );
716:
717: insert into gl_je_categories_tl (
718: je_category_name,
719: LAST_UPDATE_DATE,
720: LAST_UPDATED_BY,
721: CREATION_DATE,

Line 756: from gl_je_categories_tl B, FND_LANGUAGES L

752: B.attribute4,
753: B.attribute5,
754: B.context,
755: B.consolidation_flag
756: from gl_je_categories_tl B, FND_LANGUAGES L
757: where L.INSTALLED_FLAG in ('I', 'B')
758: and B.LANGUAGE = userenv('LANG')
759: and not exists
760: (select NULL

Line 761: from gl_je_categories_tl T

757: where L.INSTALLED_FLAG in ('I', 'B')
758: and B.LANGUAGE = userenv('LANG')
759: and not exists
760: (select NULL
761: from gl_je_categories_tl T
762: where T.je_category_name = B.je_category_name
763: and T.LANGUAGE = L.LANGUAGE_CODE);
764:
765: end ADD_LANGUAGE;

Line 769: END GL_JE_CATEGORIES_PKG;

765: end ADD_LANGUAGE;
766:
767: -- ************************************************************************
768:
769: END GL_JE_CATEGORIES_PKG;