1 PACKAGE BODY PAY_PAYGBPAY_XMLP_PKG AS
2 /* $Header: PAYGBPAYB.pls 120.3 2008/03/21 07:23:31 vjaganat noship $ */
3 FUNCTION BEFORE_REPORT_TRIGGER RETURN BOOLEAN IS
4 BEGIN
5 BEGIN
6 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
7 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
8 CP_BUSINESS_GROUP_NAME := RTRIM(SUBSTRB(HR_REPORTS.GET_BUSINESS_GROUP(P_BUSINESS_GROUP_ID)
9 ,1
10 ,240));
11 CP_EARLIEST_PAYMENT := FND_DATE.CANONICAL_TO_DATE(P_PAYMENT_START_DATE);
12 CP_LATEST_PAYMENT := FND_DATE.CANONICAL_TO_DATE(P_PAYMENT_END_DATE);
13 END;
14 BEGIN
15 IF P_CONSOLIDATION_SET_ID IS NULL THEN
16 P_CONSOLIDATION_SET_LINE := '/* No Consolidation Set Condition */';
17 ELSE
18 P_CONSOLIDATION_SET_LINE := 'and ppa.consolidation_set_id =' || (TO_CHAR(P_CONSOLIDATION_SET_ID));
19 END IF;
20 SELECT
21 LEGISLATION_CODE
22 INTO P_LEGISLATION_CODE
23 FROM
24 PER_BUSINESS_GROUPS
25 WHERE BUSINESS_GROUP_ID = P_BUSINESS_GROUP_ID;
26 SELECT
27 DISTINCT
28 PAYROLL_NAME
29 INTO CP_PAYROLL_NAME
30 FROM
31 PAY_PAYROLLS_F
32 WHERE PAYROLL_ID = P_PAYROLL_ID;
33 IF P_CONSOLIDATION_SET_ID IS NOT NULL THEN
34 SELECT
35 CONSOLIDATION_SET_NAME
36 INTO CP_CONSOLIDATION_SET_NAME
37 FROM
38 PAY_CONSOLIDATION_SETS
39 WHERE CONSOLIDATION_SET_ID = P_CONSOLIDATION_SET_ID;
40 ELSE
41 CP_CONSOLIDATION_SET_NAME := NULL;
42 END IF;
43 END;
44 RETURN (TRUE);
45 END BEFORE_REPORT_TRIGGER;
46
47 FUNCTION CF_CALCULATE_RUNNING_TOTALFORM(CS_RUNNING_TOTAL_AMOUNT_PAID IN NUMBER) RETURN NUMBER IS
48 BEGIN
49 CP_RUNNING_TOTAL_AMOUNT_PAID := CP_RUNNING_TOTAL_AMOUNT_PAID + CS_RUNNING_TOTAL_AMOUNT_PAID;
50 RETURN (0);
51 END CF_CALCULATE_RUNNING_TOTALFORM;
52
53 FUNCTION CF_RUNNING_TOTAL_NUMBER_PAIDFO(TOTAL_ASSIGNMENTS_PAID IN NUMBER) RETURN NUMBER IS
54 BEGIN
55 CP_RUNNING_TOTAL_NUMBER_PAID := CP_RUNNING_TOTAL_NUMBER_PAID + TOTAL_ASSIGNMENTS_PAID;
56 RETURN (0);
57 END CF_RUNNING_TOTAL_NUMBER_PAIDFO;
58
59 FUNCTION AFTERREPORT RETURN BOOLEAN IS
60 BEGIN
61 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
62 RETURN (TRUE);
63 END AFTERREPORT;
64
65 FUNCTION CP_RUNNING_TOTAL_NUMBER_PAID_P RETURN NUMBER IS
66 BEGIN
67 RETURN CP_RUNNING_TOTAL_NUMBER_PAID;
68 END CP_RUNNING_TOTAL_NUMBER_PAID_P;
69
70 FUNCTION CP_RUNNING_TOTAL_AMOUNT_PAID_P RETURN NUMBER IS
71 BEGIN
72 RETURN CP_RUNNING_TOTAL_AMOUNT_PAID;
73 END CP_RUNNING_TOTAL_AMOUNT_PAID_P;
74
75 FUNCTION CP_BUSINESS_GROUP_NAME_P RETURN VARCHAR2 IS
76 BEGIN
77 RETURN CP_BUSINESS_GROUP_NAME;
78 END CP_BUSINESS_GROUP_NAME_P;
79
80 FUNCTION CP_PAYROLL_NAME_P RETURN VARCHAR2 IS
81 BEGIN
82 RETURN CP_PAYROLL_NAME;
83 END CP_PAYROLL_NAME_P;
84
85 FUNCTION CP_CONSOLIDATION_SET_LINE_P RETURN VARCHAR2 IS
86 BEGIN
87 RETURN CP_CONSOLIDATION_SET_LINE;
88 END CP_CONSOLIDATION_SET_LINE_P;
89
90 FUNCTION CP_CONSOLIDATION_SET_NAME_P RETURN VARCHAR2 IS
91 BEGIN
92 RETURN CP_CONSOLIDATION_SET_NAME;
93 END CP_CONSOLIDATION_SET_NAME_P;
94
95 FUNCTION CP_EARLIEST_PAYMENT_P RETURN VARCHAR2 IS
96 BEGIN
97 RETURN CP_EARLIEST_PAYMENT;
98 END CP_EARLIEST_PAYMENT_P;
99
100 FUNCTION CP_LATEST_PAYMENT_P RETURN VARCHAR2 IS
101 BEGIN
102 RETURN CP_LATEST_PAYMENT;
103 END CP_LATEST_PAYMENT_P;
104
105 END PAY_PAYGBPAY_XMLP_PKG;
106