1 Package per_psv_bus as
2 /* $Header: pepsvrhi.pkh 120.0 2005/05/31 15:44:36 appldev noship $ */
3
4 --
5 -- ---------------------------------------------------------------------------
6 -- |----------------------< get_business_group_id >--------------------------|
7 -- ---------------------------------------------------------------------------
8
9 Procedure get_business_group_id
10 (p_position_structure_id in number
11 ,p_business_group_id out nocopy number);
12 --
13 -- ---------------------------------------------------------------------------
14 -- |----------------------< set_security_group_id >--------------------------|
15 -- ---------------------------------------------------------------------------
16 -- {Start Of Comments}
17 --
18 -- Description:
19 -- Sets the security_group_id in CLIENT_INFO for the appropriate business
20 -- group context.
21 --
22 -- Prerequisites:
23 -- The primary key identified by p_pos_structure_version_id
24 -- already exists.
25 --
26 -- In Arguments:
27 -- p_pos_structure_version_id
28 --
29 --
30 -- Post Success:
31 -- The security_group_id will be set in CLIENT_INFO.
32 --
33 -- Post Failure:
34 -- An error is raised if the value does not exist.
35 --
36 -- Access Status:
37 -- Internal Development Use Only.
38 --
39 -- {End Of Comments}
40 -- ---------------------------------------------------------------------------
41 procedure set_security_group_id
42 (p_pos_structure_version_id in number
43 );
44 --
45 --
46 -- ---------------------------------------------------------------------------
47 -- |---------------------< return_legislation_code >-------------------------|
48 -- ---------------------------------------------------------------------------
49 -- {Start Of Comments}
50 --
51 -- Description:
52 -- Return the legislation code for a specific primary key value
53 --
54 -- Prerequisites:
55 -- The primary key identified by p_pos_structure_version_id
56 -- already exists.
57 --
58 -- In Arguments:
59 -- p_pos_structure_version_id
60 --
61 --
62 -- Post Success:
63 -- The business group's legislation code will be returned.
64 --
65 -- Post Failure:
66 -- An error is raised if the value does not exist.
67 --
68 -- Access Status:
69 -- Internal Development Use Only.
70 --
71 -- {End Of Comments}
72 -- ---------------------------------------------------------------------------
73 FUNCTION return_legislation_code
74 (p_pos_structure_version_id in number
75 ) RETURN varchar2;
76 --
77 --
78 -- ----------------------------------------------------------------------------
79 -- |---------------------------< insert_validate >----------------------------|
80 -- ----------------------------------------------------------------------------
81 -- {Start of comments}
82 --
83 -- Description:
84 -- This procedure controls the execution of all insert business rules
85 -- validation.
86 --
87 -- Prerequisites:
88 -- This private procedure is called from ins procedure.
89 --
90 -- In Parameters:
91 -- A Pl/Sql record structure.
92 --
93 -- Post Success:
94 -- Processing continues.
95 --
96 -- Post Failure:
97 -- If a business rules fails the error will not be handled by this procedure
98 -- unless explicity coded.
99 --
100 -- Developer Implementation Notes:
101 -- For insert, your business rules should be executed from this procedure
102 -- and should ideally (unless really necessary) just be straight procedure
103 -- or function calls. Try and avoid using conditional branching logic.
104 --
105 -- Access Status:
106 -- Internal Row Handler Use Only.
107 --
108 -- {End of comments}
109 -- ----------------------------------------------------------------------------
110 Procedure insert_validate
111 (p_effective_date in date
112 ,p_rec in per_psv_shd.g_rec_type
113 ,p_gap_warning out nocopy boolean);
114 --
115 -- ----------------------------------------------------------------------------
116 -- |---------------------------< update_validate >----------------------------|
117 -- ----------------------------------------------------------------------------
118 -- {Start Of Comments}
119 --
120 -- Description:
121 -- This procedure controls the execution of all update business rules
122 -- validation.
123 --
124 -- Prerequisites:
125 -- This private procedure is called from upd procedure.
126 --
127 -- In Parameters:
128 -- A Pl/Sql record structure.
129 --
130 -- Post Success:
131 -- Processing continues.
132 --
133 -- Post Failure:
134 -- If a business rules fails the error will not be handled by this procedure
135 -- unless explicity coded.
136 --
137 -- Access Status:
138 -- Internal Row Handler Use Only.
139 --
140 -- {End Of Comments}
141 -- ----------------------------------------------------------------------------
142 Procedure update_validate
143 (p_effective_date in date
144 ,p_rec in per_psv_shd.g_rec_type
145 ,p_gap_warning out nocopy boolean);
146 --
147 -- ----------------------------------------------------------------------------
148 -- |---------------------------< delete_validate >----------------------------|
149 -- ----------------------------------------------------------------------------
150 -- {Start Of Comments}
151 --
152 -- Description:
153 -- This procedure controls the execution of all delete business rules
154 -- validation.
155 --
156 -- Prerequisites:
157 -- This private procedure is called from del procedure.
158 --
159 -- In Parameters:
160 -- A Pl/Sql record structure.
161 --
162 -- Post Success:
163 -- Processing continues.
164 --
165 -- Post Failure:
166 -- If a business rules fails the error will not be handled by this procedure
167 -- unless explicity coded.
168 --
169 -- Developer Implementation Notes:
170 -- For delete, your business rules should be executed from this procedure
171 -- and should ideally (unless really necessary) just be straight procedure
172 -- or function calls. Try and avoid using conditional branching logic.
173 --
174 -- Access Status:
175 -- Internal Row Handler Use Only.
176 --
177 -- {End Of Comments}
178 -- ----------------------------------------------------------------------------
179 Procedure delete_validate
180 (p_rec in per_psv_shd.g_rec_type
181 );
182 --
183 end per_psv_bus;