PACKAGE BODY: APPS.AR_RAXPTL_XMLP_PKG

Source

1 PACKAGE BODY AR_RAXPTL_XMLP_PKG AS
2 /* $Header: RAXPTLB.pls 120.0 2007/12/27 14:32:09 abraghun noship $ */
3 
4 function report_nameformula(Company_Name in varchar2) return varchar2 is
5 begin
6 
7 DECLARE
8     l_report_name  VARCHAR2(80);
9 
10 BEGIN
11 
12     RP_Company_Name := Company_Name;
13 
14     SELECT substr(cp.user_concurrent_program_name,1,80)
15     INTO   l_report_name
16     FROM   FND_CONCURRENT_PROGRAMS_VL cp,
17            FND_CONCURRENT_REQUESTS cr
18     WHERE  cr.request_id = P_CONC_REQUEST_ID
19     AND    cp.application_id = cr.program_application_id
20     AND    cp.concurrent_program_id = cr.concurrent_program_id;
21 
22     RP_Report_Name := l_report_name;
23     RETURN(l_report_name);
24 
25 EXCEPTION
26     WHEN NO_DATA_FOUND
27     THEN RP_REPORT_NAME := 'Payment Terms Listing';
28          RETURN('Payment Terms Listing');
29 END;
30 RETURN NULL; end;
31 
32 function BeforeReport return boolean is
33 begin
34 
35 BEGIN
36 	P_CONC_REQUEST_ID:=FND_GLOBAL.conc_request_id;
37 /*SRW.USER_EXIT('FND SRWINIT');*/null;
38 
39 
40 
41 
42 
43 END;
44   return (TRUE);
45 end;
46 
47 function Sub_TitleFormula return VARCHAR2 is
48 begin
49 
50 begin
51 RP_SUB_TITLE := ' ';
52 return(' ');
53 end;
54 
55 RETURN NULL; end;
56 
57 function AfterReport return boolean is
58 begin
59 
60 /*SRW.USER_EXIT('FND SRWEXIT');*/null;
61   return (TRUE);
62 end;
63 
64 --Functions to refer Oracle report placeholders--
65 
66  Function RP_COMPANY_NAME_p return varchar2 is
67 	Begin
68 	 return RP_COMPANY_NAME;
69 	 END;
70  Function RP_REPORT_NAME_p return varchar2 is
71 	Begin
72 	 return substr(RP_REPORT_NAME,1,instr(RP_REPORT_NAME,' (XML)'));
73 	 END;
74  Function RP_DATA_FOUND_p return varchar2 is
75 	Begin
76 	 return RP_DATA_FOUND;
77 	 END;
78  Function RP_SUB_TITLE_p return varchar2 is
79 	Begin
80 	 return RP_SUB_TITLE;
81 	 END;
82  function D_Relative_AmountFormula return VARCHAR2 is
83 	begin
84 	RP_DATA_FOUND := 'X';
85 	return null;
86 	end;
87 END AR_RAXPTL_XMLP_PKG ;
88