X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fam.pl;h=b6996d169b1e34edda36daa47affa331d5e93f0c;hb=588aa1eb2e55c698fecd2dec453e332fb6859af6;hp=368a627161bddaa0d5491dfa512db952e2dd7b74;hpb=bd1ece25ff151772844eb6318f02ade2470602db;p=kivitendo-erp.git diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl index 368a62716..b6996d169 100644 --- a/bin/mozilla/am.pl +++ b/bin/mozilla/am.pl @@ -347,11 +347,13 @@ sub account_header { } my $ChartTypeIsAccount = ($form->{charttype} eq "A") ? "1":""; + my $AccountIsPosted = ($form->{orphaned} ) ? "":"1"; $form->header(); my $parameters_ref = { ChartTypeIsAccount => $ChartTypeIsAccount, + AccountIsPosted => $AccountIsPosted, select_category => $select_category, select_charttype => $select_charttype, select_bwa => $select_bwa, @@ -2049,7 +2051,8 @@ sub show_am_history { my $dbh = $form->dbconnect(\%myconfig); - my $restriction = qq| AND (| . join(' OR ', map { " addition = " . $dbh->quote($_) } split(m/\,/, $form->{einschraenkungen})) . qq|)| if $form->{einschraenkungen}; + my $restriction; + $restriction = qq| AND (| . join(' OR ', map { " addition = " . $dbh->quote($_) } split(m/\,/, $form->{einschraenkungen})) . qq|)| if $form->{einschraenkungen}; $restriction .= qq| AND h.itime::date >= | . conv_dateq($form->{fromdate}) if $form->{fromdate}; $restriction .= qq| AND h.itime::date <= | . conv_dateq($form->{todate}) if $form->{todate}; if ($form->{mitarbeiter} =~ m/^\d+$/) {