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.