PACKAGE BODY: APPS.AR_ARHLERPT_XMLP_PKG

Source

1 PACKAGE BODY AR_ARHLERPT_XMLP_PKG AS
2 /* $Header: ARHLERPTB.pls 120.0 2008/01/24 14:45:46 dwkrishn noship $ */
3   FUNCTION AFTERPFORM RETURN BOOLEAN IS
4   BEGIN
5     SELECT
6       BATCH_NAME,
7       ORIGINAL_SYSTEM,
8       TRUNC(CREATION_DATE),
9       LOAD_TYPE,
10       TOTAL_BATCH_RECORDS,
11       TOTAL_RECORDS_IMPORTED
12     INTO P_BATCH_NAME,P_ORIG_SYS,P_CRE_DT,P_LOAD_TYPE,P_TOT_B_REC,P_TOT_REC_IMP
13     FROM
14       HZ_IMP_BATCH_SUMMARY
15     WHERE BATCH_ID = P_BATCH_ID;
16     P_CRE_DT1 := to_char(P_CRE_DT,'DD-MON-YY');
17     RETURN (TRUE);
18   EXCEPTION
19     WHEN OTHERS THEN
20       /*SRW.MESSAGE('100'
21                  ,'error in aftre parameter form:' || SQLERRM)*/NULL;
22       /*SRW.MESSAGE('100'
23                  ,'batch id is' || P_BATCH_ID)*/NULL;
24       RETURN (FALSE);
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 AR_ARHLERPT_XMLP_PKG;