Revision d88bc8a1
Von Bernd Bleßmann vor etwa 3 Jahren hinzugefügt
SL/IC.pm | ||
---|---|---|
736 | 736 |
|
737 | 737 |
# transdate madness. |
738 | 738 |
my $transdate = ""; |
739 |
if (($form->{type} eq "invoice") or ($form->{type} eq "credit_note") or ($form->{script} eq 'ir.pl')) {
|
|
739 |
if ( (any {$form->{type} eq $_} qw(invoice credit_note invoice_for_advance_payment)) or ($form->{script} eq 'ir.pl') ) {
|
|
740 | 740 |
# use deliverydate for sales and purchase invoice, if it exists |
741 | 741 |
# also use deliverydate for credit notes |
742 | 742 |
$transdate = $form->{tax_point} || $form->{deliverydate} || $form->{invdate}; |
Auch abrufbar als: Unified diff
Anzahlungs-Rg.: neuen Typ bei Ermittlung des Datums f. Konten berücksichtigen