1: package body HR_TEMPLATE_DATA_GROUPS_PKG as
2: /* $Header: hrtdglct.pkb 115.2 2002/12/11 07:11:58 raranjan noship $ */
3: procedure OWNER_TO_WHO (
4: X_OWNER in VARCHAR2,
5: X_CREATION_DATE out nocopy DATE,
31: X_LAST_UPDATE_DATE in DATE,
32: X_LAST_UPDATED_BY in NUMBER,
33: X_LAST_UPDATE_LOGIN in NUMBER
34: ) is
35: cursor C is select ROWID from HR_TEMPLATE_DATA_GROUPS
36: where TEMPLATE_DATA_GROUP_ID = X_TEMPLATE_DATA_GROUP_ID
37: ;
38: begin
39: insert into HR_TEMPLATE_DATA_GROUPS (
35: cursor C is select ROWID from HR_TEMPLATE_DATA_GROUPS
36: where TEMPLATE_DATA_GROUP_ID = X_TEMPLATE_DATA_GROUP_ID
37: ;
38: begin
39: insert into HR_TEMPLATE_DATA_GROUPS (
40: TEMPLATE_DATA_GROUP_ID,
41: OBJECT_VERSION_NUMBER,
42: FORM_TEMPLATE_ID,
43: FORM_DATA_GROUP_ID,
76: cursor c1 is select
77: OBJECT_VERSION_NUMBER,
78: FORM_TEMPLATE_ID,
79: FORM_DATA_GROUP_ID
80: from HR_TEMPLATE_DATA_GROUPS
81: where TEMPLATE_DATA_GROUP_ID = X_TEMPLATE_DATA_GROUP_ID
82: for update of TEMPLATE_DATA_GROUP_ID nowait;
83: begin
84: for tlinfo in c1 loop
104: X_LAST_UPDATED_BY in NUMBER,
105: X_LAST_UPDATE_LOGIN in NUMBER
106: ) is
107: begin
108: update HR_TEMPLATE_DATA_GROUPS set
109: OBJECT_VERSION_NUMBER = X_OBJECT_VERSION_NUMBER,
110: FORM_TEMPLATE_ID = X_FORM_TEMPLATE_ID,
111: FORM_DATA_GROUP_ID = X_FORM_DATA_GROUP_ID,
112: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
122: procedure DELETE_ROW (
123: X_TEMPLATE_DATA_GROUP_ID in NUMBER
124: ) is
125: begin
126: delete from HR_TEMPLATE_DATA_GROUPS
127: where TEMPLATE_DATA_GROUP_ID = X_TEMPLATE_DATA_GROUP_ID;
128:
129: if (sql%notfound) then
130: raise no_data_found;
191:
192: begin
193: select template_data_group_id
194: into x_template_data_group_id
195: from hr_template_data_groups
196: where form_template_id = x_form_template_id
197: and form_data_group_id = x_form_data_group_id;
198: exception
199: when no_data_found then
196: where form_template_id = x_form_template_id
197: and form_data_group_id = x_form_data_group_id;
198: exception
199: when no_data_found then
200: select hr_template_data_groups_s.nextval
201: into x_template_data_group_id
202: from dual;
203: end;
204:
226: X_LAST_UPDATED_BY,
227: X_LAST_UPDATE_LOGIN );
228: end;
229: end LOAD_ROW;
230: end HR_TEMPLATE_DATA_GROUPS_PKG;