1 PACKAGE BODY WIP_WIPUTVAL_XMLP_PKG AS
2 /* $Header: WIPUTVALB.pls 120.2 2008/02/28 08:11:54 dwkrishn noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 cursor c1 is
5 SELECT fifst.id_flex_num
6 FROM fnd_id_flex_structures fifst
7 WHERE fifst.application_id = 401
8 AND fifst.id_flex_code = 'MSTK'
9 AND fifst.enabled_flag = 'Y'
10 AND fifst.freeze_flex_definition_flag = 'Y'
11 ORDER BY fifst.id_flex_num;
12
13
14 BEGIN
15 P_EXCHANGE_RATE := FND_NUMBER.CANONICAL_TO_NUMBER(P_EXCHANGE_RATE_CHAR);
16 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
17 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
18 /*SRW.USER_EXIT('FND FLEXSQL CODE="MSTK"
19 APPL_SHORT_NAME="INV" OUTPUT=":P_ASSY_FLEX"
20 TABLEALIAS="MSI"
21 MODE="SELECT" DISPLAY="ALL"')*/NULL;
22 IF (P_FROM_ASSEMBLY IS NOT NULL) THEN
23 IF (P_TO_ASSEMBLY IS NOT NULL) THEN
24 NULL;
25 ELSE
26 NULL;
27 END IF;
28 ELSE
29 IF (P_TO_ASSEMBLY IS NOT NULL) THEN
30 NULL;
31 END IF;
32 IF (P_PROJECT_ID IS NOT NULL) THEN
33 P_PROJECT_WHERE := 'wdj.PROJECT_ID =' || P_PROJECT_ID;
34 END IF;
35 END IF;
36
37 open c1;
38 fetch c1 into lp_struct_num;
39 close c1;
40 RETURN (TRUE);
41 RETURN (TRUE);
42 END BEFOREREPORT;
43
44 FUNCTION C_DJ_PERIOD_ACTIVITYFORMULA(C_DJ_CI_PTD IN NUMBER
45 ,C_DJ_CR_PTD IN NUMBER
46 ,C_DJ_VR_PTD IN NUMBER) RETURN NUMBER IS
47 BEGIN
48 RETURN (C_DJ_CI_PTD - C_DJ_CR_PTD - C_DJ_VR_PTD);
49 END C_DJ_PERIOD_ACTIVITYFORMULA;
50
51 FUNCTION C_DJ_ENDING_BALANCEFORMULA(C_DJ_CI_CUM IN NUMBER
52 ,C_DJ_CR_CUM IN NUMBER
53 ,C_DJ_VR_CUM IN NUMBER) RETURN NUMBER IS
54 BEGIN
55 RETURN (C_DJ_CI_CUM - C_DJ_CR_CUM - C_DJ_VR_CUM);
56 END C_DJ_ENDING_BALANCEFORMULA;
57
58 FUNCTION CLOSED_JOBS(C_PERIOD_START_DATE IN VARCHAR2
59 ,C_PERIOD_CLOSE_DATE IN VARCHAR2) RETURN CHARACTER IS
60 TEMP VARCHAR2(350) := ' ';
61 BEGIN
62 IF (P_CLOSED_JOBS = 1) THEN
63 TEMP := 'and nvl(trunc(wdj.date_closed),to_date(''' || TO_CHAR(
64 to_date(substr(C_PERIOD_START_DATE,1,10), 'YYYY-MM-DD')
65 ,'YYYYMMDD') || ''',''YYYYMMDD'')) >= to_date(''' || TO_CHAR(
66 to_date(substr(C_PERIOD_START_DATE,1,10), 'YYYY-MM-DD')
67 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
68 ELSE
69 TEMP := 'and nvl(trunc(wdj.date_closed),to_date(''' || TO_CHAR(
70 to_date(substr(C_PERIOD_CLOSE_DATE,1,10), 'YYYY-MM-DD')
71 ,'YYYYMMDD') || ''',''YYYYMMDD'')+1) > to_date(''' || TO_CHAR(
72 to_date(substr(C_PERIOD_CLOSE_DATE,1,10), 'YYYY-MM-DD')
73 ,'YYYYMMDD') || ''',''YYYYMMDD'')';
74 END IF;
75 RETURN (TEMP);
76 END CLOSED_JOBS;
77
78 FUNCTION C_LIMIT_TYPESFORMULA RETURN VARCHAR2 IS
79 BEGIN
80 IF (P_CLASS_TYPE IS NULL) THEN
81 RETURN (' ');
82 ELSE
83 RETURN ('and wpb.class_type = ' || TO_CHAR(P_CLASS_TYPE));
84 END IF;
85 RETURN ' ';
86 END C_LIMIT_TYPESFORMULA;
87
88 FUNCTION LIMIT_CLASSES RETURN CHARACTER IS
89 LIMIT_CLASSES VARCHAR2(80);
90 BEGIN
91 IF (P_FROM_CLASS IS NOT NULL) THEN
92 IF (P_TO_CLASS IS NOT NULL) THEN
93 LIMIT_CLASSES := ' AND WDJ.CLASS_CODE BETWEEN ''' || P_FROM_CLASS || ''' AND ''' || P_TO_CLASS || '''';
94 ELSE
95 LIMIT_CLASSES := ' AND WDJ.CLASS_CODE >= ''' || P_FROM_CLASS || '''';
96 END IF;
97 ELSE
98 IF (P_TO_CLASS IS NOT NULL) THEN
99 LIMIT_CLASSES := ' AND WDJ.CLASS_CODE <= ''' || P_TO_CLASS || '''';
100 ELSE
101 LIMIT_CLASSES := ' ';
102 END IF;
103 END IF;
104 RETURN (LIMIT_CLASSES);
105 END LIMIT_CLASSES;
106
107 FUNCTION LIMIT_JOBS RETURN CHARACTER IS
108 LIMIT_JOBS VARCHAR2(240);
109 BEGIN
110 IF (P_FROM_JOB IS NOT NULL) THEN
111 IF (P_TO_JOB IS NOT NULL) THEN
112 LIMIT_JOBS := ' AND WE.WIP_ENTITY_NAME BETWEEN ''' || P_FROM_JOB || ''' AND ''' || P_TO_JOB || '''';
113 ELSE
114 LIMIT_JOBS := ' AND WE.WIP_ENTITY_NAME >= ''' || P_FROM_JOB || '''';
115 END IF;
116 ELSE
117 IF (P_TO_JOB IS NOT NULL) THEN
118 LIMIT_JOBS := ' AND WE.WIP_ENTITY_NAME <= ''' || P_TO_JOB || '''';
119 ELSE
120 LIMIT_JOBS := ' ';
121 END IF;
122 END IF;
123 RETURN (LIMIT_JOBS);
124 END LIMIT_JOBS;
125
126 FUNCTION LIMIT_CLASSES_RS RETURN CHARACTER IS
127 LIMIT_CLASSES VARCHAR2(80);
128 BEGIN
129 IF (P_FROM_CLASS IS NOT NULL) THEN
130 IF (P_TO_CLASS IS NOT NULL) THEN
131 LIMIT_CLASSES := ' AND WRI.CLASS_CODE BETWEEN ''' || P_FROM_CLASS || ''' AND ''' || P_TO_CLASS || '''';
132 ELSE
133 LIMIT_CLASSES := ' AND WRI.CLASS_CODE >= ''' || P_FROM_CLASS || '''';
134 END IF;
135 ELSE
136 IF (P_TO_CLASS IS NOT NULL) THEN
137 LIMIT_CLASSES := ' AND WRI.CLASS_CODE <= ''' || P_TO_CLASS || '''';
138 ELSE
139 LIMIT_CLASSES := ' ';
140 END IF;
141 END IF;
142 RETURN (LIMIT_CLASSES);
143 END LIMIT_CLASSES_RS;
144
145 FUNCTION C_ACCT_PERIOD_ACTFORMULA(P_PTD_OR_CUM IN VARCHAR2
146 ,C_ACCT_CI_PTD IN NUMBER
147 ,C_ACCT_CR_PTD IN NUMBER
148 ,C_ACCT_EL_VAR_PTD IN NUMBER
149 ,C_ACCT_CI_CUM IN NUMBER
150 ,C_ACCT_CR_CUM IN NUMBER
151 ,C_ACCT_EL_VAR_CUM IN NUMBER) RETURN NUMBER IS
152 BEGIN
153 IF (P_PTD_OR_CUM = 'PTD') THEN
154 RETURN (C_ACCT_CI_PTD - C_ACCT_CR_PTD - C_ACCT_EL_VAR_PTD);
155 ELSE
156 RETURN (C_ACCT_CI_CUM - C_ACCT_CR_CUM - C_ACCT_EL_VAR_CUM);
157 END IF;
158 RETURN NULL;
159 END C_ACCT_PERIOD_ACTFORMULA;
160
161 FUNCTION C_SUBTITLEFORMULA(REP_TYPE IN VARCHAR2
162 ,ORG_CURRENCY IN VARCHAR2) RETURN VARCHAR2 IS
163 BEGIN
164 BEGIN
165 /*SRW.REFERENCE(REP_TYPE)*/NULL;
166 /*SRW.REFERENCE(ORG_CURRENCY)*/NULL;
167 IF ((ORG_CURRENCY = P_CURRENCY_CODE) AND (P_EXCHANGE_RATE = 1)) THEN
168 RETURN (REP_TYPE || ' (' || P_CURRENCY_CODE || ')');
169 ELSE
170 RETURN (REP_TYPE || ' (' || P_CURRENCY_CODE || ' @ ' || TO_CHAR(ROUND(P_EXCHANGE_RATE
171 ,6)) || ' ' || ORG_CURRENCY || ')');
172 END IF;
173 END;
174 RETURN NULL;
175 END C_SUBTITLEFORMULA;
176
177 FUNCTION C_WIP_PERIOD_ACTFORMULA(P_PTD_OR_CUM IN VARCHAR2
178 ,C_WIP_CI_PTD IN NUMBER
179 ,C_WIP_CR_PTD IN NUMBER
180 ,C_WIP_EL_VAR_PTD IN NUMBER
181 ,C_WIP_CI_CUM IN NUMBER
182 ,C_WIP_CR_CUM IN NUMBER
183 ,C_WIP_EL_VAR_CUM IN NUMBER) RETURN NUMBER IS
184 BEGIN
185 IF (P_PTD_OR_CUM = 'PTD') THEN
186 RETURN (C_WIP_CI_PTD - C_WIP_CR_PTD - C_WIP_EL_VAR_PTD);
187 ELSE
188 RETURN (C_WIP_CI_CUM - C_WIP_CR_CUM - C_WIP_EL_VAR_CUM);
189 END IF;
190 RETURN NULL;
191 END C_WIP_PERIOD_ACTFORMULA;
192
193 FUNCTION C_FLEXWHEREFORMULA RETURN VARCHAR2 IS
194 BEGIN
195 IF (P_FLEXWHERE IS NULL) THEN
196 RETURN (' ');
197 ELSE
198 RETURN ('AND ' || P_FLEXWHERE);
199 END IF;
200 RETURN ' ';
201 END C_FLEXWHEREFORMULA;
202
203 FUNCTION C_DJ_CI_PTDFORMULA(C_DJ_LAST_DATE IN NUMBER
204 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
205 ,C_DJ_CI_LAST IN NUMBER) RETURN NUMBER IS
206 BEGIN
207 IF (C_DJ_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
208 RETURN (C_DJ_CI_LAST);
209 ELSE
210 RETURN (0);
211 END IF;
212 RETURN NULL;
213 END C_DJ_CI_PTDFORMULA;
214
215 FUNCTION C_DJ_CR_PTDFORMULA(C_DJ_LAST_DATE IN NUMBER
216 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
217 ,C_DJ_CR_LAST IN NUMBER) RETURN NUMBER IS
218 BEGIN
219 IF (C_DJ_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
220 RETURN (C_DJ_CR_LAST);
221 ELSE
222 RETURN (0);
223 END IF;
224 RETURN NULL;
225 END C_DJ_CR_PTDFORMULA;
226
227 FUNCTION C_DJ_VR_PTDFORMULA(C_DJ_LAST_DATE IN NUMBER
228 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
229 ,C_DJ_VR_LAST IN NUMBER) RETURN NUMBER IS
230 BEGIN
231 IF (C_DJ_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
232 RETURN (C_DJ_VR_LAST);
233 ELSE
234 RETURN (0);
235 END IF;
236 RETURN NULL;
237 END C_DJ_VR_PTDFORMULA;
238
239 FUNCTION C_ACCT_CI_PTDFORMULA(C_ACCT_LAST_DATE IN NUMBER
240 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
241 ,C_ACCT_CI_LAST IN NUMBER) RETURN NUMBER IS
242 BEGIN
243 IF (C_ACCT_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
244 RETURN (C_ACCT_CI_LAST);
245 ELSE
246 RETURN (0);
247 END IF;
248 RETURN NULL;
249 END C_ACCT_CI_PTDFORMULA;
250
251 FUNCTION C_ACCT_CR_PTDFORMULA(C_ACCT_LAST_DATE IN NUMBER
252 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
253 ,C_ACCT_CR_LAST IN NUMBER) RETURN NUMBER IS
254 BEGIN
255 IF (C_ACCT_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
256 RETURN (C_ACCT_CR_LAST);
257 ELSE
258 RETURN (0);
259 END IF;
260 RETURN NULL;
261 END C_ACCT_CR_PTDFORMULA;
262
263 FUNCTION C_ACCT_EL_VAR_PTDFORMULA(C_ACCT_LAST_DATE IN NUMBER
264 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
265 ,C_ACCT_EL_VAR_LAST IN NUMBER) RETURN NUMBER IS
266 BEGIN
267 IF (C_ACCT_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
268 RETURN (C_ACCT_EL_VAR_LAST);
269 ELSE
270 RETURN (0);
271 END IF;
272 RETURN NULL;
273 END C_ACCT_EL_VAR_PTDFORMULA;
274
275 FUNCTION C_ACCT_SING_VAR_PTDFORMULA(C_ACCT_LAST_DATE IN NUMBER
276 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
277 ,C_ACCT_SING_LAST IN NUMBER) RETURN NUMBER IS
278 BEGIN
279 IF (C_ACCT_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
280 RETURN (C_ACCT_SING_LAST);
281 ELSE
282 RETURN (0);
283 END IF;
284 RETURN NULL;
285 END C_ACCT_SING_VAR_PTDFORMULA;
286
287 FUNCTION C_WIP_CI_PTDFORMULA(C_WIP_LAST_DATE IN NUMBER
288 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
289 ,C_WIP_CI_LAST IN NUMBER) RETURN NUMBER IS
290 BEGIN
291 IF (C_WIP_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
292 RETURN (C_WIP_CI_LAST);
293 ELSE
294 RETURN (0);
295 END IF;
296 RETURN NULL;
297 END C_WIP_CI_PTDFORMULA;
298
299 FUNCTION C_WIP_CR_PTDFORMULA(C_WIP_LAST_DATE IN NUMBER
300 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
301 ,C_WIP_CR_LAST IN NUMBER) RETURN NUMBER IS
302 BEGIN
303 IF (C_WIP_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
304 RETURN (C_WIP_CR_LAST);
305 ELSE
306 RETURN (0);
307 END IF;
308 RETURN NULL;
309 END C_WIP_CR_PTDFORMULA;
310
311 FUNCTION C_WIP_EL_VAR_PTDFORMULA(C_WIP_LAST_DATE IN NUMBER
312 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
313 ,C_WIP_EL_VAR_LAST IN NUMBER) RETURN NUMBER IS
314 BEGIN
315 IF (C_WIP_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
316 RETURN (C_WIP_EL_VAR_LAST);
317 ELSE
318 RETURN (0);
319 END IF;
320 RETURN NULL;
321 END C_WIP_EL_VAR_PTDFORMULA;
322
323 FUNCTION C_WIP_SING_PTDFORMULA(C_WIP_LAST_DATE IN NUMBER
324 ,C_PERIOD_CLOSE_DATE IN VARCHAR2
325 ,C_WIP_SING_LAST IN NUMBER) RETURN NUMBER IS
326 BEGIN
327 IF (C_WIP_LAST_DATE = C_PERIOD_CLOSE_DATE) THEN
328 RETURN (C_WIP_SING_LAST);
329 ELSE
330 RETURN (0);
331 END IF;
332 RETURN NULL;
333 END C_WIP_SING_PTDFORMULA;
334
335 FUNCTION C_DJ_CIFORMULA(P_PTD_OR_CUM IN VARCHAR2
336 ,C_DJ_CI_PTD IN NUMBER
337 ,C_DJ_CI_CUM IN NUMBER) RETURN NUMBER IS
338 BEGIN
339 IF (P_PTD_OR_CUM = 'PTD') THEN
340 RETURN (C_DJ_CI_PTD);
341 ELSE
342 RETURN (C_DJ_CI_CUM);
343 END IF;
344 RETURN NULL;
345 END C_DJ_CIFORMULA;
346
347 FUNCTION C_DJ_CRFORMULA(P_PTD_OR_CUM IN VARCHAR2
348 ,C_DJ_CR_PTD IN NUMBER
349 ,C_DJ_CR_CUM IN NUMBER) RETURN NUMBER IS
350 BEGIN
351 IF (P_PTD_OR_CUM = 'PTD') THEN
352 RETURN (C_DJ_CR_PTD);
353 ELSE
354 RETURN (C_DJ_CR_CUM);
355 END IF;
356 RETURN NULL;
357 END C_DJ_CRFORMULA;
358
359 FUNCTION C_DJ_VRFORMULA(P_PTD_OR_CUM IN VARCHAR2
360 ,C_DJ_VR_PTD IN NUMBER
361 ,C_DJ_VR_CUM IN NUMBER) RETURN NUMBER IS
362 BEGIN
363 IF (P_PTD_OR_CUM = 'PTD') THEN
364 RETURN (C_DJ_VR_PTD);
365 ELSE
366 RETURN (C_DJ_VR_CUM);
367 END IF;
368 RETURN NULL;
369 END C_DJ_VRFORMULA;
370
371 FUNCTION C_ACCT_CIFORMULA(P_PTD_OR_CUM IN VARCHAR2
372 ,C_ACCT_CI_PTD IN NUMBER
373 ,C_ACCT_CI_CUM IN NUMBER) RETURN NUMBER IS
374 BEGIN
375 IF (P_PTD_OR_CUM = 'PTD') THEN
376 RETURN (C_ACCT_CI_PTD);
377 ELSE
378 RETURN (C_ACCT_CI_CUM);
379 END IF;
380 RETURN NULL;
381 END C_ACCT_CIFORMULA;
382
383 FUNCTION C_ACCT_CRFORMULA(P_PTD_OR_CUM IN VARCHAR2
384 ,C_ACCT_CR_PTD IN NUMBER
385 ,C_ACCT_CR_CUM IN NUMBER) RETURN NUMBER IS
386 BEGIN
387 IF (P_PTD_OR_CUM = 'PTD') THEN
388 RETURN (C_ACCT_CR_PTD);
389 ELSE
390 RETURN (C_ACCT_CR_CUM);
391 END IF;
392 RETURN NULL;
393 END C_ACCT_CRFORMULA;
394
395 FUNCTION C_ACCT_EL_VARFORMULA(P_PTD_OR_CUM IN VARCHAR2
396 ,C_ACCT_EL_VAR_PTD IN NUMBER
397 ,C_ACCT_EL_VAR_CUM IN NUMBER) RETURN NUMBER IS
398 BEGIN
399 IF (P_PTD_OR_CUM = 'PTD') THEN
400 RETURN (C_ACCT_EL_VAR_PTD);
401 ELSE
402 RETURN (C_ACCT_EL_VAR_CUM);
403 END IF;
404 RETURN NULL;
405 END C_ACCT_EL_VARFORMULA;
406
407 FUNCTION C_ACCT_SINGFORMULA(P_PTD_OR_CUM IN VARCHAR2
408 ,C_ACCT_SING_VAR_PTD IN NUMBER
409 ,C_ACCT_SING_VAR_CUM IN NUMBER) RETURN NUMBER IS
410 BEGIN
411 IF (P_PTD_OR_CUM = 'PTD') THEN
412 RETURN (C_ACCT_SING_VAR_PTD);
413 ELSE
414 RETURN (C_ACCT_SING_VAR_CUM);
415 END IF;
416 RETURN NULL;
417 END C_ACCT_SINGFORMULA;
418
419 FUNCTION C_WIP_CIFORMULA(P_PTD_OR_CUM IN VARCHAR2
420 ,C_WIP_CI_PTD IN NUMBER
421 ,C_WIP_CI_CUM IN NUMBER) RETURN NUMBER IS
422 BEGIN
423 IF (P_PTD_OR_CUM = 'PTD') THEN
424 RETURN (C_WIP_CI_PTD);
425 ELSE
426 RETURN (C_WIP_CI_CUM);
427 END IF;
428 RETURN NULL;
429 END C_WIP_CIFORMULA;
430
431 FUNCTION C_WIP_CRFORMULA(P_PTD_OR_CUM IN VARCHAR2
432 ,C_WIP_CR_PTD IN NUMBER
433 ,C_WIP_CR_CUM IN NUMBER) RETURN NUMBER IS
434 BEGIN
435 IF (P_PTD_OR_CUM = 'PTD') THEN
436 RETURN (C_WIP_CR_PTD);
437 ELSE
438 RETURN (C_WIP_CR_CUM);
439 END IF;
440 RETURN NULL;
441 END C_WIP_CRFORMULA;
442
443 FUNCTION C_WIP_EL_VARFORMULA(P_PTD_OR_CUM IN VARCHAR2
444 ,C_WIP_EL_VAR_PTD IN NUMBER
445 ,C_WIP_EL_VAR_CUM IN NUMBER) RETURN NUMBER IS
446 BEGIN
447 IF (P_PTD_OR_CUM = 'PTD') THEN
448 RETURN (C_WIP_EL_VAR_PTD);
449 ELSE
450 RETURN (C_WIP_EL_VAR_CUM);
451 END IF;
452 RETURN NULL;
453 END C_WIP_EL_VARFORMULA;
454
455 FUNCTION C_WIP_SINGFORMULA(P_PTD_OR_CUM IN VARCHAR2
456 ,C_WIP_SING_PTD IN NUMBER
457 ,C_WIP_SING_CUM IN NUMBER) RETURN NUMBER IS
458 BEGIN
459 IF (P_PTD_OR_CUM = 'PTD') THEN
460 RETURN (C_WIP_SING_PTD);
461 ELSE
462 RETURN (C_WIP_SING_CUM);
463 END IF;
464 RETURN NULL;
465 END C_WIP_SINGFORMULA;
466
467 FUNCTION P_PTD_OR_CUMFORMULA RETURN VARCHAR2 IS
468 BEGIN
469 IF (P_REPORT_TYPE = 1) THEN
470 RETURN ('PTD');
471 ELSE
472 RETURN ('CUM');
473 END IF;
474 RETURN NULL;
475 END P_PTD_OR_CUMFORMULA;
476
477 FUNCTION AFTERREPORT RETURN BOOLEAN IS
478 BEGIN
479 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
480 RETURN (TRUE);
481 END AFTERREPORT;
482
483 FUNCTION C_ACCT_SORTFORMULA(C_ACCT_SORT IN VARCHAR2) RETURN VARCHAR2 IS
484 BEGIN
485 RETURN (C_ACCT_SORT);
486 END C_ACCT_SORTFORMULA;
487
488 FUNCTION C_WIP_ACCT_SORTFORMULA(C_WIP_ACCT_SORT IN VARCHAR2) RETURN VARCHAR2 IS
489 BEGIN
490 RETURN (C_WIP_ACCT_SORT);
491 END C_WIP_ACCT_SORTFORMULA;
492
493 FUNCTION AFTERPFORM RETURN BOOLEAN IS
494 BEGIN
495 RETURN (TRUE);
496 END AFTERPFORM;
497
498 END WIP_WIPUTVAL_XMLP_PKG;
499