1 PACKAGE BODY INV_INVIRDST_XMLP_PKG AS
2 /* $Header: INVIRDSTB.pls 120.2 2008/01/08 06:38:06 dwkrishn noship $ */
3 FUNCTION C_WHEREFORMULA RETURN VARCHAR2 IS
4 BEGIN
5 IF P_STATUS_HI IS NOT NULL AND P_STATUS_LO IS NOT NULL THEN
6 RETURN ('and inventory_item_status_code between ''' || P_STATUS_LO || ''' and ''' || P_STATUS_HI || ''' ');
7 ELSE
8 IF P_STATUS_HI IS NULL AND P_STATUS_LO IS NOT NULL THEN
9 RETURN ('and inventory_item_status_code >= ''' || P_STATUS_LO || ''' ');
10 ELSE
11 IF P_STATUS_LO IS NULL AND P_STATUS_HI IS NOT NULL THEN
12 RETURN ('and inventory_item_status_code <= ''' || P_STATUS_HI || ''' ');
13 ELSE
14 return(' ');
15 END IF;
16 END IF;
17 END IF;
18 RETURN NULL;
19 END C_WHEREFORMULA;
20
21 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
22 BEGIN
23 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
24 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
25 RETURN (TRUE);
26 END BEFOREREPORT;
27
28 FUNCTION AFTERREPORT RETURN BOOLEAN IS
29 BEGIN
30 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
31 RETURN (TRUE);
32 END AFTERREPORT;
33
34 END INV_INVIRDST_XMLP_PKG;
35