Revision f68c0971
Von jan vor etwa 15 Jahren hinzugefügt
| bin/mozilla/rp.pl | ||
|---|---|---|
|
};
|
||
|
}
|
||
|
} else {
|
||
|
my ($yy, $mm, $dd) = $locale->parse_date(\%myconfig, $form->{fromdate});
|
||
|
$form->{fromdate} = "${dd}.${mm}.${yy}";
|
||
|
($yy, $mm, $dd) = $locale->parse_date(\%myconfig, $form->{todate});
|
||
|
$form->{todate} = "${dd}.${mm}.${yy}";
|
||
|
$form->{comparefromdate} = "01.01.$yy";
|
||
|
$form->{comparetodate} = $form->{todate};
|
||
|
# die konvertierungen nur dann durchführen, wenn auch daten gesetzt sind.
|
||
|
# ansonsten ist die prüfung in RP.pm
|
||
|
# if (defined ($form->{fromdate|todate}=='..'))
|
||
|
# immer wahr
|
||
|
if ($form->{fromdate}){
|
||
|
my ($yy, $mm, $dd) = $locale->parse_date(\%myconfig, $form->{fromdate});
|
||
|
$form->{fromdate} = "${dd}.${mm}.${yy}";
|
||
|
$form->{comparefromdate} = "01.01.$yy";
|
||
|
}
|
||
|
if ($form->{todate}){
|
||
|
my ($yy, $mm, $dd) = $locale->parse_date(\%myconfig, $form->{todate});
|
||
|
$form->{todate} = "${dd}.${mm}.${yy}";
|
||
|
$form->{comparetodate} = $form->{todate};
|
||
|
}
|
||
|
}
|
||
|
|
||
|
RP->bwa(\%myconfig, \%$form);
|
||
Auch abrufbar als: Unified diff
Berichte
> BWA -> Freier Zeitraum. Die Eingabe von nur dem Startoder Enddatum führt zu einem Fehler, da die Prüfung in RP.pm auf Inhalt der Variablen immer wahr ist. Entsprechend vorher geprüft