projekt kivitendo

    my @chart_fields = qw(accno description charttype category link pos_bilanz

                          pos_eur pos_er new_chart_id valid_from pos_bwa datevautomatik

    foreach my $cf ( @chart_fields ) {

      $form->{"$cf"} = $chart_obj->$cf;

    }

                  new_chart_id = ?,

                  valid_from = ?,

                  datevautomatik = ?,

                  invalid = ?

                WHERE id = ?|;

                  conv_i($form->{new_chart_id}),

                  conv_date($form->{valid_from}),

                  ($form->{datevautomatik} eq 'T') ? 'true':'false',

                  $form->{invalid} ? 'true' : 'false',

                $form->{id},

    );

  'City'                        => 'Stadt',

  'Classification'              => 'Klassifizierung',

  'Clear'                       => 'Löschen',

  'Clear fields'                => 'Felder leeren',

  'Cleared Balance'             => 'abgeschlossen',

  'Cleared/uncleared only'      => 'Status abgeglichen',

  'City'                        => '',

  'Classification'              => '',

  'Clear'                       => '',

  'Clear fields'                => '',

  'Cleared Balance'             => '',

  'Cleared/uncleared only'      => '',

          <th align="left">[% 'Valid from' | $T8 %]</th>

          <td><input name="valid_from" value="[% valid_from %]"></td>

        </tr>

  </table>

[% END %]

</fieldset>