1 PACKAGE BODY WIP_WIPSUEMP_XMLP_PKG AS
2 /* $Header: WIPSUEMPB.pls 120.1 2008/01/31 12:43:56 npannamp noship $ */
3 FUNCTION EMPLOYEE_TABLE RETURN CHARACTER IS
4 BEGIN
5 IF (P_CURRENT_ONLY = 1) THEN
6 RETURN ('MTL_EMPLOYEES_CURRENT_VIEW');
7 ELSE
8 RETURN ('MTL_EMPLOYEES_VIEW');
9 END IF;
10 RETURN ' ';
11 END EMPLOYEE_TABLE;
12
13 FUNCTION LIMIT_EMPLOYEE RETURN CHARACTER IS
14 LIMIT_EMP VARCHAR2(500);
15 BEGIN
16 IF (P_FROM_EMPLOYEE IS NOT NULL) THEN
17 IF (P_TO_EMPLOYEE IS NOT NULL) THEN
18 LIMIT_EMP := 'AND hre.full_name between ''' || REPLACE(P_FROM_EMPLOYEE
19 ,''''
20 ,'''''') || ''' AND ''' || REPLACE(P_TO_EMPLOYEE
21 ,''''
22 ,'''''') || '''';
23 ELSE
24 LIMIT_EMP := 'AND hre.full_name >= ''' || REPLACE(P_FROM_EMPLOYEE
25 ,''''
26 ,'''''') || '''';
27 END IF;
28 ELSE
29 IF (P_TO_EMPLOYEE IS NOT NULL) THEN
30 LIMIT_EMP := 'AND hre.full_name <= ''' || REPLACE(P_TO_EMPLOYEE
31 ,''''
32 ,'''''') || '''';
33 ELSE
34 LIMIT_EMP := ' ';
35 END IF;
36 END IF;
37 RETURN (LIMIT_EMP);
38 END LIMIT_EMPLOYEE;
39
40 FUNCTION LIMIT_DATES RETURN CHARACTER IS
41 LIMIT_DATES VARCHAR2(120);
42 BEGIN
43 IF (P_FROM_DATE IS NOT NULL) THEN
44 IF (P_TO_DATE IS NOT NULL) THEN
45 LIMIT_DATES := ' AND TRUNC(w1.effective_date) BETWEEN TO_DATE(''' || TO_CHAR(P_FROM_DATE
46 ,'YYYYMMDD') || ''',''YYYYMMDD'') AND TO_DATE(''' || TO_CHAR(P_TO_DATE
47 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
48 ELSE
49 LIMIT_DATES := ' AND TRUNC(w1.effective_date) >= TO_DATE(''' || TO_CHAR(P_FROM_DATE
50 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
51 END IF;
52 ELSE
53 IF (P_TO_DATE IS NOT NULL) THEN
54 LIMIT_DATES := ' AND TRUNC(w1.effective_date) <= TO_DATE(''' || TO_CHAR(P_TO_DATE
55 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
56 ELSE
57 LIMIT_DATES := ' ';
58 END IF;
59 END IF;
60 RETURN (LIMIT_DATES);
61 END LIMIT_DATES;
62
63 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
64 BEGIN
65 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
66 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
67 SELECT
68 CURRENCY_CODE
69 INTO P_CURR_CODE
70 FROM
71 GL_SETS_OF_BOOKS G,
72 ORG_ORGANIZATION_DEFINITIONS O
73 WHERE G.SET_OF_BOOKS_ID = O.SET_OF_BOOKS_ID
74 AND O.ORGANIZATION_ID = P_ORGANIZATION_ID;
75 SELECT
76 NVL(C.EXTENDED_PRECISION
77 ,C.PRECISION)
78 INTO P_PRECISION
79 FROM
80 ORG_ORGANIZATION_DEFINITIONS O,
81 FND_CURRENCIES C
82 WHERE O.ORGANIZATION_ID = P_ORGANIZATION_ID
83 AND C.CURRENCY_CODE = P_CURR_CODE;
84 RETURN (TRUE);
85 END BEFOREREPORT;
86
87 FUNCTION AFTERREPORT RETURN BOOLEAN IS
88 BEGIN
89 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
90 RETURN (TRUE);
91 END AFTERREPORT;
92
93 FUNCTION C_SUBTITLEFORMULA(P_CURRENCY_CODE IN VARCHAR2) RETURN VARCHAR2 IS
94 BEGIN
95 RETURN ('(' || P_CURRENCY_CODE || ')');
96 END C_SUBTITLEFORMULA;
97
98 FUNCTION AFTERPFORM RETURN BOOLEAN IS
99 BEGIN
100 RETURN (TRUE);
101 END AFTERPFORM;
102
103 END WIP_WIPSUEMP_XMLP_PKG;
104
105