Revision 6295e12d
Von Philip Reetz vor fast 19 Jahren hinzugefügt
SL/GL.pm | ||
---|---|---|
38 | 38 |
|
39 | 39 |
package GL; |
40 | 40 |
|
41 |
use Data::Dumper; |
|
42 |
|
|
41 | 43 |
sub delete_transaction { |
42 | 44 |
my ($self, $myconfig, $form) = @_; |
43 | 45 |
$main::lxdebug->enter_sub(); |
... | ... | |
518 | 520 |
($form->{gifi_account_description}) = $sth->fetchrow_array; |
519 | 521 |
$sth->finish; |
520 | 522 |
} |
523 |
print(STDERR Dumper($form->{GL})); |
|
521 | 524 |
$main::lxdebug->leave_sub(); |
522 | 525 |
|
523 | 526 |
$dbh->disconnect; |
bin/mozilla/gl.pl | ||
---|---|---|
698 | 698 |
$debitaccno .= |
699 | 699 |
"<br><a href=$href&accno=$ref->{debit_accno}{$key}&callback=$callback>$ref->{debit_accno}{$key}</a>"; |
700 | 700 |
} |
701 |
if ($ref->{debit_taxkey}{$key} eq $debittaxkey) { |
|
702 |
$ref->{debit_tax_accno}{$key} = $taxaccno; |
|
703 |
} |
|
701 |
# if ($ref->{debit_taxkey}{$key} eq $debittaxkey) {
|
|
702 |
# $ref->{debit_tax_accno}{$key} = $taxaccno;
|
|
703 |
# }
|
|
704 | 704 |
$taxaccno = $ref->{debit_tax_accno}{$key}; |
705 | 705 |
$debittaxkey = $ref->{debit_taxkey}{$key}; |
706 | 706 |
} |
... | ... | |
716 | 716 |
$creditaccno .= |
717 | 717 |
"<br><a href=$href&accno=$ref->{credit_accno}{$key}&callback=$callback>$ref->{credit_accno}{$key}</a>"; |
718 | 718 |
} |
719 |
if ($ref->{credit_taxkey}{$key} eq $credittaxkey) { |
|
720 |
$ref->{credit_tax_accno}{$key} = $taxaccno; |
|
721 |
} |
|
719 |
# if ($ref->{credit_taxkey}{$key} eq $credittaxkey) {
|
|
720 |
# $ref->{credit_tax_accno}{$key} = $taxaccno;
|
|
721 |
# }
|
|
722 | 722 |
$taxaccno = $ref->{credit_tax_accno}{$key}; |
723 | 723 |
$credittaxkey = $ref->{credit_taxkey}{$key}; |
724 | 724 |
} |
Auch abrufbar als: Unified diff
Steuerkonten wurden nicht angezeigt, wenn Rechnung und Zahlung vom gleichen Tag. Fixed Bug#259