[Home] [Help]
13: SUBTYPE ae_doc_rec_type IS arp_acct_main.ae_doc_rec_type;
14:
15: PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
16:
17: FUNCTION find_prev_accounted_id(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE) RETURN NUMBER;
18:
19: PROCEDURE insert_BR_ps(
20: p_trh_rec IN ar_transaction_history%ROWTYPE,
21: p_ps_id OUT NOCOPY ar_payment_schedules.payment_schedule_id%TYPE);
20: p_trh_rec IN ar_transaction_history%ROWTYPE,
21: p_ps_id OUT NOCOPY ar_payment_schedules.payment_schedule_id%TYPE);
22:
23: PROCEDURE calculate_BR_amounts(
24: p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE,
25: p_amount OUT NOCOPY NUMBER,
26: p_acctd_amount OUT NOCOPY NUMBER,
27: p_line_amount OUT NOCOPY NUMBER,
28: p_tax_amount OUT NOCOPY NUMBER,
28: p_tax_amount OUT NOCOPY NUMBER,
29: p_freight_amount OUT NOCOPY NUMBER,
30: p_charges_amount OUT NOCOPY NUMBER);
31:
32: FUNCTION previous_history_exists(p_customer_trx_id ra_customer_trx.customer_trx_id%TYPE) RETURN BOOLEAN;
33:
34: /*===========================================================================+
35: | PROCEDURE |
36: | insert_transaction_history |
77: l_security xla_events_pub_pkg.t_security;
78: l_event_count NUMBER;
79: l_trh_count NUMBER;
80:
81: cursor update_event (p_trx_id ra_customer_trx.customer_trx_id%TYPE)
82: is
83: select distinct trh.event_id
84: from ar_transaction_history_all trh
85: where trh.customer_trx_id = p_trx_id and
361: l_event_source_info.legal_entity_id,
362: l_event_source_info.ledger_id,
363: l_event_source_info.entity_type_code
364: from
365: ra_customer_trx trx ,
366: xla_transaction_entities_upg xet
367: where trx.customer_trx_id = p_trh_rec.customer_trx_id
368: and trx.customer_trx_id = xet.source_id_int_1
369: and xet.entity_code ='BILLS_RECEIVABLE'
675: | MODIFICATION HISTORY |
676: | 28-MAR-2000 Jani Rautiainen Created |
677: | |
678: +===========================================================================*/
679: FUNCTION find_prev_accounted_id(p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE) RETURN NUMBER IS
680:
681: /*----------------------------------+
682: | Cursor for finding the previous |
683: | accounted transaction history |
747: PROCEDURE insert_BR_ps(
748: p_trh_rec IN ar_transaction_history%ROWTYPE,
749: p_ps_id OUT NOCOPY ar_payment_schedules.payment_schedule_id%TYPE) IS
750:
751: l_trx_rec ra_customer_trx%ROWTYPE;
752: l_ps_rec ar_payment_schedules%ROWTYPE;
753: l_ps_id ar_payment_schedules.payment_schedule_id%TYPE;
754:
755: BEGIN
860: | 28-MAR-2000 Jani Rautiainen Created |
861: | |
862: +===========================================================================*/
863: PROCEDURE calculate_BR_amounts(
864: p_customer_trx_id IN ra_customer_trx.customer_trx_id%TYPE,
865: p_amount OUT NOCOPY NUMBER,
866: p_acctd_amount OUT NOCOPY NUMBER,
867: p_line_amount OUT NOCOPY NUMBER,
868: p_tax_amount OUT NOCOPY NUMBER,
881: sum(nvl(line_adjusted,0)) total_line,
882: sum(nvl(freight_adjusted,0)) total_freight,
883: sum(nvl(tax_adjusted,0)) total_tax,
884: sum(nvl(receivables_charges_adjusted,0)) total_charges
885: FROM ra_customer_trx_lines ctl,
886: ar_adjustments adj
887: WHERE ctl.customer_trx_id = p_customer_trx_id
888: AND adj.adjustment_id = ctl.br_adjustment_id;
889:
953: | MODIFICATION HISTORY |
954: | 28-MAR-2000 Jani Rautiainen Created |
955: | |
956: +===========================================================================*/
957: FUNCTION previous_history_exists(p_customer_trx_id ra_customer_trx.customer_trx_id%TYPE) RETURN BOOLEAN IS
958:
959: CURSOR previous_history_exists_cur IS
960: SELECT 'exists'
961: FROM ar_transaction_history