163: l_legal_entity_id ar_cash_receipts.legal_entity_id%TYPE;
164:
165: BEGIN
166: IF PG_DEBUG in ('Y', 'C') THEN
167: arp_standard.debug( 'arp_process_application.update_application()+');
168: END IF;
169:
170: IF (p_ra_id IS NULL)
171: THEN
263:
264: --Bug 1815528 If claim type is CLAIM, then create claim
265:
266: IF PG_DEBUG in ('Y', 'C') THEN
267: arp_standard.debug( 'p_application_ref_type = '||p_application_ref_type);
268: arp_standard.debug( 'p_application_ref_num = '||nvl(p_application_ref_num,'NULL'));
269: END IF;
270: IF (p_application_ref_type = 'CLAIM' AND
271: p_application_ref_num IS NULL)
264: --Bug 1815528 If claim type is CLAIM, then create claim
265:
266: IF PG_DEBUG in ('Y', 'C') THEN
267: arp_standard.debug( 'p_application_ref_type = '||p_application_ref_type);
268: arp_standard.debug( 'p_application_ref_num = '||nvl(p_application_ref_num,'NULL'));
269: END IF;
270: IF (p_application_ref_type = 'CLAIM' AND
271: p_application_ref_num IS NULL)
272: THEN
431: l_xla_ev_rec.xla_call := 'B';
432: ARP_XLA_EVENTS.create_events(p_xla_ev_rec => l_xla_ev_rec);
433:
434: IF PG_DEBUG in ('Y', 'C') THEN
435: arp_standard.debug( 'arp_process_application.update_application()-');
436: END IF;
437:
438: EXCEPTION
439: when others then
506: l_ae_doc_rec ae_doc_rec_type;
507:
508: BEGIN
509: IF PG_DEBUG in ('Y', 'C') THEN
510: arp_standard.debug( 'arp_process_application.delete_selected_transaction()+');
511: END IF;
512:
513: -- Check that the Application Id, and the Applied Payment Schedule Id
514: -- have been provided.
591: -- deleted.
592: ----------------------------------------------------------------
593:
594: IF PG_DEBUG in ('Y', 'C') THEN
595: arp_standard.debug('delete_selected_transaction: ' || 'Getting the Receivable Application Id for the UNAPP row');
596: END IF;
597: -- Get the receivable application id for the UNAPP row.
598: select ra.receivable_application_id
599: into ln_unapp_ra_id
601: where ra.cash_receipt_id = ln_cash_receipt_id
602: and ra.status = 'UNAPP';
603:
604: IF PG_DEBUG in ('Y', 'C') THEN
605: arp_standard.debug('delete_selected_transaction: ' || 'Fetch the UNAPP row');
606: END IF;
607: -- Fetch the UNAPP row.
608: arp_app_pkg.fetch_p( ln_unapp_ra_id, lr_ra_rec );
609:
610: -- Set the amount with the new value.
611: lr_ra_rec.amount_applied := lr_ra_rec.amount_applied - ln_amount_applied;
612:
613: IF PG_DEBUG in ('Y', 'C') THEN
614: arp_standard.debug('delete_selected_transaction: ' || 'New UNAPP amount: ' || to_char(lr_ra_rec.amount_applied));
615: END IF;
616:
617: -- Set the acctd amount with the new value.
618: lr_ra_rec.acctd_amount_applied_from := lr_ra_rec.acctd_amount_applied_from - ln_acctd_amount_applied_from;
616:
617: -- Set the acctd amount with the new value.
618: lr_ra_rec.acctd_amount_applied_from := lr_ra_rec.acctd_amount_applied_from - ln_acctd_amount_applied_from;
619: IF PG_DEBUG in ('Y', 'C') THEN
620: arp_standard.debug('delete_selected_transaction: ' || 'Update the UNAPP row');
621: END IF;
622: --
623: --Release 11.5 delete child accounting records associated with
624: --parent applications UNAPP record as update is a combination
655: arp_acct_main.Create_Acct_Entry(l_ae_doc_rec);
656: END IF;
657:
658: IF PG_DEBUG in ('Y', 'C') THEN
659: arp_standard.debug('delete_selected_transaction: ' || 'arp_process_application.delete_receivable_application()-');
660: END IF;
661:
662: EXCEPTION
663: WHEN OTHERS THEN
661:
662: EXCEPTION
663: WHEN OTHERS THEN
664: IF PG_DEBUG in ('Y', 'C') THEN
665: arp_standard.debug('delete_selected_transaction: ' || '-- EXCEPTION:');
666: arp_standard.debug('delete_selected_transaction: ' || 'Printing procedure parameter values:');
667: arp_standard.debug('delete_selected_transaction: ' || '-- p_ra_id = '||TO_CHAR(p_ra_id));
668: arp_standard.debug('delete_selected_transaction: ' || '-- p_app_ps_id = '||TO_CHAR(p_app_ps_id));
669: END IF;
662: EXCEPTION
663: WHEN OTHERS THEN
664: IF PG_DEBUG in ('Y', 'C') THEN
665: arp_standard.debug('delete_selected_transaction: ' || '-- EXCEPTION:');
666: arp_standard.debug('delete_selected_transaction: ' || 'Printing procedure parameter values:');
667: arp_standard.debug('delete_selected_transaction: ' || '-- p_ra_id = '||TO_CHAR(p_ra_id));
668: arp_standard.debug('delete_selected_transaction: ' || '-- p_app_ps_id = '||TO_CHAR(p_app_ps_id));
669: END IF;
670: app_exception.raise_exception;
663: WHEN OTHERS THEN
664: IF PG_DEBUG in ('Y', 'C') THEN
665: arp_standard.debug('delete_selected_transaction: ' || '-- EXCEPTION:');
666: arp_standard.debug('delete_selected_transaction: ' || 'Printing procedure parameter values:');
667: arp_standard.debug('delete_selected_transaction: ' || '-- p_ra_id = '||TO_CHAR(p_ra_id));
668: arp_standard.debug('delete_selected_transaction: ' || '-- p_app_ps_id = '||TO_CHAR(p_app_ps_id));
669: END IF;
670: app_exception.raise_exception;
671: END delete_selected_transaction;
664: IF PG_DEBUG in ('Y', 'C') THEN
665: arp_standard.debug('delete_selected_transaction: ' || '-- EXCEPTION:');
666: arp_standard.debug('delete_selected_transaction: ' || 'Printing procedure parameter values:');
667: arp_standard.debug('delete_selected_transaction: ' || '-- p_ra_id = '||TO_CHAR(p_ra_id));
668: arp_standard.debug('delete_selected_transaction: ' || '-- p_app_ps_id = '||TO_CHAR(p_app_ps_id));
669: END IF;
670: app_exception.raise_exception;
671: END delete_selected_transaction;
672:
705: l_ra_rec ar_receivable_applications%ROWTYPE;
706:
707: Begin
708: IF PG_DEBUG in ('Y', 'C') THEN
709: arp_standard.debug( 'arp_process_application.update_onacct_cust_app()+');
710: END IF;
711: IF (p_ra_id IS NULL)
712: THEN
713: APP_EXCEPTION.INVALID_ARGUMENT(
722: l_ra_rec.on_acct_cust_site_use_id := p_on_acct_cust_site_use_id;
723: l_ra_rec.on_acct_po_num := p_on_acct_po_num;
724:
725: IF PG_DEBUG in ('Y', 'C') THEN
726: arp_standard.debug( 'p_ra_id ='||p_ra_id);
727: arp_standard.debug( 'p_on_acct_cust_id = '||p_on_acct_cust_id );
728: arp_standard.debug( 'p_on_acct_cust_site_use_id = '||p_on_acct_cust_site_use_id );
729: arp_standard.debug( 'p_on_acct_po_num = '||p_on_acct_po_num);
730: END IF;
723: l_ra_rec.on_acct_po_num := p_on_acct_po_num;
724:
725: IF PG_DEBUG in ('Y', 'C') THEN
726: arp_standard.debug( 'p_ra_id ='||p_ra_id);
727: arp_standard.debug( 'p_on_acct_cust_id = '||p_on_acct_cust_id );
728: arp_standard.debug( 'p_on_acct_cust_site_use_id = '||p_on_acct_cust_site_use_id );
729: arp_standard.debug( 'p_on_acct_po_num = '||p_on_acct_po_num);
730: END IF;
731:
724:
725: IF PG_DEBUG in ('Y', 'C') THEN
726: arp_standard.debug( 'p_ra_id ='||p_ra_id);
727: arp_standard.debug( 'p_on_acct_cust_id = '||p_on_acct_cust_id );
728: arp_standard.debug( 'p_on_acct_cust_site_use_id = '||p_on_acct_cust_site_use_id );
729: arp_standard.debug( 'p_on_acct_po_num = '||p_on_acct_po_num);
730: END IF;
731:
732: -- Dump the data into database
725: IF PG_DEBUG in ('Y', 'C') THEN
726: arp_standard.debug( 'p_ra_id ='||p_ra_id);
727: arp_standard.debug( 'p_on_acct_cust_id = '||p_on_acct_cust_id );
728: arp_standard.debug( 'p_on_acct_cust_site_use_id = '||p_on_acct_cust_site_use_id );
729: arp_standard.debug( 'p_on_acct_po_num = '||p_on_acct_po_num);
730: END IF;
731:
732: -- Dump the data into database
733: arp_app_pkg.update_p(l_ra_rec);
732: -- Dump the data into database
733: arp_app_pkg.update_p(l_ra_rec);
734:
735: IF PG_DEBUG in ('Y', 'C') THEN
736: arp_standard.debug( 'arp_process_application.update_onacct_cust_app()-');
737: END IF;
738: EXCEPTION
739: when others then
740: raise;