1 package body AR_CONFIRMATION_ACTION AS
2 /*$Header: ARCOATNB.pls 120.2 2005/07/22 09:48:27 naneja noship $ */
3
4 procedure update_status(p_status in varchar2,
5 p_doc_transfer_id in NUMBER,
6 p_msgid in VARCHAR2,
7 p_exception_message in varchar2 default null,
8 p_exception_type in varchar2 default null) is
9 cursor doc is
10 select * from ar_document_transfers
11 where document_transfer_id = p_doc_transfer_id;
12 doc_rec ar_document_transfers%rowtype;
13
14 begin
15 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.update_status(+)'); end if;
16 open doc; fetch doc into doc_rec; close doc;
17 doc_rec.confirmation_msgid := p_msgid;
18 doc_rec.status := p_status;
19 doc_rec.exception_message := p_exception_message;
20 doc_rec.exception_type := p_exception_type;
21 ar_document_transfer_pkg.updateRow(doc_rec);
22 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.update_status(-)'); end if;
23 end;
24
25 function parseAndValidateId(p_id in varchar2,
26 p_doc_transfer_id out nocopy number,
27 p_responsibility_id out nocopy number,
28 p_trx_number out nocopy varchar2,
29 p_trx_date out nocopy date,
30 p_currency out nocopy varchar2,
31 p_line_number out nocopy number) return boolean is
32 l_exists varchar2(1);
33 l_retcode boolean;
34 l_trx_id varchar2(50);
35 l_trx_line_id varchar2(50);
36 l_doc_transfer_id varchar2(50);
37 cursor trx is select dt.responsibility_id,
38 dt.status,
39 trx.trx_number,
40 trx.trx_date,
41 trx.INVOICE_CURRENCY_CODE,
42 trxl.line_number
43 from ar_document_transfers dt,
44 ra_customer_trx trx,
45 ra_customer_trx_lines trxl
46 where dt.document_transfer_id = l_doc_transfer_id and
47 trx.customer_trx_id = l_trx_id and
48 trxl.customer_trx_line_id(+) = l_trx_line_id and
49 dt.source_table = 'RA_CUSTOMER_TRX' and
50 dt.source_id = trx.customer_trx_id and
51 trx.customer_trx_id = trxl.customer_trx_id(+);
52 l_trx_rec trx%rowtype;
53 begin
54 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.parseAndValidateId(+)'); end if;
55 l_doc_transfer_id := rtrim(ltrim(substrb(p_id,1,instrb(p_id,':',1,1)-1)));
56 if instrb(p_id, ':',1,2) = 0 then --Header Only
57 l_trx_id := rtrim(ltrim(substrb(p_id, instrb(p_id,':',1,1)+1)));
58 else -- Header and Line
59 l_trx_id := rtrim(ltrim(substrb(p_id, instrb(p_id,':',1,1)+1,instrb(p_id,':',1,2)-1)));
60 l_trx_line_id := rtrim(ltrim(substrb(p_id, instrb(p_id,':',1,2)+1)));
61 end if;
62
63 if ar_doc_transfer_standard.isDebugOn then
64 ar_doc_transfer_standard.debug('l_doc_transfer_id:'||l_doc_transfer_id);
65 ar_doc_transfer_standard.debug('l_trx_id:'||l_trx_id);
66 ar_doc_transfer_standard.debug('l_trx_line_id:'||l_trx_line_id);
67 end if;
68 open trx; fetch trx into l_trx_rec; close trx;
69 if ar_doc_transfer_standard.isDebugOn then
70 ar_doc_transfer_standard.debug('l_trx_rec.trx_number:'||l_trx_rec.trx_number);
71 ar_doc_transfer_standard.debug('l_trx_rec.trx_date:'||to_char(l_trx_rec.trx_date));
72 ar_doc_transfer_standard.debug('l_trx_rec.invoice_currency_code:'||l_trx_rec.invoice_currency_code);
73 ar_doc_transfer_standard.debug('l_trx_rec.line_number:'||l_trx_rec.line_number);
74 end if;
75 if l_trx_rec.trx_number is null then
76 l_retcode := false;
77 else
78 l_retcode := true;
79 p_doc_transfer_id := l_doc_transfer_id;
80 p_responsibility_id := l_trx_rec.responsibility_id;
81 p_trx_number := l_trx_rec.trx_number;
82 p_trx_date := l_trx_rec.trx_date;
83 p_currency := l_trx_rec.INVOICE_CURRENCY_CODE;
84 p_line_number := l_trx_rec.line_number;
85 end if;
86 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.parseAndValidateId(-)'); end if;
87 return l_retcode;
88 end;
89
90 procedure notifyToSysadmin(p_id in varchar2) is
91 l_subject varchar2(200);
92 l_body varchar2(4000);
93 begin
94 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.notifyToSysadmin(+)'); end if;
95 fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_SBJ');
96 l_subject := fnd_message.get;
97 fnd_message.set_name('AR','AR_CONF_ACT_INV_ID_BODY');
98 fnd_message.set_token('P_ID', p_id);
99 l_body := fnd_message.get;
100 ar_notification_standard.notifyToSysadmin(l_subject, l_body);
101 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.notifyToSysadmin(-)'); end if;
102 end;
103
104 procedure processRejection(p_id in varchar2, p_reason_code in varchar2, p_msgid in varchar2) is
105 l_doc_transfer_id number;
106 l_trx_number varchar2(20);
107 l_trx_date date;
108 l_invoice_currency varchar2(15);
109 l_line_number number;
110 l_responsibility_id number;
111 l_subject varchar2(200);
112 l_body varchar2(4000);
113 l_msg varchar2(240);
114 l_url varchar2(500);
115 cursor ap_lookups is
116 select description from ap_lookup_codes
117 where lookup_type = 'REJECT CODE' and lookup_code = p_reason_code;
118
119 begin
120 if ar_doc_transfer_standard.isDebugOn then
121 ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.processRejection(+)');
122 ar_doc_transfer_standard.debug('p_id:'||p_id);
123 ar_doc_transfer_standard.debug('p_reason_code:'||p_reason_code);
124 ar_doc_transfer_standard.debug('p_msgid:'||p_msgid);
125 end if;
126 if parseAndValidateId(p_id => p_id,
127 p_doc_transfer_id => l_doc_transfer_id,
128 p_responsibility_id => l_responsibility_id,
129 p_trx_number => l_trx_number,
130 p_trx_date => l_trx_date,
131 p_currency => l_invoice_currency,
132 p_line_number => l_line_number) then
133 fnd_message.set_name('AR', 'AR_CONF_ACT_CUST_MSG_SBJ');
134 l_subject := fnd_message.get;
135 if l_line_number is null then
136 fnd_message.set_name('AR','AR_CONF_ACT_CUST_MSG_BODY1');
137 else
138 fnd_message.set_name('AR','AR_CONF_ACT_CUST_MSG_BODY2');
139 fnd_message.set_token('LINE_NUMBER',to_char(l_line_number));
140 end if;
141 fnd_message.set_token('TRX_NUMBER', l_trx_number);
142 fnd_message.set_token('TRX_DATE', to_char(l_trx_date));
143 fnd_message.set_token('CURRENCY', l_invoice_currency);
144 l_body := fnd_message.get||fnd_global.newline||fnd_global.newline;
145 open ap_lookups; fetch ap_lookups into l_msg; close ap_lookups;
146 l_body := l_body||l_msg;
147 l_url := 'JSP:/OA_HTML/OA.jsp?akRegionCode=ARDOCTRSPG'||'&'||
148 'akRegionApplicationId=222'||'&'||
149 'Query=Y'||'&'||
150 'DocumentTransferNumber='||to_char(l_doc_transfer_id);
151 ar_notification_standard.notify(l_subject,
152 l_body,
153 'FND_RESP222:'||to_char(l_responsibility_id),
154 l_url);
155 update_status('REJECTED', l_doc_transfer_id, p_msgid, l_body, 'AR');
156 else
157 notifyToSysadmin(p_id);
158 end if;
159 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.processRejection(-)');end if;
160 end;
161
162
163 procedure SUCCESSFUL_TRANSMISSION( P_STATUS in VARCHAR2,
164 P_ID in VARCHAR2,
165 P_REASON_CODE in VARCHAR2,
166 P_DESCRIPTION in VARCHAR2,
167 P_MSGID in VARCHAR2) is
168 l_doc_transfer_id number;
169 l_trx_number varchar2(20);
170 l_trx_date date;
171 l_invoice_currency varchar2(15);
172 l_line_number number;
173 l_responsibility_id number;
174 begin
175 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.SUCCESSFUL_TRANSMISSION(+)'); end if;
176 if parseAndValidateId(p_id => p_id,
177 p_doc_transfer_id => l_doc_transfer_id,
178 p_responsibility_id => l_responsibility_id,
179 p_trx_number => l_trx_number,
180 p_trx_date => l_trx_date,
181 p_currency => l_invoice_currency,
182 p_line_number => l_line_number) then
183 update_status('ACCEPTED', l_doc_transfer_id, p_msgid);
184 else
185 notifyToSysadmin(p_id);
186 end if;
187 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.SUCCESSFUL_TRANSMISSION(-)'); end if;
188 end;
189
190 procedure DUPL_INV_NUM_IN_IMPORT( P_STATUS in VARCHAR2,
191 P_ID in VARCHAR2,
192 P_REASON_CODE in VARCHAR2,
193 P_DESCRIPTION in VARCHAR2,
194 P_MSGID in VARCHAR2) is
195
196 begin
197 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.DUPL_INV_NUM_IN_IMPORT(+)'); end if;
198 processRejection(p_id, p_reason_code, p_msgid);
199 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.DUPL_INV_NUM_IN_IMPORT(-)'); end if;
200 end;
201
202 procedure DUPLICATE_INVOICE_NUMBER( P_STATUS in VARCHAR2,
203 P_ID in VARCHAR2,
204 P_REASON_CODE in VARCHAR2,
205 P_DESCRIPTION in VARCHAR2,
206 P_MSGID in VARCHAR2) is
207 begin
208 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.DUPLICATE_INVOICE_NUMBER(+)'); end if;
209 processRejection(p_id, p_reason_code, p_msgid);
210 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.DUPLICATE_INVOICE_NUMBER(-)'); end if;
211 end;
212
213 procedure DUPLICATE_LINE_NUMBER( P_STATUS in VARCHAR2,
214 P_ID in VARCHAR2,
215 P_REASON_CODE in VARCHAR2,
216 P_DESCRIPTION in VARCHAR2,
217 P_MSGID in VARCHAR2) is
218 begin
219 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.DUPLICATE_LINE_NUMBER(+)'); end if;
220 processRejection(p_id, p_reason_code, p_msgid);
221 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.DUPLICATE_LINE_NUMBER(-)'); end if;
222 end;
223
224
225 procedure INCONSISTENT_CURR( P_STATUS in VARCHAR2,
226 P_ID in VARCHAR2,
227 P_REASON_CODE in VARCHAR2,
228 P_DESCRIPTION in VARCHAR2,
229 P_MSGID in VARCHAR2) is
230 begin
231 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INCONSISTENT_CURR(+)'); end if;
232 processRejection(p_id, p_reason_code, p_msgid);
233 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INCONSISTENT_CURR(-)'); end if;
234 end;
235
236
237 procedure INCONSISTENT_PO_SUPPLIER( P_STATUS in VARCHAR2,
238 P_ID in VARCHAR2,
239 P_REASON_CODE in VARCHAR2,
240 P_DESCRIPTION in VARCHAR2,
241 P_MSGID in VARCHAR2) is
242 begin
243 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INCONSISTENT_PO_SUPPLIER(+)'); end if;
244 processRejection(p_id, p_reason_code, p_msgid);
245 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INCONSISTENT_PO_SUPPLIER(-)'); end if;
246 end;
247
248
249 procedure INVALID_LINE_AMOUNT( P_STATUS in VARCHAR2,
250 P_ID in VARCHAR2,
251 P_REASON_CODE in VARCHAR2,
252 P_DESCRIPTION in VARCHAR2,
253 P_MSGID in VARCHAR2) is
254 begin
255 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_LINE_AMOUNT(+)'); end if;
256 processRejection(p_id, p_reason_code, p_msgid);
257 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_LINE_AMOUNT(-)'); end if;
258 end;
259
260
261 procedure INVALID_INVOICE_AMOUNT( P_STATUS in VARCHAR2,
262 P_ID in VARCHAR2,
263 P_REASON_CODE in VARCHAR2,
264 P_DESCRIPTION in VARCHAR2,
265 P_MSGID in VARCHAR2) is
266 begin
267 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_INVOICE_AMOUNT(+)'); end if;
268 processRejection(p_id, p_reason_code, p_msgid);
269 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_INVOICE_AMOUNT(-)'); end if;
270 end;
271
272
273 procedure INVALID_PO_INFO( P_STATUS in VARCHAR2,
274 P_ID in VARCHAR2,
275 P_REASON_CODE in VARCHAR2,
276 P_DESCRIPTION in VARCHAR2,
277 P_MSGID in VARCHAR2) is
278 begin
279 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_INFO(+)'); end if;
280 processRejection(p_id, p_reason_code, p_msgid);
281 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_INFO(-)'); end if;
282 end;
283
284
285 procedure INVALID_PO_NUM( P_STATUS in VARCHAR2,
286 P_ID in VARCHAR2,
287 P_REASON_CODE in VARCHAR2,
288 P_DESCRIPTION in VARCHAR2,
289 P_MSGID in VARCHAR2) is
290 begin
291 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_NUM(+)'); end if;
292 processRejection(p_id, p_reason_code, p_msgid);
293 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_NUM(-)'); end if;
294 end;
295
296
297 procedure INVALID_PO_RELEASE_INFO( P_STATUS in VARCHAR2,
298 P_ID in VARCHAR2,
299 P_REASON_CODE in VARCHAR2,
300 P_DESCRIPTION in VARCHAR2,
301 P_MSGID in VARCHAR2) is
302 begin
303 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_RELEASE_INFO(+)'); end if;
304 processRejection(p_id, p_reason_code, p_msgid);
305 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_RELEASE_INFO(-)'); end if;
306 end;
307
308
309 procedure INVALID_PO_RELEASE_NUM( P_STATUS in VARCHAR2,
310 P_ID in VARCHAR2,
311 P_REASON_CODE in VARCHAR2,
312 P_DESCRIPTION in VARCHAR2,
313 P_MSGID in VARCHAR2) is
314 begin
318 end;
315 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_RELEASE_NUM(+)'); end if;
316 processRejection(p_id, p_reason_code, p_msgid);
317 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_RELEASE_NUM(-)'); end if;
319
320
321 procedure INVALID_PO_SHIPMENT_NUM( P_STATUS in VARCHAR2,
322 P_ID in VARCHAR2,
323 P_REASON_CODE in VARCHAR2,
324 P_DESCRIPTION in VARCHAR2,
325 P_MSGID in VARCHAR2) is
326 begin
327 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_SHIPMENT_NUM(+)'); end if;
328 processRejection(p_id, p_reason_code, p_msgid);
329 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PO_SHIPMENT_NUM(-)'); end if;
330 end;
331
332
333 procedure INVALID_PRICE_QUANTITY( P_STATUS in VARCHAR2,
334 P_ID in VARCHAR2,
335 P_REASON_CODE in VARCHAR2,
336 P_DESCRIPTION in VARCHAR2,
337 P_MSGID in VARCHAR2) is
338 begin
339 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PRICE_QUANTITY(+)'); end if;
340 processRejection(p_id, p_reason_code, p_msgid);
341 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_PRICE_QUANTITY(-)'); end if;
342 end;
343
344
345 procedure INVALID_QUANTITY( P_STATUS in VARCHAR2,
346 P_ID in VARCHAR2,
347 P_REASON_CODE in VARCHAR2,
348 P_DESCRIPTION in VARCHAR2,
349 P_MSGID in VARCHAR2) is
350 begin
351 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.(+)'); end if;
352 processRejection(p_id, p_reason_code, p_msgid);
353 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.(-)'); end if;
354 end;
355
356
357 procedure INVALID_SUPPLIER( P_STATUS in VARCHAR2,
358 P_ID in VARCHAR2,
359 P_REASON_CODE in VARCHAR2,
360 P_DESCRIPTION in VARCHAR2,
361 P_MSGID in VARCHAR2) is
362 begin
363 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_SUPPLIER(+)'); end if;
364 processRejection(p_id, p_reason_code, p_msgid);
365 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_SUPPLIER(-)'); end if;
366 end;
367
368
369
370 procedure INVALID_SUPPLIER_SITE( P_STATUS in VARCHAR2,
371 P_ID in VARCHAR2,
372 P_REASON_CODE in VARCHAR2,
373 P_DESCRIPTION in VARCHAR2,
374 P_MSGID in VARCHAR2) is
375 begin
376 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_SUPPLIER_SITE(+)'); end if;
377 processRejection(p_id, p_reason_code, p_msgid);
378 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_SUPPLIER_SITE(-)'); end if;
379 end;
380
381
382 procedure INVALID_UNIT_PRICE( P_STATUS in VARCHAR2,
383 P_ID in VARCHAR2,
384 P_REASON_CODE in VARCHAR2,
385 P_DESCRIPTION in VARCHAR2,
386 P_MSGID in VARCHAR2) is
387 begin
388 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_UNIT_PRICE(+)'); end if;
389 processRejection(p_id, p_reason_code, p_msgid);
390 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.INVALID_UNIT_PRICE(-)'); end if;
391 end;
392
393
394 procedure NO_PO_LINE_NUM( P_STATUS in VARCHAR2,
395 P_ID in VARCHAR2,
396 P_REASON_CODE in VARCHAR2,
397 P_DESCRIPTION in VARCHAR2,
398 P_MSGID in VARCHAR2) is
399 begin
400 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.NO_PO_LINE_NUM(+)'); end if;
401 processRejection(p_id, p_reason_code, p_msgid);
402 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.NO_PO_LINE_NUM(-)'); end if;
403 end;
404
405
406 procedure NO_SUPPLIER( P_STATUS in VARCHAR2,
407 P_ID in VARCHAR2,
408 P_REASON_CODE in VARCHAR2,
409 P_DESCRIPTION in VARCHAR2,
410 P_MSGID in VARCHAR2) is
411 begin
412 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.NO_SUPPLIER(+)'); end if;
413 processRejection(p_id, p_reason_code, p_msgid);
414 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.NO_SUPPLIER(-)'); end if;
415 end;
416
417
418 procedure RELEASE_MISSNG( P_STATUS in VARCHAR2,
419 P_ID in VARCHAR2,
420 P_REASON_CODE in VARCHAR2,
421 P_DESCRIPTION in VARCHAR2,
422 P_MSGID in VARCHAR2) is
423 begin
424 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.RELEASE_MISSNG(+)'); end if;
425 processRejection(p_id, p_reason_code, p_msgid);
426 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION.RELEASE_MISSNG(-)'); end if;
427 end;
428
429 begin
430 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION(+)'); end if;
431 if ar_doc_transfer_standard.isDebugOn then ar_doc_transfer_standard.debug('AR_CONFIRMATION_ACTION(-)'); end if;
432 end;