1 PACKAGE BODY WIP_WIPTRTXN_XMLP_PKG AS
2 /* $Header: WIPTRTXNB.pls 120.1 2008/01/31 12:48:10 npannamp noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 BEGIN
5 BEGIN
6 P_FROM_DATE1:=to_char(P_FROM_DATE,'DD-MON-YY');
7 P_TO_DATE1:=to_char(P_TO_DATE,'DD-MON-YY');
8 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
9 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
10 /*SRW.USER_EXIT('FND FLEXSQL CODE="MSTK"
11 APPL_SHORT_NAME="INV" OUTPUT=":P_FLEXDATA"
12 MODE="SELECT" DISPLAY="ALL" TABLEALIAS="MSI"')*/NULL;
13 IF (P_FROM_ASSEMBLY IS NOT NULL) THEN
14 IF (P_TO_ASSEMBLY IS NOT NULL) THEN
15 NULL;
16 ELSE
17 NULL;
18 END IF;
19 ELSE
20 IF (P_TO_ASSEMBLY IS NOT NULL) THEN
21 NULL;
22 END IF;
23 END IF;
24 RETURN TRUE;
25 END;
26 RETURN (TRUE);
27 END BEFOREREPORT;
28
29 FUNCTION LIMIT_DATES RETURN CHARACTER IS
30 LIMIT_DATES VARCHAR2(150);
31 BEGIN
32 IF (P_FROM_DATE IS NOT NULL) THEN
33 IF (P_TO_DATE IS NOT NULL) THEN
34 LIMIT_DATES := ' AND WT.transaction_date >= TO_DATE(''' || TO_CHAR(P_FROM_DATE
35 ,'YYYYMMDD') || ''',''YYYYMMDD'')' || ' AND WT.transaction_date < TO_DATE(''' || TO_CHAR(P_TO_DATE + 1
36 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
37 ELSE
38 LIMIT_DATES := ' AND WT.transaction_date >= TO_DATE(''' || TO_CHAR(P_FROM_DATE
39 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
40 END IF;
41 ELSE
42 IF (P_TO_DATE IS NOT NULL) THEN
43 LIMIT_DATES := ' AND WT.transaction_date < TO_DATE(''' || TO_CHAR(P_TO_DATE + 1
44 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
45 ELSE
46 LIMIT_DATES := ' ';
47 END IF;
48 END IF;
49 RETURN (LIMIT_DATES);
50 END LIMIT_DATES;
51
52 FUNCTION LIMIT_EMPLOYEES RETURN CHARACTER IS
53 LIMIT_EMPLOYEES VARCHAR2(510);
54 BEGIN
55 IF (P_FROM_EMPLOYEE IS NOT NULL) THEN
56 IF (P_TO_EMPLOYEE IS NOT NULL) THEN
57 LIMIT_EMPLOYEES := ' AND HRE.FULL_NAME BETWEEN ''' || P_FROM_EMPLOYEE || ''' AND ''' || P_TO_EMPLOYEE || ''' ';
58 ELSE
59 LIMIT_EMPLOYEES := ' AND HRE.FULL_NAME >= ''' || P_FROM_EMPLOYEE || ''' ';
60 END IF;
61 ELSE
62 IF (P_TO_EMPLOYEE IS NOT NULL) THEN
63 LIMIT_EMPLOYEES := ' AND HRE.FULL_NAME <= ''' || P_TO_EMPLOYEE || ''' ';
64 ELSE
65 LIMIT_EMPLOYEES := ' ';
66 END IF;
67 END IF;
68 RETURN (LIMIT_EMPLOYEES);
69 END LIMIT_EMPLOYEES;
70
71 FUNCTION LIMIT_JOBS RETURN CHARACTER IS
72 LIMIT_JOBS VARCHAR2(500);
73 BEGIN
74 IF (P_FROM_JOB IS NOT NULL) THEN
75 IF (P_TO_JOB IS NOT NULL) THEN
76 LIMIT_JOBS := ' AND WE.WIP_ENTITY_NAME BETWEEN ''' || P_FROM_JOB || ''' AND ''' || P_TO_JOB || '''';
77 ELSE
78 LIMIT_JOBS := ' AND WE.WIP_ENTITY_NAME >= ''' || P_FROM_JOB || '''';
79 END IF;
80 ELSE
81 IF (P_TO_JOB IS NOT NULL) THEN
82 LIMIT_JOBS := ' AND WE.WIP_ENTITY_NAME <= ''' || P_TO_JOB || '''';
83 ELSE
84 LIMIT_JOBS := ' ';
85 END IF;
86 END IF;
87 RETURN (LIMIT_JOBS);
88 END LIMIT_JOBS;
89
90 FUNCTION LIMIT_LINES RETURN CHARACTER IS
91 LIMIT_LINES VARCHAR2(80);
92 BEGIN
93 IF (P_FROM_LINE IS NOT NULL) THEN
94 IF (P_TO_LINE IS NOT NULL) THEN
95 LIMIT_LINES := ' AND WL.LINE_CODE BETWEEN ''' || P_FROM_LINE || ''' AND ''' || P_TO_LINE || ''' ';
96 ELSE
97 LIMIT_LINES := ' AND WL.LINE_CODE >= ''' || P_FROM_LINE || ''' ';
98 END IF;
99 ELSE
100 IF (P_TO_LINE IS NOT NULL) THEN
101 LIMIT_LINES := ' AND WL.LINE_CODE <= ''' || P_TO_LINE || ''' ';
102 ELSE
103 LIMIT_LINES := ' ';
104 END IF;
105 END IF;
106 RETURN (LIMIT_LINES);
107 END LIMIT_LINES;
108
109 FUNCTION LIMIT_REASONS RETURN CHARACTER IS
110 LIMIT_REASONS VARCHAR2(150);
111 BEGIN
112 IF (P_FROM_REASON IS NOT NULL) THEN
113 IF (P_TO_REASON IS NOT NULL) THEN
114 LIMIT_REASONS := ' AND MTR.REASON_NAME BETWEEN ''' || P_FROM_REASON || ''' AND ''' || P_TO_REASON || ''' ';
115 ELSE
116 LIMIT_REASONS := ' AND MTR.REASON_NAME >= ''' || P_FROM_REASON || ''' ';
117 END IF;
118 ELSE
119 IF (P_TO_REASON IS NOT NULL) THEN
120 LIMIT_REASONS := ' AND MTR.REASON_NAME <= ''' || P_TO_REASON || ''' ';
121 ELSE
122 LIMIT_REASONS := ' ';
123 END IF;
124 END IF;
125 RETURN (LIMIT_REASONS);
126 END LIMIT_REASONS;
127
128 FUNCTION LIMIT_ACTIVITIES RETURN CHARACTER IS
129 LIMIT_ACTIVITIES VARCHAR2(80);
130 BEGIN
131 IF (P_FROM_ACTIVITY IS NOT NULL) THEN
132 IF (P_TO_ACTIVITY IS NOT NULL) THEN
133 LIMIT_ACTIVITIES := ' AND CA.ACTIVITY BETWEEN ''' || P_FROM_ACTIVITY || ''' AND ''' || P_TO_ACTIVITY || ''' ';
134 ELSE
135 LIMIT_ACTIVITIES := ' AND CA.ACTIVITY >= ''' || P_FROM_ACTIVITY || ''' ';
136 END IF;
137 ELSE
138 IF (P_TO_ACTIVITY IS NOT NULL) THEN
139 LIMIT_ACTIVITIES := ' AND CA.ACTIVITY <= ''' || P_TO_ACTIVITY || ''' ';
140 ELSE
141 LIMIT_ACTIVITIES := ' ';
142 END IF;
143 END IF;
144 RETURN (LIMIT_ACTIVITIES);
145 END LIMIT_ACTIVITIES;
146
147 FUNCTION LIMIT_EMPLOYEE RETURN CHARACTER IS
148 LIMIT_EMP VARCHAR2(520);
149 BEGIN
150 IF (P_FROM_EMPLOYEE IS NOT NULL) THEN
151 IF (P_TO_EMPLOYEE IS NOT NULL) THEN
152 LIMIT_EMP := 'AND hre.full_name between ''' || REPLACE(P_FROM_EMPLOYEE
153 ,''''
154 ,'''''') || ''' AND ''' || REPLACE(P_TO_EMPLOYEE
155 ,''''
156 ,'''''') || '''';
157 ELSE
158 LIMIT_EMP := 'AND hre.full_name >= ''' || REPLACE(P_FROM_EMPLOYEE
159 ,''''
160 ,'''''') || '''';
161 END IF;
162 ELSE
163 IF (P_TO_EMPLOYEE IS NOT NULL) THEN
164 LIMIT_EMP := 'AND hre.full_name <= ''' || REPLACE(P_TO_EMPLOYEE
165 ,''''
166 ,'''''') || '''';
167 ELSE
168 LIMIT_EMP := ' ';
169 END IF;
170 END IF;
171 RETURN (LIMIT_EMP);
172 END LIMIT_EMPLOYEE;
173
174 FUNCTION C_LIMIT_DATESFORMULA RETURN VARCHAR2 IS
175 BEGIN
176 RETURN (LIMIT_DATES);
177 END C_LIMIT_DATESFORMULA;
178
179 FUNCTION C_LIMIT_ACTIVITIESFORMULA RETURN VARCHAR2 IS
180 BEGIN
181 RETURN (LIMIT_ACTIVITIES);
182 END C_LIMIT_ACTIVITIESFORMULA;
183
184 FUNCTION C_LIMIT_REASONSFORMULA RETURN VARCHAR2 IS
185 BEGIN
186 RETURN (LIMIT_REASONS);
187 END C_LIMIT_REASONSFORMULA;
188
189 FUNCTION C_LIMIT_LINESFORMULA RETURN VARCHAR2 IS
190 BEGIN
191 RETURN (LIMIT_LINES);
192 END C_LIMIT_LINESFORMULA;
193
194 FUNCTION C_LIMIT_JOBSFORMULA RETURN VARCHAR2 IS
195 BEGIN
196 RETURN (LIMIT_JOBS);
197 END C_LIMIT_JOBSFORMULA;
198
199 FUNCTION C_LIMIT_ASSEMBLIESFORMULA RETURN VARCHAR2 IS
200 BEGIN
201 BEGIN
202 IF (P_FLEXWHERE IS NOT NULL) THEN
203 RETURN ('AND ');
204 ELSE
205 RETURN (' ');
206 END IF;
207 END;
208 RETURN NULL;
209 END C_LIMIT_ASSEMBLIESFORMULA;
210
211 FUNCTION AFTERREPORT RETURN BOOLEAN IS
212 BEGIN
213 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
214 RETURN (TRUE);
215 END AFTERREPORT;
216
217 FUNCTION C_FLEX_MASTER_SORTFORMULA(C_FLEX_MASTER_SORT IN VARCHAR2) RETURN VARCHAR2 IS
218 BEGIN
219 RETURN (C_FLEX_MASTER_SORT);
220 END C_FLEX_MASTER_SORTFORMULA;
221
222 FUNCTION LIMIT_RESOURCE RETURN CHARACTER IS
223 LIMIT_RES VARCHAR2(80);
224 BEGIN
225 IF (P_FROM_RESOURCE IS NOT NULL) THEN
226 IF (P_TO_RESOURCE IS NOT NULL) THEN
227 LIMIT_RES := 'AND BR.RESOURCE_CODE between ''' || P_FROM_RESOURCE || ''' AND ''' || P_TO_RESOURCE || '''';
228 ELSE
229 LIMIT_RES := 'AND BR.RESOURCE_CODE >= ''' || P_FROM_RESOURCE || '''';
230 END IF;
231 ELSE
232 IF (P_TO_RESOURCE IS NOT NULL) THEN
233 LIMIT_RES := 'AND BR.RESOURCE_CODE <= ''' || P_TO_RESOURCE || '''';
234 ELSE
235 LIMIT_RES := ' ';
236 END IF;
237 END IF;
238 RETURN (LIMIT_RES);
239 END LIMIT_RESOURCE;
240
241 FUNCTION AFTERPFORM RETURN BOOLEAN IS
242 BEGIN
243 RETURN (TRUE);
244 END AFTERPFORM;
245
246 END WIP_WIPTRTXN_XMLP_PKG;
247