1 PACKAGE BODY FLM_FLMRFSCH_XMLP_PKG AS
2 /* $Header: FLMRFSCHB.pls 120.0 2007/12/24 15:32:39 nchinnam noship $ */
3 FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4 BEGIN
5 SELECT
6 O.ORGANIZATION_NAME
7 INTO P_ORGANIZATION
8 FROM
9 ORG_ORGANIZATION_DEFINITIONS O
10 WHERE O.ORGANIZATION_ID = P_ORG_ID;
11 IF (P_LINE_FROM IS NULL AND P_LINE_TO IS NOT NULL) THEN
12 CP_LINE_FROM := P_LINE_TO;
13 ELSIF (P_LINE_FROM IS NOT NULL AND P_LINE_TO IS NULL) THEN
14 CP_LINE_TO := P_LINE_FROM;
15 END IF;
16 IF (P_LINE_FROM IS NOT NULL) THEN
17 P_LIMIT_LINE := 'and wl.line_code >= ''' || P_LINE_FROM || '''';
18 ELSE
19 P_LIMIT_LINE := ' ';
20 END IF;
21 IF (P_LINE_TO IS NOT NULL) THEN
22 P_LIMIT_LINE := P_LIMIT_LINE || ' and wl.line_code <= ''' || P_LINE_TO || '''';
23 ELSE
24 P_LIMIT_LINE := ' ';
25 END IF;
26 IF (P_SCH_GROUP IS NOT NULL) THEN
27 P_LIMIT_SCH_GROUP := 'and wsg.schedule_group_name = ''' || P_SCH_GROUP || '''';
28 ELSE
29 P_LIMIT_SCH_GROUP := ' ';
30 END IF;
31 SELECT FIFST.ID_FLEX_NUM
32 INTO P_ITEM_FLEX_NUM
33 FROM FND_ID_FLEX_STRUCTURES FIFST
34 WHERE FIFST.APPLICATION_ID = 401
35 AND FIFST.ID_FLEX_CODE = 'MSTK'
36 AND FIFST.ENABLED_FLAG = 'Y'
37 AND FIFST.FREEZE_FLEX_DEFINITION_FLAG = 'Y'
38 AND ROWNUM<2 ;
39 P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
40 CP_DATE_FROM := TO_CHAR(P_DATE_FROM,'DD-MON-YY');
41 CP_DATE_TO := TO_CHAR(P_DATE_TO,'DD-MON-YY');
42 /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
43 /*SRW.USER_EXIT('
44 FND FLEXSQL
45 CODE="MSTK"
46 APPL_SHORT_NAME="INV"
47 OUTPUT=":P_ASSY_FLEX"
48 TABLEALIAS="MSI1"
49 MODE="SELECT"
50 DISPLAY="ALL"
51 ')*/NULL;
52 RETURN (TRUE);
53 END BEFOREREPORT;
54 FUNCTION AFTERREPORT RETURN BOOLEAN IS
55 BEGIN
56 /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
57 RETURN (TRUE);
58 END AFTERREPORT;
59 FUNCTION AFTERPFORM RETURN BOOLEAN IS
60 BEGIN
61 RETURN (TRUE);
62 END AFTERPFORM;
63 END FLM_FLMRFSCH_XMLP_PKG;
64