PACKAGE BODY: APPS.QA_QLTPLANR_XMLP_PKG

Source

1 PACKAGE BODY QA_QLTPLANR_XMLP_PKG AS
2 /* $Header: QLTPLANRB.pls 120.0 2007/12/24 10:35:27 krreddy noship $ */
3   FUNCTION AFTERPFORM RETURN BOOLEAN IS
4   BEGIN
5     IF P_ORGANIZATION_ID IS NOT NULL THEN
6       P_ORG_DELIMITER := 'and qpv.Organization_id = ' || TO_CHAR(P_ORGANIZATION_ID);
7     END IF;
8     IF P_PLAN_TYPE IS NOT NULL THEN
9       P_PLAN_TYPE_DELIMITER := 'and qpv.plan_type_code = ''' || P_PLAN_TYPE || '''';
10       SELECT
11         MEANING
12       INTO P_PLAN_TYPE_MEANING
13       FROM
14         FND_COMMON_LOOKUPS
15       WHERE LOOKUP_TYPE = 'COLLECTION_PLAN_TYPE'
16         AND LOOKUP_CODE = P_PLAN_TYPE;
17     END IF;
18     RETURN (TRUE);
19   END AFTERPFORM;
20   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
21   BEGIN
22     P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
23     /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
24     LP_PLAN_TYPE_MEANING:=P_PLAN_TYPE_MEANING;
25     RETURN (TRUE);
26   END BEFOREREPORT;
27   FUNCTION AFTERREPORT RETURN BOOLEAN IS
28   BEGIN
29     /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
30     RETURN (TRUE);
31   END AFTERREPORT;
32 END QA_QLTPLANR_XMLP_PKG;
33