DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_FORM_ITEMS_PKG

Source


1 package body HR_FORM_ITEMS_PKG as
2 /* $Header: hrfitlct.pkb 115.2 2002/12/10 11:10:48 hjonnala noship $ */
3 procedure OWNER_TO_WHO (
4   X_OWNER in VARCHAR2,
5   X_CREATION_DATE out nocopy DATE,
6   X_CREATED_BY out nocopy NUMBER,
7   X_LAST_UPDATE_DATE out nocopy DATE,
8   X_LAST_UPDATED_BY out nocopy NUMBER,
9   X_LAST_UPDATE_LOGIN out nocopy NUMBER
10 ) is
11 begin
12   if X_OWNER = 'SEED' then
13     X_CREATED_BY := 1;
14     X_LAST_UPDATED_BY := 1;
15   else
16     X_CREATED_BY := 0;
17     X_LAST_UPDATED_BY := 0;
18   end if;
19   X_CREATION_DATE := sysdate;
20   X_LAST_UPDATE_DATE := sysdate;
21   X_LAST_UPDATE_LOGIN := 0;
22 end OWNER_TO_WHO;
23 procedure INSERT_ROW (
24   X_ROWID in out nocopy VARCHAR2,
25   X_FORM_ITEM_ID in NUMBER,
26   X_OBJECT_VERSION_NUMBER in NUMBER,
27   X_APPLICATION_ID in NUMBER,
28   X_FORM_ID in NUMBER,
29   X_FORM_CANVAS_ID in NUMBER,
30   X_FULL_ITEM_NAME in VARCHAR2,
31   X_ITEM_TYPE in VARCHAR2,
32   X_FORM_TAB_PAGE_ID in NUMBER,
33   X_RADIO_BUTTON_NAME in VARCHAR2,
34   X_REQUIRED_OVERRIDE in NUMBER,
35   X_FORM_TAB_PAGE_ID_OVERRIDE in NUMBER,
36   X_VISIBLE_OVERRIDE in NUMBER,
37   X_USER_ITEM_NAME in VARCHAR2,
38   X_DESCRIPTION in VARCHAR2,
39   X_CREATION_DATE in DATE,
40   X_CREATED_BY in NUMBER,
41   X_LAST_UPDATE_DATE in DATE,
42   X_LAST_UPDATED_BY in NUMBER,
43   X_LAST_UPDATE_LOGIN in NUMBER
44 ) is
45   cursor C is select ROWID from HR_FORM_ITEMS_B
46     where FORM_ITEM_ID = X_FORM_ITEM_ID
47     ;
48 begin
49   insert into HR_FORM_ITEMS_B (
50     FORM_ITEM_ID,
51     OBJECT_VERSION_NUMBER,
52     APPLICATION_ID,
53     FORM_ID,
54     FORM_CANVAS_ID,
55     FULL_ITEM_NAME,
56     ITEM_TYPE,
57     FORM_TAB_PAGE_ID,
58     RADIO_BUTTON_NAME,
59     REQUIRED_OVERRIDE,
60     FORM_TAB_PAGE_ID_OVERRIDE,
61     VISIBLE_OVERRIDE,
62     CREATION_DATE,
63     CREATED_BY,
64     LAST_UPDATE_DATE,
65     LAST_UPDATED_BY,
66     LAST_UPDATE_LOGIN
67   ) values (
68     X_FORM_ITEM_ID,
69     X_OBJECT_VERSION_NUMBER,
70     X_APPLICATION_ID,
71     X_FORM_ID,
72     X_FORM_CANVAS_ID,
73     X_FULL_ITEM_NAME,
74     X_ITEM_TYPE,
75     X_FORM_TAB_PAGE_ID,
76     X_RADIO_BUTTON_NAME,
77     X_REQUIRED_OVERRIDE,
78     X_FORM_TAB_PAGE_ID_OVERRIDE,
79     X_VISIBLE_OVERRIDE,
80     X_CREATION_DATE,
81     X_CREATED_BY,
82     X_LAST_UPDATE_DATE,
83     X_LAST_UPDATED_BY,
84     X_LAST_UPDATE_LOGIN
85   );
86 
87   insert into HR_FORM_ITEMS_TL (
88     LAST_UPDATE_LOGIN,
89     CREATED_BY,
90     CREATION_DATE,
91     LAST_UPDATE_DATE,
92     LAST_UPDATED_BY,
93     FORM_ITEM_ID,
94     USER_ITEM_NAME,
95     DESCRIPTION,
96     LANGUAGE,
97     SOURCE_LANG
98   ) select
99     X_LAST_UPDATE_LOGIN,
100     X_CREATED_BY,
101     X_CREATION_DATE,
102     X_LAST_UPDATE_DATE,
103     X_LAST_UPDATED_BY,
104     X_FORM_ITEM_ID,
105     X_USER_ITEM_NAME,
106     X_DESCRIPTION,
107     L.LANGUAGE_CODE,
108     userenv('LANG')
109   from FND_LANGUAGES L
110   where L.INSTALLED_FLAG in ('I', 'B')
111   and not exists
112     (select NULL
113     from HR_FORM_ITEMS_TL T
114     where T.FORM_ITEM_ID = X_FORM_ITEM_ID
115     and T.LANGUAGE = L.LANGUAGE_CODE);
116 
117   open c;
118   fetch c into X_ROWID;
119   if (c%notfound) then
120     close c;
121     raise no_data_found;
122   end if;
123   close c;
124 
125 end INSERT_ROW;
126 
127 procedure LOCK_ROW (
128   X_FORM_ITEM_ID in NUMBER,
129   X_OBJECT_VERSION_NUMBER in NUMBER,
130   X_APPLICATION_ID in NUMBER,
131   X_FORM_ID in NUMBER,
132   X_FORM_CANVAS_ID in NUMBER,
133   X_FULL_ITEM_NAME in VARCHAR2,
134   X_ITEM_TYPE in VARCHAR2,
135   X_FORM_TAB_PAGE_ID in NUMBER,
136   X_RADIO_BUTTON_NAME in VARCHAR2,
137   X_REQUIRED_OVERRIDE in NUMBER,
138   X_FORM_TAB_PAGE_ID_OVERRIDE in NUMBER,
139   X_VISIBLE_OVERRIDE in NUMBER,
140   X_USER_ITEM_NAME in VARCHAR2,
141   X_DESCRIPTION in VARCHAR2
142 ) is
143   cursor c is select
144       OBJECT_VERSION_NUMBER,
145       APPLICATION_ID,
146       FORM_ID,
147       FORM_CANVAS_ID,
148       FULL_ITEM_NAME,
149       ITEM_TYPE,
150       FORM_TAB_PAGE_ID,
151       RADIO_BUTTON_NAME,
152       REQUIRED_OVERRIDE,
153       FORM_TAB_PAGE_ID_OVERRIDE,
154       VISIBLE_OVERRIDE
155     from HR_FORM_ITEMS_B
156     where FORM_ITEM_ID = X_FORM_ITEM_ID
157     for update of FORM_ITEM_ID nowait;
158   recinfo c%rowtype;
159 
160   cursor c1 is select
161       USER_ITEM_NAME,
162       DESCRIPTION,
163       decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
164     from HR_FORM_ITEMS_TL
165     where FORM_ITEM_ID = X_FORM_ITEM_ID
166     and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
167     for update of FORM_ITEM_ID nowait;
168 begin
169   open c;
170   fetch c into recinfo;
171   if (c%notfound) then
172     close c;
173     fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
174     app_exception.raise_exception;
175   end if;
176   close c;
177   if (    (recinfo.OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER)
178       AND (recinfo.APPLICATION_ID = X_APPLICATION_ID)
179       AND (recinfo.FORM_ID = X_FORM_ID)
180       AND (recinfo.FORM_CANVAS_ID = X_FORM_CANVAS_ID)
181       AND (recinfo.FULL_ITEM_NAME = X_FULL_ITEM_NAME)
182       AND (recinfo.ITEM_TYPE = X_ITEM_TYPE)
183       AND ((recinfo.FORM_TAB_PAGE_ID = X_FORM_TAB_PAGE_ID)
184            OR ((recinfo.FORM_TAB_PAGE_ID is null) AND (X_FORM_TAB_PAGE_ID is null)))
185       AND ((recinfo.RADIO_BUTTON_NAME = X_RADIO_BUTTON_NAME)
186            OR ((recinfo.RADIO_BUTTON_NAME is null) AND (X_RADIO_BUTTON_NAME is null)))
187       AND ((recinfo.REQUIRED_OVERRIDE = X_REQUIRED_OVERRIDE)
188            OR ((recinfo.REQUIRED_OVERRIDE is null) AND (X_REQUIRED_OVERRIDE is null)))
189       AND ((recinfo.FORM_TAB_PAGE_ID_OVERRIDE = X_FORM_TAB_PAGE_ID_OVERRIDE)
190            OR ((recinfo.FORM_TAB_PAGE_ID_OVERRIDE is null) AND (X_FORM_TAB_PAGE_ID_OVERRIDE is null)))
191       AND ((recinfo.VISIBLE_OVERRIDE = X_VISIBLE_OVERRIDE)
192            OR ((recinfo.VISIBLE_OVERRIDE is null) AND (X_VISIBLE_OVERRIDE is null)))
193   ) then
194     null;
195   else
196     fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
197     app_exception.raise_exception;
198   end if;
199 
200   for tlinfo in c1 loop
201     if (tlinfo.BASELANG = 'Y') then
202       if (    (tlinfo.USER_ITEM_NAME = X_USER_ITEM_NAME)
203           AND ((tlinfo.DESCRIPTION = X_DESCRIPTION)
204                OR ((tlinfo.DESCRIPTION is null) AND (X_DESCRIPTION is null)))
205       ) then
206         null;
207       else
208         fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
209         app_exception.raise_exception;
210       end if;
211     end if;
212   end loop;
213   return;
214 end LOCK_ROW;
215 
216 procedure UPDATE_ROW (
217   X_FORM_ITEM_ID in NUMBER,
218   X_OBJECT_VERSION_NUMBER in NUMBER,
219   X_APPLICATION_ID in NUMBER,
220   X_FORM_ID in NUMBER,
221   X_FORM_CANVAS_ID in NUMBER,
222   X_FULL_ITEM_NAME in VARCHAR2,
223   X_ITEM_TYPE in VARCHAR2,
224   X_FORM_TAB_PAGE_ID in NUMBER,
225   X_RADIO_BUTTON_NAME in VARCHAR2,
226   X_REQUIRED_OVERRIDE in NUMBER,
227   X_FORM_TAB_PAGE_ID_OVERRIDE in NUMBER,
228   X_VISIBLE_OVERRIDE in NUMBER,
229   X_USER_ITEM_NAME in VARCHAR2,
230   X_DESCRIPTION in VARCHAR2,
231   X_LAST_UPDATE_DATE in DATE,
232   X_LAST_UPDATED_BY in NUMBER,
233   X_LAST_UPDATE_LOGIN in NUMBER
234 ) is
235 begin
236   update HR_FORM_ITEMS_B set
237     OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
238     APPLICATION_ID = X_APPLICATION_ID,
239     FORM_ID = X_FORM_ID,
240     FORM_CANVAS_ID = X_FORM_CANVAS_ID,
241     FULL_ITEM_NAME = X_FULL_ITEM_NAME,
242     ITEM_TYPE = X_ITEM_TYPE,
243     FORM_TAB_PAGE_ID = X_FORM_TAB_PAGE_ID,
244     RADIO_BUTTON_NAME = X_RADIO_BUTTON_NAME,
245     REQUIRED_OVERRIDE = X_REQUIRED_OVERRIDE,
246     FORM_TAB_PAGE_ID_OVERRIDE = X_FORM_TAB_PAGE_ID_OVERRIDE,
247     VISIBLE_OVERRIDE = X_VISIBLE_OVERRIDE,
248     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
249     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
250     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
251   where FORM_ITEM_ID = X_FORM_ITEM_ID;
252 
253   if (sql%notfound) then
254     raise no_data_found;
255   end if;
256 
257   update HR_FORM_ITEMS_TL set
258     USER_ITEM_NAME = X_USER_ITEM_NAME,
259     DESCRIPTION = X_DESCRIPTION,
260     LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
261     LAST_UPDATED_BY = X_LAST_UPDATED_BY,
262     LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
263     SOURCE_LANG = userenv('LANG')
264   where FORM_ITEM_ID = X_FORM_ITEM_ID
265   and userenv('LANG') in (LANGUAGE, SOURCE_LANG);
266 
267   if (sql%notfound) then
268     raise no_data_found;
269   end if;
270 end UPDATE_ROW;
271 
272 procedure DELETE_ROW (
273   X_FORM_ITEM_ID in NUMBER
274 ) is
275 begin
276   delete from HR_FORM_ITEMS_TL
277   where FORM_ITEM_ID = X_FORM_ITEM_ID;
278 
279   if (sql%notfound) then
280     raise no_data_found;
281   end if;
282 
283   delete from HR_FORM_ITEMS_B
284   where FORM_ITEM_ID = X_FORM_ITEM_ID;
285 
286   if (sql%notfound) then
287     raise no_data_found;
288   end if;
289 end DELETE_ROW;
290 
291 procedure ADD_LANGUAGE
292 is
293 begin
294   delete from HR_FORM_ITEMS_TL T
295   where not exists
296     (select NULL
297     from HR_FORM_ITEMS_B B
298     where B.FORM_ITEM_ID = T.FORM_ITEM_ID
299     );
300 
301   update HR_FORM_ITEMS_TL T set (
302       USER_ITEM_NAME,
303       DESCRIPTION
304     ) = (select
305       B.USER_ITEM_NAME,
306       B.DESCRIPTION
307     from HR_FORM_ITEMS_TL B
308     where B.FORM_ITEM_ID = T.FORM_ITEM_ID
309     and B.LANGUAGE = T.SOURCE_LANG)
310   where (
311       T.FORM_ITEM_ID,
312       T.LANGUAGE
313   ) in (select
314       SUBT.FORM_ITEM_ID,
315       SUBT.LANGUAGE
316     from HR_FORM_ITEMS_TL SUBB, HR_FORM_ITEMS_TL SUBT
317     where SUBB.FORM_ITEM_ID = SUBT.FORM_ITEM_ID
318     and SUBB.LANGUAGE = SUBT.SOURCE_LANG
319     and (SUBB.USER_ITEM_NAME <> SUBT.USER_ITEM_NAME
320       or SUBB.DESCRIPTION <> SUBT.DESCRIPTION
321       or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)
322       or (SUBB.DESCRIPTION is not null and SUBT.DESCRIPTION is null)
323   ));
324 
325   insert into HR_FORM_ITEMS_TL (
326     LAST_UPDATE_LOGIN,
327     CREATED_BY,
328     CREATION_DATE,
329     LAST_UPDATE_DATE,
330     LAST_UPDATED_BY,
331     FORM_ITEM_ID,
332     USER_ITEM_NAME,
333     DESCRIPTION,
334     LANGUAGE,
335     SOURCE_LANG
336   ) select
337     B.LAST_UPDATE_LOGIN,
338     B.CREATED_BY,
339     B.CREATION_DATE,
340     B.LAST_UPDATE_DATE,
341     B.LAST_UPDATED_BY,
342     B.FORM_ITEM_ID,
343     B.USER_ITEM_NAME,
344     B.DESCRIPTION,
345     L.LANGUAGE_CODE,
346     B.SOURCE_LANG
347   from HR_FORM_ITEMS_TL B, FND_LANGUAGES L
348   where L.INSTALLED_FLAG in ('I', 'B')
349   and B.LANGUAGE = userenv('LANG')
350   and not exists
351     (select NULL
352     from HR_FORM_ITEMS_TL T
353     where T.FORM_ITEM_ID = B.FORM_ITEM_ID
354     and T.LANGUAGE = L.LANGUAGE_CODE);
355 end ADD_LANGUAGE;
356 procedure TRANSLATE_ROW (
357   X_APPLICATION_SHORT_NAME in VARCHAR2,
358   X_FORM_NAME in VARCHAR2,
359   X_FULL_ITEM_NAME in VARCHAR2,
360   X_RADIO_BUTTON_NAME in VARCHAR2,
361   X_OWNER in VARCHAR2,
362   X_USER_ITEM_NAME in VARCHAR2,
363   X_DESCRIPTION in VARCHAR2) is
364   X_ROWID ROWID;
365   X_CREATION_DATE DATE;
366   X_CREATED_BY NUMBER;
367   X_LAST_UPDATE_DATE DATE;
368   X_LAST_UPDATED_BY NUMBER;
369   X_LAST_UPDATE_LOGIN NUMBER;
370   X_FORM_ID NUMBER;
371   X_APPLICATION_ID NUMBER;
372   X_FORM_WINDOW_ID NUMBER;
373   X_FORM_CANVAS_ID NUMBER;
374   X_FORM_TAB_PAGE_ID NUMBER;
375   X_FORM_TAB_PAGE_ID_OVERRIDE NUMBER;
376   X_FORM_ITEM_ID NUMBER;
377 begin
378 
379   OWNER_TO_WHO (
380     X_OWNER,
381     X_CREATION_DATE,
382     X_CREATED_BY,
383     X_LAST_UPDATE_DATE,
384     X_LAST_UPDATED_BY,
385     X_LAST_UPDATE_LOGIN
386   );
387 
388  select application_id
389  into x_application_id
390  from fnd_application
391  where application_short_name = x_application_short_name;
392 
393  select form_id
394  into x_form_id
395  from fnd_form
396  where form_name = x_form_name
397  and application_id = x_application_id;
398 
399  select form_item_id
400  into x_form_item_id
401  from hr_form_items_b
402  where full_item_name =  x_full_item_name
403  and application_id = x_application_id
404  and form_id = x_form_id
405  and (  radio_button_name = x_radio_button_name
406      or (radio_button_name is null and x_radio_button_name is null) );
407 
408  update HR_FORM_ITEMS_TL set
409   DESCRIPTION = X_DESCRIPTION,
410   USER_ITEM_NAME = X_USER_ITEM_NAME,
411   LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
412   LAST_UPDATED_BY = X_LAST_UPDATED_BY,
413   LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
414   SOURCE_LANG = userenv('LANG')
415  where userenv('LANG') in (LANGUAGE,SOURCE_LANG)
416  and form_item_id = x_form_item_id;
417 
418 end TRANSLATE_ROW;
419 
420 procedure LOAD_ROW (
421   X_APPLICATION_SHORT_NAME in VARCHAR2,
422   X_FORM_NAME in VARCHAR2,
423   X_FULL_ITEM_NAME in VARCHAR2,
424   X_RADIO_BUTTON_NAME in VARCHAR2,
425   X_OWNER in VARCHAR2,
426   X_CANVAS_NAME in VARCHAR2,
427   X_WINDOW_NAME in VARCHAR2,
428   X_TAB_PAGE_NAME_1 in VARCHAR2,
429   X_TAB_PAGE_NAME_2 in VARCHAR2,
430   X_OBJECT_VERSION_NUMBER in VARCHAR2,
431   X_ITEM_TYPE in VARCHAR2,
432   X_REQUIRED_OVERRIDE in VARCHAR2,
433   X_VISIBLE_OVERRIDE in VARCHAR2,
434   X_USER_ITEM_NAME in VARCHAR2,
435   X_DESCRIPTION in VARCHAR2) is
436   X_ROWID ROWID;
437   X_CREATION_DATE DATE;
438   X_CREATED_BY NUMBER;
439   X_LAST_UPDATE_DATE DATE;
440   X_LAST_UPDATED_BY NUMBER;
441   X_LAST_UPDATE_LOGIN NUMBER;
442   X_FORM_ID NUMBER;
443   X_APPLICATION_ID NUMBER;
444   X_FORM_WINDOW_ID NUMBER;
445   X_FORM_CANVAS_ID NUMBER;
446   X_FORM_TAB_PAGE_ID NUMBER;
447   X_FORM_TAB_PAGE_ID_OVERRIDE NUMBER;
448   X_FORM_ITEM_ID NUMBER;
449 begin
450 
451   OWNER_TO_WHO (
452     X_OWNER,
453     X_CREATION_DATE,
454     X_CREATED_BY,
455     X_LAST_UPDATE_DATE,
456     X_LAST_UPDATED_BY,
457     X_LAST_UPDATE_LOGIN
458   );
459 
460  select application_id
461  into x_application_id
462  from fnd_application
463  where application_short_name = x_application_short_name;
464 
465  select form_id
466  into x_form_id
467  from fnd_form
468  where form_name = x_form_name
469  and application_id = x_application_id;
470 
471  select hfc.form_canvas_id
472  into x_form_canvas_id
473  from hr_form_canvases_b hfc
474       ,hr_form_windows_b hfw
475  where hfc.canvas_name = x_canvas_name
476  and hfw.application_id = x_application_id
477  and hfw.form_id = x_form_id
478  and hfw.window_name = x_window_name;
479 
480  IF ltrim(rtrim(x_tab_page_name_1)) IS NOT NULL THEN
481 
482  select form_tab_page_id
483  into x_form_tab_page_id
484  from hr_form_tab_pages_b
485  where form_canvas_id = x_form_canvas_id
486  and tab_page_name = x_tab_page_name_1;
487 
488  ELSE
489  x_form_tab_page_id := null;
490 
491  END IF;
492 
493 
494  IF ltrim(rtrim(x_tab_page_name_2)) IS NOT NULL THEN
495 
496  select form_tab_page_id
497  into x_form_tab_page_id_override
498  from hr_form_tab_pages_b
499  where form_canvas_id = x_form_canvas_id
500  and tab_page_name = x_tab_page_name_2;
501 
502  ELSE
503  x_form_tab_page_id_override := null;
504 
505  END IF;
506 
507  begin
508    select form_item_id
509    into x_form_item_id
510    from hr_form_items_b
511    where full_item_name =  x_full_item_name
512    and application_id = x_application_id
513    and form_id = x_form_id
514    and (  radio_button_name = x_radio_button_name
515        or (radio_button_name is null and x_radio_button_name is null) );
516  exception
517    when no_data_found then
518      select hr_form_items_b_s.nextval
519      into x_form_item_id
520      from dual;
521  end;
522  begin
523    UPDATE_ROW (
524      X_FORM_ITEM_ID,
525      to_number(X_OBJECT_VERSION_NUMBER),
526      X_APPLICATION_ID,
527      X_FORM_ID,
528      X_FORM_CANVAS_ID,
529      X_FULL_ITEM_NAME,
530      X_ITEM_TYPE,
531      X_FORM_TAB_PAGE_ID,
532      X_RADIO_BUTTON_NAME,
533      to_number(X_REQUIRED_OVERRIDE),
534      X_FORM_TAB_PAGE_ID_OVERRIDE,
535      to_number(X_VISIBLE_OVERRIDE),
536      X_USER_ITEM_NAME,
537      X_DESCRIPTION,
538      X_LAST_UPDATE_DATE,
539      X_LAST_UPDATED_BY,
540      X_LAST_UPDATE_LOGIN
541    );
542  exception
543     when no_data_found then
544       INSERT_ROW (
545         X_ROWID,
546         X_FORM_ITEM_ID,
547         to_number(X_OBJECT_VERSION_NUMBER),
548         X_APPLICATION_ID,
549         X_FORM_ID,
550         X_FORM_CANVAS_ID,
551         X_FULL_ITEM_NAME,
552         X_ITEM_TYPE,
553         X_FORM_TAB_PAGE_ID,
554         X_RADIO_BUTTON_NAME,
555         to_number(X_REQUIRED_OVERRIDE),
556         X_FORM_TAB_PAGE_ID_OVERRIDE,
557         to_number(X_VISIBLE_OVERRIDE),
558         X_USER_ITEM_NAME,
559         X_DESCRIPTION,
560         X_CREATION_DATE,
561         X_CREATED_BY,
562         X_LAST_UPDATE_DATE,
563         X_LAST_UPDATED_BY,
564         X_LAST_UPDATE_LOGIN);
565  end;
566 end LOAD_ROW;
567 end HR_FORM_ITEMS_PKG;