X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fbp.pl;h=e4300566026d12eaf50baec34553d550b6cdf3a2;hb=b5157f97d47413e5f33cced1d0de527979ff3d61;hp=a39cdd1b145f7e88bb2c9a4df33487860ed2a755;hpb=081a4f9736f3bc345872be8f61632cbed4a8d9b3;p=kivitendo-erp.git
diff --git a/bin/mozilla/bp.pl b/bin/mozilla/bp.pl
index a39cdd1b1..e43005660 100644
--- a/bin/mozilla/bp.pl
+++ b/bin/mozilla/bp.pl
@@ -32,9 +32,12 @@
#======================================================================
use SL::BP;
+use Data::Dumper;
1;
+require "bin/mozilla/common.pl";
+
# end of main
sub search {
@@ -158,12 +161,12 @@ sub search {
# with JavaScript Calendar
$button1 = qq|
-
+ |
text('button') . qq|> |
|;
$button2 = qq|
-
+ |
text('button') . qq|> |
|;
@@ -176,15 +179,16 @@ sub search {
# without JavaScript Calendar
$button1 = qq|
- | |;
+ | |;
$button2 = qq|
- | |;
+ | |;
}
-
+ $form->{javascript} .= qq||;
$form->header;
-
+ $onload = qq|;setupDateFormat('|. $myconfig{dateformat} .qq|', '|. $locale->text("Falsches Datumsformat!") .qq|')|;
+ $onload .= qq|;setupPoints('|. $myconfig{numberformat} .qq|', '|. $locale->text("wrongformat") .qq|')|;
print qq|
-
+
@@ -576,7 +589,7 @@ sub list_spool {
|;
- $lxdebug->leave_sub();
+ $main::lxdebug->leave_sub();
}
sub select_all {
@@ -588,5 +601,5 @@ sub select_all {
$lxdebug->leave_sub();
}
-sub continue { &{ $form->{nextsub} } }
+sub continue { call_sub($form->{"nextsub"}); }