PACKAGE BODY: APPS.AR_ARXAPFRC_XMLP_PKG

Source

1 PACKAGE BODY AR_ARXAPFRC_XMLP_PKG AS
2 /* $Header: ARXAPFRCB.pls 120.0 2007/12/27 13:23:54 abraghun noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4   BEGIN
5     BEGIN
6       P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
7       SELECT SUBSTR(ARGUMENT1,INSTR(ARGUMENT1,'=')+1,LENGTH(ARGUMENT1))
8 INTO P_BATCH_ID
9 FROM FND_CONCURRENT_REQUESTS WHERE REQUEST_ID=P_CONC_REQUEST_ID;
10       /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
11       SELECT
12         SOB.NAME
13       INTO P_COMPANY_NAME
14       FROM
15         GL_SETS_OF_BOOKS SOB,
16         AR_SYSTEM_PARAMETERS AR
17       WHERE SOB.SET_OF_BOOKS_ID = AR.SET_OF_BOOKS_ID;
18       P_MASK_BNK_ACCT := FND_PROFILE.VALUE('AR_MASK_BANK_ACCOUNT_NUMBERS');
19     END;
20     LP_COMPANY_NAME:=P_COMPANY_NAME;
21     RETURN (TRUE);
22   END BEFOREREPORT;
23 
24   FUNCTION AFTERREPORT RETURN BOOLEAN IS
25   BEGIN
26     /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
27     RETURN (TRUE);
28   END AFTERREPORT;
29 
30 END AR_ARXAPFRC_XMLP_PKG;
31