]> wagnertech.de Git - mfinanz.git/commitdiff
Merge branch 'master' of ssh://lx-office/~/lx-office-erp
authorSven Schöling <s.schoeling@linet-services.de>
Mon, 11 Jan 2010 15:41:34 +0000 (16:41 +0100)
committerSven Schöling <s.schoeling@linet-services.de>
Mon, 11 Jan 2010 15:41:34 +0000 (16:41 +0100)
bin/mozilla/rp.pl

index 5164b7f10bbd1cc067f15526f7381e237a0f12b0..45bbb4d0b070924a4429d86a4ea2d2a98031e564 100644 (file)
@@ -2714,12 +2714,20 @@ sub generate_bwa {
       };
     }
   } 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);