[Home] [Help]
5611:
5612: l_ae_line_rec ar_ae_alloc_rec_gt%ROWTYPE ;
5613: l_ctr BINARY_INTEGER ;
5614: l_actual_account ar_distributions.code_combination_id%TYPE ;
5615: l_source_type ar_distributions.source_type%TYPE ;
5616:
5617: --PL/SQL table object,this collection is used for bulk processing of inserts
5618: TYPE ae_alloc_rec_gt_tab IS TABLE OF ar_ae_alloc_rec_gt%ROWTYPE INDEX BY BINARY_INTEGER;
5619: l_ae_alloc_rec_gt_tab ae_alloc_rec_gt_tab;
6125: l_org_inv_loc_seg_id ar_distributions.location_segment_id%TYPE ;
6126: l_taxable_amt NUMBER;
6127: l_taxable_acctd_amt NUMBER;
6128:
6129: l_source_type_secondary ar_distributions.source_type_secondary%TYPE;
6130:
6131: --PL/SQL table object,this collection is used for bulk processing of inserts
6132: TYPE ae_alloc_rec_gt_tab IS TABLE OF ar_ae_alloc_rec_gt%ROWTYPE INDEX BY BINARY_INTEGER;
6133: l_ae_alloc_rec_gt_tab ae_alloc_rec_gt_tab;
8028: activity_bucket,
8029: ref_dist_ccid,
8030: ref_mf_dist_flag
8031: )
8032: SELECT ar_distributions_s.nextval,
8033: al.ae_source_id,
8034: al.ae_source_table,
8035: al.ae_line_type,
8036: al.ae_line_type_secondary,
8891: -- arp_standard.debug('source type = ' || l_ae_line_rec.source_type);
8892: -- if (l_ae_line_rec.source_type = 'EXCH_GAIN' or
8893: -- l_ae_line_rec.source_type = 'EXCH_LOSS' or
8894: -- l_ae_line_rec.source_type = 'CURR_ROUND' ) THEN
8895: -- select ar_distributions_s.nextval
8896: -- into l_ae_line_rec.line_id
8897: -- from dual;
8898: -- ELSE
8899: -- BEGIN
8913: -- and code_combination_id = l_ae_line_rec.code_combination_id;
8914: -- EXCEPTION
8915: -- WHEN OTHERS THEN
8916: -- arp_standard.debug('Can not determine Line id so created new one');
8917: -- select ar_distributions_s.nextval
8918: -- into l_ae_line_rec.line_id
8919: -- from dual;
8920: -- END;
8921: -- arp_standard.debug('line id = ' || to_char(l_ae_line_rec.line_id));