DBA Data[Home] [Help]

APPS.HR_NAVIGATION_UNITS_PKG dependencies on HR_NAVIGATION_UNITS

Line 1: PACKAGE BODY HR_NAVIGATION_UNITS_PKG as

1: PACKAGE BODY HR_NAVIGATION_UNITS_PKG as
2: /* $Header: pewfl01t.pkb 120.0 2005/05/31 23:07:49 appldev noship $ */
3: procedure OWNER_TO_WHO (
4: X_OWNER in VARCHAR2,
5: X_CREATION_DATE out nocopy DATE,

Line 34: CURSOR C IS SELECT rowid FROM HR_NAVIGATION_UNITS

30: X_Max_Number_Of_Nav_Buttons NUMBER,
31: X_Block_Name VARCHAR2,
32: X_LANGUAGE_CODE in varchar2 default hr_api.userenv_lang
33: ) IS
34: CURSOR C IS SELECT rowid FROM HR_NAVIGATION_UNITS
35:
36: WHERE nav_unit_id = X_Nav_Unit_Id;
37:
38: CURSOR C2 IS SELECT hr_navigation_units_s.nextval FROM sys.dual;

Line 38: CURSOR C2 IS SELECT hr_navigation_units_s.nextval FROM sys.dual;

34: CURSOR C IS SELECT rowid FROM HR_NAVIGATION_UNITS
35:
36: WHERE nav_unit_id = X_Nav_Unit_Id;
37:
38: CURSOR C2 IS SELECT hr_navigation_units_s.nextval FROM sys.dual;
39: l_language_code varchar2(3);
40: BEGIN
41:
42: -- Validate the language parameter. l_language_code should be passed

Line 54: INSERT INTO HR_NAVIGATION_UNITS(

50: OPEN C2;
51: FETCH C2 INTO X_Nav_Unit_Id;
52: CLOSE C2;
53: end if;
54: INSERT INTO HR_NAVIGATION_UNITS(
55: nav_unit_id,
56: default_workflow_id,
57: application_abbrev,
58: default_label,

Line 72: INSERT INTO HR_NAVIGATION_UNITS_TL(

68: X_Max_Number_Of_Nav_Buttons,
69: X_Block_Name
70: );
71:
72: INSERT INTO HR_NAVIGATION_UNITS_TL(
73: nav_unit_id,
74: default_label,
75: language,
76: source_lang)

Line 86: from HR_NAVIGATION_UNITS_TL T

82: from FND_LANGUAGES L
83: where L.INSTALLED_FLAG in ('I', 'B')
84: and not exists
85: (select NULL
86: from HR_NAVIGATION_UNITS_TL T
87: where T.NAV_UNIT_ID = X_NAV_UNIT_ID
88: and T.LANGUAGE = L.LANGUAGE_CODE);
89:
90: OPEN C;

Line 113: FROM HR_NAVIGATION_UNITS

109: X_Block_Name VARCHAR2
110: ) IS
111: CURSOR C IS
112: SELECT *
113: FROM HR_NAVIGATION_UNITS
114: WHERE rowid = X_Rowid
115: FOR UPDATE of Nav_Unit_Id NOWAIT;
116: Recinfo C%ROWTYPE;
117:

Line 118: cursor CSR_HR_NAVIGATION_UNITS_TL is

114: WHERE rowid = X_Rowid
115: FOR UPDATE of Nav_Unit_Id NOWAIT;
116: Recinfo C%ROWTYPE;
117:
118: cursor CSR_HR_NAVIGATION_UNITS_TL is
119: select DEFAULT_LABEL,
120: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
121: from HR_NAVIGATION_UNITS_TL TL
122: where nav_unit_id = x_nav_unit_id

Line 121: from HR_NAVIGATION_UNITS_TL TL

117:
118: cursor CSR_HR_NAVIGATION_UNITS_TL is
119: select DEFAULT_LABEL,
120: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
121: from HR_NAVIGATION_UNITS_TL TL
122: where nav_unit_id = x_nav_unit_id
123: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
124: for update of nav_unit_id nowait;
125:

Line 168: for tlinfo in CSR_HR_NAVIGATION_UNITS_TL loop

164: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
165: APP_EXCEPTION.RAISE_EXCEPTION;
166: end if;
167:
168: for tlinfo in CSR_HR_NAVIGATION_UNITS_TL loop
169: if (tlinfo.BASELANG = 'Y') then
170: if ( ((tlinfo.DEFAULT_LABEL = X_DEFAULT_LABEL)
171: OR ((tlinfo.DEFAULT_LABEL is null) AND (X_DEFAULT_LABEL is null)))
172: ) then

Line 206: UPDATE HR_NAVIGATION_UNITS

202: --
203: l_language_code := x_language_code;
204: hr_api.validate_language_code(p_language_code => l_language_code);
205:
206: UPDATE HR_NAVIGATION_UNITS
207: SET
208: nav_unit_id = X_Nav_Unit_Id,
209: default_workflow_id = X_Default_Workflow_Id,
210: application_abbrev = X_Application_Abbrev,

Line 224: update HR_NAVIGATION_UNITS_TL

220: hr_utility.set_message_token('STEP','1');
221: hr_utility.raise_error;
222: end if;
223:
224: update HR_NAVIGATION_UNITS_TL
225: set
226: DEFAULT_LABEL = X_DEFAULT_LABEL,
227: SOURCE_LANG = userenv('LANG')
228: where NAV_UNIT_ID = X_NAV_UNIT_ID

Line 263: update HR_NAVIGATION_UNITS set

259: l_language_code := x_language_code;
260: hr_api.validate_language_code(p_language_code => l_language_code);
261:
262:
263: update HR_NAVIGATION_UNITS set
264: DEFAULT_WORKFLOW_ID = X_DEFAULT_WORKFLOW_ID,
265: APPLICATION_ABBREV = X_APPLICATION_ABBREV,
266: DEFAULT_LABEL = X_DEFAULT_LABEL,
267: FORM_NAME = X_FORM_NAME,

Line 276: update HR_NAVIGATION_UNITS_TL

272: if (sql%notfound) then
273: raise no_data_found;
274: end if;
275:
276: update HR_NAVIGATION_UNITS_TL
277: set
278: DEFAULT_LABEL = X_DEFAULT_LABEL,
279: SOURCE_LANG = userenv('LANG')
280: where NAV_UNIT_ID = X_NAV_UNIT_ID

Line 291: delete from HR_NAVIGATION_UNITS_TL

287: end UPDATE_ROW;
288:
289: PROCEDURE Delete_Row(x_nav_unit_id varchar2, X_Rowid VARCHAR2) IS
290: BEGIN
291: delete from HR_NAVIGATION_UNITS_TL
292: where NAV_UNIT_ID = X_NAV_UNIT_ID;
293:
294: if (sql%notfound) then
295: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

Line 301: DELETE FROM HR_NAVIGATION_UNITS

297: hr_utility.set_message_token('STEP','1');
298: hr_utility.raise_error;
299: end if;
300:
301: DELETE FROM HR_NAVIGATION_UNITS
302: WHERE rowid = X_Rowid;
303:
304: if (SQL%NOTFOUND) then
305: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');

Line 315: delete from HR_NAVIGATION_UNITS_TL T

311:
312: procedure ADD_LANGUAGE
313: is
314: begin
315: delete from HR_NAVIGATION_UNITS_TL T
316: where not exists
317: (select NULL
318: from HR_NAVIGATION_UNITS B
319: where B.NAV_UNIT_ID = T.NAV_UNIT_ID

Line 318: from HR_NAVIGATION_UNITS B

314: begin
315: delete from HR_NAVIGATION_UNITS_TL T
316: where not exists
317: (select NULL
318: from HR_NAVIGATION_UNITS B
319: where B.NAV_UNIT_ID = T.NAV_UNIT_ID
320: );
321:
322: update HR_NAVIGATION_UNITS_TL T set (

Line 322: update HR_NAVIGATION_UNITS_TL T set (

318: from HR_NAVIGATION_UNITS B
319: where B.NAV_UNIT_ID = T.NAV_UNIT_ID
320: );
321:
322: update HR_NAVIGATION_UNITS_TL T set (
323: DEFAULT_LABEL
324: ) = (select
325: B.DEFAULT_LABEL
326: from HR_NAVIGATION_UNITS_TL B

Line 326: from HR_NAVIGATION_UNITS_TL B

322: update HR_NAVIGATION_UNITS_TL T set (
323: DEFAULT_LABEL
324: ) = (select
325: B.DEFAULT_LABEL
326: from HR_NAVIGATION_UNITS_TL B
327: where B.NAV_UNIT_ID = T.NAV_UNIT_ID
328: and B.LANGUAGE = T.SOURCE_LANG)
329: where (
330: T.NAV_UNIT_ID,

Line 335: from HR_NAVIGATION_UNITS_TL SUBB, HR_NAVIGATION_UNITS_TL SUBT

331: T.LANGUAGE
332: ) in (select
333: SUBT.NAV_UNIT_ID,
334: SUBT.LANGUAGE
335: from HR_NAVIGATION_UNITS_TL SUBB, HR_NAVIGATION_UNITS_TL SUBT
336: where SUBB.NAV_UNIT_ID = SUBT.NAV_UNIT_ID
337: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
338: and (SUBB.DEFAULT_LABEL <> SUBT.DEFAULT_LABEL
339: or (SUBB.DEFAULT_LABEL is null and SUBT.DEFAULT_LABEL is not null)

Line 343: insert into HR_NAVIGATION_UNITS_TL (

339: or (SUBB.DEFAULT_LABEL is null and SUBT.DEFAULT_LABEL is not null)
340: or (SUBB.DEFAULT_LABEL is not null and SUBT.DEFAULT_LABEL is null)
341: ));
342:
343: insert into HR_NAVIGATION_UNITS_TL (
344: NAV_UNIT_ID,
345: DEFAULT_LABEL,
346: LANGUAGE,
347: SOURCE_LANG

Line 353: from HR_NAVIGATION_UNITS_TL B, FND_LANGUAGES L

349: B.NAV_UNIT_ID,
350: B.DEFAULT_LABEL,
351: L.LANGUAGE_CODE,
352: B.SOURCE_LANG
353: from HR_NAVIGATION_UNITS_TL B, FND_LANGUAGES L
354: where L.INSTALLED_FLAG in ('I', 'B')
355: and B.LANGUAGE = userenv('LANG')
356: and not exists
357: (select NULL

Line 358: from HR_NAVIGATION_UNITS_TL T

354: where L.INSTALLED_FLAG in ('I', 'B')
355: and B.LANGUAGE = userenv('LANG')
356: and not exists
357: (select NULL
358: from HR_NAVIGATION_UNITS_TL T
359: where T.NAV_UNIT_ID = B.NAV_UNIT_ID
360: and T.LANGUAGE = L.LANGUAGE_CODE);
361:
362: end ADD_LANGUAGE;

Line 399: from hr_navigation_units

395: begin
396: select NAV_UNIT_ID,DEFAULT_WORKFLOW_ID, APPLICATION_ABBREV, DEFAULT_LABEL,MAX_NUMBER_OF_NAV_BUTTONS
397: into X_NAV_UNIT_ID, Y_DEFAULT_WORKFLOW_ID, Y_APPLICATION_ABBREV,
398: Y_DEFAULT_LABEL,Y_MAX_NUMBER_OF_NAV_BUTTONS
399: from hr_navigation_units
400: where FORM_NAME = X_FORM_NAME
401: and nvl(block_name,hr_api.g_varchar2) = nvl(x_block_name,hr_api.g_varchar2);
402:
403: --

Line 426: select HR_NAVIGATION_UNITS_S.NEXTVAL

422: END IF;
423:
424: exception
425: when no_data_found then
426: select HR_NAVIGATION_UNITS_S.NEXTVAL
427: into X_NAV_UNIT_ID
428: from dual;
429:
430: INSERT_ROW(

Line 459: FROM HR_NAVIGATION_UNITS_TL

455: Y_SOURCE_LANG varchar2(4);
456: --
457: Cursor database_row(p_nav_unit_id number) IS
458: SELECT DEFAULT_LABEL, SOURCE_LANG
459: FROM HR_NAVIGATION_UNITS_TL
460: WHERE userenv('LANG') in (LANGUAGE,SOURCE_LANG)
461: AND nav_unit_id = p_nav_unit_id;
462: --
463: begin

Line 466: from hr_navigation_units

462: --
463: begin
464: select nav_unit_id
465: into x_nav_unit_id
466: from hr_navigation_units
467: where FORM_NAME = X_FORM_NAME
468: and ( (BLOCK_NAME = X_BLOCK_NAME)
469: or (BLOCK_NAME is null and X_BLOCK_NAME is null));
470:

Line 480: update HR_NAVIGATION_UNITS_TL

476: if database_row%found then
477: if X_DEFAULT_LABEL <> Y_DEFAULT_LABEL OR
478: Y_SOURCE_LANG <> userenv('LANG') THEN
479:
480: update HR_NAVIGATION_UNITS_TL
481: set DEFAULT_LABEL = X_DEFAULT_LABEL,
482: SOURCE_LANG = userenv('LANG')
483: where userenv('LANG') in (LANGUAGE,SOURCE_LANG)
484: and nav_unit_id = x_nav_unit_id;

Line 505: END HR_NAVIGATION_UNITS_PKG;

501: --
502: end TRANSLATE_ROW;
503:
504:
505: END HR_NAVIGATION_UNITS_PKG;