[Home] [Help]
PACKAGE BODY: APPS.PER_IN_EXTRA_ASG_INFO_LEG_HOOK
Source
6 g_debug BOOLEAN ;
1 PACKAGE BODY per_in_extra_asg_info_leg_hook AS
2 /* $Header: peinlhae.pkb 120.2 2006/05/27 18:45:26 statkar noship $ */
3 p_token_name pay_in_utils.char_tab_type;
4 p_token_value pay_in_utils.char_tab_type;
5 g_package CONSTANT VARCHAR2(100) := 'per_in_extra_asg_info_leg_hook.';
7 --
8 --------------------------------------------------------------------------
9 -- --
10 -- Name : check_asg_extra_info_insert --
11 -- Type : PROCEDURE --
12 -- Access : Public --
13 -- Description : Checks for the unique month and year of a record --
14 -- --
15 -- --
16 -- --
17 -- Parameters : --
18 -- IN : p_assignment_id NUMBER --
19 -- : p_aei_information_category VARCHAR2 --
20 -- : p_aei_information1 VARCHAR2 --
21 -- : p_aei_information2 VARCHAR2 --
22 -- OUT : N/A --
23 -- RETURN : N/A --
24 -- --
25 -- Change History : --
26 --------------------------------------------------------------------------
27 -- Rev# Date Userid Description --
28 --------------------------------------------------------------------------
29 -- 1.0 01-APR-05 abhjain Created this procedure --
30 --------------------------------------------------------------------------
31
32 PROCEDURE check_asg_extra_info_insert(
33 p_assignment_id IN NUMBER
34 ,p_aei_information_category IN VARCHAR2
35 ,p_aei_information1 IN VARCHAR2
36 ,p_aei_information2 IN VARCHAR2
37 ,p_aei_information3 IN VARCHAR2
38 ,p_aei_information4 IN VARCHAR2
39 ,p_aei_information5 IN VARCHAR2
40 ,p_aei_information6 IN VARCHAR2
41 ,p_aei_information7 IN VARCHAR2
42 ,p_aei_information8 IN VARCHAR2
43 ,p_aei_information9 IN VARCHAR2
44 ,p_aei_information10 IN VARCHAR2
45 ,p_aei_information11 IN VARCHAR2
46 ,p_aei_information12 IN VARCHAR2
47 ,p_aei_information13 IN VARCHAR2
48 ,p_aei_information14 IN VARCHAR2
49 ,p_aei_information15 IN VARCHAR2
50 ,p_aei_information16 IN VARCHAR2
51 ,p_aei_information17 IN VARCHAR2
52 ,p_aei_information18 IN VARCHAR2
53 ,p_aei_information19 IN VARCHAR2
54 ,p_aei_information20 IN VARCHAR2
55 ,p_aei_information21 IN VARCHAR2
56 ,p_aei_information22 IN VARCHAR2
57 ,p_aei_information23 IN VARCHAR2
58 ,p_aei_information24 IN VARCHAR2
59 ,p_aei_information25 IN VARCHAR2
60 ,p_aei_information26 IN VARCHAR2
61 ,p_aei_information27 IN VARCHAR2
62 ,p_aei_information28 IN VARCHAR2
63 ,p_aei_information29 IN VARCHAR2
64 ,p_aei_information30 IN VARCHAR2
65 ) IS
66
67 l_procedure VARCHAR2(100);
68 l_message_name VARCHAR2(255);
69
70 BEGIN
71
72 l_procedure := g_package ||'check_asg_extra_info_insert';
73 g_debug := hr_utility.debug_enabled;
74 pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
75
76 IF NOT hr_utility.chk_product_install('Oracle Human Resources', 'IN') THEN
77 pay_in_utils.trace('IN Legislation not installed. Not performing the validations','20');
78 RETURN;
79 END IF;
80
81 l_message_name := 'SUCCESS';
82 pay_in_utils.set_location(g_debug,l_procedure,30);
83
84 check_asg_extra_info_int(
85 p_assignment_id => p_assignment_id
86 ,p_aei_information_category => p_aei_information_category
87 ,p_aei_information1 => p_aei_information1
88 ,p_aei_information2 => p_aei_information2
89 ,p_aei_information3 => p_aei_information3
90 ,p_aei_information4 => p_aei_information4
91 ,p_aei_information5 => p_aei_information5
92 ,p_aei_information6 => p_aei_information6
93 ,p_aei_information7 => p_aei_information7
94 ,p_aei_information8 => p_aei_information8
95 ,p_aei_information9 => p_aei_information9
96 ,p_aei_information10 => p_aei_information10
97 ,p_aei_information11 => p_aei_information11
98 ,p_aei_information12 => p_aei_information12
99 ,p_aei_information13 => p_aei_information13
100 ,p_aei_information14 => p_aei_information14
101 ,p_aei_information15 => p_aei_information15
102 ,p_aei_information16 => p_aei_information16
103 ,p_aei_information17 => p_aei_information17
104 ,p_aei_information18 => p_aei_information18
105 ,p_aei_information19 => p_aei_information19
106 ,p_aei_information20 => p_aei_information20
107 ,p_aei_information21 => p_aei_information21
111 ,p_aei_information25 => p_aei_information25
108 ,p_aei_information22 => p_aei_information22
109 ,p_aei_information23 => p_aei_information23
110 ,p_aei_information24 => p_aei_information24
112 ,p_aei_information26 => p_aei_information26
113 ,p_aei_information27 => p_aei_information27
114 ,p_aei_information28 => p_aei_information28
115 ,p_aei_information29 => p_aei_information29
116 ,p_aei_information30 => p_aei_information30
117 ,p_message => l_message_name
118 ,p_token_name => p_token_name
119 ,p_token_value => p_token_value);
120
121 pay_in_utils.set_location(g_debug,l_procedure,40);
122
123 IF l_message_name <> 'HR_7207_API_MANDATORY_ARG' THEN
124 pay_in_utils.raise_message(800, l_message_name, p_token_name, p_token_value);
125 ELSE
126 pay_in_utils.raise_message(801, l_message_name, p_token_name, p_token_value);
127 END IF;
128
129 pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,50);
130
131 END check_asg_extra_info_insert;
132
133 --------------------------------------------------------------------------
134 -- --
135 -- Name : check_asg_extra_info_update --
136 -- Type : PROCEDURE --
137 -- Access : Public --
138 -- Description : Checks for the unique month and year of a record --
139 -- --
140 -- --
141 -- --
142 -- Parameters : --
143 -- IN : p_assignment_extra_info_id NUMBER --
144 -- : p_aei_information_category VARCHAR2 --
145 -- : p_aei_information1 VARCHAR2 --
146 -- : p_aei_information2 VARCHAR2 --
147 -- OUT : N/A --
148 -- RETURN : N/A --
149 -- --
150 -- Change History : --
151 --------------------------------------------------------------------------
152 -- Rev# Date Userid Description --
153 --------------------------------------------------------------------------
154 -- 1.0 01-APR-05 abhjain Created this procedure --
155 --------------------------------------------------------------------------
156
157 PROCEDURE check_asg_extra_info_update(
158 p_assignment_extra_info_id IN NUMBER
159 ,p_aei_information_category IN VARCHAR2
160 ,p_aei_information1 IN VARCHAR2
161 ,p_aei_information2 IN VARCHAR2
162 ,p_aei_information3 IN VARCHAR2
163 ,p_aei_information4 IN VARCHAR2
164 ,p_aei_information5 IN VARCHAR2
165 ,p_aei_information6 IN VARCHAR2
166 ,p_aei_information7 IN VARCHAR2
167 ,p_aei_information8 IN VARCHAR2
168 ,p_aei_information9 IN VARCHAR2
169 ,p_aei_information10 IN VARCHAR2
170 ,p_aei_information11 IN VARCHAR2
171 ,p_aei_information12 IN VARCHAR2
172 ,p_aei_information13 IN VARCHAR2
173 ,p_aei_information14 IN VARCHAR2
174 ,p_aei_information15 IN VARCHAR2
175 ,p_aei_information16 IN VARCHAR2
176 ,p_aei_information17 IN VARCHAR2
177 ,p_aei_information18 IN VARCHAR2
178 ,p_aei_information19 IN VARCHAR2
179 ,p_aei_information20 IN VARCHAR2
180 ,p_aei_information21 IN VARCHAR2
181 ,p_aei_information22 IN VARCHAR2
182 ,p_aei_information23 IN VARCHAR2
183 ,p_aei_information24 IN VARCHAR2
184 ,p_aei_information25 IN VARCHAR2
185 ,p_aei_information26 IN VARCHAR2
186 ,p_aei_information27 IN VARCHAR2
187 ,p_aei_information28 IN VARCHAR2
188 ,p_aei_information29 IN VARCHAR2
189 ,p_aei_information30 IN VARCHAR2
190 ) IS
191
192
193 CURSOR get_assignment_id
194 IS
195 SELECT assignment_id
196 ,aei_information1
197 ,aei_information2
198 ,aei_information3
199 ,aei_information4
200 ,aei_information5
201 ,aei_information6
202 ,aei_information7
203 ,aei_information8
204 ,aei_information9
205 ,aei_information10
206 ,aei_information11
207 ,aei_information12
208 ,aei_information13
209 ,aei_information14
210 ,aei_information15
211 ,aei_information16
212 ,aei_information17
213 ,aei_information18
214 ,aei_information19
215 ,aei_information20
216 ,aei_information21
217 ,aei_information22
218 ,aei_information23
219 ,aei_information24
220 ,aei_information25
221 ,aei_information26
222 ,aei_information27
223 ,aei_information28
224 ,aei_information29
225 ,aei_information30
226 FROM per_assignment_extra_info
227 WHERE assignment_extra_info_id = p_assignment_extra_info_id;
228
229 l_procedure VARCHAR2(100);
233 l_aei_information2 per_assignment_extra_info.aei_information1%type;
230 l_message_name VARCHAR2(255);
231 l_assignment_id per_assignment_extra_info.assignment_id%type;
232 l_aei_information1 per_assignment_extra_info.aei_information1%type;
234 l_aei_information3 per_assignment_extra_info.aei_information1%type;
235 l_aei_information4 per_assignment_extra_info.aei_information1%type;
236 l_aei_information5 per_assignment_extra_info.aei_information1%type;
237 l_aei_information6 per_assignment_extra_info.aei_information1%type;
238 l_aei_information7 per_assignment_extra_info.aei_information1%type;
239 l_aei_information8 per_assignment_extra_info.aei_information1%type;
240 l_aei_information9 per_assignment_extra_info.aei_information1%type;
241 l_aei_information10 per_assignment_extra_info.aei_information1%type;
242 l_aei_information11 per_assignment_extra_info.aei_information1%type;
243 l_aei_information12 per_assignment_extra_info.aei_information1%type;
244 l_aei_information13 per_assignment_extra_info.aei_information1%type;
245 l_aei_information14 per_assignment_extra_info.aei_information1%type;
246 l_aei_information15 per_assignment_extra_info.aei_information1%type;
247 l_aei_information16 per_assignment_extra_info.aei_information1%type;
248 l_aei_information17 per_assignment_extra_info.aei_information1%type;
249 l_aei_information18 per_assignment_extra_info.aei_information1%type;
250 l_aei_information19 per_assignment_extra_info.aei_information1%type;
251 l_aei_information20 per_assignment_extra_info.aei_information1%type;
252 l_aei_information21 per_assignment_extra_info.aei_information1%type;
253 l_aei_information22 per_assignment_extra_info.aei_information1%type;
254 l_aei_information23 per_assignment_extra_info.aei_information1%type;
255 l_aei_information24 per_assignment_extra_info.aei_information1%type;
256 l_aei_information25 per_assignment_extra_info.aei_information1%type;
257 l_aei_information26 per_assignment_extra_info.aei_information1%type;
258 l_aei_information27 per_assignment_extra_info.aei_information1%type;
259 l_aei_information28 per_assignment_extra_info.aei_information1%type;
260 l_aei_information29 per_assignment_extra_info.aei_information1%type;
261 l_aei_information30 per_assignment_extra_info.aei_information1%type;
262 BEGIN
263
264
265 l_procedure := g_package ||'check_asg_extra_info_update';
266 g_debug := hr_utility.debug_enabled;
267 pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
268
269 IF NOT hr_utility.chk_product_install('Oracle Human Resources', 'IN') THEN
270 pay_in_utils.trace('IN Legislation not installed. Not performing the validations','20');
271 RETURN;
272 END IF;
273
274 l_message_name := 'SUCCESS';
275 pay_in_utils.set_location(g_debug,l_procedure,30);
276
277 OPEN get_assignment_id;
278 FETCH get_assignment_id INTO l_assignment_id
279 ,l_aei_information1
280 ,l_aei_information2
281 ,l_aei_information3
282 ,l_aei_information4
283 ,l_aei_information5
284 ,l_aei_information6
285 ,l_aei_information7
286 ,l_aei_information8
287 ,l_aei_information9
288 ,l_aei_information10
289 ,l_aei_information11
290 ,l_aei_information12
291 ,l_aei_information13
292 ,l_aei_information14
293 ,l_aei_information15
294 ,l_aei_information16
295 ,l_aei_information17
296 ,l_aei_information18
297 ,l_aei_information19
298 ,l_aei_information20
299 ,l_aei_information21
300 ,l_aei_information22
301 ,l_aei_information23
302 ,l_aei_information24
303 ,l_aei_information25
304 ,l_aei_information26
305 ,l_aei_information27
306 ,l_aei_information28
307 ,l_aei_information29
308 ,l_aei_information30;
309 CLOSE get_assignment_id;
310
311 pay_in_utils.set_location(g_debug,l_procedure,40);
312
313 IF p_aei_information1 <> hr_api.g_varchar2 THEN
314 l_aei_information1 := p_aei_information1;
315 END IF;
316 IF p_aei_information2 <> hr_api.g_varchar2 THEN
317 l_aei_information2 := p_aei_information2;
318 END IF;
319 IF p_aei_information3 <> hr_api.g_varchar2 THEN
320 l_aei_information3 := p_aei_information3;
321 END IF;
322 IF p_aei_information4 <> hr_api.g_varchar2 THEN
323 l_aei_information4 := p_aei_information4;
324 END IF;
325 IF p_aei_information5 <> hr_api.g_varchar2 THEN
326 l_aei_information5 := p_aei_information5;
327 END IF;
328 IF p_aei_information6 <> hr_api.g_varchar2 THEN
329 l_aei_information6 := p_aei_information6;
330 END IF;
331 IF p_aei_information7 <> hr_api.g_varchar2 THEN
332 l_aei_information7 := p_aei_information7;
333 END IF;
334 IF p_aei_information8 <> hr_api.g_varchar2 THEN
335 l_aei_information8 := p_aei_information8;
336 END IF;
337 IF p_aei_information9 <> hr_api.g_varchar2 THEN
338 l_aei_information9 := p_aei_information9;
339 END IF;
343 IF p_aei_information11 <> hr_api.g_varchar2 THEN
340 IF p_aei_information10 <> hr_api.g_varchar2 THEN
341 l_aei_information10 := p_aei_information10;
342 END IF;
344 l_aei_information11 := p_aei_information11;
345 END IF;
346 IF p_aei_information12 <> hr_api.g_varchar2 THEN
347 l_aei_information12 := p_aei_information12;
348 END IF;
349 IF p_aei_information13 <> hr_api.g_varchar2 THEN
350 l_aei_information13 := p_aei_information13;
351 END IF;
352 IF p_aei_information14 <> hr_api.g_varchar2 THEN
353 l_aei_information14 := p_aei_information14;
354 END IF;
355 IF p_aei_information15 <> hr_api.g_varchar2 THEN
356 l_aei_information15 := p_aei_information15;
357 END IF;
358 IF p_aei_information16 <> hr_api.g_varchar2 THEN
359 l_aei_information16 := p_aei_information16;
360 END IF;
361 IF p_aei_information17 <> hr_api.g_varchar2 THEN
362 l_aei_information17 := p_aei_information17;
363 END IF;
364 IF p_aei_information18 <> hr_api.g_varchar2 THEN
365 l_aei_information18 := p_aei_information18;
366 END IF;
367 IF p_aei_information19 <> hr_api.g_varchar2 THEN
368 l_aei_information19 := p_aei_information19;
369 END IF;
370 IF p_aei_information20 <> hr_api.g_varchar2 THEN
371 l_aei_information20 := p_aei_information20;
372 END IF;
373 IF p_aei_information21 <> hr_api.g_varchar2 THEN
374 l_aei_information21 := p_aei_information21;
375 END IF;
376 IF p_aei_information22 <> hr_api.g_varchar2 THEN
377 l_aei_information22 := p_aei_information22;
378 END IF;
379 IF p_aei_information23 <> hr_api.g_varchar2 THEN
380 l_aei_information23 := p_aei_information23;
381 END IF;
382 IF p_aei_information24 <> hr_api.g_varchar2 THEN
383 l_aei_information24 := p_aei_information24;
384 END IF;
385 IF p_aei_information25 <> hr_api.g_varchar2 THEN
386 l_aei_information25 := p_aei_information25;
387 END IF;
388 IF p_aei_information26 <> hr_api.g_varchar2 THEN
389 l_aei_information26 := p_aei_information26;
390 END IF;
391 IF p_aei_information27 <> hr_api.g_varchar2 THEN
392 l_aei_information27 := p_aei_information27;
393 END IF;
394 IF p_aei_information28 <> hr_api.g_varchar2 THEN
395 l_aei_information28 := p_aei_information28;
396 END IF;
397 IF p_aei_information29 <> hr_api.g_varchar2 THEN
398 l_aei_information29 := p_aei_information29;
399 END IF;
400 IF p_aei_information30 <> hr_api.g_varchar2 THEN
401 l_aei_information30 := p_aei_information30;
402 END IF;
403
404 pay_in_utils.set_location(g_debug,l_procedure,50);
405 check_asg_extra_info_int(
406 p_assignment_id => l_assignment_id
407 ,p_assignment_extra_info_id => p_assignment_extra_info_id
408 ,p_aei_information_category => p_aei_information_category
409 ,p_aei_information1 => l_aei_information1
410 ,p_aei_information2 => l_aei_information2
411 ,p_aei_information3 => l_aei_information3
412 ,p_aei_information4 => l_aei_information4
413 ,p_aei_information5 => l_aei_information5
414 ,p_aei_information6 => l_aei_information6
415 ,p_aei_information7 => l_aei_information7
416 ,p_aei_information8 => l_aei_information8
417 ,p_aei_information9 => l_aei_information9
418 ,p_aei_information10 => l_aei_information10
419 ,p_aei_information11 => l_aei_information11
420 ,p_aei_information12 => l_aei_information12
421 ,p_aei_information13 => l_aei_information13
422 ,p_aei_information14 => l_aei_information14
423 ,p_aei_information15 => l_aei_information15
424 ,p_aei_information16 => l_aei_information16
425 ,p_aei_information17 => l_aei_information17
426 ,p_aei_information18 => l_aei_information18
427 ,p_aei_information19 => l_aei_information19
428 ,p_aei_information20 => l_aei_information20
429 ,p_aei_information21 => l_aei_information21
430 ,p_aei_information22 => l_aei_information22
431 ,p_aei_information23 => l_aei_information23
432 ,p_aei_information24 => l_aei_information24
433 ,p_aei_information25 => l_aei_information25
434 ,p_aei_information26 => l_aei_information26
435 ,p_aei_information27 => l_aei_information27
436 ,p_aei_information28 => l_aei_information28
437 ,p_aei_information29 => l_aei_information29
438 ,p_aei_information30 => l_aei_information30
439 ,p_message => l_message_name
440 ,p_token_name => p_token_name
441 ,p_token_value => p_token_value);
442 pay_in_utils.set_location(g_debug,l_procedure,60);
443 IF l_message_name <> 'HR_7207_API_MANDATORY_ARG' THEN
444 pay_in_utils.raise_message(800, l_message_name, p_token_name, p_token_value);
445 ELSE
446 pay_in_utils.raise_message(801, l_message_name, p_token_name, p_token_value);
447 END IF;
448 pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,70);
449
450
451 END check_asg_extra_info_update;
452
453 --------------------------------------------------------------------------
454 -- --
455 -- Name : check_asg_extra_info_int --
456 -- Type : PROCEDURE --
457 -- Access : Public --
461 -- --
458 -- Description : User hook checks --
459 -- --
460 -- --
462 -- Parameters : --
463 -- IN : p_assignment_id NUMBER --
464 -- : p_aei_information_category VARCHAR2 --
465 -- : p_assignment_extra_info_id VARCHAR2 --
466 -- : p_aei_information1 VARCHAR2 --
467 -- : p_aei_information2 VARCHAR2 --
468 -- OUT : N/A --
469 -- RETURN : N/A --
470 -- --
471 -- Change History : --
472 --------------------------------------------------------------------------
473 -- Rev# Date Userid Description --
474 --------------------------------------------------------------------------
475 -- 1.0 07-APR-05 abhjain Created this procedure --
476 --------------------------------------------------------------------------
477 PROCEDURE check_asg_extra_info_int(
478 p_assignment_id IN NUMBER
479 ,p_assignment_extra_info_id IN NUMBER default null
480 ,p_aei_information_category IN VARCHAR2
481 ,p_aei_information1 IN VARCHAR2
482 ,p_aei_information2 IN VARCHAR2
483 ,p_aei_information3 IN VARCHAR2
484 ,p_aei_information4 IN VARCHAR2
485 ,p_aei_information5 IN VARCHAR2
486 ,p_aei_information6 IN VARCHAR2
487 ,p_aei_information7 IN VARCHAR2
488 ,p_aei_information8 IN VARCHAR2
489 ,p_aei_information9 IN VARCHAR2
490 ,p_aei_information10 IN VARCHAR2
491 ,p_aei_information11 IN VARCHAR2
492 ,p_aei_information12 IN VARCHAR2
493 ,p_aei_information13 IN VARCHAR2
494 ,p_aei_information14 IN VARCHAR2
495 ,p_aei_information15 IN VARCHAR2
496 ,p_aei_information16 IN VARCHAR2
497 ,p_aei_information17 IN VARCHAR2
498 ,p_aei_information18 IN VARCHAR2
499 ,p_aei_information19 IN VARCHAR2
500 ,p_aei_information20 IN VARCHAR2
501 ,p_aei_information21 IN VARCHAR2
502 ,p_aei_information22 IN VARCHAR2
503 ,p_aei_information23 IN VARCHAR2
504 ,p_aei_information24 IN VARCHAR2
505 ,p_aei_information25 IN VARCHAR2
506 ,p_aei_information26 IN VARCHAR2
507 ,p_aei_information27 IN VARCHAR2
508 ,p_aei_information28 IN VARCHAR2
509 ,p_aei_information29 IN VARCHAR2
510 ,p_aei_information30 IN VARCHAR2
511 ,p_message OUT NOCOPY VARCHAR2
512 ,p_token_name OUT NOCOPY pay_in_utils.char_tab_type
513 ,p_token_value OUT NOCOPY pay_in_utils.char_tab_type) IS
514 CURSOR cur_check_unique_record_ins
515 IS
516 SELECT 1
517 FROM PER_ASSIGNMENT_EXTRA_INFO
518 WHERE assignment_id = p_assignment_id
519 AND aei_information1 = p_aei_information1
520 AND aei_information2 = p_aei_information2
521 AND aei_information_category = p_aei_information_category;
522
523 CURSOR cur_check_unique_record_upd
524 IS
525 SELECT 1
526 FROM PER_ASSIGNMENT_EXTRA_INFO
527 WHERE aei_information1 = p_aei_information1
528 AND aei_information2 = p_aei_information2
529 AND aei_information_category = p_aei_information_category
530 AND assignment_id = p_assignment_id
531 AND assignment_extra_info_id <> p_assignment_extra_info_id;
532
533 l_procedure VARCHAR2(100);
534 l_temp NUMBER;
535 l_message_name VARCHAR2(80);
536
537 BEGIN
538 p_message := 'SUCCESS';
539 l_procedure := g_package ||'check_asg_extra_info_int';
540 g_debug := hr_utility.debug_enabled ;
541 pay_in_utils.set_location(g_debug,'Entering: '||l_procedure,10);
542
543 IF p_aei_information_category = 'PER_IN_PF_REMARKS'
544 OR p_aei_information_category = 'PER_IN_ESI_REMARKS' THEN
545 --
546 IF p_assignment_extra_info_id IS NULL THEN
547 OPEN cur_check_unique_record_ins;
548 FETCH cur_check_unique_record_ins INTO l_temp;
549 CLOSE cur_check_unique_record_ins;
550
551 pay_in_utils.set_location(g_debug,l_procedure,20);
552
553 IF l_temp = 1 THEN
554 p_message := 'PER_IN_MULTIPLE_REMARKS';
555 pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,30);
556 RETURN;
557 END IF;
558
559 ELSIF p_assignment_extra_info_id IS NOT NULL THEN
560 OPEN cur_check_unique_record_upd;
561 FETCH cur_check_unique_record_upd INTO l_temp;
562 CLOSE cur_check_unique_record_upd;
563
564 pay_in_utils.set_location(g_debug,l_procedure,40);
565
566 IF l_temp = 1 THEN
567 p_message := 'PER_IN_MULTIPLE_REMARKS';
568 pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,50);
569 RETURN;
570 END IF;
571
572 END IF;
573 pay_in_utils.set_location(g_debug,'Leaving: '||l_procedure,60);
574
575 END IF;
576
577 END check_asg_extra_info_int;
578
579 END per_in_extra_asg_info_leg_hook;