X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/2fa5768e4830ff60fb5677dde6d22d61f6137f30..ed41d55e5545edd2abb6a2cae868bc6ebc45771d:/SL/Form.pm diff --git a/SL/Form.pm b/SL/Form.pm index e034a203c..68272b31c 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -674,13 +674,22 @@ sub header { |; } - my $fokus = qq| document.$self->{fokus}.focus();| if ($self->{"fokus"}); + my $fokus = qq| + + | if $self->{"fokus"}; #Set Calendar my $jsscript = ""; if ($self->{jsscript} == 1) { $jsscript = qq| + @@ -711,13 +720,7 @@ sub header { $jsscript $ajax - + $fokus @@ -2196,7 +2199,7 @@ sub _get_charts { my $transdate = quote_db_date($params->{transdate}); my $query = - qq|SELECT c.id, c.accno, c.description, c.link, tk.taxkey_id, tk.tax_id | . + qq|SELECT c.id, c.accno, c.description, c.link, c.charttype, tk.taxkey_id, tk.tax_id | . qq|FROM chart c | . qq|LEFT JOIN taxkeys tk ON | . qq|(tk.id = (SELECT id FROM taxkeys | .