DBA Data[Home] [Help]

APPS.AR_POSTBATCH_PARALLEL dependencies on FND_FILE

Line 163: fnd_file.put_line(FND_FILE.LOG, 'submit_subrequest()+');

159: PROCEDURE submit_subrequest (p_worker_number IN NUMBER,
160: p_org_id IN NUMBER) IS
161: l_request_id NUMBER(15);
162: BEGIN
163: fnd_file.put_line(FND_FILE.LOG, 'submit_subrequest()+');
164:
165: FND_REQUEST.SET_ORG_ID(p_org_id);
166:
167: l_request_id := FND_REQUEST.submit_request( 'AR', 'ARCABP',

Line 228: fnd_file.put_line( FND_FILE.LOG, 'Process_batch_for_update()+');

224: l_act_app_cnt NUMBER;
225: l_act_app_amt NUMBER;
226: l_err_receipt_cnt NUMBER;
227: BEGIN
228: fnd_file.put_line( FND_FILE.LOG, 'Process_batch_for_update()+');
229:
230: IF ( p_batch_applied_status <> 'PROCESSED' AND
231: p_batch_applied_status <> 'POSTBATCH_WAITING') THEN
232:

Line 234: fnd_file.put_line(FND_FILE.LOG, 'Batch_id : '||p_batch_id||' : Control count : '||p_ct_cnt||' : Control Amount : '||p_ct_amt);

230: IF ( p_batch_applied_status <> 'PROCESSED' AND
231: p_batch_applied_status <> 'POSTBATCH_WAITING') THEN
232:
233:
234: fnd_file.put_line(FND_FILE.LOG, 'Batch_id : '||p_batch_id||' : Control count : '||p_ct_cnt||' : Control Amount : '||p_ct_amt);
235:
236: fnd_file.put_line( FND_FILE.LOG, ' Getting the applied count and applied amount');
237:
238: SELECT count(*), nvl(sum(cr.amount),0)

Line 236: fnd_file.put_line( FND_FILE.LOG, ' Getting the applied count and applied amount');

232:
233:
234: fnd_file.put_line(FND_FILE.LOG, 'Batch_id : '||p_batch_id||' : Control count : '||p_ct_cnt||' : Control Amount : '||p_ct_amt);
235:
236: fnd_file.put_line( FND_FILE.LOG, ' Getting the applied count and applied amount');
237:
238: SELECT count(*), nvl(sum(cr.amount),0)
239: INTO l_act_app_cnt, l_act_app_amt
240: FROM ar_cash_receipts cr,

Line 258: fnd_file.put_line( FND_FILE.LOG, 'Updating batch_applied_status to PROCESSED.' );

254: FROM ar_interim_cash_receipts
255: WHERE batch_id = p_batch_id;
256:
257: IF ( l_err_receipt_cnt = 0) THEN
258: fnd_file.put_line( FND_FILE.LOG, 'Updating batch_applied_status to PROCESSED.' );
259: UPDATE ar_batches
260: SET batch_applied_status = 'PROCESSED',
261: status = l_status,
262: last_updated_by = G_USER_ID,

Line 270: fnd_file.put_line( FND_FILE.LOG, 'Updating batch_applied_status to POSTBATCH_WAITING.' );

266: program_application_id = G_PROG_APPL_ID,
267: program_update_date = sysdate
268: WHERE batch_id = p_batch_id;
269: ELSE
270: fnd_file.put_line( FND_FILE.LOG, 'Updating batch_applied_status to POSTBATCH_WAITING.' );
271: update_batch_for_rerun( l_status, p_batch_id);
272: END IF;
273:
274: commit;

Line 275: fnd_file.put_line( FND_FILE.LOG, 'End of Posting');

271: update_batch_for_rerun( l_status, p_batch_id);
272: END IF;
273:
274: commit;
275: fnd_file.put_line( FND_FILE.LOG, 'End of Posting');
276:
277: END IF;
278: END update_batch_after_process;
279:

Line 281: fnd_file.put_line( FND_FILE.LOG, 'submit_postbatch_parallel()+');

277: END IF;
278: END update_batch_after_process;
279:
280: BEGIN
281: fnd_file.put_line( FND_FILE.LOG, 'submit_postbatch_parallel()+');
282: /* Initialize the global values */
283: G_USER_ID := FND_GLOBAL.user_id;
284: G_CONC_PROGRAM_ID := FND_GLOBAL.conc_program_id;
285: G_CONC_REQUEST_ID := FND_GLOBAL.conc_request_id;

Line 312: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');

308: IF NVL(p_transmission_id,-1) <> -1 THEN
309: -- This is a Lockbox batch.
310: FOR lbr IN lbbatch LOOP
311: IF lbr.batch_applied_status = 'PROCESSED' THEN
312: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
313: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
314: ELSIF lbr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
315: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
316: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));

Line 313: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));

309: -- This is a Lockbox batch.
310: FOR lbr IN lbbatch LOOP
311: IF lbr.batch_applied_status = 'PROCESSED' THEN
312: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
313: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
314: ELSIF lbr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
315: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
316: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));
317: ELSE

Line 315: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');

311: IF lbr.batch_applied_status = 'PROCESSED' THEN
312: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
313: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
314: ELSIF lbr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
315: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
316: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));
317: ELSE
318: SELECT 'locked'
319: INTO l_locked_status

Line 316: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));

312: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
313: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
314: ELSIF lbr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
315: fnd_file.put( FND_FILE.OUTPUT, '***' || lbr.batch_name ||' : ');
316: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));
317: ELSE
318: SELECT 'locked'
319: INTO l_locked_status
320: FROM ar_batches

Line 337: fnd_file.put_line( FND_FILE.OUTPUT, '**** No Batches To Process ****');

333: l_batch_applied_status := 'IN_PROCESS';
334: END IF;
335: END LOOP;
336: IF l_batch_applied_status <> 'IN_PROCESS' THEN
337: fnd_file.put_line( FND_FILE.OUTPUT, '**** No Batches To Process ****');
338: goto leave_program;
339: END IF;
340: ELSE
341: -- This is a Quick cash batch.

Line 344: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');

340: ELSE
341: -- This is a Quick cash batch.
342: FOR qcr IN qcbatch LOOP
343: IF qcr.batch_applied_status = 'PROCESSED' THEN
344: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');
345: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
346: goto leave_program;
347: ELSIF qcr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
348: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');

Line 345: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));

341: -- This is a Quick cash batch.
342: FOR qcr IN qcbatch LOOP
343: IF qcr.batch_applied_status = 'PROCESSED' THEN
344: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');
345: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
346: goto leave_program;
347: ELSIF qcr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
348: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');
349: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));

Line 348: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');

344: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');
345: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
346: goto leave_program;
347: ELSIF qcr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
348: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');
349: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));
350: goto leave_program;
351: ELSE
352: SELECT 'locked'

Line 349: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));

345: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_BEEN_PROCESSED'));
346: goto leave_program;
347: ELSIF qcr.batch_applied_status <> 'POSTBATCH_WAITING' THEN
348: fnd_file.put( FND_FILE.OUTPUT, '***' || qcr.batch_name ||' : ');
349: fnd_file.put_line( FND_FILE.OUTPUT, fnd_message.get_string('AR', 'ARCABP_NOT_VALID_BATCH'));
350: goto leave_program;
351: ELSE
352: SELECT 'locked'
353: INTO l_locked_status

Line 392: fnd_file.put_line(fnd_file.log, 'EXCEPTION:Failed to get information for AR');

388: application_short_name=>'AR'
389: , status => l_status
390: , industry => l_industry
391: , oracle_schema => l_schema)) THEN
392: fnd_file.put_line(fnd_file.log, 'EXCEPTION:Failed to get information for AR');
393: RAISE no_product_info;
394: END IF;
395:
396: fnd_stats.gather_table_stats(ownname=>l_schema,

Line 402: fnd_file.put_line(fnd_file.log, 'Error in Gather stats' || SQLERRM(SQLCODE));

398: fnd_stats.gather_table_stats(ownname=>l_schema,
399: tabname=>l_tname2);
400: EXCEPTION
401: WHEN OTHERS THEN
402: fnd_file.put_line(fnd_file.log, 'Error in Gather stats' || SQLERRM(SQLCODE));
403: RAISE;
404: END;
405: fnd_file.put_line(fnd_file.LOG, 'AR:ARPBMPB Gathered Stats on Interim Tables');
406: END IF;

Line 405: fnd_file.put_line(fnd_file.LOG, 'AR:ARPBMPB Gathered Stats on Interim Tables');

401: WHEN OTHERS THEN
402: fnd_file.put_line(fnd_file.log, 'Error in Gather stats' || SQLERRM(SQLCODE));
403: RAISE;
404: END;
405: fnd_file.put_line(fnd_file.LOG, 'AR:ARPBMPB Gathered Stats on Interim Tables');
406: END IF;
407: --Invoke the child programs
408: FOR l_worker_number IN 1..p_total_workers LOOP
409: fnd_file.put_line(FND_FILE.LOG, 'worker # : ' || l_worker_number );

Line 409: fnd_file.put_line(FND_FILE.LOG, 'worker # : ' || l_worker_number );

405: fnd_file.put_line(fnd_file.LOG, 'AR:ARPBMPB Gathered Stats on Interim Tables');
406: END IF;
407: --Invoke the child programs
408: FOR l_worker_number IN 1..p_total_workers LOOP
409: fnd_file.put_line(FND_FILE.LOG, 'worker # : ' || l_worker_number );
410: submit_subrequest (l_worker_number,p_org_id);
411: END LOOP;
412:
413: IF PG_DEBUG in ('Y', 'C') THEN

Line 432: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' has a phase '||l_req_status_tab(i).dev_phase);

428: message =>l_req_status_tab(i).message);
429:
430: IF l_req_status_tab(i).dev_phase <> 'COMPLETE' THEN
431: P_RETCODE := 2;
432: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' has a phase '||l_req_status_tab(i).dev_phase);
433: ELSIF l_req_status_tab(i).dev_phase = 'COMPLETE'
434: AND l_req_status_tab(i).dev_status <> 'NORMAL' THEN
435: P_RETCODE := 2;
436: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed with status '||l_req_status_tab(i).dev_status);

Line 436: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed with status '||l_req_status_tab(i).dev_status);

432: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' has a phase '||l_req_status_tab(i).dev_phase);
433: ELSIF l_req_status_tab(i).dev_phase = 'COMPLETE'
434: AND l_req_status_tab(i).dev_status <> 'NORMAL' THEN
435: P_RETCODE := 2;
436: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed with status '||l_req_status_tab(i).dev_status);
437: ELSE
438: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed successfully');
439: END IF;
440:

Line 438: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed successfully');

434: AND l_req_status_tab(i).dev_status <> 'NORMAL' THEN
435: P_RETCODE := 2;
436: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed with status '||l_req_status_tab(i).dev_status);
437: ELSE
438: fnd_file.put_line( FND_FILE.LOG, 'Worker # '|| i||' completed successfully');
439: END IF;
440:
441: END LOOP;
442:

Line 443: fnd_file.put( FND_FILE.LOG, 'Return Code : ' || p_retcode);

439: END IF;
440:
441: END LOOP;
442:
443: fnd_file.put( FND_FILE.LOG, 'Return Code : ' || p_retcode);
444:
445: IF NVL( p_retcode, -1) = 2 THEN
446: fnd_file.put_line( FND_FILE.LOG, ' - Child program failed.' );
447: ELSE

Line 446: fnd_file.put_line( FND_FILE.LOG, ' - Child program failed.' );

442:
443: fnd_file.put( FND_FILE.LOG, 'Return Code : ' || p_retcode);
444:
445: IF NVL( p_retcode, -1) = 2 THEN
446: fnd_file.put_line( FND_FILE.LOG, ' - Child program failed.' );
447: ELSE
448: fnd_file.put_line( FND_FILE.LOG, ' - Child programs completed successfully' );
449: END IF;
450:

Line 448: fnd_file.put_line( FND_FILE.LOG, ' - Child programs completed successfully' );

444:
445: IF NVL( p_retcode, -1) = 2 THEN
446: fnd_file.put_line( FND_FILE.LOG, ' - Child program failed.' );
447: ELSE
448: fnd_file.put_line( FND_FILE.LOG, ' - Child programs completed successfully' );
449: END IF;
450:
451: IF NVL(p_transmission_id, -1) <> -1 THEN /* Lockbox batch */
452: FOR lbr IN lbbatch LOOP

Line 469: fnd_file.put_line( FND_FILE.LOG, 'Updating transmission status.');

465: END IF;
466:
467: IF NVL( p_transmission_id, -1) <> -1 THEN
468:
469: fnd_file.put_line( FND_FILE.LOG, 'Updating transmission status.');
470:
471: UPDATE ar_transmissions t
472: SET status = 'CL',
473: last_updated_by = G_USER_ID,

Line 492: fnd_file.put_line( FND_FILE.LOG, 'submit_postbatch_parallel()-');

488: AR_BUS_EVENT_COVER.Raise_PostBatch_Run_Event( G_CONC_REQUEST_ID );
489:
490: <>
491: commit;
492: fnd_file.put_line( FND_FILE.LOG, 'submit_postbatch_parallel()-');
493:
494: EXCEPTION
495:
496: WHEN OTHERS THEN

Line 528: fnd_file.put_line( FND_FILE.LOG, 'update_batch_for_rerun()+');

524:
525: PROCEDURE update_batch_for_rerun( p_status IN ar_batches.status%TYPE,
526: p_batch_id IN NUMBER) AS
527: BEGIN
528: fnd_file.put_line( FND_FILE.LOG, 'update_batch_for_rerun()+');
529:
530: UPDATE ar_batches
531: SET batch_applied_status = 'POSTBATCH_WAITING',
532: status = p_status,

Line 543: fnd_file.put_line( FND_FILE.LOG, 'update_batch_for_rerun()-');

539: WHERE batch_id = p_batch_id;
540:
541: commit;
542:
543: fnd_file.put_line( FND_FILE.LOG, 'update_batch_for_rerun()-');
544: END update_batch_for_rerun;
545:
546: END AR_POSTBATCH_PARALLEL;