1 PACKAGE BODY PAY_PAYGBP35_XMLP_PKG AS
2 /* $Header: PAYGBP35B.pls 120.0 2008/01/07 15:34:55 srikrish noship $ */
3 FUNCTION C_PAY_CONTRIBSFORMULA(SUM_PAY_CONTRIBS IN NUMBER) RETURN NUMBER IS
4 BEGIN
5 BEGIN
6 IF SUM_PAY_CONTRIBS > 0 THEN
7 RETURN (TO_CHAR(SUM_PAY_CONTRIBS / 100
8 ,'99999999990.00'));
9 ELSE
10 RETURN ('0.00');
11 END IF;
12 EXCEPTION
13 WHEN OTHERS THEN
14 NULL;
15 END;
16 RETURN NULL;
17 END C_PAY_CONTRIBSFORMULA;
18
19 FUNCTION C_PAY_SSPFORMULA(SUM_PAY_SSP IN NUMBER) RETURN NUMBER IS
20 BEGIN
21 BEGIN
22 IF NVL(SUM_PAY_SSP
23 ,0) > 0 THEN
24 RETURN (TO_CHAR(SUM_PAY_SSP / 100
25 ,'999999990.00'));
26 ELSE
27 RETURN ('0.00');
28 END IF;
29 END;
30 RETURN NULL;
31 END C_PAY_SSPFORMULA;
32
33 FUNCTION C_PAY_SMPFORMULA(SUM_PAY_SMP IN NUMBER) RETURN NUMBER IS
34 BEGIN
35 BEGIN
36 IF NVL(SUM_PAY_SMP
37 ,0) > 0 THEN
38 RETURN (TO_CHAR(SUM_PAY_SMP / 100
39 ,'999999990.00'));
40 ELSE
41 RETURN ('0.00');
42 END IF;
43 END;
44 RETURN NULL;
45 END C_PAY_SMPFORMULA;
46
47 FUNCTION C_PAY_GROSSFORMULA(SUM_PAY_GROSS IN NUMBER) RETURN NUMBER IS
48 BEGIN
49 BEGIN
50 IF NVL(SUM_PAY_GROSS
51 ,0) > 0 THEN
52 RETURN (TO_CHAR(SUM_PAY_GROSS / 100
53 ,'99999999990.00'));
54 ELSE
55 RETURN ('0.00');
56 END IF;
57 END;
58 RETURN NULL;
59 END C_PAY_GROSSFORMULA;
60
61 FUNCTION C_PAY_TAXFORMULA(SUM_PAY_TAX IN NUMBER) RETURN NUMBER IS
62 BEGIN
63 BEGIN
64 IF NVL(SUM_PAY_TAX
65 ,0) = 0 THEN
66 RETURN ('0.00');
67 ELSE
68 RETURN (TO_CHAR(SUM_PAY_TAX / 100
69 ,'99999999990.00'));
70 END IF;
71 END;
72 RETURN NULL;
73 END C_PAY_TAXFORMULA;
74
75 FUNCTION C_PAY_PREV_GROSSFORMULA(SUM_PAY_PREV_GROSS IN NUMBER) RETURN NUMBER IS
76 BEGIN
77 BEGIN
78 IF NVL(SUM_PAY_PREV_GROSS
79 ,0) > 0 THEN
80 RETURN (TO_CHAR(SUM_PAY_PREV_GROSS / 100
81 ,'99999999990.00'));
82 ELSE
83 RETURN ('0.00');
84 END IF;
85 END;
86 RETURN NULL;
87 END C_PAY_PREV_GROSSFORMULA;
88
89 FUNCTION C_PAY_PREV_TAXFORMULA(SUM_PAY_PREV_TAX IN NUMBER) RETURN NUMBER IS
90 BEGIN
91 BEGIN
92 IF NVL(SUM_PAY_PREV_TAX
93 ,0) > 0 THEN
94 RETURN (TO_CHAR(SUM_PAY_PREV_TAX / 100
95 ,'99999999990.00'));
96 ELSE
97 RETURN ('0.00');
98 END IF;
99 END;
100 RETURN NULL;
101 END C_PAY_PREV_TAXFORMULA;
102
103 FUNCTION C_EOY_CONTRIBSFORMULA(SUM_EOY_CONTRIBS IN NUMBER) RETURN NUMBER IS
104 BEGIN
105 BEGIN
106 IF NVL(SUM_EOY_CONTRIBS
107 ,0) > 0 THEN
108 RETURN (TO_CHAR(SUM_EOY_CONTRIBS / 100
109 ,'99999999990.00'));
110 ELSE
111 RETURN ('0.0');
112 END IF;
113 END;
114 RETURN NULL;
115 END C_EOY_CONTRIBSFORMULA;
116
117 FUNCTION C_EOY_SSPFORMULA(SUM_EOY_SSP IN NUMBER) RETURN NUMBER IS
118 BEGIN
119 BEGIN
120 IF NVL(SUM_EOY_SSP
121 ,0) > 0 THEN
122 RETURN (TO_CHAR(SUM_EOY_SSP / 100
123 ,'999999990.00'));
124 ELSE
125 RETURN ('0.0');
126 END IF;
127 END;
128 RETURN NULL;
129 END C_EOY_SSPFORMULA;
130
131 FUNCTION C_EOY_SMPFORMULA(SUM_EOY_SMP IN NUMBER) RETURN NUMBER IS
132 BEGIN
133 BEGIN
134 IF NVL(SUM_EOY_SMP
135 ,0) > 0 THEN
136 RETURN (TO_CHAR(SUM_EOY_SMP / 100
137 ,'999999990.00'));
138 ELSE
139 RETURN ('0.0');
140 END IF;
141 END;
142 RETURN NULL;
143 END C_EOY_SMPFORMULA;
144
145 FUNCTION C_EOY_GROSSFORMULA(SUM_EOY_GROSS IN NUMBER) RETURN NUMBER IS
146 BEGIN
147 BEGIN
148 IF NVL(SUM_EOY_GROSS
149 ,0) > 0 THEN
150 RETURN (TO_CHAR(SUM_EOY_GROSS / 100
151 ,'99999999990.00'));
152 ELSE
153 RETURN ('0.0');
154 END IF;
155 END;
156 RETURN NULL;
157 END C_EOY_GROSSFORMULA;
158
159 FUNCTION C_EOY_TAXFORMULA(SUM_EOY_TAX IN NUMBER) RETURN NUMBER IS
160 BEGIN
161 BEGIN
162 IF NVL(SUM_EOY_TAX
163 ,0) = 0 THEN
164 RETURN ('0.0');
165 ELSE
166 RETURN (TO_CHAR(SUM_EOY_TAX / 100
167 ,'99999999990.00'));
168 END IF;
169 END;
170 RETURN NULL;
171 END C_EOY_TAXFORMULA;
172
173 FUNCTION C_EOY_PREV_GROSSFORMULA(SUM_EOY_PREV_GROSS IN NUMBER) RETURN NUMBER IS
174 BEGIN
175 BEGIN
176 IF NVL(SUM_EOY_PREV_GROSS
177 ,0) > 0 THEN
178 RETURN (TO_CHAR(SUM_EOY_PREV_GROSS / 100));
179 ELSE
180 RETURN ('0.0');
181 END IF;
182 END;
183 RETURN NULL;
184 END C_EOY_PREV_GROSSFORMULA;
185
186 FUNCTION C_EOY_PREV_TAXFORMULA(SUM_EOY_PREV_TAX IN NUMBER) RETURN NUMBER IS
187 BEGIN
188 BEGIN
189 IF NVL(SUM_EOY_PREV_TAX
190 ,0) > 0 THEN
191 RETURN (TO_CHAR(SUM_EOY_PREV_TAX / 100));
192 ELSE
193 RETURN ('0.0');
194 END IF;
195 END;
196 RETURN NULL;
197 END C_EOY_PREV_TAXFORMULA;
198
199 FUNCTION C_TOT_CONTRIBSFORMULA(SUM_TOT_CONTRIBS IN NUMBER) RETURN NUMBER IS
200 BEGIN
201 BEGIN
202 IF NVL(SUM_TOT_CONTRIBS
203 ,0) > 0 THEN
204 RETURN (TO_CHAR(SUM_TOT_CONTRIBS / 100
205 ,'99999999990.00'));
206 ELSE
207 RETURN ('0.00');
208 END IF;
209 END;
210 RETURN NULL;
211 END C_TOT_CONTRIBSFORMULA;
212
213 FUNCTION C_TOT_SSPFORMULA(SUM_TOT_SSP IN NUMBER) RETURN NUMBER IS
214 BEGIN
215 BEGIN
216 IF NVL(SUM_TOT_SSP
217 ,0) > 0 THEN
218 RETURN (TO_CHAR(SUM_TOT_SSP / 100
219 ,'999999990.00'));
220 ELSE
221 RETURN ('0.00');
222 END IF;
223 END;
224 RETURN NULL;
225 END C_TOT_SSPFORMULA;
226
227 FUNCTION C_TOT_SMPFORMULA(SUM_TOT_SMP IN NUMBER) RETURN NUMBER IS
228 BEGIN
229 BEGIN
230 IF NVL(SUM_TOT_SMP
231 ,0) > 0 THEN
232 RETURN (TO_CHAR(SUM_TOT_SMP / 100
233 ,'999999990.00'));
234 ELSE
235 RETURN ('0.00');
236 END IF;
237 END;
238 RETURN NULL;
239 END C_TOT_SMPFORMULA;
240
241 FUNCTION C_TOT_GROSSFORMULA(SUM_TOT_GROSS IN NUMBER) RETURN NUMBER IS
242 BEGIN
243 BEGIN
244 IF NVL(SUM_TOT_GROSS
245 ,0) > 0 THEN
246 RETURN (TO_CHAR(SUM_TOT_GROSS / 100
247 ,'99999999990.00'));
248 ELSE
249 RETURN ('0.00');
250 END IF;
251 END;
252 RETURN NULL;
253 END C_TOT_GROSSFORMULA;
254
255 FUNCTION C_TOT_TAXFORMULA(SUM_TOT_TAX IN NUMBER) RETURN NUMBER IS
256 BEGIN
257 BEGIN
258 IF NVL(SUM_TOT_TAX
259 ,0) = 0 THEN
260 RETURN ('0.00');
261 ELSE
262 RETURN (TO_CHAR(SUM_TOT_TAX / 100
263 ,'99999999990.00'));
264 END IF;
265 END;
266 RETURN NULL;
267 END C_TOT_TAXFORMULA;
268
269 FUNCTION C_TOT_PREV_GROSFORMULA(SUM_TOT_PREV_GROSS IN NUMBER) RETURN NUMBER IS
270 BEGIN
271 BEGIN
272 IF NVL(SUM_TOT_PREV_GROSS
273 ,0) > 0 THEN
274 RETURN (TO_CHAR(SUM_TOT_PREV_GROSS / 100
275 ,'99999999990.00'));
276 ELSE
277 RETURN ('0.00');
278 END IF;
279 END;
280 RETURN NULL;
281 END C_TOT_PREV_GROSFORMULA;
282
283 FUNCTION C_TOT_PREV_TAXFORMULA(SUM_TOT_PREV_TAX IN NUMBER) RETURN NUMBER IS
284 BEGIN
285 BEGIN
286 IF NVL(SUM_TOT_PREV_TAX
287 ,0) > 0 THEN
288 RETURN (TO_CHAR(SUM_TOT_PREV_TAX / 100
289 ,'99999999990.00'));
290 ELSE
291 RETURN ('0.00');
292 END IF;
293 END;
294 RETURN NULL;
295 END C_TOT_PREV_TAXFORMULA;
296
297 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
298 BEGIN
299 DECLARE
300 L_BUSINESS_GROUP_ID NUMBER;
301 L_LEGISLATIVE_PARAMETERS VARCHAR2(240);
302 BEGIN
303 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
304 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
305 SELECT
306 A.BUSINESS_GROUP_ID,
307 A.REQUEST_ID,
308 A.LEGISLATIVE_PARAMETERS,
309 A.START_DATE,
310 A.EFFECTIVE_DATE,
311 TO_NUMBER(SUBSTR(TO_CHAR(A.START_DATE
312 ,'DD-MM-YYYY')
313 ,7
314 ,4))
315 INTO L_BUSINESS_GROUP_ID,C_REQUEST_ID,L_LEGISLATIVE_PARAMETERS,C_START_DATE,C_END_DATE,C_DATE_FROM
316 FROM
317 PAY_PAYROLL_ACTIONS A
318 WHERE A.PAYROLL_ACTION_ID = P_PAYROLL_ACTION_ID;
319 C_TAX_DISTRICT := PAY_GB_EOY_ARCHIVE.GET_PARAMETER(L_LEGISLATIVE_PARAMETERS
320 ,'TAX_REF'
321 ,NULL);
322 C_PERMIT_NO := PAY_GB_EOY_ARCHIVE.GET_PARAMETER(L_LEGISLATIVE_PARAMETERS
323 ,'PERMIT'
324 ,NULL);
325 C_BUSINESS_GROUP_NAME := HR_REPORTS.GET_BUSINESS_GROUP(L_BUSINESS_GROUP_ID);
326 C_DATE_FROM_TO := TO_CHAR(C_DATE_FROM) || '/' || TO_CHAR(C_DATE_FROM + 1);
327 EXCEPTION
328 WHEN NO_DATA_FOUND THEN
329 NULL;
330 END;
331 RETURN (TRUE);
332 END BEFOREREPORT;
333
334 FUNCTION C_NI_VALUEFORMULA(NI_CODE IN VARCHAR2
335 ,SUM_CONTRIBS IN NUMBER) RETURN NUMBER IS
336 BEGIN
337 IF (NI_CODE <> 'P') THEN
338 RETURN (SUM_CONTRIBS);
339 ELSE
340 RETURN (0.0);
341 END IF;
342 RETURN NULL;
343 END C_NI_VALUEFORMULA;
344
345 FUNCTION C_NIP_VALUEFORMULA(NI_CODE IN VARCHAR2
346 ,SUM_CONTRIBS IN NUMBER) RETURN NUMBER IS
347 BEGIN
348 IF (NI_CODE = 'P') THEN
349 RETURN (SUM_CONTRIBS);
350 ELSE
351 RETURN (0.0);
352 END IF;
353 RETURN NULL;
354 END C_NIP_VALUEFORMULA;
355
356 FUNCTION C_EOY_NIPFORMULA(SUM_EOY_CONTRIBS IN NUMBER
357 ,SUM_EOY_NIP IN NUMBER) RETURN NUMBER IS
358 BEGIN
359 BEGIN
360 IF NVL(SUM_EOY_CONTRIBS
361 ,0) > 0 THEN
362 RETURN (TO_CHAR(SUM_EOY_NIP / 100
363 ,'9999999990.00'));
364 ELSE
365 RETURN ('0.0');
366 END IF;
367 END;
368 RETURN NULL;
369 END C_EOY_NIPFORMULA;
370
371 FUNCTION C_TOT_NIPFORMULA(SUM_TOT_CONTRIBS IN NUMBER
372 ,SUM_TOT_NIP IN NUMBER) RETURN NUMBER IS
373 BEGIN
374 BEGIN
375 IF NVL(SUM_TOT_CONTRIBS
376 ,0) > 0 THEN
377 RETURN (TO_CHAR(SUM_TOT_NIP / 100
378 ,'99999999990.00'));
379 ELSE
380 RETURN ('0.00');
384 END C_TOT_NIPFORMULA;
381 END IF;
382 END;
383 RETURN NULL;
385
386 FUNCTION C_SMP_NI_COMPFORMULA(SMP_NI_COMP IN NUMBER) RETURN NUMBER IS
387 BEGIN
388 BEGIN
389 IF NVL(SMP_NI_COMP
390 ,0) > 0 THEN
391 RETURN (TO_CHAR(SMP_NI_COMP / 100
392 ,'999999990.00'));
393 ELSE
394 RETURN ('0.00');
395 END IF;
396 END;
397 RETURN NULL;
398 END C_SMP_NI_COMPFORMULA;
399
400 FUNCTION C_SMP_RECFORMULA(SMP_REC IN NUMBER) RETURN NUMBER IS
401 BEGIN
402 BEGIN
403 IF NVL(SMP_REC
404 ,0) > 0 THEN
405 RETURN (TO_CHAR(SMP_REC / 100
406 ,'999999990.00'));
407 ELSE
408 RETURN ('0.00');
409 END IF;
410 END;
411 RETURN NULL;
412 END C_SMP_RECFORMULA;
413
414 FUNCTION C_SSP_RECFORMULA(SSP_REC IN NUMBER) RETURN NUMBER IS
415 BEGIN
416 BEGIN
417 IF NVL(SSP_REC
418 ,0) > 0 THEN
419 RETURN (TO_CHAR(SSP_REC / 100
420 ,'999999990.00'));
421 ELSE
422 RETURN ('0.00');
423 END IF;
424 END;
425 RETURN NULL;
426 END C_SSP_RECFORMULA;
427
428 FUNCTION C_NIP_CONTRIBSFORMULA(SUM_PAY_CONTRIBS IN NUMBER
429 ,SUM_NIP_CONTRIBS IN NUMBER) RETURN NUMBER IS
430 BEGIN
431 BEGIN
432 IF SUM_PAY_CONTRIBS > 0 THEN
433 RETURN (TO_CHAR(SUM_NIP_CONTRIBS / 100
434 ,'9999999990.00'));
435 ELSE
436 RETURN ('0.00');
437 END IF;
438 EXCEPTION
439 WHEN OTHERS THEN
440 NULL;
441 END;
442 RETURN NULL;
443 END C_NIP_CONTRIBSFORMULA;
444
445 FUNCTION C_EOY_SMP_RECFORMULA(EOY_SMP_REC IN NUMBER) RETURN NUMBER IS
446 BEGIN
447 BEGIN
448 IF NVL(EOY_SMP_REC
449 ,0) > 0 THEN
450 RETURN (TO_CHAR(EOY_SMP_REC / 100
451 ,'999999990.00'));
452 ELSE
453 RETURN ('0.00');
454 END IF;
455 END;
456 RETURN NULL;
457 END C_EOY_SMP_RECFORMULA;
458
459 FUNCTION C_EOY_SSP_RECFORMULA(EOY_SSP_REC IN NUMBER) RETURN NUMBER IS
460 BEGIN
461 BEGIN
462 IF NVL(EOY_SSP_REC
463 ,0) > 0 THEN
464 RETURN (TO_CHAR(EOY_SSP_REC / 100
465 ,'9999999990.00'));
466 ELSE
467 RETURN ('0.00');
468 END IF;
469 END;
470 RETURN NULL;
471 END C_EOY_SSP_RECFORMULA;
472
473 FUNCTION C_EOY_SMP_NI_COMPFORMULA(EOY_SMP_NI_COMP IN NUMBER) RETURN NUMBER IS
474 BEGIN
475 BEGIN
476 IF NVL(EOY_SMP_NI_COMP
477 ,0) > 0 THEN
478 RETURN (TO_CHAR(EOY_SMP_NI_COMP / 100
479 ,'9999999990.00'));
480 ELSE
481 RETURN ('0.00');
482 END IF;
483 END;
484 RETURN NULL;
485 END C_EOY_SMP_NI_COMPFORMULA;
486
487 FUNCTION C_SUM_SMP_RECFORMULA(SUM_SMP_REC IN NUMBER) RETURN NUMBER IS
488 BEGIN
489 BEGIN
490 IF NVL(SUM_SMP_REC
491 ,0) > 0 THEN
492 RETURN (TO_CHAR(SUM_SMP_REC / 100
493 ,'99999999990.00'));
494 ELSE
495 RETURN ('0.00');
496 END IF;
497 END;
498 RETURN NULL;
499 END C_SUM_SMP_RECFORMULA;
500
501 FUNCTION C_SUM_SMP_NI_COMPFORMULA(SUM_SMP_NI_COMP IN NUMBER) RETURN NUMBER IS
502 BEGIN
503 BEGIN
504 IF NVL(SUM_SMP_NI_COMP
505 ,0) > 0 THEN
506 RETURN (TO_CHAR(SUM_SMP_NI_COMP / 100
507 ,'999999990.00'));
508 ELSE
509 RETURN ('0.00');
510 END IF;
511 END;
512 RETURN NULL;
513 END C_SUM_SMP_NI_COMPFORMULA;
514
515 FUNCTION C_SUM_SSP_RECFORMULA(SUM_SSP_REC IN NUMBER) RETURN NUMBER IS
516 BEGIN
517 BEGIN
518 IF NVL(SUM_SSP_REC
519 ,0) > 0 THEN
520 RETURN (TO_CHAR(SUM_SSP_REC / 100
521 ,'999999990.00'));
522 ELSE
523 RETURN ('0.00');
524 END IF;
525 END;
526 RETURN NULL;
527 END C_SUM_SSP_RECFORMULA;
528
529 FUNCTION C_EOY_SPP_BIRTHFORMULA(SUM_EOY_SPP_BIRTH IN NUMBER) RETURN NUMBER IS
530 BEGIN
531 BEGIN
532 IF NVL(SUM_EOY_SPP_BIRTH
533 ,0) > 0 THEN
534 RETURN (TO_CHAR(SUM_EOY_SPP_BIRTH / 100
535 ,'999999990.00'));
536 ELSE
537 RETURN ('0.0');
538 END IF;
539 END;
540 RETURN NULL;
541 END C_EOY_SPP_BIRTHFORMULA;
542
543 FUNCTION C_EOY_SAPFORMULA(SUM_EOY_SAP IN NUMBER) RETURN NUMBER IS
544 BEGIN
545 BEGIN
546 IF NVL(SUM_EOY_SAP
547 ,0) > 0 THEN
548 RETURN (TO_CHAR(SUM_EOY_SAP / 100
549 ,'999999990.00'));
550 ELSE
551 RETURN ('0.0');
552 END IF;
553 END;
554 RETURN NULL;
555 END C_EOY_SAPFORMULA;
556
557 FUNCTION C_EOY_SPP_ADOPTFORMULA(SUM_EOY_SPP_ADOPT IN NUMBER) RETURN NUMBER IS
558 BEGIN
559 BEGIN
560 IF NVL(SUM_EOY_SPP_ADOPT
561 ,0) > 0 THEN
562 RETURN (TO_CHAR(SUM_EOY_SPP_ADOPT / 100
563 ,'999999990.00'));
564 ELSE
565 RETURN ('0.0');
566 END IF;
567 END;
568 RETURN NULL;
569 END C_EOY_SPP_ADOPTFORMULA;
570
574 IF NVL(SUM_TOT_SAP
571 FUNCTION C_TOT_SAPFORMULA(SUM_TOT_SAP IN NUMBER) RETURN NUMBER IS
572 BEGIN
573 BEGIN
575 ,0) > 0 THEN
576 RETURN (TO_CHAR(SUM_TOT_SAP / 100
577 ,'999999990.00'));
578 ELSE
579 RETURN ('0.00');
580 END IF;
581 END;
582 RETURN NULL;
583 END C_TOT_SAPFORMULA;
584
585 FUNCTION C_TOT_SPP_BIRTHFORMULA(SUM_TOT_SPP_BIRTH IN NUMBER) RETURN NUMBER IS
586 BEGIN
587 BEGIN
588 IF NVL(SUM_TOT_SPP_BIRTH
589 ,0) > 0 THEN
590 RETURN (TO_CHAR(SUM_TOT_SPP_BIRTH / 100
591 ,'999999990.00'));
592 ELSE
593 RETURN ('0.00');
594 END IF;
595 END;
596 RETURN NULL;
597 END C_TOT_SPP_BIRTHFORMULA;
598
599 FUNCTION C_TOT_SPP_ADOPTFORMULA(SUM_TOT_SPP_ADOPT IN NUMBER) RETURN NUMBER IS
600 BEGIN
601 BEGIN
602 IF NVL(SUM_TOT_SPP_ADOPT
603 ,0) > 0 THEN
604 RETURN (TO_CHAR(SUM_TOT_SPP_ADOPT / 100
605 ,'999999990.00'));
606 ELSE
607 RETURN ('0.00');
608 END IF;
609 END;
610 RETURN NULL;
611 END C_TOT_SPP_ADOPTFORMULA;
612
613 FUNCTION C_PAY_SAPFORMULA(SUM_PAY_SAP IN NUMBER) RETURN NUMBER IS
614 BEGIN
615 BEGIN
616 IF NVL(SUM_PAY_SAP
617 ,0) > 0 THEN
618 RETURN (TO_CHAR(SUM_PAY_SAP / 100
619 ,'999999990.00'));
620 ELSE
621 RETURN ('0.00');
622 END IF;
623 END;
624 RETURN NULL;
625 END C_PAY_SAPFORMULA;
626
627 FUNCTION C_PAY_SPPAFORMULA(SUM_PAY_SPP_ADOPT IN NUMBER) RETURN NUMBER IS
628 BEGIN
629 BEGIN
630 IF NVL(SUM_PAY_SPP_ADOPT
631 ,0) > 0 THEN
632 RETURN (TO_CHAR(SUM_PAY_SPP_ADOPT / 100
633 ,'999999990.00'));
634 ELSE
635 RETURN ('0.00');
636 END IF;
637 END;
638 RETURN NULL;
639 END C_PAY_SPPAFORMULA;
640
641 FUNCTION C_PAY_SPPBFORMULA(SUM_PAY_SPP_BIRTH IN NUMBER) RETURN NUMBER IS
642 BEGIN
643 BEGIN
644 IF NVL(SUM_PAY_SPP_BIRTH
645 ,0) > 0 THEN
646 RETURN (TO_CHAR(SUM_PAY_SPP_BIRTH / 100
647 ,'999999990.00'));
648 ELSE
649 RETURN ('0.00');
650 END IF;
651 END;
652 RETURN NULL;
653 END C_PAY_SPPBFORMULA;
654
655 FUNCTION C_SAP_NI_COMPFORMULA(SAP_NI_COMP IN NUMBER) RETURN NUMBER IS
656 BEGIN
657 BEGIN
658 IF NVL(SAP_NI_COMP
659 ,0) > 0 THEN
660 RETURN (TO_CHAR(SAP_NI_COMP / 100
661 ,'999999990.00'));
662 ELSE
663 RETURN ('0.00');
664 END IF;
665 END;
666 RETURN NULL;
667 END C_SAP_NI_COMPFORMULA;
668
669 FUNCTION C_SPP_NI_COMPFORMULA(SPP_NI_COMP IN NUMBER) RETURN NUMBER IS
670 BEGIN
671 BEGIN
672 IF NVL(SPP_NI_COMP
673 ,0) > 0 THEN
674 RETURN (TO_CHAR(SPP_NI_COMP / 100
675 ,'999999990.00'));
676 ELSE
677 RETURN ('0.00');
678 END IF;
679 END;
680 RETURN NULL;
681 END C_SPP_NI_COMPFORMULA;
682
683 FUNCTION C_SAP_RECFORMULA(SAP_REC IN NUMBER) RETURN NUMBER IS
684 BEGIN
685 BEGIN
686 IF NVL(SAP_REC
687 ,0) > 0 THEN
688 RETURN (TO_CHAR(SAP_REC / 100
689 ,'999999990.00'));
690 ELSE
691 RETURN ('0.00');
692 END IF;
693 END;
694 RETURN NULL;
695 END C_SAP_RECFORMULA;
696
697 FUNCTION C_SPP_RECFORMULA(SPP_REC IN NUMBER) RETURN NUMBER IS
698 BEGIN
699 BEGIN
700 IF NVL(SPP_REC
701 ,0) > 0 THEN
702 RETURN (TO_CHAR(SPP_REC / 100
703 ,'999999990.00'));
704 ELSE
705 RETURN ('0.00');
706 END IF;
707 END;
708 RETURN NULL;
709 END C_SPP_RECFORMULA;
710
711 FUNCTION C_EOY_SAP_RECFORMULA(EOY_SAP_REC IN NUMBER) RETURN NUMBER IS
712 BEGIN
713 BEGIN
714 IF NVL(EOY_SAP_REC
715 ,0) > 0 THEN
716 RETURN (TO_CHAR(EOY_SAP_REC / 100
717 ,'999999990.00'));
718 ELSE
719 RETURN ('0.00');
720 END IF;
721 END;
722 RETURN NULL;
723 END C_EOY_SAP_RECFORMULA;
724
725 FUNCTION C_EOY_SPP_RECFORMULA(EOY_SPP_REC IN NUMBER) RETURN NUMBER IS
726 BEGIN
727 BEGIN
728 IF NVL(EOY_SPP_REC
729 ,0) > 0 THEN
730 RETURN (TO_CHAR(EOY_SPP_REC / 100
731 ,'999999990.00'));
732 ELSE
733 RETURN ('0.00');
734 END IF;
735 END;
736 RETURN NULL;
737 END C_EOY_SPP_RECFORMULA;
738
739 FUNCTION C_EOY_SAP_NI_COMPFORMULA(EOY_SAP_NI_COMP IN NUMBER) RETURN NUMBER IS
740 BEGIN
741 BEGIN
742 IF NVL(EOY_SAP_NI_COMP
743 ,0) > 0 THEN
744 RETURN (TO_CHAR(EOY_SAP_NI_COMP / 100
745 ,'9999999990.00'));
746 ELSE
747 RETURN ('0.00');
748 END IF;
749 END;
750 RETURN NULL;
751 END C_EOY_SAP_NI_COMPFORMULA;
752
753 FUNCTION C_EOY_SPP_NI_COMPFORMULA(EOY_SPP_NI_COMP IN NUMBER) RETURN NUMBER IS
754 BEGIN
755 BEGIN
756 IF NVL(EOY_SPP_NI_COMP
757 ,0) > 0 THEN
758 RETURN (TO_CHAR(EOY_SPP_NI_COMP / 100
759 ,'9999999990.00'));
760 ELSE
761 RETURN ('0.00');
762 END IF;
763 END;
764 RETURN NULL;
765 END C_EOY_SPP_NI_COMPFORMULA;
766
767 FUNCTION C_SUM_SAP_RECFORMULA(SUM_SAP_REC IN NUMBER) RETURN NUMBER IS
768 BEGIN
769 BEGIN
770 IF NVL(SUM_SAP_REC
771 ,0) > 0 THEN
772 RETURN (TO_CHAR(SUM_SAP_REC / 100
773 ,'99999999990.00'));
774 ELSE
775 RETURN ('0.00');
776 END IF;
777 END;
778 RETURN NULL;
779 END C_SUM_SAP_RECFORMULA;
780
781 FUNCTION C_SUM_SPP_RECFORMULA(SUM_SPP_REC IN NUMBER) RETURN NUMBER IS
782 BEGIN
783 BEGIN
784 IF NVL(SUM_SPP_REC
785 ,0) > 0 THEN
786 RETURN (TO_CHAR(SUM_SPP_REC / 100
787 ,'99999999990.00'));
788 ELSE
789 RETURN ('0.00');
790 END IF;
791 END;
792 RETURN NULL;
793 END C_SUM_SPP_RECFORMULA;
794
795 FUNCTION C_SUM_SAP_NI_COMPFORMULA(SUM_SAP_NI_COMP IN NUMBER) RETURN NUMBER IS
796 BEGIN
797 BEGIN
798 IF NVL(SUM_SAP_NI_COMP
799 ,0) > 0 THEN
800 RETURN (TO_CHAR(SUM_SAP_NI_COMP / 100
801 ,'999999990.00'));
802 ELSE
803 RETURN ('0.00');
804 END IF;
805 END;
806 RETURN NULL;
807 END C_SUM_SAP_NI_COMPFORMULA;
808
809 FUNCTION CSUM_SPP_NI_COMPFORMULA(SUM_SPP_NI_COMP IN NUMBER) RETURN NUMBER IS
810 BEGIN
811 BEGIN
812 IF NVL(SUM_SPP_NI_COMP
813 ,0) > 0 THEN
814 RETURN (TO_CHAR(SUM_SPP_NI_COMP / 100
815 ,'999999990.00'));
816 ELSE
817 RETURN ('0.00');
818 END IF;
819 END;
820 RETURN NULL;
821 END CSUM_SPP_NI_COMPFORMULA;
822
823 FUNCTION AFTERREPORT RETURN BOOLEAN IS
824 BEGIN
825 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
826 RETURN (TRUE);
827 END AFTERREPORT;
828
829 FUNCTION C_NI_ARREARSFORMULA(ASSIG_ACT_ID IN NUMBER) RETURN NUMBER IS
830 L_NI_ARREARS NUMBER := 0;
831 BEGIN
832 L_NI_ARREARS := PAY_GB_EOY_ARCHIVE.GET_ARCH_NUM(ASSIG_ACT_ID
833 ,'X_NI_ARREARS') / 100;
834 RETURN NVL(L_NI_ARREARS
835 ,0);
836 END C_NI_ARREARSFORMULA;
837
838 FUNCTION C_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
839 BEGIN
840 RETURN C_BUSINESS_GROUP_NAME;
841 END C_BUSINESS_GROUP_NAME_P;
842
843 FUNCTION C_REQUEST_ID_P RETURN NUMBER IS
844 BEGIN
845 RETURN C_REQUEST_ID;
846 END C_REQUEST_ID_P;
847
848 FUNCTION C_TAX_DISTRICT_P RETURN VARCHAR2 IS
849 BEGIN
850 RETURN C_TAX_DISTRICT;
851 END C_TAX_DISTRICT_P;
852
853 FUNCTION C_PERMIT_NO_P RETURN VARCHAR2 IS
854 BEGIN
855 RETURN C_PERMIT_NO;
856 END C_PERMIT_NO_P;
857
858 FUNCTION C_START_DATE_P RETURN DATE IS
859 BEGIN
860 RETURN C_START_DATE;
861 END C_START_DATE_P;
862
863 FUNCTION C_END_DATE_P RETURN DATE IS
864 BEGIN
865 RETURN C_END_DATE;
866 END C_END_DATE_P;
867
868 FUNCTION C_DATE_FROM_P RETURN NUMBER IS
869 BEGIN
870 RETURN C_DATE_FROM;
871 END C_DATE_FROM_P;
872
873 FUNCTION C_DATE_FROM_TO_P RETURN VARCHAR2 IS
874 BEGIN
875 RETURN C_DATE_FROM_TO;
876 END C_DATE_FROM_TO_P;
877
878 END PAY_PAYGBP35_XMLP_PKG;