X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8ec0d29a33e23ce962b807e87cc8b577c8c98ec2..6277aefffea29c8aa6f684bd86c55cdc6366f32f:/bin/mozilla/ir.pl diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index d27e91b2c..466d44bd5 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -354,6 +354,8 @@ sub form_header { qq|{duedate}>|; } + $form->{"javascript"} .= qq||; + $form->header; print qq| @@ -709,7 +711,7 @@ sub form_footer { $column_data{"AP_paid_$i"} = qq||; $column_data{"datepaid_$i"} = - qq|{"datepaid_$i"}> + qq|{"datepaid_$i"}> |; $column_data{"source_$i"} = qq|{"source_$i"}>|; @@ -757,13 +759,15 @@ sub form_footer { print qq| |; - } else { - if ($invdate > $closedto) { - print qq| - |; - } + + } + + print qq||; + + if (!$form->{id} && ($invdate > $closedto)) { + print qq| |; } print $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) .