APPS.PER_RSC_BUS dependencies on PER_RSC_SHD

Line 19: Procedure check_non_updateable_args(p_rec in per_rsc_shd.g_rec_type) is

15: -- ----------------------------------------------------------------------------
16: -- |----------------------< check_non_updateable_args >-----------------------|
17: -- ----------------------------------------------------------------------------
18: --
19: Procedure check_non_updateable_args(p_rec in per_rsc_shd.g_rec_type) is
20: --
21: l_proc varchar2(72) := g_package||'check_non_updateable_args';
22: l_error exception;
23: l_argument varchar2(30);

Line 31: if not per_rsc_shd.api_updating

27: --
28: -- Only proceed with validation if a row exists for
29: -- the current record in the HR Schema
30: --
31: if not per_rsc_shd.api_updating
32: (p_rating_scale_id => p_rec.rating_scale_id
33: ,p_object_version_number => p_rec.object_version_number
34: ) then
35: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

Line 42: if p_rec.business_group_id <> per_rsc_shd.g_old_rec.business_group_id then

38: end if;
39: --
40: hr_utility.set_location(l_proc, 6);
41: --
42: if p_rec.business_group_id <> per_rsc_shd.g_old_rec.business_group_id then
43: l_argument := 'business_group_id';
44: raise l_error;
45: end if;
46: hr_utility.set_location(l_proc, 7);

Line 48: if p_rec.rating_scale_id <> per_rsc_shd.g_old_rec.rating_scale_id then

44: raise l_error;
45: end if;
46: hr_utility.set_location(l_proc, 7);
47: --
48: if p_rec.rating_scale_id <> per_rsc_shd.g_old_rec.rating_scale_id then
49: l_argument := 'rating_scale_id';
50: raise l_error;
51: end if;
52: hr_utility.set_location(l_proc, 9);

Line 54: if p_rec.type <> per_rsc_shd.g_old_rec.type then

50: raise l_error;
51: end if;
52: hr_utility.set_location(l_proc, 9);
53: --
54: if p_rec.type <> per_rsc_shd.g_old_rec.type then
55: l_argument := 'type';
56: raise l_error;
57: end if;
58: hr_utility.set_location(l_proc, 10);

Line 164: l_api_updating := per_rsc_shd.api_updating

160: -- Only proceed with validation if:
161: -- a) The current g_old_rec is current and
162: -- b) The value for name has changed.
163: --
164: l_api_updating := per_rsc_shd.api_updating
165: (p_rating_scale_id => p_rating_scale_id
166: ,p_object_version_number => p_object_version_number
167: );
168: --

Line 172: nvl(per_rsc_shd.g_old_rec.name, hr_api.g_varchar2)

168: --
169: hr_utility.set_location (l_proc, 3);
170: --
171: if (l_api_updating AND
172: nvl(per_rsc_shd.g_old_rec.name, hr_api.g_varchar2)
173: <> nvl(p_name, hr_api.g_varchar2)
174: or not l_api_updating)
175: then
176: --

Line 256: l_api_updating := per_rsc_shd.api_updating

252: -- a) The current g_old_rec is current
253: -- b) The not_applicable value has changed.
254: -- c) A record is being inserted.
255: --
256: l_api_updating := per_rsc_shd.api_updating
257: (p_rating_scale_id => p_rating_scale_id
258: ,p_object_version_number => p_object_version_number
259: );
260: --

Line 261: if ((l_api_updating and nvl(per_rsc_shd.g_old_rec.type,

257: (p_rating_scale_id => p_rating_scale_id
258: ,p_object_version_number => p_object_version_number
259: );
260: --
261: if ((l_api_updating and nvl(per_rsc_shd.g_old_rec.type,
262: hr_api.g_varchar2)
263: <> nvl(p_type, hr_api.g_varchar2)) or
264: (NOT l_api_updating)) then
265: --

Line 374: l_api_updating := per_rsc_shd.api_updating

370: -- a) The current g_old_rec is current
371: -- b) The default flag has changed.
372: -- c) A record is being inserted.
373: --
374: l_api_updating := per_rsc_shd.api_updating
375: (p_rating_scale_id => p_rating_scale_id
376: ,p_object_version_number => p_object_version_number
377: );
378: --

Line 379: if ((l_api_updating and nvl(per_rsc_shd.g_old_rec.default_flag,

375: (p_rating_scale_id => p_rating_scale_id
376: ,p_object_version_number => p_object_version_number
377: );
378: --
379: if ((l_api_updating and nvl(per_rsc_shd.g_old_rec.default_flag,
380: hr_api.g_varchar2)
381: <> nvl(p_default_flag, hr_api.g_varchar2))
382: or
383: (NOT l_api_updating)) then

Line 593: (p_rec in per_rsc_shd.g_rec_type) is

589: -- Access Status:
590: -- Internal Row Handler Use Only.
591: --
592: procedure chk_df
593: (p_rec in per_rsc_shd.g_rec_type) is
594: --
595: l_proc varchar2(72) := g_package||'chk_df';
596: --
597: begin

Line 601: nvl(per_rsc_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>

597: begin
598: hr_utility.set_location('Entering:'||l_proc, 10);
599: --
600: if (((p_rec.rating_scale_id is not null) and (
601: nvl(per_rsc_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
602: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
603: nvl(per_rsc_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
604: nvl(p_rec.attribute1, hr_api.g_varchar2) or
605: nvl(per_rsc_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>

Line 603: nvl(per_rsc_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>

599: --
600: if (((p_rec.rating_scale_id is not null) and (
601: nvl(per_rsc_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
602: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
603: nvl(per_rsc_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
604: nvl(p_rec.attribute1, hr_api.g_varchar2) or
605: nvl(per_rsc_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
606: nvl(p_rec.attribute2, hr_api.g_varchar2) or
607: nvl(per_rsc_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>

Line 605: nvl(per_rsc_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>

601: nvl(per_rsc_shd.g_old_rec.attribute_category, hr_api.g_varchar2) <>
602: nvl(p_rec.attribute_category, hr_api.g_varchar2) or
603: nvl(per_rsc_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
604: nvl(p_rec.attribute1, hr_api.g_varchar2) or
605: nvl(per_rsc_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
606: nvl(p_rec.attribute2, hr_api.g_varchar2) or
607: nvl(per_rsc_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
608: nvl(p_rec.attribute3, hr_api.g_varchar2) or
609: nvl(per_rsc_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>

Line 607: nvl(per_rsc_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>

603: nvl(per_rsc_shd.g_old_rec.attribute1, hr_api.g_varchar2) <>
604: nvl(p_rec.attribute1, hr_api.g_varchar2) or
605: nvl(per_rsc_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
606: nvl(p_rec.attribute2, hr_api.g_varchar2) or
607: nvl(per_rsc_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
608: nvl(p_rec.attribute3, hr_api.g_varchar2) or
609: nvl(per_rsc_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
610: nvl(p_rec.attribute4, hr_api.g_varchar2) or
611: nvl(per_rsc_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>

Line 609: nvl(per_rsc_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>

605: nvl(per_rsc_shd.g_old_rec.attribute2, hr_api.g_varchar2) <>
606: nvl(p_rec.attribute2, hr_api.g_varchar2) or
607: nvl(per_rsc_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
608: nvl(p_rec.attribute3, hr_api.g_varchar2) or
609: nvl(per_rsc_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
610: nvl(p_rec.attribute4, hr_api.g_varchar2) or
611: nvl(per_rsc_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
612: nvl(p_rec.attribute5, hr_api.g_varchar2) or
613: nvl(per_rsc_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>

Line 611: nvl(per_rsc_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>

607: nvl(per_rsc_shd.g_old_rec.attribute3, hr_api.g_varchar2) <>
608: nvl(p_rec.attribute3, hr_api.g_varchar2) or
609: nvl(per_rsc_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
610: nvl(p_rec.attribute4, hr_api.g_varchar2) or
611: nvl(per_rsc_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
612: nvl(p_rec.attribute5, hr_api.g_varchar2) or
613: nvl(per_rsc_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
614: nvl(p_rec.attribute6, hr_api.g_varchar2) or
615: nvl(per_rsc_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>

Line 613: nvl(per_rsc_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>

609: nvl(per_rsc_shd.g_old_rec.attribute4, hr_api.g_varchar2) <>
610: nvl(p_rec.attribute4, hr_api.g_varchar2) or
611: nvl(per_rsc_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
612: nvl(p_rec.attribute5, hr_api.g_varchar2) or
613: nvl(per_rsc_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
614: nvl(p_rec.attribute6, hr_api.g_varchar2) or
615: nvl(per_rsc_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
616: nvl(p_rec.attribute7, hr_api.g_varchar2) or
617: nvl(per_rsc_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>

Line 615: nvl(per_rsc_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>

611: nvl(per_rsc_shd.g_old_rec.attribute5, hr_api.g_varchar2) <>
612: nvl(p_rec.attribute5, hr_api.g_varchar2) or
613: nvl(per_rsc_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
614: nvl(p_rec.attribute6, hr_api.g_varchar2) or
615: nvl(per_rsc_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
616: nvl(p_rec.attribute7, hr_api.g_varchar2) or
617: nvl(per_rsc_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
618: nvl(p_rec.attribute8, hr_api.g_varchar2) or
619: nvl(per_rsc_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>

Line 617: nvl(per_rsc_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>

613: nvl(per_rsc_shd.g_old_rec.attribute6, hr_api.g_varchar2) <>
614: nvl(p_rec.attribute6, hr_api.g_varchar2) or
615: nvl(per_rsc_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
616: nvl(p_rec.attribute7, hr_api.g_varchar2) or
617: nvl(per_rsc_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
618: nvl(p_rec.attribute8, hr_api.g_varchar2) or
619: nvl(per_rsc_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
620: nvl(p_rec.attribute9, hr_api.g_varchar2) or
621: nvl(per_rsc_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>

Line 619: nvl(per_rsc_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>

615: nvl(per_rsc_shd.g_old_rec.attribute7, hr_api.g_varchar2) <>
616: nvl(p_rec.attribute7, hr_api.g_varchar2) or
617: nvl(per_rsc_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
618: nvl(p_rec.attribute8, hr_api.g_varchar2) or
619: nvl(per_rsc_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
620: nvl(p_rec.attribute9, hr_api.g_varchar2) or
621: nvl(per_rsc_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
622: nvl(p_rec.attribute10, hr_api.g_varchar2) or
623: nvl(per_rsc_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>

Line 621: nvl(per_rsc_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>

617: nvl(per_rsc_shd.g_old_rec.attribute8, hr_api.g_varchar2) <>
618: nvl(p_rec.attribute8, hr_api.g_varchar2) or
619: nvl(per_rsc_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
620: nvl(p_rec.attribute9, hr_api.g_varchar2) or
621: nvl(per_rsc_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
622: nvl(p_rec.attribute10, hr_api.g_varchar2) or
623: nvl(per_rsc_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
624: nvl(p_rec.attribute11, hr_api.g_varchar2) or
625: nvl(per_rsc_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>

Line 623: nvl(per_rsc_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>

619: nvl(per_rsc_shd.g_old_rec.attribute9, hr_api.g_varchar2) <>
620: nvl(p_rec.attribute9, hr_api.g_varchar2) or
621: nvl(per_rsc_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
622: nvl(p_rec.attribute10, hr_api.g_varchar2) or
623: nvl(per_rsc_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
624: nvl(p_rec.attribute11, hr_api.g_varchar2) or
625: nvl(per_rsc_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
626: nvl(p_rec.attribute12, hr_api.g_varchar2) or
627: nvl(per_rsc_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>

Line 625: nvl(per_rsc_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>

621: nvl(per_rsc_shd.g_old_rec.attribute10, hr_api.g_varchar2) <>
622: nvl(p_rec.attribute10, hr_api.g_varchar2) or
623: nvl(per_rsc_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
624: nvl(p_rec.attribute11, hr_api.g_varchar2) or
625: nvl(per_rsc_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
626: nvl(p_rec.attribute12, hr_api.g_varchar2) or
627: nvl(per_rsc_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
628: nvl(p_rec.attribute13, hr_api.g_varchar2) or
629: nvl(per_rsc_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>

Line 627: nvl(per_rsc_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>

623: nvl(per_rsc_shd.g_old_rec.attribute11, hr_api.g_varchar2) <>
624: nvl(p_rec.attribute11, hr_api.g_varchar2) or
625: nvl(per_rsc_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
626: nvl(p_rec.attribute12, hr_api.g_varchar2) or
627: nvl(per_rsc_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
628: nvl(p_rec.attribute13, hr_api.g_varchar2) or
629: nvl(per_rsc_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
630: nvl(p_rec.attribute14, hr_api.g_varchar2) or
631: nvl(per_rsc_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>

Line 629: nvl(per_rsc_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>

625: nvl(per_rsc_shd.g_old_rec.attribute12, hr_api.g_varchar2) <>
626: nvl(p_rec.attribute12, hr_api.g_varchar2) or
627: nvl(per_rsc_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
628: nvl(p_rec.attribute13, hr_api.g_varchar2) or
629: nvl(per_rsc_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
630: nvl(p_rec.attribute14, hr_api.g_varchar2) or
631: nvl(per_rsc_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
632: nvl(p_rec.attribute15, hr_api.g_varchar2) or
633: nvl(per_rsc_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>

Line 631: nvl(per_rsc_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>

627: nvl(per_rsc_shd.g_old_rec.attribute13, hr_api.g_varchar2) <>
628: nvl(p_rec.attribute13, hr_api.g_varchar2) or
629: nvl(per_rsc_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
630: nvl(p_rec.attribute14, hr_api.g_varchar2) or
631: nvl(per_rsc_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
632: nvl(p_rec.attribute15, hr_api.g_varchar2) or
633: nvl(per_rsc_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
634: nvl(p_rec.attribute16, hr_api.g_varchar2) or
635: nvl(per_rsc_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>

Line 633: nvl(per_rsc_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>

629: nvl(per_rsc_shd.g_old_rec.attribute14, hr_api.g_varchar2) <>
630: nvl(p_rec.attribute14, hr_api.g_varchar2) or
631: nvl(per_rsc_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
632: nvl(p_rec.attribute15, hr_api.g_varchar2) or
633: nvl(per_rsc_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
634: nvl(p_rec.attribute16, hr_api.g_varchar2) or
635: nvl(per_rsc_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
636: nvl(p_rec.attribute17, hr_api.g_varchar2) or
637: nvl(per_rsc_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>

Line 635: nvl(per_rsc_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>

631: nvl(per_rsc_shd.g_old_rec.attribute15, hr_api.g_varchar2) <>
632: nvl(p_rec.attribute15, hr_api.g_varchar2) or
633: nvl(per_rsc_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
634: nvl(p_rec.attribute16, hr_api.g_varchar2) or
635: nvl(per_rsc_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
636: nvl(p_rec.attribute17, hr_api.g_varchar2) or
637: nvl(per_rsc_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
638: nvl(p_rec.attribute18, hr_api.g_varchar2) or
639: nvl(per_rsc_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>

Line 637: nvl(per_rsc_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>

633: nvl(per_rsc_shd.g_old_rec.attribute16, hr_api.g_varchar2) <>
634: nvl(p_rec.attribute16, hr_api.g_varchar2) or
635: nvl(per_rsc_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
636: nvl(p_rec.attribute17, hr_api.g_varchar2) or
637: nvl(per_rsc_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
638: nvl(p_rec.attribute18, hr_api.g_varchar2) or
639: nvl(per_rsc_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
640: nvl(p_rec.attribute19, hr_api.g_varchar2) or
641: nvl(per_rsc_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>

Line 639: nvl(per_rsc_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>

635: nvl(per_rsc_shd.g_old_rec.attribute17, hr_api.g_varchar2) <>
636: nvl(p_rec.attribute17, hr_api.g_varchar2) or
637: nvl(per_rsc_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
638: nvl(p_rec.attribute18, hr_api.g_varchar2) or
639: nvl(per_rsc_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
640: nvl(p_rec.attribute19, hr_api.g_varchar2) or
641: nvl(per_rsc_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>
642: nvl(p_rec.attribute20, hr_api.g_varchar2)))
643: or

Line 641: nvl(per_rsc_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>

637: nvl(per_rsc_shd.g_old_rec.attribute18, hr_api.g_varchar2) <>
638: nvl(p_rec.attribute18, hr_api.g_varchar2) or
639: nvl(per_rsc_shd.g_old_rec.attribute19, hr_api.g_varchar2) <>
640: nvl(p_rec.attribute19, hr_api.g_varchar2) or
641: nvl(per_rsc_shd.g_old_rec.attribute20, hr_api.g_varchar2) <>
642: nvl(p_rec.attribute20, hr_api.g_varchar2)))
643: or
644: (p_rec.rating_scale_id is null))
645: and hr_rating_scales_api.g_ignore_df <> 'Y' then -- BUG3621261

Line 706: Procedure insert_validate(p_rec in per_rsc_shd.g_rec_type

702: --
703: -- ----------------------------------------------------------------------------
704: -- |---------------------------< insert_validate >----------------------------|
705: -- ----------------------------------------------------------------------------
706: Procedure insert_validate(p_rec in per_rsc_shd.g_rec_type
707: ,p_effective_date in date) is
708: --
709: l_proc varchar2(72) := g_package||'insert_validate';
710: --

Line 790: Procedure update_validate(p_rec in per_rsc_shd.g_rec_type

786: --
787: -- ----------------------------------------------------------------------------
788: -- |---------------------------< update_validate >----------------------------|
789: -- ----------------------------------------------------------------------------
790: Procedure update_validate(p_rec in per_rsc_shd.g_rec_type
791: ,p_effective_date in date) is
792: --
793: l_proc varchar2(72) := g_package||'update_validate';
794: --

Line 862: Procedure delete_validate(p_rec in per_rsc_shd.g_rec_type) is

858: --
859: -- ----------------------------------------------------------------------------
860: -- |---------------------------< delete_validate >----------------------------|
861: -- ----------------------------------------------------------------------------
862: Procedure delete_validate(p_rec in per_rsc_shd.g_rec_type) is
863: --
864: l_proc varchar2(72) := g_package||'delete_validate';
865: --
866: Begin