Revision bce93dd4
Von Sven Schöling vor mehr als 3 Jahren hinzugefügt
| bin/mozilla/oe.pl | ||
|---|---|---|
| 55 | 55 |
use SL::DB::TaxZone; |
| 56 | 56 |
use SL::DB::PaymentTerm; |
| 57 | 57 |
use SL::DB::Vendor; |
| 58 |
use SL::Presenter::Tag qw(hidden_tag checkbox_tag); |
|
| 58 | 59 |
|
| 59 | 60 |
require "bin/mozilla/common.pl"; |
| 60 | 61 |
require "bin/mozilla/io.pl"; |
| ... | ... | |
| 489 | 490 |
my $form = $main::form; |
| 490 | 491 |
my %myconfig = %main::myconfig; |
| 491 | 492 |
my $locale = $main::locale; |
| 492 |
my $cgi = $::request->{cgi};
|
|
| 493 | 493 |
|
| 494 | 494 |
check_oe_access(); |
| 495 | 495 |
|
| ... | ... | |
| 1004 | 1004 |
my $form = $main::form; |
| 1005 | 1005 |
my %myconfig = %main::myconfig; |
| 1006 | 1006 |
my $locale = $main::locale; |
| 1007 |
my $cgi = $::request->{cgi};
|
|
| 1008 | 1007 |
|
| 1009 | 1008 |
check_oe_access(); |
| 1010 | 1009 |
|
| ... | ... | |
| 1269 | 1268 |
} |
| 1270 | 1269 |
|
| 1271 | 1270 |
$row->{ids} = {
|
| 1272 |
'raw_data' => $cgi->hidden('-name' => "trans_id_${idx}", '-value' => $oe->{id})
|
|
| 1273 |
. $cgi->checkbox('-name' => "multi_id_${idx}", '-value' => 1, '-label' => ''),
|
|
| 1271 |
'raw_data' => hidden_tag("trans_id_${idx}", $oe->{id})
|
|
| 1272 |
. checkbox_tag("multi_id_${idx}", value => 1, label => ""),
|
|
| 1274 | 1273 |
'valign' => 'center', |
| 1275 | 1274 |
'align' => 'center', |
| 1276 | 1275 |
}; |
Auch abrufbar als: Unified diff
CGI.pm nicht mehr als html Generator verwenden
Die restlichen Vorkommen sind jetzt noch
- header
- redirect
- cookie
und sind alle der Form: $::request->cgi->...