PACKAGE BODY: APPS.QA_QLTCHACR_XMLP_PKG

Source

1 PACKAGE BODY QA_QLTCHACR_XMLP_PKG AS
2 /* $Header: QLTCHACRB.pls 120.0 2007/12/24 10:31:44 krreddy noship $ */
3   FUNCTION AFTERPFORM RETURN BOOLEAN IS
4   BEGIN
5     IF (P_CHAR_NAME IS NOT NULL) THEN
6       SELECT
7         NAME
8       INTO P_CHAR_NAME
9       FROM
10         QA_CHARS
11       WHERE CHAR_ID = P_CHAR_NAME;
12       P_CHAR_LIMITER := 'and  qcatv.char_name = ''' || P_CHAR_NAME || '''';
13     END IF;
14     IF (P_ENABLED IS NOT NULL) THEN
15       P_ENABLED_LIMITER := 'and ml.lookup_code = ''' || P_ENABLED || '''';
16       SELECT
17         MEANING
18       INTO P_ENABLED_MEANING
19       FROM
20         MFG_LOOKUPS
21       WHERE LOOKUP_CODE = P_ENABLED
22         AND LOOKUP_TYPE = 'SYS_YES_NO';
23     END IF;
24     RETURN (TRUE);
25   END AFTERPFORM;
26 
27   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
28   BEGIN
29     P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
30     /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
31     RETURN (TRUE);
32   END BEFOREREPORT;
33 
34   FUNCTION AFTERREPORT RETURN BOOLEAN IS
35   BEGIN
36     /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
37     RETURN (TRUE);
38   END AFTERREPORT;
39 
40 END QA_QLTCHACR_XMLP_PKG;
41