X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FAP.pm;h=e909890f83760f5672308d2017e14a495cf86a81;hb=72539cb39a3d19f930a8e0e41e46bf41afe9a8f1;hp=8be0c8f8188a4c9904222c5c83a3ae118eb69050;hpb=993f05d0c65e9f1c990364303c7474cf0873f429;p=kivitendo-erp.git diff --git a/SL/AP.pm b/SL/AP.pm index 8be0c8f81..e909890f8 100644 --- a/SL/AP.pm +++ b/SL/AP.pm @@ -142,14 +142,7 @@ sub post_transaction { # amount for total AP $form->{payables} = $form->{invtotal}; - print(STDERR $form->{payables}, - " Payables\n", - $form->{invtotal}, - " Invtotal\n", - $form->{netamount}, - " Netamount\n", - $form->{total_tax}, - " Total_Tax\n\n"); + my ($query, $sth); # if we have an id delete old records @@ -449,7 +442,7 @@ sub ap_transactions { push @a, "employee" if $self->{l_employee}; my $sortorder = join ', ', $form->sort_columns(@a); $sortorder = $form->{sort} if $form->{sort}; - + $query .= "WHERE $where ORDER by $sortorder";