projekt kivitendo

    qq|  a.marge_total, a.marge_percent, | .

    qq|  a.transaction_description, | .

    qq|  pr.projectnumber AS globalprojectnumber, | .

    qq|  e.name AS employee, | .

    qq|FROM ar a | .

    qq|JOIN customer c ON (a.customer_id = c.id) | .

    qq|LEFT JOIN employee e ON (a.employee_id = e.id) | .

    qq|LEFT JOIN employee e2 ON (a.salesman_id = e2.id) | .

  my $where = "1 = 1";

  if ($form->{customer_id}) {

    }

  }

  push @a, "employee" if $form->{l_employee};

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

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

  # now copy acc_trans entries

  $query = qq|SELECT a.*, c.link FROM acc_trans a LEFT JOIN chart c ON a.chart_id = c.id WHERE a.trans_id = ? ORDER BY a.acc_trans_id|;

  # kill all entries containing payments, which are the last 2n rows, of which the last has link =~ /paid/

  while ($rowref->[-1]{link} =~ /paid/) {

  	$form->{addition} = "ADDED";

  	$form->save_history($form->dbconnect(\%myconfig));

  }

  $form->{title}    = "Add";

  $form->{callback} = "ar.pl?action=add" unless $form->{callback};

  my $n = ($form->{creditremaining} =~ /-/) ? "0" : "1";

    : qq|<input name=customer value="$form->{customer}" size=35>|;

  $employee = qq|

  $column_data{exchangerate} = "<th>" . $locale->text('Exch') . "</th>";

  $column_data{AR_paid}      = "<th>" . $locale->text('Account') . "</th>";

  $column_data{source}       = "<th>" . $locale->text('Source') . "</th>";

  print "

        <tr>

    print qq| <input type=button class=submit onclick=set_history_window($form->{id}); name=history id=history value=| . $locale->text('history') . qq|> |;

  }

  # /button for saving history

          . $locale->text('mark as paid') . qq|">|;

  }

  # /mark_as_paid button

  $auth->assert('general_ledger');

  $lxdebug->leave_sub();

}

  my $transdate = $form->datetonum($form->{transdate}, \%myconfig);

  $form->error($locale->text('Cannot post transaction for a closed period!')) if ($form->date_closed($form->{"transdate"}, \%myconfig));

    unless grep $_*1, map $form->parse_amount(\%myconfig, $form->{"amount_$_"}), 1..$form->{rowcount};

  $form->isblank("exchangerate", $locale->text('Exchangerate missing!'))

    $form->{addition} = "POSTED";

    $form->save_history($form->dbconnect(\%myconfig));

  }

  remove_draft() if $form->{remove_draft};

  $form->redirect($locale->text('Transaction posted!')) unless $inline;

  	$form->{addition} = "POSTED AS NEW";

  	$form->save_history($form->dbconnect(\%myconfig));

  }

  &post;

  $lxdebug->leave_sub();

  	  $form->{addition} = "DELETED";

  	  $form->save_history($form->dbconnect(\%myconfig));

    }

    $form->redirect($locale->text('Transaction deleted!'));

  }

  $form->error($locale->text('Cannot delete transaction!'));

| if $form->{selectdepartment};

  $form->{title} = $locale->text('AR Transactions');

  $form->{javascript} .= qq|<script type="text/javascript" src="js/common.js"></script>|;

  # use JavaScript Calendar or not

  $form->{jsscript} = 1;

  $jsscript = "";

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

		<td nowrap>| . $locale->text('Transaction description') . qq|</td>

	      </tr>

	    </table>

	  </td>

	</tr>

  @columns =

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

       datepaid due duedate transaction_description notes salesman employee shippingpoint shipvia

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

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

    'globalprojectnumber'     => { 'text' => $locale->text('Project Number'), },

    'marge_total'             => { 'text' => $locale->text('Ertrag'), },

    'marge_percent'           => { 'text' => $locale->text('Ertrag prozentual'), },

  );

  foreach my $name (qw(id transdate duedate invnumber ordnumber name datepaid employee shippingpoint shipvia transaction_description)) {

    $form->{addition} = "STORNO";

    $form->save_history($form->dbconnect(\%myconfig));

  }

  $lxdebug->leave_sub();

}

  'Contact'                     => 'Kontakt',

  'Continue'                    => 'Weiter',

  'Could not spawn the printer command.' => 'Die Druckanwendung konnte nicht gestartet werden.',

  'Create and edit RFQs'        => 'Lieferantenanfragen erfassen und bearbeiten',

  'Create and edit customers and vendors' => 'Kunden und Lieferanten erfassen und bearbeiten',

  'Create and edit dunnings'    => 'Mahnungen erfassen und bearbeiten',

  'Paid'                        => 'bezahlt',

  'Part Number'                 => 'Artikelnummer',

  'Part description'            => 'Artikelbeschreibung',

  'Payment date missing!'       => 'Tag der Zahlung fehlt!',

  'Payment posted!'             => 'Zahlung gebucht!',

  'Pick List'                   => 'Sammelliste',

  'Shipping Point'              => 'Versandort',

  'Skip'                        => '?berspringen',

  'Source'                      => 'Beleg',

  'Storno'                      => 'Storno',

  'Storno (one letter abbreviation)' => 'S',

  'Storno Invoice'              => 'Stornorechnung',

  'Transactions, AR transactions, AP transactions' => 'Dialogbuchen, Debitorenrechnungen, Kreditorenrechnungen',

  'Trying to call a sub without a name' => 'Es wurde versucht, eine Unterfunktion ohne Namen aufzurufen.',

  'Type'                        => 'Typ',

  'Unit'                        => 'Einheit',

  'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',

  'Update'                      => 'Erneuern',