51: --
52: -- {END Of Comments}
53: -- ----------------------------------------------------------------------------
54: PROCEDURE update_dml
55: (p_rec IN OUT NOCOPY pay_pyr_shd.g_rec_type
56: ) IS
57: --
58: l_proc VARCHAR2(72) := g_package||'update_dml';
59: --
62: --
63: -- Increment the object version
64: p_rec.object_version_number := p_rec.object_version_number + 1;
65: --
66: pay_pyr_shd.g_api_dml := TRUE; -- Set the api dml status
67: --
68: -- Update the pay_rates Row
69: --
70: update pay_rates
103: ,asg_rate_type = p_rec.asg_rate_type
104: ,object_version_number = p_rec.object_version_number
105: WHERE rate_id = p_rec.rate_id;
106: --
107: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
108: --
109: hr_utility.set_location(' Leaving:'||l_proc, 10);
110: --
111: EXCEPTION
110: --
111: EXCEPTION
112: WHEN hr_api.check_integrity_violated THEN
113: -- A check constraint has been violated
114: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
115: pay_pyr_shd.constraint_error
116: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
117: WHEN hr_api.parent_integrity_violated THEN
118: -- Parent integrity has been violated
111: EXCEPTION
112: WHEN hr_api.check_integrity_violated THEN
113: -- A check constraint has been violated
114: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
115: pay_pyr_shd.constraint_error
116: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
117: WHEN hr_api.parent_integrity_violated THEN
118: -- Parent integrity has been violated
119: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
115: pay_pyr_shd.constraint_error
116: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
117: WHEN hr_api.parent_integrity_violated THEN
118: -- Parent integrity has been violated
119: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
120: pay_pyr_shd.constraint_error
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: WHEN hr_api.unique_integrity_violated THEN
123: -- Unique integrity has been violated
116: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
117: WHEN hr_api.parent_integrity_violated THEN
118: -- Parent integrity has been violated
119: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
120: pay_pyr_shd.constraint_error
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: WHEN hr_api.unique_integrity_violated THEN
123: -- Unique integrity has been violated
124: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
120: pay_pyr_shd.constraint_error
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: WHEN hr_api.unique_integrity_violated THEN
123: -- Unique integrity has been violated
124: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
125: pay_pyr_shd.constraint_error
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: WHEN Others THEN
128: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: WHEN hr_api.unique_integrity_violated THEN
123: -- Unique integrity has been violated
124: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
125: pay_pyr_shd.constraint_error
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: WHEN Others THEN
128: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
129: Raise;
124: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
125: pay_pyr_shd.constraint_error
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: WHEN Others THEN
128: pay_pyr_shd.g_api_dml := FALSE; -- Unset the api dml status
129: Raise;
130: END update_dml;
131: --
132: -- ----------------------------------------------------------------------------
161: --
162: -- {END Of Comments}
163: -- ----------------------------------------------------------------------------
164: PROCEDURE pre_update
165: (p_rec IN pay_pyr_shd.g_rec_type
166: ) IS
167: --
168: l_proc VARCHAR2(72) := g_package||'pre_update';
169: --
206: -- {END Of Comments}
207: -- ----------------------------------------------------------------------------
208: PROCEDURE post_update
209: (p_effective_date IN DATE
210: ,p_rec IN pay_pyr_shd.g_rec_type
211: ) IS
212: --
213: l_proc VARCHAR2(72) := g_package||'post_update';
214: --
288: => p_rec.asg_rate_type
289: ,p_object_version_number
290: => p_rec.object_version_number
291: ,p_business_group_id_o
292: => pay_pyr_shd.g_old_rec.business_group_id
293: ,p_parent_spine_id_o
294: => pay_pyr_shd.g_old_rec.parent_spine_id
295: ,p_name_o
296: => pay_pyr_shd.g_old_rec.name
290: => p_rec.object_version_number
291: ,p_business_group_id_o
292: => pay_pyr_shd.g_old_rec.business_group_id
293: ,p_parent_spine_id_o
294: => pay_pyr_shd.g_old_rec.parent_spine_id
295: ,p_name_o
296: => pay_pyr_shd.g_old_rec.name
297: ,p_rate_type_o
298: => pay_pyr_shd.g_old_rec.rate_type
292: => pay_pyr_shd.g_old_rec.business_group_id
293: ,p_parent_spine_id_o
294: => pay_pyr_shd.g_old_rec.parent_spine_id
295: ,p_name_o
296: => pay_pyr_shd.g_old_rec.name
297: ,p_rate_type_o
298: => pay_pyr_shd.g_old_rec.rate_type
299: ,p_rate_uom_o
300: => pay_pyr_shd.g_old_rec.rate_uom
294: => pay_pyr_shd.g_old_rec.parent_spine_id
295: ,p_name_o
296: => pay_pyr_shd.g_old_rec.name
297: ,p_rate_type_o
298: => pay_pyr_shd.g_old_rec.rate_type
299: ,p_rate_uom_o
300: => pay_pyr_shd.g_old_rec.rate_uom
301: ,p_comments_o
302: => pay_pyr_shd.g_old_rec.comments
296: => pay_pyr_shd.g_old_rec.name
297: ,p_rate_type_o
298: => pay_pyr_shd.g_old_rec.rate_type
299: ,p_rate_uom_o
300: => pay_pyr_shd.g_old_rec.rate_uom
301: ,p_comments_o
302: => pay_pyr_shd.g_old_rec.comments
303: ,p_request_id_o
304: => pay_pyr_shd.g_old_rec.request_id
298: => pay_pyr_shd.g_old_rec.rate_type
299: ,p_rate_uom_o
300: => pay_pyr_shd.g_old_rec.rate_uom
301: ,p_comments_o
302: => pay_pyr_shd.g_old_rec.comments
303: ,p_request_id_o
304: => pay_pyr_shd.g_old_rec.request_id
305: ,p_program_application_id_o
306: => pay_pyr_shd.g_old_rec.program_application_id
300: => pay_pyr_shd.g_old_rec.rate_uom
301: ,p_comments_o
302: => pay_pyr_shd.g_old_rec.comments
303: ,p_request_id_o
304: => pay_pyr_shd.g_old_rec.request_id
305: ,p_program_application_id_o
306: => pay_pyr_shd.g_old_rec.program_application_id
307: ,p_program_id_o
308: => pay_pyr_shd.g_old_rec.program_id
302: => pay_pyr_shd.g_old_rec.comments
303: ,p_request_id_o
304: => pay_pyr_shd.g_old_rec.request_id
305: ,p_program_application_id_o
306: => pay_pyr_shd.g_old_rec.program_application_id
307: ,p_program_id_o
308: => pay_pyr_shd.g_old_rec.program_id
309: ,p_program_update_date_o
310: => pay_pyr_shd.g_old_rec.program_update_date
304: => pay_pyr_shd.g_old_rec.request_id
305: ,p_program_application_id_o
306: => pay_pyr_shd.g_old_rec.program_application_id
307: ,p_program_id_o
308: => pay_pyr_shd.g_old_rec.program_id
309: ,p_program_update_date_o
310: => pay_pyr_shd.g_old_rec.program_update_date
311: ,p_attribute_category_o
312: => pay_pyr_shd.g_old_rec.attribute_category
306: => pay_pyr_shd.g_old_rec.program_application_id
307: ,p_program_id_o
308: => pay_pyr_shd.g_old_rec.program_id
309: ,p_program_update_date_o
310: => pay_pyr_shd.g_old_rec.program_update_date
311: ,p_attribute_category_o
312: => pay_pyr_shd.g_old_rec.attribute_category
313: ,p_attribute1_o
314: => pay_pyr_shd.g_old_rec.attribute1
308: => pay_pyr_shd.g_old_rec.program_id
309: ,p_program_update_date_o
310: => pay_pyr_shd.g_old_rec.program_update_date
311: ,p_attribute_category_o
312: => pay_pyr_shd.g_old_rec.attribute_category
313: ,p_attribute1_o
314: => pay_pyr_shd.g_old_rec.attribute1
315: ,p_attribute2_o
316: => pay_pyr_shd.g_old_rec.attribute2
310: => pay_pyr_shd.g_old_rec.program_update_date
311: ,p_attribute_category_o
312: => pay_pyr_shd.g_old_rec.attribute_category
313: ,p_attribute1_o
314: => pay_pyr_shd.g_old_rec.attribute1
315: ,p_attribute2_o
316: => pay_pyr_shd.g_old_rec.attribute2
317: ,p_attribute3_o
318: => pay_pyr_shd.g_old_rec.attribute3
312: => pay_pyr_shd.g_old_rec.attribute_category
313: ,p_attribute1_o
314: => pay_pyr_shd.g_old_rec.attribute1
315: ,p_attribute2_o
316: => pay_pyr_shd.g_old_rec.attribute2
317: ,p_attribute3_o
318: => pay_pyr_shd.g_old_rec.attribute3
319: ,p_attribute4_o
320: => pay_pyr_shd.g_old_rec.attribute4
314: => pay_pyr_shd.g_old_rec.attribute1
315: ,p_attribute2_o
316: => pay_pyr_shd.g_old_rec.attribute2
317: ,p_attribute3_o
318: => pay_pyr_shd.g_old_rec.attribute3
319: ,p_attribute4_o
320: => pay_pyr_shd.g_old_rec.attribute4
321: ,p_attribute5_o
322: => pay_pyr_shd.g_old_rec.attribute5
316: => pay_pyr_shd.g_old_rec.attribute2
317: ,p_attribute3_o
318: => pay_pyr_shd.g_old_rec.attribute3
319: ,p_attribute4_o
320: => pay_pyr_shd.g_old_rec.attribute4
321: ,p_attribute5_o
322: => pay_pyr_shd.g_old_rec.attribute5
323: ,p_attribute6_o
324: => pay_pyr_shd.g_old_rec.attribute6
318: => pay_pyr_shd.g_old_rec.attribute3
319: ,p_attribute4_o
320: => pay_pyr_shd.g_old_rec.attribute4
321: ,p_attribute5_o
322: => pay_pyr_shd.g_old_rec.attribute5
323: ,p_attribute6_o
324: => pay_pyr_shd.g_old_rec.attribute6
325: ,p_attribute7_o
326: => pay_pyr_shd.g_old_rec.attribute7
320: => pay_pyr_shd.g_old_rec.attribute4
321: ,p_attribute5_o
322: => pay_pyr_shd.g_old_rec.attribute5
323: ,p_attribute6_o
324: => pay_pyr_shd.g_old_rec.attribute6
325: ,p_attribute7_o
326: => pay_pyr_shd.g_old_rec.attribute7
327: ,p_attribute8_o
328: => pay_pyr_shd.g_old_rec.attribute8
322: => pay_pyr_shd.g_old_rec.attribute5
323: ,p_attribute6_o
324: => pay_pyr_shd.g_old_rec.attribute6
325: ,p_attribute7_o
326: => pay_pyr_shd.g_old_rec.attribute7
327: ,p_attribute8_o
328: => pay_pyr_shd.g_old_rec.attribute8
329: ,p_attribute9_o
330: => pay_pyr_shd.g_old_rec.attribute9
324: => pay_pyr_shd.g_old_rec.attribute6
325: ,p_attribute7_o
326: => pay_pyr_shd.g_old_rec.attribute7
327: ,p_attribute8_o
328: => pay_pyr_shd.g_old_rec.attribute8
329: ,p_attribute9_o
330: => pay_pyr_shd.g_old_rec.attribute9
331: ,p_attribute10_o
332: => pay_pyr_shd.g_old_rec.attribute10
326: => pay_pyr_shd.g_old_rec.attribute7
327: ,p_attribute8_o
328: => pay_pyr_shd.g_old_rec.attribute8
329: ,p_attribute9_o
330: => pay_pyr_shd.g_old_rec.attribute9
331: ,p_attribute10_o
332: => pay_pyr_shd.g_old_rec.attribute10
333: ,p_attribute11_o
334: => pay_pyr_shd.g_old_rec.attribute11
328: => pay_pyr_shd.g_old_rec.attribute8
329: ,p_attribute9_o
330: => pay_pyr_shd.g_old_rec.attribute9
331: ,p_attribute10_o
332: => pay_pyr_shd.g_old_rec.attribute10
333: ,p_attribute11_o
334: => pay_pyr_shd.g_old_rec.attribute11
335: ,p_attribute12_o
336: => pay_pyr_shd.g_old_rec.attribute12
330: => pay_pyr_shd.g_old_rec.attribute9
331: ,p_attribute10_o
332: => pay_pyr_shd.g_old_rec.attribute10
333: ,p_attribute11_o
334: => pay_pyr_shd.g_old_rec.attribute11
335: ,p_attribute12_o
336: => pay_pyr_shd.g_old_rec.attribute12
337: ,p_attribute13_o
338: => pay_pyr_shd.g_old_rec.attribute13
332: => pay_pyr_shd.g_old_rec.attribute10
333: ,p_attribute11_o
334: => pay_pyr_shd.g_old_rec.attribute11
335: ,p_attribute12_o
336: => pay_pyr_shd.g_old_rec.attribute12
337: ,p_attribute13_o
338: => pay_pyr_shd.g_old_rec.attribute13
339: ,p_attribute14_o
340: => pay_pyr_shd.g_old_rec.attribute14
334: => pay_pyr_shd.g_old_rec.attribute11
335: ,p_attribute12_o
336: => pay_pyr_shd.g_old_rec.attribute12
337: ,p_attribute13_o
338: => pay_pyr_shd.g_old_rec.attribute13
339: ,p_attribute14_o
340: => pay_pyr_shd.g_old_rec.attribute14
341: ,p_attribute15_o
342: => pay_pyr_shd.g_old_rec.attribute15
336: => pay_pyr_shd.g_old_rec.attribute12
337: ,p_attribute13_o
338: => pay_pyr_shd.g_old_rec.attribute13
339: ,p_attribute14_o
340: => pay_pyr_shd.g_old_rec.attribute14
341: ,p_attribute15_o
342: => pay_pyr_shd.g_old_rec.attribute15
343: ,p_attribute16_o
344: => pay_pyr_shd.g_old_rec.attribute16
338: => pay_pyr_shd.g_old_rec.attribute13
339: ,p_attribute14_o
340: => pay_pyr_shd.g_old_rec.attribute14
341: ,p_attribute15_o
342: => pay_pyr_shd.g_old_rec.attribute15
343: ,p_attribute16_o
344: => pay_pyr_shd.g_old_rec.attribute16
345: ,p_attribute17_o
346: => pay_pyr_shd.g_old_rec.attribute17
340: => pay_pyr_shd.g_old_rec.attribute14
341: ,p_attribute15_o
342: => pay_pyr_shd.g_old_rec.attribute15
343: ,p_attribute16_o
344: => pay_pyr_shd.g_old_rec.attribute16
345: ,p_attribute17_o
346: => pay_pyr_shd.g_old_rec.attribute17
347: ,p_attribute18_o
348: => pay_pyr_shd.g_old_rec.attribute18
342: => pay_pyr_shd.g_old_rec.attribute15
343: ,p_attribute16_o
344: => pay_pyr_shd.g_old_rec.attribute16
345: ,p_attribute17_o
346: => pay_pyr_shd.g_old_rec.attribute17
347: ,p_attribute18_o
348: => pay_pyr_shd.g_old_rec.attribute18
349: ,p_attribute19_o
350: => pay_pyr_shd.g_old_rec.attribute19
344: => pay_pyr_shd.g_old_rec.attribute16
345: ,p_attribute17_o
346: => pay_pyr_shd.g_old_rec.attribute17
347: ,p_attribute18_o
348: => pay_pyr_shd.g_old_rec.attribute18
349: ,p_attribute19_o
350: => pay_pyr_shd.g_old_rec.attribute19
351: ,p_attribute20_o
352: => pay_pyr_shd.g_old_rec.attribute20
346: => pay_pyr_shd.g_old_rec.attribute17
347: ,p_attribute18_o
348: => pay_pyr_shd.g_old_rec.attribute18
349: ,p_attribute19_o
350: => pay_pyr_shd.g_old_rec.attribute19
351: ,p_attribute20_o
352: => pay_pyr_shd.g_old_rec.attribute20
353: ,p_rate_basis_o
354: => pay_pyr_shd.g_old_rec.rate_basis
348: => pay_pyr_shd.g_old_rec.attribute18
349: ,p_attribute19_o
350: => pay_pyr_shd.g_old_rec.attribute19
351: ,p_attribute20_o
352: => pay_pyr_shd.g_old_rec.attribute20
353: ,p_rate_basis_o
354: => pay_pyr_shd.g_old_rec.rate_basis
355: ,p_asg_rate_type_o
356: => pay_pyr_shd.g_old_rec.asg_rate_type
350: => pay_pyr_shd.g_old_rec.attribute19
351: ,p_attribute20_o
352: => pay_pyr_shd.g_old_rec.attribute20
353: ,p_rate_basis_o
354: => pay_pyr_shd.g_old_rec.rate_basis
355: ,p_asg_rate_type_o
356: => pay_pyr_shd.g_old_rec.asg_rate_type
357: ,p_object_version_number_o
358: => pay_pyr_shd.g_old_rec.object_version_number
352: => pay_pyr_shd.g_old_rec.attribute20
353: ,p_rate_basis_o
354: => pay_pyr_shd.g_old_rec.rate_basis
355: ,p_asg_rate_type_o
356: => pay_pyr_shd.g_old_rec.asg_rate_type
357: ,p_object_version_number_o
358: => pay_pyr_shd.g_old_rec.object_version_number
359: );
360: --
354: => pay_pyr_shd.g_old_rec.rate_basis
355: ,p_asg_rate_type_o
356: => pay_pyr_shd.g_old_rec.asg_rate_type
357: ,p_object_version_number_o
358: => pay_pyr_shd.g_old_rec.object_version_number
359: );
360: --
361: exception
362: --
414: --
415: -- {END Of Comments}
416: -- ----------------------------------------------------------------------------
417: PROCEDURE convert_defs
418: (p_rec IN OUT NOCOPY pay_pyr_shd.g_rec_type
419: ) IS
420: --
421: BEGIN
422: --
426: -- IS being used THEN we must set to the 'current' argument value.
427: --
428: IF (p_rec.business_group_id = hr_api.g_number) THEN
429: p_rec.business_group_id :=
430: pay_pyr_shd.g_old_rec.business_group_id;
431: END IF;
432: IF (p_rec.parent_spine_id = hr_api.g_number) THEN
433: p_rec.parent_spine_id :=
434: pay_pyr_shd.g_old_rec.parent_spine_id;
430: pay_pyr_shd.g_old_rec.business_group_id;
431: END IF;
432: IF (p_rec.parent_spine_id = hr_api.g_number) THEN
433: p_rec.parent_spine_id :=
434: pay_pyr_shd.g_old_rec.parent_spine_id;
435: END IF;
436: IF (p_rec.name = hr_api.g_VARCHAR2) THEN
437: p_rec.name :=
438: pay_pyr_shd.g_old_rec.name;
434: pay_pyr_shd.g_old_rec.parent_spine_id;
435: END IF;
436: IF (p_rec.name = hr_api.g_VARCHAR2) THEN
437: p_rec.name :=
438: pay_pyr_shd.g_old_rec.name;
439: END IF;
440: IF (p_rec.rate_type = hr_api.g_VARCHAR2) THEN
441: p_rec.rate_type :=
442: pay_pyr_shd.g_old_rec.rate_type;
438: pay_pyr_shd.g_old_rec.name;
439: END IF;
440: IF (p_rec.rate_type = hr_api.g_VARCHAR2) THEN
441: p_rec.rate_type :=
442: pay_pyr_shd.g_old_rec.rate_type;
443: END IF;
444: IF (p_rec.rate_uom = hr_api.g_VARCHAR2) THEN
445: p_rec.rate_uom :=
446: pay_pyr_shd.g_old_rec.rate_uom;
442: pay_pyr_shd.g_old_rec.rate_type;
443: END IF;
444: IF (p_rec.rate_uom = hr_api.g_VARCHAR2) THEN
445: p_rec.rate_uom :=
446: pay_pyr_shd.g_old_rec.rate_uom;
447: END IF;
448: IF (p_rec.comments = hr_api.g_VARCHAR2) THEN
449: p_rec.comments :=
450: pay_pyr_shd.g_old_rec.comments;
446: pay_pyr_shd.g_old_rec.rate_uom;
447: END IF;
448: IF (p_rec.comments = hr_api.g_VARCHAR2) THEN
449: p_rec.comments :=
450: pay_pyr_shd.g_old_rec.comments;
451: END IF;
452: IF (p_rec.request_id = hr_api.g_number) THEN
453: p_rec.request_id :=
454: pay_pyr_shd.g_old_rec.request_id;
450: pay_pyr_shd.g_old_rec.comments;
451: END IF;
452: IF (p_rec.request_id = hr_api.g_number) THEN
453: p_rec.request_id :=
454: pay_pyr_shd.g_old_rec.request_id;
455: END IF;
456: IF (p_rec.program_application_id = hr_api.g_number) THEN
457: p_rec.program_application_id :=
458: pay_pyr_shd.g_old_rec.program_application_id;
454: pay_pyr_shd.g_old_rec.request_id;
455: END IF;
456: IF (p_rec.program_application_id = hr_api.g_number) THEN
457: p_rec.program_application_id :=
458: pay_pyr_shd.g_old_rec.program_application_id;
459: END IF;
460: IF (p_rec.program_id = hr_api.g_number) THEN
461: p_rec.program_id :=
462: pay_pyr_shd.g_old_rec.program_id;
458: pay_pyr_shd.g_old_rec.program_application_id;
459: END IF;
460: IF (p_rec.program_id = hr_api.g_number) THEN
461: p_rec.program_id :=
462: pay_pyr_shd.g_old_rec.program_id;
463: END IF;
464: IF (p_rec.program_update_date = hr_api.g_date) THEN
465: p_rec.program_update_date :=
466: pay_pyr_shd.g_old_rec.program_update_date;
462: pay_pyr_shd.g_old_rec.program_id;
463: END IF;
464: IF (p_rec.program_update_date = hr_api.g_date) THEN
465: p_rec.program_update_date :=
466: pay_pyr_shd.g_old_rec.program_update_date;
467: END IF;
468: IF (p_rec.attribute_category = hr_api.g_VARCHAR2) THEN
469: p_rec.attribute_category :=
470: pay_pyr_shd.g_old_rec.attribute_category;
466: pay_pyr_shd.g_old_rec.program_update_date;
467: END IF;
468: IF (p_rec.attribute_category = hr_api.g_VARCHAR2) THEN
469: p_rec.attribute_category :=
470: pay_pyr_shd.g_old_rec.attribute_category;
471: END IF;
472: IF (p_rec.attribute1 = hr_api.g_VARCHAR2) THEN
473: p_rec.attribute1 :=
474: pay_pyr_shd.g_old_rec.attribute1;
470: pay_pyr_shd.g_old_rec.attribute_category;
471: END IF;
472: IF (p_rec.attribute1 = hr_api.g_VARCHAR2) THEN
473: p_rec.attribute1 :=
474: pay_pyr_shd.g_old_rec.attribute1;
475: END IF;
476: IF (p_rec.attribute2 = hr_api.g_VARCHAR2) THEN
477: p_rec.attribute2 :=
478: pay_pyr_shd.g_old_rec.attribute2;
474: pay_pyr_shd.g_old_rec.attribute1;
475: END IF;
476: IF (p_rec.attribute2 = hr_api.g_VARCHAR2) THEN
477: p_rec.attribute2 :=
478: pay_pyr_shd.g_old_rec.attribute2;
479: END IF;
480: IF (p_rec.attribute3 = hr_api.g_VARCHAR2) THEN
481: p_rec.attribute3 :=
482: pay_pyr_shd.g_old_rec.attribute3;
478: pay_pyr_shd.g_old_rec.attribute2;
479: END IF;
480: IF (p_rec.attribute3 = hr_api.g_VARCHAR2) THEN
481: p_rec.attribute3 :=
482: pay_pyr_shd.g_old_rec.attribute3;
483: END IF;
484: IF (p_rec.attribute4 = hr_api.g_VARCHAR2) THEN
485: p_rec.attribute4 :=
486: pay_pyr_shd.g_old_rec.attribute4;
482: pay_pyr_shd.g_old_rec.attribute3;
483: END IF;
484: IF (p_rec.attribute4 = hr_api.g_VARCHAR2) THEN
485: p_rec.attribute4 :=
486: pay_pyr_shd.g_old_rec.attribute4;
487: END IF;
488: IF (p_rec.attribute5 = hr_api.g_VARCHAR2) THEN
489: p_rec.attribute5 :=
490: pay_pyr_shd.g_old_rec.attribute5;
486: pay_pyr_shd.g_old_rec.attribute4;
487: END IF;
488: IF (p_rec.attribute5 = hr_api.g_VARCHAR2) THEN
489: p_rec.attribute5 :=
490: pay_pyr_shd.g_old_rec.attribute5;
491: END IF;
492: IF (p_rec.attribute6 = hr_api.g_VARCHAR2) THEN
493: p_rec.attribute6 :=
494: pay_pyr_shd.g_old_rec.attribute6;
490: pay_pyr_shd.g_old_rec.attribute5;
491: END IF;
492: IF (p_rec.attribute6 = hr_api.g_VARCHAR2) THEN
493: p_rec.attribute6 :=
494: pay_pyr_shd.g_old_rec.attribute6;
495: END IF;
496: IF (p_rec.attribute7 = hr_api.g_VARCHAR2) THEN
497: p_rec.attribute7 :=
498: pay_pyr_shd.g_old_rec.attribute7;
494: pay_pyr_shd.g_old_rec.attribute6;
495: END IF;
496: IF (p_rec.attribute7 = hr_api.g_VARCHAR2) THEN
497: p_rec.attribute7 :=
498: pay_pyr_shd.g_old_rec.attribute7;
499: END IF;
500: IF (p_rec.attribute8 = hr_api.g_VARCHAR2) THEN
501: p_rec.attribute8 :=
502: pay_pyr_shd.g_old_rec.attribute8;
498: pay_pyr_shd.g_old_rec.attribute7;
499: END IF;
500: IF (p_rec.attribute8 = hr_api.g_VARCHAR2) THEN
501: p_rec.attribute8 :=
502: pay_pyr_shd.g_old_rec.attribute8;
503: END IF;
504: IF (p_rec.attribute9 = hr_api.g_VARCHAR2) THEN
505: p_rec.attribute9 :=
506: pay_pyr_shd.g_old_rec.attribute9;
502: pay_pyr_shd.g_old_rec.attribute8;
503: END IF;
504: IF (p_rec.attribute9 = hr_api.g_VARCHAR2) THEN
505: p_rec.attribute9 :=
506: pay_pyr_shd.g_old_rec.attribute9;
507: END IF;
508: IF (p_rec.attribute10 = hr_api.g_VARCHAR2) THEN
509: p_rec.attribute10 :=
510: pay_pyr_shd.g_old_rec.attribute10;
506: pay_pyr_shd.g_old_rec.attribute9;
507: END IF;
508: IF (p_rec.attribute10 = hr_api.g_VARCHAR2) THEN
509: p_rec.attribute10 :=
510: pay_pyr_shd.g_old_rec.attribute10;
511: END IF;
512: IF (p_rec.attribute11 = hr_api.g_VARCHAR2) THEN
513: p_rec.attribute11 :=
514: pay_pyr_shd.g_old_rec.attribute11;
510: pay_pyr_shd.g_old_rec.attribute10;
511: END IF;
512: IF (p_rec.attribute11 = hr_api.g_VARCHAR2) THEN
513: p_rec.attribute11 :=
514: pay_pyr_shd.g_old_rec.attribute11;
515: END IF;
516: IF (p_rec.attribute12 = hr_api.g_VARCHAR2) THEN
517: p_rec.attribute12 :=
518: pay_pyr_shd.g_old_rec.attribute12;
514: pay_pyr_shd.g_old_rec.attribute11;
515: END IF;
516: IF (p_rec.attribute12 = hr_api.g_VARCHAR2) THEN
517: p_rec.attribute12 :=
518: pay_pyr_shd.g_old_rec.attribute12;
519: END IF;
520: IF (p_rec.attribute13 = hr_api.g_VARCHAR2) THEN
521: p_rec.attribute13 :=
522: pay_pyr_shd.g_old_rec.attribute13;
518: pay_pyr_shd.g_old_rec.attribute12;
519: END IF;
520: IF (p_rec.attribute13 = hr_api.g_VARCHAR2) THEN
521: p_rec.attribute13 :=
522: pay_pyr_shd.g_old_rec.attribute13;
523: END IF;
524: IF (p_rec.attribute14 = hr_api.g_VARCHAR2) THEN
525: p_rec.attribute14 :=
526: pay_pyr_shd.g_old_rec.attribute14;
522: pay_pyr_shd.g_old_rec.attribute13;
523: END IF;
524: IF (p_rec.attribute14 = hr_api.g_VARCHAR2) THEN
525: p_rec.attribute14 :=
526: pay_pyr_shd.g_old_rec.attribute14;
527: END IF;
528: IF (p_rec.attribute15 = hr_api.g_VARCHAR2) THEN
529: p_rec.attribute15 :=
530: pay_pyr_shd.g_old_rec.attribute15;
526: pay_pyr_shd.g_old_rec.attribute14;
527: END IF;
528: IF (p_rec.attribute15 = hr_api.g_VARCHAR2) THEN
529: p_rec.attribute15 :=
530: pay_pyr_shd.g_old_rec.attribute15;
531: END IF;
532: IF (p_rec.attribute16 = hr_api.g_VARCHAR2) THEN
533: p_rec.attribute16 :=
534: pay_pyr_shd.g_old_rec.attribute16;
530: pay_pyr_shd.g_old_rec.attribute15;
531: END IF;
532: IF (p_rec.attribute16 = hr_api.g_VARCHAR2) THEN
533: p_rec.attribute16 :=
534: pay_pyr_shd.g_old_rec.attribute16;
535: END IF;
536: IF (p_rec.attribute17 = hr_api.g_VARCHAR2) THEN
537: p_rec.attribute17 :=
538: pay_pyr_shd.g_old_rec.attribute17;
534: pay_pyr_shd.g_old_rec.attribute16;
535: END IF;
536: IF (p_rec.attribute17 = hr_api.g_VARCHAR2) THEN
537: p_rec.attribute17 :=
538: pay_pyr_shd.g_old_rec.attribute17;
539: END IF;
540: IF (p_rec.attribute18 = hr_api.g_VARCHAR2) THEN
541: p_rec.attribute18 :=
542: pay_pyr_shd.g_old_rec.attribute18;
538: pay_pyr_shd.g_old_rec.attribute17;
539: END IF;
540: IF (p_rec.attribute18 = hr_api.g_VARCHAR2) THEN
541: p_rec.attribute18 :=
542: pay_pyr_shd.g_old_rec.attribute18;
543: END IF;
544: IF (p_rec.attribute19 = hr_api.g_VARCHAR2) THEN
545: p_rec.attribute19 :=
546: pay_pyr_shd.g_old_rec.attribute19;
542: pay_pyr_shd.g_old_rec.attribute18;
543: END IF;
544: IF (p_rec.attribute19 = hr_api.g_VARCHAR2) THEN
545: p_rec.attribute19 :=
546: pay_pyr_shd.g_old_rec.attribute19;
547: END IF;
548: IF (p_rec.attribute20 = hr_api.g_VARCHAR2) THEN
549: p_rec.attribute20 :=
550: pay_pyr_shd.g_old_rec.attribute20;
546: pay_pyr_shd.g_old_rec.attribute19;
547: END IF;
548: IF (p_rec.attribute20 = hr_api.g_VARCHAR2) THEN
549: p_rec.attribute20 :=
550: pay_pyr_shd.g_old_rec.attribute20;
551: END IF;
552: IF (p_rec.rate_basis = hr_api.g_VARCHAR2) THEN
553: p_rec.rate_basis :=
554: pay_pyr_shd.g_old_rec.rate_basis;
550: pay_pyr_shd.g_old_rec.attribute20;
551: END IF;
552: IF (p_rec.rate_basis = hr_api.g_VARCHAR2) THEN
553: p_rec.rate_basis :=
554: pay_pyr_shd.g_old_rec.rate_basis;
555: END IF;
556: IF (p_rec.asg_rate_type = hr_api.g_VARCHAR2) THEN
557: p_rec.asg_rate_type :=
558: pay_pyr_shd.g_old_rec.asg_rate_type;
554: pay_pyr_shd.g_old_rec.rate_basis;
555: END IF;
556: IF (p_rec.asg_rate_type = hr_api.g_VARCHAR2) THEN
557: p_rec.asg_rate_type :=
558: pay_pyr_shd.g_old_rec.asg_rate_type;
559: END IF;
560: --
561: END convert_defs;
562: --
564: -- |---------------------------------< upd >----------------------------------|
565: -- ----------------------------------------------------------------------------
566: PROCEDURE upd
567: (p_effective_date IN DATE
568: ,p_rec IN OUT NOCOPY pay_pyr_shd.g_rec_type
569: ) IS
570: --
571: l_proc VARCHAR2(72) := g_package||'upd';
572: --
574: hr_utility.set_location('Entering:'||l_proc, 5);
575: --
576: -- We must lock the row which we need to update.
577: --
578: pay_pyr_shd.lck
579: (p_rec.rate_id
580: ,p_rec.object_version_number
581: );
582: --
649: ,p_rate_basis IN VARCHAR2 DEFAULT hr_api.g_VARCHAR2
650: ,p_asg_rate_type IN VARCHAR2 DEFAULT hr_api.g_VARCHAR2
651: ) IS
652: --
653: l_rec pay_pyr_shd.g_rec_type;
654: l_proc VARCHAR2(72) := g_package||'upd';
655: --
656: BEGIN
657: hr_utility.set_location('Entering:'||l_proc, 5);
659: -- Call conversion function to turn arguments INTO the
660: -- l_rec structure.
661: --
662: l_rec :=
663: pay_pyr_shd.convert_args
664: (p_rate_id
665: ,hr_api.g_number --p_business_group_id
666: ,p_parent_spine_id
667: ,p_name