Revision 992a539d
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
| bin/mozilla/ct.pl | ||
|---|---|---|
| 806 | 806 |
$form->{taxincluded} = ($form->{taxincluded}) ? "checked" : "";
|
| 807 | 807 |
$form->{creditlimit} =
|
| 808 | 808 |
$form->format_amount(\%myconfig, $form->{creditlimit}, 0);
|
| 809 |
$form->{discount} =
|
|
| 810 |
$form->format_amount(\%myconfig, $form->{discount});
|
|
| 809 |
$form->{discount} = $form->format_amount(\%myconfig, $form->{discount});
|
|
| 811 | 810 |
|
| 812 | 811 |
if ($myconfig{role} eq 'admin') {
|
| 813 | 812 |
$bcc = qq| |
| ... | ... | |
| 1573 | 1572 |
if ($vertreter && $form->{db} eq "customer") {
|
| 1574 | 1573 |
$form->isblank("salesman_id", $locale->text("Salesman missing!"));
|
| 1575 | 1574 |
} |
| 1576 |
&{"CT::save_$form->{db}"}("", \%myconfig, \%$form);
|
|
| 1577 |
|
|
| 1575 |
$rc = &{"CT::save_$form->{db}"}("", \%myconfig, \%$form);
|
|
| 1576 |
if ($rc == 3) {
|
|
| 1577 |
$form->error($locale->text('customernumber not unique!'));
|
|
| 1578 |
} |
|
| 1578 | 1579 |
$form->redirect($locale->text($msg)); |
| 1579 | 1580 |
|
| 1580 | 1581 |
$lxdebug->leave_sub(); |
Auch abrufbar als: Unified diff
Recommit von r1168 von skoehler: Kundennummer laesst sich nur einmal vergegen, nicht ueber Datenbankschema unique bwz. primary key