projekt kivitendo

  my $query =

    qq|SELECT a.id, a.invnumber, a.transdate, a.duedate, a.amount, a.paid, | .

    qq|  a.ordnumber, v.name, a.invoice, a.netamount, a.datepaid, a.notes, | .

    qq|  pr.projectnumber AS globalprojectnumber, | .

    qq|  e.name AS employee, | .

    qq|  v.vendornumber, v.country, v.ustid, | .

  my $sortdir   = !defined $form->{sortdir} ? 'ASC' : $form->{sortdir} ? 'ASC' : 'DESC';

  my $sortorder = join(', ', map { "$_ $sortdir" } @a);

    $sortorder = $form->{sort} . " $sortdir";

  }

  my @columns =

    qw(transdate id type invnumber ordnumber name netamount tax amount paid datepaid

       due duedate transaction_description notes employee globalprojectnumber

  my @hidden_variables = map { "l_${_}" } @columns;

  push @hidden_variables, "l_subtotal", qw(open closed vendor invnumber ordnumber transaction_description notes project_id transdatefrom transdateto department);

    'taxzone'                 => { 'text' => $locale->text('Steuersatz'), },

    'payment_terms'           => { 'text' => $locale->text('Payment Terms'), },

    'charts'                  => { 'text' => $locale->text('Buchungskonto'), },

  );

    my $sortdir                 = $form->{sort} eq $name ? 1 - $form->{sortdir} : $form->{sortdir};

    $column_defs{$name}->{link} = $href . "&sort=$name&sortdir=$sortdir";

  }

        :                     $locale->text("AP Transaction (abbreviation)");

    }

    my $row = { };

    foreach my $column (@columns) {

           <td nowrap>[% 'Payment Terms' | $T8 %]</td>

           <td align=right><input name="l_charts" class=checkbox type=checkbox value=Y></td>

           <td nowrap>[% 'Buchungskonto' | $T8 %]</td>

          </tr>

         <tr>

          <td colspan=4 align=left><b>[% 'Vendor' | $T8 %] </td>