1548: l_msg_data VARCHAR2(4000);
1549: l_msg_count NUMBER;
1550:
1551: --BUG#2750340
1552: l_ev_rec arp_xla_events.xla_events_type;
1553:
1554: BEGIN
1555:
1556: arp_util.debug('arp_process_credit.insert_header()+');
1587: arp_ct_pkg.insert_p(l_trx_rec, p_trx_number, l_customer_trx_id);
1588:
1589: p_customer_trx_id := l_customer_trx_id;
1590:
1591: -- BUG#2750340 : Call AR_XLA_EVENTS
1592: l_ev_rec.xla_from_doc_id := p_customer_trx_id;
1593: l_ev_rec.xla_to_doc_id := p_customer_trx_id;
1594: l_ev_rec.xla_req_id := NULL;
1595: l_ev_rec.xla_dist_id := NULL;
1597: l_ev_rec.xla_doc_event := NULL;
1598: l_ev_rec.xla_mode := 'O';
1599: l_ev_rec.xla_call := 'B';
1600: l_ev_rec.xla_fetch_size := 999;
1601: arp_xla_events.create_events(p_xla_ev_rec => l_ev_rec );
1602:
1603: /*--------------------------------------------------+
1604: | call autoaccounting to insert the REC record |
1605: +--------------------------------------------------*/
1919:
1920: BEGIN
1921:
1922: --6870437
1923: ARP_XLA_EVENTS.delete_reverse_revrec_event( p_document_id => p_customer_trx_id,
1924: p_doc_table => 'CT');
1925:
1926: arp_ctlgd_pkg.delete_f_ct_id(p_customer_trx_id,
1927: 'N',
2123: l_tax_status varchar2(100) := 'OK';
2124: l_derive_status varchar2(100) := 'OK';
2125: l_cmm_status varchar2(100) := 'OK';
2126: --BUG#2750340
2127: l_ev_rec arp_xla_events.xla_events_type;
2128: l_action VARCHAR2(10);
2129: l_return_status VARCHAR2(1);
2130: l_msg_data VARCHAR2(4000);
2131: l_msg_count NUMBER;
2131: l_msg_count NUMBER;
2132: l_ret_status NUMBER;
2133:
2134: --6870437
2135: l_event_source_info xla_events_pub_pkg.t_event_source_info;
2136: l_event_id NUMBER;
2137: l_security xla_events_pub_pkg.t_security;
2138:
2139: CURSOR l_rec IS
2133:
2134: --6870437
2135: l_event_source_info xla_events_pub_pkg.t_event_source_info;
2136: l_event_id NUMBER;
2137: l_security xla_events_pub_pkg.t_security;
2138:
2139: CURSOR l_rec IS
2140: SELECT 222,
2141: min(ev.event_id) event_id,
2147: trx.org_id org_id
2148: FROM ra_customer_trx trx,
2149: ra_cust_trx_line_gl_dist gld,
2150: xla_transaction_entities_upg xet,
2151: xla_events ev
2152: WHERE trx.customer_trx_id = p_customer_trx_id
2153: AND trx.customer_trx_id = gld.customer_trx_id
2154: AND gld.account_class = 'REC'
2155: AND gld.posting_control_id = -3
2555:
2556: l_security.security_id_int_1 := c.org_id;
2557: l_event_id := c.event_id;
2558:
2559: xla_events_pub_pkg.update_event
2560: (p_event_source_info => l_event_source_info,
2561: p_event_id => l_event_id,
2562: p_event_date => p_gl_date,
2563: p_valuation_method => null,
2565: p_security_context => l_security);
2566: END loop;
2567: ELSE
2568:
2569: -- BUG#2750340 : Call AR_XLA_EVENTS
2570: l_ev_rec.xla_from_doc_id := p_customer_trx_id;
2571: l_ev_rec.xla_to_doc_id := p_customer_trx_id;
2572: l_ev_rec.xla_req_id := NULL;
2573: l_ev_rec.xla_dist_id := NULL;
2575: l_ev_rec.xla_doc_event := NULL;
2576: l_ev_rec.xla_mode := 'O';
2577: l_ev_rec.xla_call := 'B';
2578: l_ev_rec.xla_fetch_size := 999;
2579: arp_xla_events.create_events(p_xla_ev_rec => l_ev_rec );
2580:
2581: END IF;
2582: END IF; --bug 7193337
2583: arp_util.debug('arp_process_credit.update_header()-');