9: PROCEDURE Insert_Ae_Lines(p_ae_line_tbl IN ae_line_tbl_type);
10:
11: PROCEDURE Init_Curr_Details(p_accounting_method IN OUT NOCOPY ar_system_parameters.accounting_method%TYPE);
12:
13: PROCEDURE Dump_Dist_Amts(p_ae_line_rec ar_distributions%ROWTYPE);
14:
15: /*========================================================================
16: | Public Functions/Procedures
17: *=======================================================================*/
125: select 'N'
126: into l_create_acct
127: from dual
128: where exists (select 'X'
129: from ar_distributions dist
130: where dist.source_id = p_ae_doc_rec.source_id
131: and dist.source_table = p_ae_doc_rec.source_table);
132:
133: IF PG_DEBUG in ('Y', 'C') THEN
868: /*========================================================================
869: | PRIVATE PROCEDURE Insert_Ae_Lines
870: |
871: | DESCRIPTION
872: | Inserts into AR_DISTRIBUTIONS accounting lines
873: | ----------------------------------------------
874: | Calls the table handler for AR_DISTRIBUTIONS to insert accounting
875: | for a given document into the underlying table.
876: |
870: |
871: | DESCRIPTION
872: | Inserts into AR_DISTRIBUTIONS accounting lines
873: | ----------------------------------------------
874: | Calls the table handler for AR_DISTRIBUTIONS to insert accounting
875: | for a given document into the underlying table.
876: |
877: | PARAMETERS
878: | p_ae_line_tbl IN Accounting lines table
878: | p_ae_line_tbl IN Accounting lines table
879: *=======================================================================*/
880: PROCEDURE Insert_Ae_Lines(p_ae_line_tbl IN ae_line_tbl_type) IS
881:
882: l_ae_line_rec ar_distributions%ROWTYPE;
883: l_ae_line_rec_empty ar_distributions%ROWTYPE;
884: l_dummy ar_distributions.line_id%TYPE;
885:
886: i BINARY_INTEGER := 1;
879: *=======================================================================*/
880: PROCEDURE Insert_Ae_Lines(p_ae_line_tbl IN ae_line_tbl_type) IS
881:
882: l_ae_line_rec ar_distributions%ROWTYPE;
883: l_ae_line_rec_empty ar_distributions%ROWTYPE;
884: l_dummy ar_distributions.line_id%TYPE;
885:
886: i BINARY_INTEGER := 1;
887:
880: PROCEDURE Insert_Ae_Lines(p_ae_line_tbl IN ae_line_tbl_type) IS
881:
882: l_ae_line_rec ar_distributions%ROWTYPE;
883: l_ae_line_rec_empty ar_distributions%ROWTYPE;
884: l_dummy ar_distributions.line_id%TYPE;
885:
886: i BINARY_INTEGER := 1;
887:
888: BEGIN
974: |
975: | PARAMETERS
976: | p_ae_line_rec IN Accounting lines record
977: *==========================================================================*/
978: PROCEDURE Dump_Dist_Amts(p_ae_line_rec IN ar_distributions%ROWTYPE) IS
979: BEGIN
980:
981: IF PG_DEBUG in ('Y', 'C') THEN
982: arp_standard.debug('ARP_ACCT_MAIN.Dump_Dist_Amts()+');