Revision 9b67d27c
Von Sven Schöling vor mehr als 12 Jahren hinzugefügt
| bin/mozilla/is.pl | ||
|---|---|---|
| 300 | 300 |
my @old_project_ids = ($form->{"globalproject_id"});
|
| 301 | 301 |
map { push @old_project_ids, $form->{"project_id_$_"} if $form->{"project_id_$_"}; } 1..$form->{"rowcount"};
|
| 302 | 302 |
|
| 303 |
$form->get_lists("shipto" => "ALL_SHIPTO",
|
|
| 304 |
"projects" => { "key" => "ALL_PROJECTS",
|
|
| 303 |
$form->get_lists("projects" => { "key" => "ALL_PROJECTS",
|
|
| 305 | 304 |
"all" => 0, |
| 306 | 305 |
"old_id" => \@old_project_ids }, |
| 307 | 306 |
"taxzones" => "ALL_TAXZONES", |
| ... | ... | |
| 312 | 311 |
|
| 313 | 312 |
$TMPL_VAR{ALL_EMPLOYEES} = SL::DB::Manager::Employee->get_all(query => [ or => [ id => $::form->{employee_id}, deleted => 0 ] ]);
|
| 314 | 313 |
$TMPL_VAR{ALL_SALESMEN} = SL::DB::Manager::Employee->get_all(query => [ or => [ id => $::form->{salesman_id}, deleted => 0 ] ]);
|
| 314 |
$TMPL_VAR{ALL_SHIPTO} = SL::DB::Manager::Shipto->get_all(query => [
|
|
| 315 |
or => [ trans_id => $::form->{"$::form->{vc}_id"} * 1, shipto_id => $::form->{shipto_id} * 1 ]
|
|
| 316 |
]); |
|
| 315 | 317 |
$TMPL_VAR{ALL_CONTACTS} = SL::DB::Manager::Contact->get_all(query => [
|
| 316 | 318 |
or => [ |
| 317 | 319 |
cp_cv_id => $::form->{"$::form->{vc}_id"} * 1,
|
| ... | ... | |
| 321 | 323 |
] |
| 322 | 324 |
] |
| 323 | 325 |
]); |
| 324 |
$TMPL_VAR{shipto_labels} = sub { join "; ", grep { $_ } map { $_[0]->{"shipto${_}" } } qw(name department_1 street city) };
|
|
| 325 | 326 |
$TMPL_VAR{department_labels} = sub { "$_[0]->{description}--$_[0]->{id}" };
|
| 326 | 327 |
|
| 327 | 328 |
# customer |
Auch abrufbar als: Unified diff
Lieferadressen, gelöschte aber ausgewählte weiterhin einblenden.