[Home] [Help]
PACKAGE BODY: APPS.ARRX_C_OTH
Source
1 PACKAGE BODY ARRX_C_OTH as
2 /* $Header: ARRXCOTB.pls 120.0 2005/01/26 21:26:36 vcrisost noship $ */
3
4 PROCEDURE AR_OTH_REC_APP (
5 errbuf out NOCOPY varchar2,
6 retcode out NOCOPY varchar2,
7 argument1 in varchar2, -- reporting level
8 argument2 in varchar2, -- reporting context
9 argument3 in varchar2, -- sob_id
10 argument4 in varchar2, -- coa_id
11 argument5 in varchar2, -- co_seg_low
12 argument6 in varchar2, -- co_seg_high
13 argument7 in varchar2, -- application_gl_date_from
14 argument8 in varchar2, -- application_gl_date_to
15 argument9 in varchar2, -- entered_currency
16 argument10 in varchar2, -- customer_name_low
17 argument11 in varchar2, -- customer_name_high
18 argument12 in varchar2, -- customer_number_low
19 argument13 in varchar2, -- customer_number_high
20 argument14 in varchar2, -- receipt_date_from
21 argument15 in varchar2, -- receipt_date_to
22 argument16 in varchar2, -- apply_date_from
23 argument17 in varchar2, -- apply_date_to
24 argument18 in varchar2, -- remittance_batch_name_low
25 argument19 in varchar2, -- remittance_batch_name_high
26 argument20 in varchar2, -- receipt batch name low
27 argument21 in varchar2, -- receipt batch name high
28 argument22 in varchar2, -- receipt number low
29 argument23 in varchar2, -- receipt number high
30 argument24 in varchar2, -- application type
31 argument25 in varchar2 default 'N', -- debug flag
32 argument26 in varchar2 default 'N', -- sql trace
33 argument27 in varchar2 default null,
34 argument28 in varchar2 default null,
35 argument29 in varchar2 default null,
36 argument30 in varchar2 default null,
37 argument31 in varchar2 default null,
38 argument32 in varchar2 default null,
39 argument33 in varchar2 default null,
40 argument34 in varchar2 default null,
41 argument35 in varchar2 default null,
42 argument36 in varchar2 default null,
43 argument37 in varchar2 default null,
44 argument38 in varchar2 default null,
45 argument39 in varchar2 default null,
46 argument40 in varchar2 default null,
47 argument41 in varchar2 default null,
48 argument42 in varchar2 default null,
49 argument43 in varchar2 default null,
50 argument44 in varchar2 default null,
51 argument45 in varchar2 default null,
52 argument46 in varchar2 default null,
53 argument47 in varchar2 default null,
54 argument48 in varchar2 default null,
55 argument49 in varchar2 default null,
56 argument50 in varchar2 default null,
57 argument51 in varchar2 default null,
58 argument52 in varchar2 default null,
59 argument53 in varchar2 default null,
60 argument54 in varchar2 default null,
61 argument55 in varchar2 default null,
62 argument56 in varchar2 default null,
63 argument57 in varchar2 default null,
64 argument58 in varchar2 default null,
65 argument59 in varchar2 default null,
66 argument60 in varchar2 default null,
67 argument61 in varchar2 default null,
68 argument62 in varchar2 default null,
69 argument63 in varchar2 default null,
70 argument64 in varchar2 default null,
71 argument65 in varchar2 default null,
72 argument66 in varchar2 default null,
73 argument67 in varchar2 default null,
74 argument68 in varchar2 default null,
75 argument69 in varchar2 default null,
76 argument70 in varchar2 default null,
77 argument71 in varchar2 default null,
78 argument72 in varchar2 default null,
79 argument73 in varchar2 default null,
80 argument74 in varchar2 default null,
81 argument75 in varchar2 default null,
82 argument76 in varchar2 default null,
83 argument77 in varchar2 default null,
84 argument78 in varchar2 default null,
85 argument79 in varchar2 default null,
86 argument80 in varchar2 default null,
87 argument81 in varchar2 default null,
88 argument82 in varchar2 default null,
89 argument83 in varchar2 default null,
90 argument84 in varchar2 default null,
91 argument85 in varchar2 default null,
92 argument86 in varchar2 default null,
93 argument87 in varchar2 default null,
94 argument88 in varchar2 default null,
95 argument89 in varchar2 default null,
96 argument90 in varchar2 default null,
97 argument91 in varchar2 default null,
98 argument92 in varchar2 default null,
99 argument93 in varchar2 default null,
100 argument94 in varchar2 default null,
101 argument95 in varchar2 default null,
102 argument96 in varchar2 default null,
103 argument97 in varchar2 default null,
104 argument98 in varchar2 default null,
105 argument99 in varchar2 default null,
106 argument100 in varchar2 default null)
107 is
108 l_request_id number;
109 l_reporting_level VARCHAR2(50);
110 l_reporting_entity_id NUMBER;
111 l_sob_id NUMBER;
112 l_coa_id number;
113 l_co_seg_low varchar2(30);
114 l_co_seg_high varchar2(30);
115 l_gl_date_low date;
116 l_gl_date_high date;
117 l_currency_code varchar2(15);
118 l_customer_name_low VARCHAR2(50);
119 l_customer_name_high VARCHAR2(50);
120 l_customer_number_low VARCHAR2(30);
121 l_customer_number_high VARCHAR2(30);
122 l_rct_date_low date;
123 l_rct_date_high date;
124 l_apply_date_low date;
125 l_apply_date_high date;
126 l_remit_batch_low varchar2(20);
127 l_remit_batch_high varchar2(20);
128 l_rct_batch_low varchar2(20);
129 l_rct_batch_high varchar2(20);
130 l_rct_num_low varchar2(15);
131 l_rct_num_high varchar2(15);
132 l_app_type varchar2(30);
133
134 begin
135 --
136 -- SQL Trace switches and debug flags are optional
137 -- but highly recommended.
138
139 if upper(substrb(argument25, 1, 1)) = 'Y' then
140 fa_rx_util_pkg.enable_debug;
141 end if;
142
143 fa_rx_util_pkg.debug('OTHER RECEIPT APPLICATIONS with parameters
144 Reporting Level : '||argument1||'
145 Reporting Entity ID : '||argument2||'
146 Set of Books ID : '||argument3||'
147 Chart of Accounts ID : '||argument4||'
148 Company Segment Low : '||argument5||'
149 Company Segment High : '||argument6||'
150 Appl GL Date From : '||argument7||'
151 Appl GL Date To : '||argument8||'
152 Entered Currency : '||argument9||'
153 Customer Name Low : '||argument10||'
154 Customer Name High : '||argument11||'
155 Customer Number Low : '||argument12||'
156 Customer Number High : '||argument13||'
157 Receipt Date From : '||argument14||'
158 Receipt Date To : '||argument15||'
159 Apply Date From : '||argument16||'
160 Apply Date To : '||argument17||'
161 Remit Batch Name Low : '||argument18||'
162 Remit Batch Name High : '||argument19||'
163 Receipt Batch Name Low : '||argument20||'
164 Receipt Batch Name High: '||argument21||'
165 Receipt Number Low : '||argument22||'
166 Receipt Number high : '||argument23||'
167 Application Type : '||argument24);
168
169 --
170 -- Assign parameters doing any necessary mappings
171 -- e.g. date/number conversion
172
173 l_request_id := fnd_global.conc_request_id;
174 l_reporting_level := argument1;
175 l_reporting_entity_id := argument2;
176 l_sob_id := argument3;
177 l_coa_id := argument4;
178 l_co_seg_low := argument5;
179 l_co_seg_high := argument6;
180 l_gl_date_low := FND_DATE.CANONICAL_TO_DATE(argument7);
181 l_gl_date_high := FND_DATE.CANONICAL_TO_DATE(argument8);
182 l_currency_code := argument9;
183 l_customer_name_low := argument10;
184 l_customer_name_high := argument11;
185 l_customer_number_low := argument12;
186 l_customer_number_high := argument13;
187 l_rct_date_low := FND_DATE.CANONICAL_TO_DATE(argument14);
188 l_rct_date_high := FND_DATE.CANONICAL_TO_DATE(argument15);
189 l_apply_date_low := FND_DATE.CANONICAL_TO_DATE(argument16);
190 l_apply_date_high := FND_DATE.CANONICAL_TO_DATE(argument17);
191 l_remit_batch_low := argument18;
192 l_remit_batch_high := argument19;
193 l_rct_batch_low := argument20;
194 l_rct_batch_high := argument21;
195 l_rct_num_low := argument22;
196 l_rct_num_high := argument23;
197 l_app_type := argument24;
198
199 --
200 -- Run report
201 arrx_oth.oth_rec_app (
202 l_request_id,
203 l_reporting_level,
204 l_reporting_entity_id,
205 l_sob_id,
206 l_coa_id,
207 l_co_seg_low,
208 l_co_seg_high,
209 l_gl_date_low,
210 l_gl_date_high,
211 l_currency_code,
212 l_customer_name_low,
213 l_customer_name_high,
214 l_customer_number_low,
215 l_customer_number_high,
216 l_rct_date_low,
217 l_rct_date_high,
218 l_apply_date_low,
219 l_apply_date_high,
220 l_remit_batch_low,
221 l_remit_batch_high,
222 l_rct_batch_low,
223 l_rct_batch_high,
224 l_rct_num_low,
225 l_rct_num_high,
226 l_app_type,
227 retcode,
228 errbuf);
229
230 commit;
231 EXCEPTION
232 WHEN OTHERS THEN
233 fa_rx_util_pkg.debug('AR_SHARED_SERVER_ERROR');
234 fa_rx_util_pkg.debug(sqlcode);
235 fa_rx_util_pkg.debug(sqlerrm);
236 retcode := 2;
237 END AR_OTH_REC_APP;
238
239 END ARRX_C_OTH;