- $i = 0;
- $j = 0;
- $k = 0;
- $l = 0;
- if ($ref->{amount} < 0) {
- if ($ref->{chart_id} > 0) {
- $ref->{debit_tax}{$i} = $ref->{amount} * -1;
- $ref->{debit_tax_accno}{$i} = $ref->{accno};
+
+ # Linenumbers of General Ledger
+ $k = 0; # Debit # AP # Soll
+ $l = 0; # Credit # AR # Haben
+ $i = 0; # Debit Tax # AP_tax # VSt
+ $j = 0; # Credit Tax # AR_tax # USt
+
+
+ if ($ref->{chart_id} > 0) { # all tax accounts first line, no line increasing
+ if ($ref->{amount} < 0) {
+ if ($ref->{link} =~ /AR_tax/) {
+ $ref->{credit_tax}{$j} = $ref->{amount};
+ $ref->{credit_tax_accno}{$j} = $ref->{accno};
+ }
+ if ($ref->{link} =~ /AP_tax/) {
+ $ref->{debit_tax}{$i} = $ref->{amount} * -1;
+ $ref->{debit_tax_accno}{$i} = $ref->{accno};
+ }