USTVA Vorauswahl bei Voranmeldezeitraum falsch

[udono@…]

Die Vorauswahl beim USTVA Report ist eigentlich so gestaltet, dass
sie den richtigen Monat automatisch anzeigt...

Bei mir kommt bei der USTVA immer der "15. Dezember 2005" als
Voreinstellung, obwohl ich seit dem Januar schon fünf weitere USTVA
ausgedruckt habe. In Finanzamt-Einstellungen ist Dauerfristverlängerung und
Monatliche Abgabe eingestellt. Dazu E/Ü-Rechnung. Bei mir funktioniert die
automatische Terminwahl also nicht.
Die Version von lx-erp bei mir ist v2.2.0

Gelöst mit r1185.

Svn Log:
Author: udo_spallek
Date: 2006-07-31 23:06:02 +0200 (Mon, 31 Jul 2006)
New Revision: 1185

Modified:

trunk/unstable/bin/mozilla/ustva.pl

Log:
#382 fixed!

Modified: trunk/unstable/bin/mozilla/ustva.pl
===================================================================
--- trunk/unstable/bin/mozilla/ustva.pl 2006-07-27 10:54:16 UTC (rev 1184)
+++ trunk/unstable/bin/mozilla/ustva.pl 2006-07-31 21:06:02 UTC (rev 1185)
@@ -73,8 +73,9 @@

$lxdebug->enter_sub();
my $myconfig = \%myconfig;
use CGI;

+

$form->{title} = $locale->text('UStVA');

• $form->{kz10} = ; #Berichtigte Anmeldung? Ja =1

+ $form->{kz10} = ; #Berichtigte Anmeldung? Ja =1 Nein=0

my $year = substr(

$form->datetonum($form->current_date(\%myconfig),

@@ -545,30 +546,26 @@

if ($form->{FA_voranmeld} eq 'month') {

# Vorauswahl bei monatlichem Voranmeldungszeitraum

• print qq|
• <select name="duetyp" id=zeitraum title="|
• . $locale->text('Hier den Berechnungszeitraum ausw&#65533;hlen...') . qq|">
• |;

• my %liste = ('01' => 'January',
• '02' => 'February',
• '03' => 'March',
• '04' => 'April',
• '05' => 'May',
• '06' => 'June',
• '07' => 'July',
• '08' => 'August',
• '09' => 'September',
• '10' => 'October',
• '11' => 'November',
• '12' => 'December',
• '13' => 'Yearly',);

+ my %liste = ('01' => $locale->text('January'),
+ '02' => $locale->text('February'),
+ '03' => $locale->text('March'),
+ '04' => $locale->text('April'),
+ '05' => $locale->text('May'),
+ '06' => $locale->text('June'),
+ '07' => $locale->text('July'),
+ '08' => $locale->text('August'),
+ '09' => $locale->text('September'),
+ '10' => $locale->text('October'),
+ '11' => $locale->text('November'),
+ '12' => $locale->text('December'),
+ '13' => $locale->text('Yearly'),
+ );

my $yy = $form->{year} * 10000;
$yymmdd = "$form->{year}$form->{month}$form->{day}" * 1;

• $yymmdd = 20060121;

$sel = ;

• my $dfv = '0';

+ my $dfv = ;

# Offset f&#65533;r Dauerfristverl&#65533;ngerung
$dfv = '100' if ($form->{FA_dauerfrist} eq '1');

@@ -629,14 +626,15 @@

};

}

+ print qq|<select id="zeitraum" name="duetyp" title="|
+ . $locale->text('Select a period') . qq|" >|;
+

my $key = ;
foreach $key (sort keys %liste) {

my $selected = ;
$selected = 'selected' if ($sel eq $key);
print qq|

• <option value="$key" $selected>|
• . $locale->text("$liste{$key}") . qq|</option>

+ <option value="$key" $selected> $liste{$key}</option>

|;

}
print qq|</select>|;