1 Package per_qat_bus AUTHID CURRENT_USER as
2 /* $Header: peqatrhi.pkh 120.0 2005/05/31 16:07:16 appldev noship $ */
3 --
4 -- ---------------------------------------------------------------------------
5 -- |----------------------< set_security_group_id >--------------------------|
6 -- ---------------------------------------------------------------------------
7 -- {Start Of Comments}
8 --
9 -- Description:
10 -- Sets the security_group_id in CLIENT_INFO for the appropriate business
11 -- group context.
12 --
13 -- Prerequisites:
14 -- The primary key identified by p_qualification_id
15 -- already exists.
16 --
17 -- In Arguments:
18 -- p_qualification_id
19 --
20 --
21 -- Post Success:
22 -- The security_group_id will be set in CLIENT_INFO.
23 --
24 -- Post Failure:
25 -- An error is raised if the value does not exist.
26 --
27 -- Access Status:
28 -- Internal Development Use Only.
29 --
30 -- {End Of Comments}
31 -- ---------------------------------------------------------------------------
32 procedure set_security_group_id
33 (p_qualification_id in number
34 );
35 --
36 -- ----------------------------------------------------------------------------
37 -- |-----------------------< chk_qual_overlap >-------------------------------|
38 -- ----------------------------------------------------------------------------
39 --
40 -- Description
41 -- This procedure checks that the qualification does not overlap for the
42 -- same person. The qualification is distinguished by business_group_id,
43 -- person_id, attendance_id, qualification_id,language and start date.
44 -- The start date must not overlap an identical qualification for the
45 -- same person.
46 --
47 -- Pre-Conditions
48 -- None.
49 --
50 -- In Parameters
51 -- p_qualification_id PK
52 -- p_qualification_type_id id of related qualification type
53 -- p_person_id id of person
54 -- p_attendance_id id of related establishment attendance
55 -- p_business_group_id id of business group
56 -- p_start_date start date of qualification
57 -- p_end_date end date of qualification
58 -- p_title title of course taken
59 -- p_object_version_number object version number
60 -- p_party_id id of party -- HR/TCA merge
61 -- p_language The current session language
62 --
63 -- Post Success
64 -- Processing continues
65 --
66 -- Post Failure
67 -- Error raised.
68 --
69 -- Access Status
70 -- Internal table handler use only.
71 --
72 Procedure chk_qual_overlap (p_qualification_id in number,
73 p_qualification_type_id in number,
74 p_person_id in number,
75 p_attendance_id in number,
76 p_business_group_id in number,
77 p_start_date in date,
78 p_end_date in date,
79 p_title in varchar2,
80 p_object_version_number in number,
81 p_party_id in number default null,
82 p_language in varchar2
83 );
84 --
85 --
86 -- ---------------------------------------------------------------------------
87 -- |---------------------< return_legislation_code >-------------------------|
88 -- ---------------------------------------------------------------------------
89 -- {Start Of Comments}
90 --
91 -- Description:
92 -- Return the legislation code for a specific primary key value
93 --
94 -- Prerequisites:
95 -- The primary key identified by p_qualification_id
96 -- already exists.
97 --
98 -- In Arguments:
99 -- p_qualification_id
100 --
101 --
102 -- Post Success:
103 -- The business group's legislation code will be returned.
104 --
105 -- Post Failure:
106 -- An error is raised if the value does not exist.
107 --
108 -- Access Status:
109 -- Internal Development Use Only.
110 --
111 -- {End Of Comments}
112 -- ---------------------------------------------------------------------------
113 FUNCTION return_legislation_code
114 (p_qualification_id in number
115 ,p_language in varchar2
116 ) RETURN varchar2;
117 --
118 --
119 -- ----------------------------------------------------------------------------
120 -- |---------------------------< insert_validate >----------------------------|
121 -- ----------------------------------------------------------------------------
122 -- {Start of comments}
123 --
124 -- Description:
125 -- This procedure controls the execution of all insert business rules
126 -- validation.
127 --
128 -- Prerequisites:
129 -- This private procedure is called from ins procedure.
130 --
131 -- In Parameters:
132 -- A Pl/Sql record structure.
133 --
134 -- Post Success:
135 -- Processing continues.
136 --
137 -- Post Failure:
138 -- If a business rules fails the error will not be handled by this procedure
139 -- unless explicity coded.
140 --
141 -- Developer Implementation Notes:
142 -- For insert, your business rules should be executed from this procedure
143 -- and should ideally (unless really necessary) just be straight procedure
144 -- or function calls. Try and avoid using conditional branching logic.
145 --
146 -- Access Status:
147 -- Internal Row Handler Use Only.
148 --
149 -- {End of comments}
150 -- ----------------------------------------------------------------------------
151 Procedure insert_validate
152 (p_rec in per_qat_shd.g_rec_type
153 ,p_qualification_id in number
154 );
155 --
156 -- ----------------------------------------------------------------------------
157 -- |---------------------------< update_validate >----------------------------|
158 -- ----------------------------------------------------------------------------
159 -- {Start Of Comments}
160 --
161 -- Description:
162 -- This procedure controls the execution of all update business rules
163 -- validation.
164 --
165 -- Prerequisites:
166 -- This private procedure is called from upd procedure.
167 --
168 -- In Parameters:
169 -- A Pl/Sql record structure.
170 --
171 -- Post Success:
172 -- Processing continues.
173 --
174 -- Post Failure:
175 -- If a business rules fails the error will not be handled by this procedure
176 -- unless explicity coded.
177 --
178 -- Access Status:
179 -- Internal Row Handler Use Only.
180 --
181 -- {End Of Comments}
182 -- ----------------------------------------------------------------------------
183 Procedure update_validate
184 (p_rec in per_qat_shd.g_rec_type
185 );
186 --
187 -- ----------------------------------------------------------------------------
188 -- |---------------------------< delete_validate >----------------------------|
189 -- ----------------------------------------------------------------------------
190 -- {Start Of Comments}
191 --
192 -- Description:
193 -- This procedure controls the execution of all delete business rules
194 -- validation.
195 --
196 -- Prerequisites:
197 -- This private procedure is called from del procedure.
198 --
199 -- In Parameters:
200 -- A Pl/Sql record structure.
201 --
202 -- Post Success:
203 -- Processing continues.
204 --
205 -- Post Failure:
206 -- If a business rules fails the error will not be handled by this procedure
207 -- unless explicity coded.
208 --
209 -- Developer Implementation Notes:
210 -- For delete, your business rules should be executed from this procedure
211 -- and should ideally (unless really necessary) just be straight procedure
212 -- or function calls. Try and avoid using conditional branching logic.
213 --
214 -- Access Status:
215 -- Internal Row Handler Use Only.
216 --
217 -- {End Of Comments}
218 -- ----------------------------------------------------------------------------
219 Procedure delete_validate
220 (p_rec in per_qat_shd.g_rec_type
221 );
222 --
223 -- ----------------------------------------------------------------------------
224 -- |-----------------------< set_translation_globals >------------------------|
225 -- ----------------------------------------------------------------------------
226 -- {Start Of Comments}
227 --
228 -- Description:
229 -- This procedure stores values required by validate_translations.
230 --
231 -- Prerequisites:
232 -- This procedure is called from from the MLS widget enabled forms.
233 --
234 -- In Parameters:
235 --
236 -- Post Success:
237 -- Processing continues.
238 --
239 -- Post Failure:
240 -- If a business rules fails the error will not be handled by this procedure
241 --
242 -- Developer Implementation Notes:
243 --
244 -- Access Status:
245 -- MLS Widget enabled forms only just before calling validate_translation.
246 --
247 -- {End Of Comments}
248 -- ----------------------------------------------------------------------------
249 PROCEDURE set_translation_globals
250 (p_qualification_type_id in number
251 ,p_person_id in number
252 ,p_attendance_id in number
253 ,p_business_group_id in number
254 ,p_object_version_number in number
255 ,p_start_date in date
256 ,p_end_date in date
257 ,p_party_id in number
258 );
259 --
260 --
261 -- ----------------------------------------------------------------------------
262 -- |---------------------------< validate_translation >------------------------|
263 -- ----------------------------------------------------------------------------
264 -- {Start Of Comments}
265 --
266 -- Description:
267 -- This procedure performs the validation for the MLS widget.
268 --
269 -- Prerequisites:
270 -- This procedure is called from from the MLS widget.
271 --
272 -- In Parameters:
273 --
274 -- Post Success:
275 -- Processing continues.
276 --
277 -- Post Failure:
278 -- If a business rules fails the error will not be handled by this procedure
279 --
280 -- Developer Implementation Notes:
281 --
282 -- Access Status:
283 -- MLS Widget Only.
284 --
285 -- {End Of Comments}
286 -- ----------------------------------------------------------------------------
287 Procedure validate_translation
288 (p_qualification_id in number
289 ,p_language in varchar2
290 ,p_title in varchar2
291 ,p_group_ranking in varchar2
292 ,p_license_restrictions in varchar2
293 ,p_awarding_body in varchar2
294 ,p_grade_attained in varchar2
295 ,p_reimbursement_arrangements in varchar2
296 ,p_training_completed_units in varchar2
297 ,p_membership_category in varchar2
298 ,p_qualification_type_id in number default null
299 ,p_person_id in number default null
300 ,p_attendance_id in number default null
301 ,p_business_group_id in number default null
302 ,p_object_version_number in number default null
303 ,p_start_date in date default null
304 ,p_end_date in date default null
305 ,p_party_id in number default null
306 );
307
308 end per_qat_bus;