X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/bb79df1ed661bc2c4696100ffe4b2745ebd34b6d..be4e11d36f40d90622fdf35eb07ab207422b5455:/bin/mozilla/ap.pl diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl index cd5eda594..c5393a7e5 100644 --- a/bin/mozilla/ap.pl +++ b/bin/mozilla/ap.pl @@ -461,12 +461,12 @@ selectvendor } | # with JavaScript Calendar $button1 = qq| - {transdate}> $readonly + {transdate} onBlur=\"check_right_date_format(this)\"> $readonly text('button') . qq|> |; $button2 = qq| - {duedate}> $readonly + {duedate} onBlur=\"check_right_date_format(this)\"> $readonly text('button') . qq|> |; @@ -479,15 +479,16 @@ selectvendor } | # without JavaScript Calendar $button1 = - qq|{transdate}> $readonly|; + qq|{transdate} onBlur=\"check_right_date_format(this)\"> $readonly|; $button2 = - qq|{duedate}> $readonly|; + qq|{duedate} onBlur=\"check_right_date_format(this)\"> $readonly|; } - + $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| - +

{script}> @@ -775,12 +776,12 @@ $jsscript |; $column_data{"paid_$i"} = - qq|{"paid_$i"}>|; + qq|{"paid_$i"} onBlur=\"check_right_number_format(this)\">|; $column_data{"AP_paid_$i"} = qq|${selectAP_paid}|; $column_data{"exchangerate_$i"} = qq|$exchangerate|; $column_data{"datepaid_$i"} = - qq|{"datepaid_$i"}> + qq|{"datepaid_$i"} onBlur=\"check_right_date_format(this)\"> |; $column_data{"source_$i"} = qq||; @@ -1207,12 +1208,12 @@ sub search { # with JavaScript Calendar $button1 = qq| - + text('button') . qq|> |; $button2 = qq| - + text('button') . qq|> |; @@ -1225,9 +1226,9 @@ sub search { # without JavaScript Calendar $button1 = qq| - |; + |; $button2 = qq| - |; + |; } $form->get_lists("projects" => { "key" => "ALL_PROJECTS", @@ -1242,11 +1243,12 @@ sub search { my $projectnumber = NTI($cgi->popup_menu('-name' => 'project_id', '-values' => \@values, '-labels' => \%labels)); - + $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| - + {script}>