Revision 8cd27a48
Von Sven Schöling vor etwa 15 Jahren hinzugefügt
| bin/mozilla/is.pl | ||
|---|---|---|
| 45 | 45 |
use strict; |
| 46 | 46 |
|
| 47 | 47 |
my $edit; |
| 48 |
#my $payment; |
|
| 49 | 48 |
my $print_post; |
| 50 | 49 |
|
| 51 | 50 |
1; |
| ... | ... | |
| 172 | 171 |
$form->{oldcustomer} = "$form->{customer}--$form->{customer_id}";
|
| 173 | 172 |
$form->{selectcustomer} = 1;
|
| 174 | 173 |
|
| 175 |
# departments |
|
| 176 |
# if ($form->{all_departments}) {
|
|
| 177 |
# $form->{selectdepartment} = "<option>\n";
|
|
| 178 |
# $form->{department} = "$form->{department}--$form->{department_id}";
|
|
| 179 |
# |
|
| 180 |
# map {
|
|
| 181 |
# $form->{selectdepartment} .= "<option>$_->{description}--$_->{id}</option>\n"
|
|
| 182 |
# } @{ $form->{all_departments} };
|
|
| 183 |
# } |
|
| 184 |
|
|
| 185 | 174 |
$form->{employee} = "$form->{employee}--$form->{employee_id}";
|
| 186 | 175 |
|
| 187 | 176 |
# forex |
Auch abrufbar als: Unified diff
Loacles ergänzt und alten Code aufgeräumt.