X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0ba3b647155cba9b668cbcc7579fd135b3a1a9be..80050a8:/bin/mozilla/ar.pl diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl index 45193ed87..2e82596cf 100644 --- a/bin/mozilla/ar.pl +++ b/bin/mozilla/ar.pl @@ -219,7 +219,6 @@ sub form_header { my ($title, $readonly, $exchangerate, $rows); my ($notes, $department, $customer, $employee, $amount, $project); - my ($onload); my ($ARselected); @@ -326,9 +325,6 @@ sub form_header { qq|| . qq||; - $onload = qq|focus()|; - $onload .= qq|;setupPoints('|. $myconfig{numberformat} .qq|', '|. $locale->text("wrongformat") .qq|')|; - # $amount = $locale->text('Amount'); # $project = $locale->text('Project'); @@ -443,7 +439,6 @@ sub form_header { project_labels => \%project_labels, rows => $rows, ARselected => $ARselected, - onload => $onload, title_str => $title, follow_up_trans_info => $follow_up_trans_info, }); @@ -547,9 +542,6 @@ $follow_ups_block print " - - - "; $main::lxdebug->leave_sub(); @@ -850,8 +842,6 @@ sub delete { delete $form->{header}; print qq| - -
{script}> |; @@ -871,9 +861,6 @@ sub delete {
- - - |; $main::lxdebug->leave_sub(); @@ -914,7 +901,7 @@ sub search { my $cgi = $::request->{cgi}; my ($customer, $department); - my ($jsscript, $button1, $button2, $onload); + my ($jsscript, $button1, $button2); # setup customer selection $form->all_vc(\%myconfig, "customer", "AR");