[Home] [Help]
1: package body HR_SOURCE_FORM_TEMPLATES_PKG as
2: /* $Header: hrsftlct.pkb 120.1 2011/04/28 11:17:52 sidsaxen ship $ */
3: procedure OWNER_TO_WHO (
4: X_OWNER in VARCHAR2,
5: X_CREATION_DATE out nocopy DATE,
30: X_LAST_UPDATE_DATE in DATE,
31: X_LAST_UPDATED_BY in NUMBER,
32: X_LAST_UPDATE_LOGIN in NUMBER
33: ) is
34: cursor C is select ROWID from HR_SOURCE_FORM_TEMPLATES
35: where SOURCE_FORM_TEMPLATE_ID = X_SOURCE_FORM_TEMPLATE_ID
36: ;
37: begin
38:
42: --
43:
44: BEGIN
45: PER_RIC_PKG.chk_integrity (
46: p_entity_name => 'HR_SOURCE_FORM_TEMPLATES',
47: p_ref_entity => 'HR_FORM_TEMPLATES_B',
48: p_ref_column_info => PER_RIC_PKG.column_info_tbl(
49: PER_RIC_PKG.col_info_rec('FORM_TEMPLATE_ID',NULL,X_FORM_TEMPLATE_ID_TO,NULL),
50: PER_RIC_PKG.col_info_rec('FORM_TEMPLATE_ID',NULL,X_FORM_TEMPLATE_ID_FROM,NULL)
55: --
56: -- Code Ends Here.
57: --
58:
59: insert into HR_SOURCE_FORM_TEMPLATES (
60: FORM_TEMPLATE_ID_FROM,
61: LAST_UPDATE_DATE,
62: LAST_UPDATED_BY,
63: LAST_UPDATE_LOGIN,
92: ) is
93: cursor c1 is select
94: FORM_TEMPLATE_ID_FROM,
95: FORM_TEMPLATE_ID_TO
96: from HR_SOURCE_FORM_TEMPLATES
97: where SOURCE_FORM_TEMPLATE_ID = X_SOURCE_FORM_TEMPLATE_ID
98: for update of SOURCE_FORM_TEMPLATE_ID nowait;
99: begin
100: for tlinfo in c1 loop
119: X_LAST_UPDATED_BY in NUMBER,
120: X_LAST_UPDATE_LOGIN in NUMBER
121: ) is
122: begin
123: update HR_SOURCE_FORM_TEMPLATES set
124: FORM_TEMPLATE_ID_FROM = X_FORM_TEMPLATE_ID_FROM,
125: FORM_TEMPLATE_ID_TO = X_FORM_TEMPLATE_ID_TO,
126: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
127: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
136: procedure DELETE_ROW (
137: X_SOURCE_FORM_TEMPLATE_ID in NUMBER
138: ) is
139: begin
140: delete from HR_SOURCE_FORM_TEMPLATES
141: where SOURCE_FORM_TEMPLATE_ID = X_SOURCE_FORM_TEMPLATE_ID;
142:
143: if (sql%notfound) then
144: raise no_data_found;
230: begin
231:
232: select source_form_template_id
233: into x_source_form_template_id
234: from hr_source_form_templates
235: where form_template_id_to = x_form_template_id_to
236: and nvl(form_template_id_from,hr_api.g_number) = nvl(x_form_template_id_from,hr_api.g_number);
237:
238: exception
236: and nvl(form_template_id_from,hr_api.g_number) = nvl(x_form_template_id_from,hr_api.g_number);
237:
238: exception
239: when no_data_found then
240: select hr_source_form_templates_s.nextval
241: into x_source_form_template_id
242: from dual;
243: end;
244:
266: X_LAST_UPDATE_LOGIN);
267: end;
268:
269: end LOAD_ROW;
270: end HR_SOURCE_FORM_TEMPLATES_PKG;