projekt kivitendo

  my $query =

    qq|UPDATE bank_accounts

       WHERE id = ?|;

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

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

  my %sort_columns = (

    'account_number'    => [ 'ba.account_number', ],

    'bank_code'         => [ 'ba.bank_code', 'ba.account_number', ],

    'bank'              => [ 'ba.bank',      'ba.account_number', ],

  my %sort_spec = create_sort_spec('defs' => \%sort_columns, 'default' => 'bank', 'column' => $params{sortorder}, 'dir' => $params{sortdir});

  my $query =

         c.accno AS chart_accno, c.description AS chart_description

       FROM bank_accounts ba

       LEFT JOIN chart c ON (ba.chart_id = c.id)

  chart_id       => { type => 'integer', not_null => 1 },

  iban           => { type => 'varchar', length => 100 },

  id             => { type => 'integer', not_null => 1, sequence => 'id' },

);

__PACKAGE__->meta->primary_key_columns([ 'id' ]);

  my $account = $form->{account} && (ref $form->{account} eq 'HASH') ? $form->{account} : { };

    bank_account_display_form('account' => $account,

    $main::lxdebug->leave_sub();

    return;

  my $href           = build_std_url('action=bank_account_list');

  my %column_defs = (

    'account_number' => { 'text' => $locale->text('Account number'), },

    'bank_code'      => { 'text' => $locale->text('Bank code'), },

    'bank'           => { 'text' => $locale->text('Bank'), },

    'iban'           => { 'text' => $locale->text('IBAN'), },

  );

  foreach my $name (@columns) {

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

  # from us automatically and we don't have to send money manually.

  $_->{checked} = ($vc eq 'customer' ? $_->{direct_debit} : !$_->{direct_debit}) for @{ $invoices };

  my $translation_list = GenericTranslations->list(translation_type => 'sepa_remittance_info_pfx');

  my %translations     = map { ( ($_->{language_id} || 'default') => $_->{translation} ) } @{ $translation_list };

                                                   'id' => \@vc_ids);

    my @vc_bank_info           = sort { lc $a->{name} cmp lc $b->{name} } values %{ $vc_bank_info };

    $form->header();

    print $form->parse_html_template('sepa/bank_transfer_create',

  ' Part Number missing!'       => ' Artikelnummer fehlt!',

  ' missing!'                   => ' fehlt!',

  '#1 (custom variable)'        => '#1 (benutzerdefinierte Variable)',

  '#1 MD'                       => '#1 PT',

  '#1 h'                        => '#1 h',

  '#1 of #2 importable objects were imported.' => '#1 von #2 importierbaren Objekten wurden importiert.',

  'Account for fees'            => 'Konto für Gebühren',

  'Account for interest'        => 'Konto für Zinsen',

  'Account number'              => 'Kontonummer',

  'Account number not unique!'  => 'Kontonummer bereits vorhanden!',

  'Account saved!'              => 'Konto gespeichert!',

  'Accounting Group deleted!'   => 'Buchungsgruppe gelöscht!',

  'You have to define a unit as a multiple of a smaller unit.' => 'Sie müssen Einheiten als ein Vielfaches einer kleineren Einheit eingeben.',

  'You have to enter a company name in the client configuration.' => 'Sie müssen in der Mandantenkonfiguration einen Firmennamen angeben.',

  'You have to enter the SEPA creditor ID in the client configuration.' => 'Sie müssen in der Mandantenkonfiguration eine SEPA-Kreditoren-Identifikation angeben.',

  'You have to grant users access to one or more clients.' => 'Benutzern muss dann Zugriff auf einzelne Mandanten gewährt werden.',

  'You have to specify a department.' => 'Sie müssen eine Abteilung wählen.',

  'You have to specify an execution date for each antry.' => 'Sie müssen für jeden zu buchenden Eintrag ein Ausführungsdatum angeben.',

  <p>

   <table>

    <tr>

     <td align="right">[% 'Account number' | $T8 %]</td>

     <td><input name="account.account_number" size="20" maxlength="100" value="[% HTML.escape(account.account_number) %]"></td>