Revision 4b34e531
Von Sven Schöling vor mehr als 16 Jahren hinzugefügt
bin/mozilla/io.pl | ||
---|---|---|
128 | 128 |
my @header_sort = qw(runningnumber partnumber description ship qty unit sellprice_pg sellprice discount linetotal); |
129 | 129 |
my @HEADER = ( |
130 | 130 |
{ id => 'runningnumber', width => 5, value => $locale->text('No.'), display => 1, }, |
131 |
{ id => 'partnumber', width => 12, value => $locale->text('Number'), display => 1, },
|
|
131 |
{ id => 'partnumber', width => 8, value => $locale->text('Number'), display => 1, },
|
|
132 | 132 |
{ id => 'description', width => 30, value => $locale->text('Part Description'), display => 1, }, |
133 | 133 |
{ id => 'ship', width => 5, value => ($form->{type} eq 'purchase_order' ? $locale->text('Ship rcvd') : $locale->text('Ship')), |
134 | 134 |
display => $form->{type} =~ /sales_order/ || ($form->{type} =~ /purchase_order/ && !($lizenzen && $form->{vc} eq "customer")) , }, |
... | ... | |
139 | 139 |
{ id => 'serialnr', width => 10, value => $locale->text('Serial No.'), display => 0, }, |
140 | 140 |
{ id => 'projectnr', width => 10, value => $locale->text('Project'), display => 0, }, |
141 | 141 |
{ id => 'sellprice', width => 15, value => $locale->text('Price'), display => !$is_delivery_order, }, |
142 |
{ id => 'sellprice_pg', width => 15, value => $locale->text('Pricegroup'), display => ($form->{type} =~ /^sales_/) && !$is_delivery_order, },
|
|
142 |
{ id => 'sellprice_pg', width => 8, value => $locale->text('Pricegroup'), display => ($form->{type} =~ /^sales_/) && !$is_delivery_order, },
|
|
143 | 143 |
{ id => 'discount', width => 5, value => $locale->text('Discount'), display => ($form->{vc} eq 'customer') && !$is_delivery_order, }, |
144 | 144 |
{ id => 'linetotal', width => 10, value => $locale->text('Extended'), display => !$is_delivery_order, }, |
145 | 145 |
{ id => 'bin', width => 10, value => $locale->text('Bin'), display => 0, }, |
... | ... | |
257 | 257 |
|
258 | 258 |
# build in drop down list for pricesgroups |
259 | 259 |
if ($form->{"prices_$i"}) { |
260 |
$column_data{sellprice_pg} = qq|<select name="sellprice_pg_$i">$form->{"prices_$i"}</select>|; |
|
260 |
$column_data{sellprice_pg} = qq|<select name="sellprice_pg_$i" style="width: 8em">$form->{"prices_$i"}</select>|;
|
|
261 | 261 |
$column_data{sellprice} = $cgi->textfield(-name => "sellprice_$i", -size => 10, -onBlur => 'check_right_number_format(this)', -value => |
262 | 262 |
(($form->{"new_pricegroup_$i"} != $form->{"old_pricegroup_$i"}) |
263 | 263 |
? $form->format_amount(\%myconfig, $form->{"price_new_$i"}, $decimalplaces) |
Auch abrufbar als: Unified diff
Maske ein wenig gestaucht, damit sie noch auf 1024 passt.
Das naechste mal muss aber Moeglichkeit her, die Daten irgendwie einzeln aufzuklappen.