[Home] [Help]
777:
778: BEGIN
779:
780: --6870437
781: ARP_XLA_EVENTS.delete_reverse_revrec_event( p_document_id => p_customer_trx_id,
782: p_doc_table => 'CT');
783:
784: arp_ctlgd_pkg.delete_f_ct_id(p_customer_trx_id,
785: 'N',
882: l_trx_rec ra_customer_trx%rowtype;
883: l_status1 varchar2(100);
884: l_status2 varchar2(100);
885: --Bug# 2750340
886: l_ev_rec arp_xla_events.xla_events_type;
887:
888: /* bug 3609567 */
889: l_error_message VARCHAR2(128) := '';
890: l_dist_count NUMBER;
1085: l_ev_rec.xla_doc_event := NULL;
1086: l_ev_rec.xla_mode := 'O';
1087: l_ev_rec.xla_call := 'B';
1088: l_ev_rec.xla_fetch_size := 999;
1089: arp_xla_events.create_events(p_xla_ev_rec => l_ev_rec );
1090:
1091: arp_util.debug('arp_process_header.insert_header()-');
1092:
1093: EXCEPTION
1178: l_status2 varchar2(100);
1179: l_status3 varchar2(100);
1180:
1181: --Bug# 2750340
1182: l_ev_rec arp_xla_events.xla_events_type;
1183:
1184: --BUG#5192414
1185: CURSOR cpost IS
1186: SELECT 'Y'
1781: END IF;
1782:
1783: --Bug# 2750340
1784: ---------------------------------------------------------
1785: -- Call to ARP_XLA_EVENTS for transaction updation in
1786: -- Trx Workbench. Mandatory when user complete a document
1787: ---------------------------------------------------------
1788: l_ev_rec.xla_from_doc_id := p_customer_trx_id;
1789: l_ev_rec.xla_to_doc_id := p_customer_trx_id;
1793: l_ev_rec.xla_doc_event := NULL;
1794: l_ev_rec.xla_mode := 'O';
1795: l_ev_rec.xla_call := 'B';
1796: l_ev_rec.xla_fetch_size := 999;
1797: arp_xla_events.create_events(p_xla_ev_rec => l_ev_rec );
1798:
1799: END IF;
1800: CLOSE cpost;
1801:
1947: --Bug # 6450286
1948: --------------------------------
1949: -- Delete the corresponding event in XLA schema
1950: --------------------------------
1951: ARP_XLA_EVENTS.delete_event( p_document_id => p_customer_trx_id,
1952: p_doc_table => 'CT');
1953:
1954: --added for bug 7478499
1955: delete_cont_defer_data(p_customer_trx_id);