X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/f8def519132bac17a3dbcdb933d60717b463a353..80050a8:/bin/mozilla/ar.pl diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl index b2a47ccd3..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, }); @@ -847,8 +842,6 @@ sub delete { delete $form->{header}; print qq| - -
{script}> |; @@ -908,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");