50: -- Internal Row Handler Use Only.
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml(p_rec in out nocopy per_bil_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: --
58: Begin
61: -- Increment the object version
62: --
63: p_rec.object_version_number := p_rec.object_version_number + 1;
64: --
65: per_bil_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the hr_summary Row
68: --
69: update hr_summary
89: date_value2 = p_rec.date_value2,
90: date_value3 = p_rec.date_value3
91: where id_value = p_rec.id_value;
92: --
93: per_bil_shd.g_api_dml := false; -- Unset the api dml status
94: --
95: hr_utility.set_location(' Leaving:'||l_proc, 10);
96: --
97: Exception
96: --
97: Exception
98: When hr_api.check_integrity_violated Then
99: -- A check constraint has been violated
100: per_bil_shd.g_api_dml := false; -- Unset the api dml status
101: per_bil_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When hr_api.parent_integrity_violated Then
104: -- Parent integrity has been violated
97: Exception
98: When hr_api.check_integrity_violated Then
99: -- A check constraint has been violated
100: per_bil_shd.g_api_dml := false; -- Unset the api dml status
101: per_bil_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When hr_api.parent_integrity_violated Then
104: -- Parent integrity has been violated
105: per_bil_shd.g_api_dml := false; -- Unset the api dml status
101: per_bil_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When hr_api.parent_integrity_violated Then
104: -- Parent integrity has been violated
105: per_bil_shd.g_api_dml := false; -- Unset the api dml status
106: per_bil_shd.constraint_error
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.unique_integrity_violated Then
109: -- Unique integrity has been violated
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When hr_api.parent_integrity_violated Then
104: -- Parent integrity has been violated
105: per_bil_shd.g_api_dml := false; -- Unset the api dml status
106: per_bil_shd.constraint_error
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.unique_integrity_violated Then
109: -- Unique integrity has been violated
110: per_bil_shd.g_api_dml := false; -- Unset the api dml status
106: per_bil_shd.constraint_error
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.unique_integrity_violated Then
109: -- Unique integrity has been violated
110: per_bil_shd.g_api_dml := false; -- Unset the api dml status
111: per_bil_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When Others Then
114: per_bil_shd.g_api_dml := false; -- Unset the api dml status
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.unique_integrity_violated Then
109: -- Unique integrity has been violated
110: per_bil_shd.g_api_dml := false; -- Unset the api dml status
111: per_bil_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When Others Then
114: per_bil_shd.g_api_dml := false; -- Unset the api dml status
115: Raise;
110: per_bil_shd.g_api_dml := false; -- Unset the api dml status
111: per_bil_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When Others Then
114: per_bil_shd.g_api_dml := false; -- Unset the api dml status
115: Raise;
116: End update_dml;
117: --
118: -- ----------------------------------------------------------------------------
146: -- Internal Row Handler Use Only.
147: --
148: -- {End Of Comments}
149: -- ----------------------------------------------------------------------------
150: Procedure pre_update(p_rec in per_bil_shd.g_rec_type) is
151: --
152: l_proc varchar2(72) := g_package||'pre_update';
153: --
154: Begin
188: -- Internal Row Handler Use Only.
189: --
190: -- {End Of Comments}
191: -- ----------------------------------------------------------------------------
192: Procedure post_update(p_rec in per_bil_shd.g_rec_type) is
193: --
194: l_proc varchar2(72) := g_package||'post_update';
195: --
196: Begin
223: ,p_num_value3 =>p_rec.num_value3
224: ,p_date_value1 =>p_rec.date_value1
225: ,p_date_value2 =>p_rec.date_value2
226: ,p_date_value3 =>p_rec.date_value3
227: ,p_type_o =>per_bil_shd.g_old_rec.type
228: ,p_business_group_id_o =>per_bil_shd.g_old_rec.business_group_id
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
224: ,p_date_value1 =>p_rec.date_value1
225: ,p_date_value2 =>p_rec.date_value2
226: ,p_date_value3 =>p_rec.date_value3
227: ,p_type_o =>per_bil_shd.g_old_rec.type
228: ,p_business_group_id_o =>per_bil_shd.g_old_rec.business_group_id
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
225: ,p_date_value2 =>p_rec.date_value2
226: ,p_date_value3 =>p_rec.date_value3
227: ,p_type_o =>per_bil_shd.g_old_rec.type
228: ,p_business_group_id_o =>per_bil_shd.g_old_rec.business_group_id
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
226: ,p_date_value3 =>p_rec.date_value3
227: ,p_type_o =>per_bil_shd.g_old_rec.type
228: ,p_business_group_id_o =>per_bil_shd.g_old_rec.business_group_id
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
227: ,p_type_o =>per_bil_shd.g_old_rec.type
228: ,p_business_group_id_o =>per_bil_shd.g_old_rec.business_group_id
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
228: ,p_business_group_id_o =>per_bil_shd.g_old_rec.business_group_id
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
229: ,p_object_version_number_o =>per_bil_shd.g_old_rec.object_version_number
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
230: ,p_fk_value1_o =>per_bil_shd.g_old_rec.fk_value1
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
231: ,p_fk_value2_o =>per_bil_shd.g_old_rec.fk_value2
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
232: ,p_fk_value3_o =>per_bil_shd.g_old_rec.fk_value3
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
233: ,p_text_value1_o =>per_bil_shd.g_old_rec.text_value1
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
234: ,p_text_value2_o =>per_bil_shd.g_old_rec.text_value2
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
235: ,p_text_value3_o =>per_bil_shd.g_old_rec.text_value3
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
236: ,p_text_value4_o =>per_bil_shd.g_old_rec.text_value4
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
244: ,p_date_value2_o =>per_bil_shd.g_old_rec.date_value2
237: ,p_text_value5_o =>per_bil_shd.g_old_rec.text_value5
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
244: ,p_date_value2_o =>per_bil_shd.g_old_rec.date_value2
245: ,p_date_value3_o =>per_bil_shd.g_old_rec.date_value3
238: ,p_text_value6_o =>per_bil_shd.g_old_rec.text_value6
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
244: ,p_date_value2_o =>per_bil_shd.g_old_rec.date_value2
245: ,p_date_value3_o =>per_bil_shd.g_old_rec.date_value3
246: );
239: ,p_text_value7_o =>per_bil_shd.g_old_rec.text_value7
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
244: ,p_date_value2_o =>per_bil_shd.g_old_rec.date_value2
245: ,p_date_value3_o =>per_bil_shd.g_old_rec.date_value3
246: );
247: */
240: ,p_num_value1_o =>per_bil_shd.g_old_rec.num_value1
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
244: ,p_date_value2_o =>per_bil_shd.g_old_rec.date_value2
245: ,p_date_value3_o =>per_bil_shd.g_old_rec.date_value3
246: );
247: */
248: --
241: ,p_num_value2_o =>per_bil_shd.g_old_rec.num_value2
242: ,p_num_value3_o =>per_bil_shd.g_old_rec.num_value3
243: ,p_date_value1_o =>per_bil_shd.g_old_rec.date_value1
244: ,p_date_value2_o =>per_bil_shd.g_old_rec.date_value2
245: ,p_date_value3_o =>per_bil_shd.g_old_rec.date_value3
246: );
247: */
248: --
249: null;
306: -- Internal Row Handler Use Only.
307: --
308: -- {End Of Comments}
309: -- ----------------------------------------------------------------------------
310: Procedure convert_defs(p_rec in out nocopy per_bil_shd.g_rec_type) is
311: --
312: l_proc varchar2(72) := g_package||'convert_defs';
313: --
314: Begin
321: -- is being used then we must set to the 'current' argument value.
322: --
323: If (p_rec.type = hr_api.g_varchar2) then
324: p_rec.type :=
325: per_bil_shd.g_old_rec.type;
326: End If;
327: If (p_rec.business_group_id = hr_api.g_number) then
328: p_rec.business_group_id :=
329: per_bil_shd.g_old_rec.business_group_id;
325: per_bil_shd.g_old_rec.type;
326: End If;
327: If (p_rec.business_group_id = hr_api.g_number) then
328: p_rec.business_group_id :=
329: per_bil_shd.g_old_rec.business_group_id;
330: End If;
331: If (p_rec.fk_value1 = hr_api.g_number) then
332: p_rec.fk_value1 :=
333: per_bil_shd.g_old_rec.fk_value1;
329: per_bil_shd.g_old_rec.business_group_id;
330: End If;
331: If (p_rec.fk_value1 = hr_api.g_number) then
332: p_rec.fk_value1 :=
333: per_bil_shd.g_old_rec.fk_value1;
334: End If;
335: If (p_rec.fk_value2 = hr_api.g_number) then
336: p_rec.fk_value2 :=
337: per_bil_shd.g_old_rec.fk_value2;
333: per_bil_shd.g_old_rec.fk_value1;
334: End If;
335: If (p_rec.fk_value2 = hr_api.g_number) then
336: p_rec.fk_value2 :=
337: per_bil_shd.g_old_rec.fk_value2;
338: End If;
339: If (p_rec.fk_value3 = hr_api.g_number) then
340: p_rec.fk_value3 :=
341: per_bil_shd.g_old_rec.fk_value3;
337: per_bil_shd.g_old_rec.fk_value2;
338: End If;
339: If (p_rec.fk_value3 = hr_api.g_number) then
340: p_rec.fk_value3 :=
341: per_bil_shd.g_old_rec.fk_value3;
342: End If;
343: If (p_rec.text_value1 = hr_api.g_varchar2) then
344: p_rec.text_value1 :=
345: per_bil_shd.g_old_rec.text_value1;
341: per_bil_shd.g_old_rec.fk_value3;
342: End If;
343: If (p_rec.text_value1 = hr_api.g_varchar2) then
344: p_rec.text_value1 :=
345: per_bil_shd.g_old_rec.text_value1;
346: End If;
347: If (p_rec.text_value2 = hr_api.g_varchar2) then
348: p_rec.text_value2 :=
349: per_bil_shd.g_old_rec.text_value2;
345: per_bil_shd.g_old_rec.text_value1;
346: End If;
347: If (p_rec.text_value2 = hr_api.g_varchar2) then
348: p_rec.text_value2 :=
349: per_bil_shd.g_old_rec.text_value2;
350: End If;
351: If (p_rec.text_value3 = hr_api.g_varchar2) then
352: p_rec.text_value3 :=
353: per_bil_shd.g_old_rec.text_value3;
349: per_bil_shd.g_old_rec.text_value2;
350: End If;
351: If (p_rec.text_value3 = hr_api.g_varchar2) then
352: p_rec.text_value3 :=
353: per_bil_shd.g_old_rec.text_value3;
354: End If;
355: If (p_rec.text_value4 = hr_api.g_varchar2) then
356: p_rec.text_value4 :=
357: per_bil_shd.g_old_rec.text_value4;
353: per_bil_shd.g_old_rec.text_value3;
354: End If;
355: If (p_rec.text_value4 = hr_api.g_varchar2) then
356: p_rec.text_value4 :=
357: per_bil_shd.g_old_rec.text_value4;
358: End If;
359: If (p_rec.text_value5 = hr_api.g_varchar2) then
360: p_rec.text_value5 :=
361: per_bil_shd.g_old_rec.text_value5;
357: per_bil_shd.g_old_rec.text_value4;
358: End If;
359: If (p_rec.text_value5 = hr_api.g_varchar2) then
360: p_rec.text_value5 :=
361: per_bil_shd.g_old_rec.text_value5;
362: End If;
363: If (p_rec.text_value6 = hr_api.g_varchar2) then
364: p_rec.text_value6 :=
365: per_bil_shd.g_old_rec.text_value6;
361: per_bil_shd.g_old_rec.text_value5;
362: End If;
363: If (p_rec.text_value6 = hr_api.g_varchar2) then
364: p_rec.text_value6 :=
365: per_bil_shd.g_old_rec.text_value6;
366: End If;
367: If (p_rec.text_value7 = hr_api.g_varchar2) then
368: p_rec.text_value7 :=
369: per_bil_shd.g_old_rec.text_value7;
365: per_bil_shd.g_old_rec.text_value6;
366: End If;
367: If (p_rec.text_value7 = hr_api.g_varchar2) then
368: p_rec.text_value7 :=
369: per_bil_shd.g_old_rec.text_value7;
370: End If;
371: If (p_rec.num_value1 = hr_api.g_number) then
372: p_rec.num_value1 :=
373: per_bil_shd.g_old_rec.num_value1;
369: per_bil_shd.g_old_rec.text_value7;
370: End If;
371: If (p_rec.num_value1 = hr_api.g_number) then
372: p_rec.num_value1 :=
373: per_bil_shd.g_old_rec.num_value1;
374: End If;
375: If (p_rec.num_value2 = hr_api.g_number) then
376: p_rec.num_value2 :=
377: per_bil_shd.g_old_rec.num_value2;
373: per_bil_shd.g_old_rec.num_value1;
374: End If;
375: If (p_rec.num_value2 = hr_api.g_number) then
376: p_rec.num_value2 :=
377: per_bil_shd.g_old_rec.num_value2;
378: End If;
379: If (p_rec.num_value3 = hr_api.g_number) then
380: p_rec.num_value3 :=
381: per_bil_shd.g_old_rec.num_value3;
377: per_bil_shd.g_old_rec.num_value2;
378: End If;
379: If (p_rec.num_value3 = hr_api.g_number) then
380: p_rec.num_value3 :=
381: per_bil_shd.g_old_rec.num_value3;
382: End If;
383: If (p_rec.date_value1 = hr_api.g_date) then
384: p_rec.date_value1 :=
385: per_bil_shd.g_old_rec.date_value1;
381: per_bil_shd.g_old_rec.num_value3;
382: End If;
383: If (p_rec.date_value1 = hr_api.g_date) then
384: p_rec.date_value1 :=
385: per_bil_shd.g_old_rec.date_value1;
386: End If;
387: If (p_rec.date_value2 = hr_api.g_date) then
388: p_rec.date_value2 :=
389: per_bil_shd.g_old_rec.date_value2;
385: per_bil_shd.g_old_rec.date_value1;
386: End If;
387: If (p_rec.date_value2 = hr_api.g_date) then
388: p_rec.date_value2 :=
389: per_bil_shd.g_old_rec.date_value2;
390: End If;
391: If (p_rec.date_value3 = hr_api.g_date) then
392: p_rec.date_value3 :=
393: per_bil_shd.g_old_rec.date_value3;
389: per_bil_shd.g_old_rec.date_value2;
390: End If;
391: If (p_rec.date_value3 = hr_api.g_date) then
392: p_rec.date_value3 :=
393: per_bil_shd.g_old_rec.date_value3;
394: End If;
395: --
396: hr_utility.set_location(' Leaving:'||l_proc, 10);
397: --
401: -- |---------------------------------< upd >----------------------------------|
402: -- ----------------------------------------------------------------------------
403: Procedure upd
404: (
405: p_rec in out nocopy per_bil_shd.g_rec_type
406: ) is
407: --
408: l_proc varchar2(72) := g_package||'upd';
409: --
411: hr_utility.set_location('Entering:'||l_proc, 5);
412: --
413: -- We must lock the row which we need to update.
414: --
415: per_bil_shd.lck
416: (
417: p_rec.id_value,
418: p_rec.object_version_number
419: );
467: p_date_value2 in date default hr_api.g_date,
468: p_date_value3 in date default hr_api.g_date
469: ) is
470: --
471: l_rec per_bil_shd.g_rec_type;
472: l_proc varchar2(72) := g_package||'upd';
473: --
474: Begin
475: hr_utility.set_location('Entering:'||l_proc, 5);
477: -- Call conversion function to turn arguments into the
478: -- l_rec structure.
479: --
480: l_rec :=
481: per_bil_shd.convert_args
482: (
483: p_type,
484: p_business_group_id,
485: p_object_version_number,