projekt kivitendo

  my ($null, $department_id) = split(/--/, $form->{department});

  $department_id *= 1;

  $query =

    qq|UPDATE gl SET

         reference = ?, description = ?, notes = ?,

         transdate = ?, department_id = ?, taxincluded = ?,

       WHERE id = ?|;

  @values = ($form->{reference}, $form->{description}, $form->{notes},

             conv_date($form->{transdate}), $department_id, $form->{taxincluded},

             conv_i($form->{id}));

  do_query($form, $dbh, $query, @values);

    if ($amount != 0) {

      $query =

        qq|INSERT INTO acc_trans (trans_id, chart_id, amount, transdate,

           VALUES (?, (SELECT id FROM chart WHERE accno = ?),

      @values = (conv_i($form->{id}), $accno, $amount, conv_date($form->{transdate}),

      do_query($form, $dbh, $query, @values);

    }

  if ($form->{id}) {

    $query =

      qq|SELECT g.reference, g.description, g.notes, g.transdate, g.storno, g.storno_id,

         FROM gl g

         LEFT JOIN department d ON (d.id = g.department_id)

         LEFT JOIN employee e ON (e.id = g.employee_id)

  $show_details_checked = "checked" if $form->{show_details};

  # $locale->text('Add General Ledger Transaction')

  # $locale->text('Edit General Ledger Transaction')

	</tr>|;

  }

       <td width="1%" align="right" nowrap>| . $locale->text('Show details') . qq|</td>

       <td width="1%"><input type="checkbox" onclick="show_form_details();" name="show_details" value="1" $show_details_checked></td>

      </tr>|;

      . qq|"> |;

  } else {

      print qq|

        <input class=submit type=submit name=action id=update_button value="| . $locale->text('Update') . qq|">

        <input class=submit type=submit name=action value="| . $locale->text('Post') . qq|">|;

  }

  print "

  'Business deleted!'           => 'Firma gel?scht.',

  'Business saved!'             => 'Firma gespeichert.',

  'CANCELED'                    => 'Storniert',

  'CSV export -- options'       => 'CSV-Export -- Optionen',

  'Calculate'                   => 'Berechnen',

  'Cancel'                      => 'Abbrechen',

  'Number of new bins'          => 'Anzahl neuer Lagerplätze',

  'Number pages'                => 'Seiten nummerieren',

  'Number variables: \'PRECISION=n\' forces numbers to be shown with exactly n decimal places.' => 'Zahlenvariablen: Mit \'PRECISION=n\' erzwingt man, dass Zahlen mit n Nachkommastellen formatiert werden.',

  'OBE-Export erfolgreich!'     => 'OBE-Export erfolgreich!',

  'Obsolete'                    => 'Ung?ltig',

  'Oct'                         => 'Okt',

  'Buchungsdatum'               => 'Buchungsdatum',

  'Buchungsnummer'              => 'Buchungsnummer',

  'CANCELED'                    => 'Storniert',

  'CSV export -- options'       => 'CSV-Export -- Optionen',

  'Cancel Accounts Receivables Transaction' => 'Debitorenbuchung stornieren',

  'Cannot delete transaction!'  => 'Buchung kann nicht gel?scht werden!',

  'Notes'                       => 'Bemerkungen',

  'Nov'                         => 'Nov',

  'November'                    => 'November',

  'Oct'                         => 'Okt',

  'October'                     => 'Oktober',

  'Others'                      => 'Andere',