51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy ben_bcm_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
89: Exception
90: When hr_api.check_integrity_violated Then
91: -- A check constraint has been violated
92: --
93: ben_bcm_shd.constraint_error
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: --
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: --
98: ben_bcm_shd.constraint_error
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: --
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: --
103: ben_bcm_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When Others Then
106: --
107: Raise;
139: --
140: -- {End Of Comments}
141: -- ----------------------------------------------------------------------------
142: Procedure pre_update
143: (p_rec in ben_bcm_shd.g_rec_type
144: ) is
145: --
146: l_proc varchar2(72) := g_package||'pre_update';
147: --
184: -- {End Of Comments}
185: -- ----------------------------------------------------------------------------
186: Procedure post_update
187: (p_effective_date in date
188: ,p_rec in ben_bcm_shd.g_rec_type
189: ) is
190: --
191: l_proc varchar2(72) := g_package||'post_update';
192: --
218: => p_rec.business_group_id
219: ,p_object_version_number
220: => p_rec.object_version_number
221: ,p_name_o
222: => ben_bcm_shd.g_old_rec.name
223: ,p_date_saved_o
224: => ben_bcm_shd.g_old_rec.date_saved
225: ,p_plan_id_o
226: => ben_bcm_shd.g_old_rec.plan_id
220: => p_rec.object_version_number
221: ,p_name_o
222: => ben_bcm_shd.g_old_rec.name
223: ,p_date_saved_o
224: => ben_bcm_shd.g_old_rec.date_saved
225: ,p_plan_id_o
226: => ben_bcm_shd.g_old_rec.plan_id
227: ,p_matrix_typ_cd_o
228: => ben_bcm_shd.g_old_rec.matrix_typ_cd
222: => ben_bcm_shd.g_old_rec.name
223: ,p_date_saved_o
224: => ben_bcm_shd.g_old_rec.date_saved
225: ,p_plan_id_o
226: => ben_bcm_shd.g_old_rec.plan_id
227: ,p_matrix_typ_cd_o
228: => ben_bcm_shd.g_old_rec.matrix_typ_cd
229: ,p_person_id_o
230: => ben_bcm_shd.g_old_rec.person_id
224: => ben_bcm_shd.g_old_rec.date_saved
225: ,p_plan_id_o
226: => ben_bcm_shd.g_old_rec.plan_id
227: ,p_matrix_typ_cd_o
228: => ben_bcm_shd.g_old_rec.matrix_typ_cd
229: ,p_person_id_o
230: => ben_bcm_shd.g_old_rec.person_id
231: ,p_row_crit_cd_o
232: => ben_bcm_shd.g_old_rec.row_crit_cd
226: => ben_bcm_shd.g_old_rec.plan_id
227: ,p_matrix_typ_cd_o
228: => ben_bcm_shd.g_old_rec.matrix_typ_cd
229: ,p_person_id_o
230: => ben_bcm_shd.g_old_rec.person_id
231: ,p_row_crit_cd_o
232: => ben_bcm_shd.g_old_rec.row_crit_cd
233: ,p_col_crit_cd_o
234: => ben_bcm_shd.g_old_rec.col_crit_cd
228: => ben_bcm_shd.g_old_rec.matrix_typ_cd
229: ,p_person_id_o
230: => ben_bcm_shd.g_old_rec.person_id
231: ,p_row_crit_cd_o
232: => ben_bcm_shd.g_old_rec.row_crit_cd
233: ,p_col_crit_cd_o
234: => ben_bcm_shd.g_old_rec.col_crit_cd
235: ,p_alct_by_cd_o
236: => ben_bcm_shd.g_old_rec.alct_by_cd
230: => ben_bcm_shd.g_old_rec.person_id
231: ,p_row_crit_cd_o
232: => ben_bcm_shd.g_old_rec.row_crit_cd
233: ,p_col_crit_cd_o
234: => ben_bcm_shd.g_old_rec.col_crit_cd
235: ,p_alct_by_cd_o
236: => ben_bcm_shd.g_old_rec.alct_by_cd
237: ,p_business_group_id_o
238: => ben_bcm_shd.g_old_rec.business_group_id
232: => ben_bcm_shd.g_old_rec.row_crit_cd
233: ,p_col_crit_cd_o
234: => ben_bcm_shd.g_old_rec.col_crit_cd
235: ,p_alct_by_cd_o
236: => ben_bcm_shd.g_old_rec.alct_by_cd
237: ,p_business_group_id_o
238: => ben_bcm_shd.g_old_rec.business_group_id
239: ,p_object_version_number_o
240: => ben_bcm_shd.g_old_rec.object_version_number
234: => ben_bcm_shd.g_old_rec.col_crit_cd
235: ,p_alct_by_cd_o
236: => ben_bcm_shd.g_old_rec.alct_by_cd
237: ,p_business_group_id_o
238: => ben_bcm_shd.g_old_rec.business_group_id
239: ,p_object_version_number_o
240: => ben_bcm_shd.g_old_rec.object_version_number
241: );
242: --
236: => ben_bcm_shd.g_old_rec.alct_by_cd
237: ,p_business_group_id_o
238: => ben_bcm_shd.g_old_rec.business_group_id
239: ,p_object_version_number_o
240: => ben_bcm_shd.g_old_rec.object_version_number
241: );
242: --
243: exception
244: --
296: --
297: -- {End Of Comments}
298: -- ----------------------------------------------------------------------------
299: Procedure convert_defs
300: (p_rec in out nocopy ben_bcm_shd.g_rec_type
301: ) is
302: --
303: Begin
304: --
308: -- is being used then we must set to the 'current' argument value.
309: --
310: If (p_rec.name = hr_api.g_varchar2) then
311: p_rec.name :=
312: ben_bcm_shd.g_old_rec.name;
313: End If;
314: If (p_rec.date_saved = hr_api.g_date) then
315: p_rec.date_saved :=
316: ben_bcm_shd.g_old_rec.date_saved;
312: ben_bcm_shd.g_old_rec.name;
313: End If;
314: If (p_rec.date_saved = hr_api.g_date) then
315: p_rec.date_saved :=
316: ben_bcm_shd.g_old_rec.date_saved;
317: End If;
318: If (p_rec.plan_id = hr_api.g_number) then
319: p_rec.plan_id :=
320: ben_bcm_shd.g_old_rec.plan_id;
316: ben_bcm_shd.g_old_rec.date_saved;
317: End If;
318: If (p_rec.plan_id = hr_api.g_number) then
319: p_rec.plan_id :=
320: ben_bcm_shd.g_old_rec.plan_id;
321: End If;
322: If (p_rec.matrix_typ_cd = hr_api.g_varchar2) then
323: p_rec.matrix_typ_cd :=
324: ben_bcm_shd.g_old_rec.matrix_typ_cd;
320: ben_bcm_shd.g_old_rec.plan_id;
321: End If;
322: If (p_rec.matrix_typ_cd = hr_api.g_varchar2) then
323: p_rec.matrix_typ_cd :=
324: ben_bcm_shd.g_old_rec.matrix_typ_cd;
325: End If;
326: If (p_rec.person_id = hr_api.g_number) then
327: p_rec.person_id :=
328: ben_bcm_shd.g_old_rec.person_id;
324: ben_bcm_shd.g_old_rec.matrix_typ_cd;
325: End If;
326: If (p_rec.person_id = hr_api.g_number) then
327: p_rec.person_id :=
328: ben_bcm_shd.g_old_rec.person_id;
329: End If;
330: If (p_rec.row_crit_cd = hr_api.g_varchar2) then
331: p_rec.row_crit_cd :=
332: ben_bcm_shd.g_old_rec.row_crit_cd;
328: ben_bcm_shd.g_old_rec.person_id;
329: End If;
330: If (p_rec.row_crit_cd = hr_api.g_varchar2) then
331: p_rec.row_crit_cd :=
332: ben_bcm_shd.g_old_rec.row_crit_cd;
333: End If;
334: If (p_rec.col_crit_cd = hr_api.g_varchar2) then
335: p_rec.col_crit_cd :=
336: ben_bcm_shd.g_old_rec.col_crit_cd;
332: ben_bcm_shd.g_old_rec.row_crit_cd;
333: End If;
334: If (p_rec.col_crit_cd = hr_api.g_varchar2) then
335: p_rec.col_crit_cd :=
336: ben_bcm_shd.g_old_rec.col_crit_cd;
337: End If;
338: If (p_rec.alct_by_cd = hr_api.g_varchar2) then
339: p_rec.alct_by_cd :=
340: ben_bcm_shd.g_old_rec.alct_by_cd;
336: ben_bcm_shd.g_old_rec.col_crit_cd;
337: End If;
338: If (p_rec.alct_by_cd = hr_api.g_varchar2) then
339: p_rec.alct_by_cd :=
340: ben_bcm_shd.g_old_rec.alct_by_cd;
341: End If;
342: If (p_rec.business_group_id = hr_api.g_number) then
343: p_rec.business_group_id :=
344: ben_bcm_shd.g_old_rec.business_group_id;
340: ben_bcm_shd.g_old_rec.alct_by_cd;
341: End If;
342: If (p_rec.business_group_id = hr_api.g_number) then
343: p_rec.business_group_id :=
344: ben_bcm_shd.g_old_rec.business_group_id;
345: End If;
346: --
347: End convert_defs;
348: --
350: -- |---------------------------------< upd >----------------------------------|
351: -- ----------------------------------------------------------------------------
352: Procedure upd
353: (p_effective_date in date
354: ,p_rec in out nocopy ben_bcm_shd.g_rec_type
355: ) is
356: --
357: l_proc varchar2(72) := g_package||'upd';
358: --
360: hr_utility.set_location('Entering:'||l_proc, 5);
361: --
362: -- We must lock the row which we need to update.
363: --
364: ben_bcm_shd.lck
365: (p_rec.cwb_matrix_id
366: ,p_rec.object_version_number
367: );
368: --
417: ,p_col_crit_cd in varchar2 default hr_api.g_varchar2
418: ,p_alct_by_cd in varchar2 default hr_api.g_varchar2
419: ) is
420: --
421: l_rec ben_bcm_shd.g_rec_type;
422: l_proc varchar2(72) := g_package||'upd';
423: --
424: Begin
425: hr_utility.set_location('Entering:'||l_proc, 5);
427: -- Call conversion function to turn arguments into the
428: -- l_rec structure.
429: --
430: l_rec :=
431: ben_bcm_shd.convert_args
432: (p_cwb_matrix_id
433: ,p_name
434: ,p_date_saved
435: ,p_plan_id