#$form->{sellprice} = 0;
$form->{weight} = 0;
map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) }
- qw(listprice rop stock);
+ qw(listprice sellprice rop stock);
@flds =
qw(id qty unit bom partnumber description sellprice weight runningnumber partsgroup lastcost);
for $i (1 .. $form->{rowcount}) {
map({ $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig, $form->{"${_}_${i}"})
if ($form->{"${_}_${i}"}) }
- qw(ship qty sellprice listprice basefactor));
+ qw(ship qty sellprice listprice basefactor discount));
}
&prepare_order;
map({ $form->{"${_}_${i}"} = $form->parse_amount(\%myconfig,
$form->{"${_}_${i}"})
if ($form->{"${_}_${i}"}) }
- qw(ship qty sellprice listprice basefactor));
+ qw(ship qty sellprice listprice basefactor discount));
}
&prepare_order;
($form->{type} =~ /_delivery_order$/) ? (
opthash($form->{type}, $form->{PD}{$form->{type}}, $locale->text('Delivery Order')),
opthash('pick_list', $form->{PD}{pick_list}, $locale->text('Pick List')),
- ) : undef,
- ($form->{type} eq 'credit_note') ?
- opthash("credit_note", $form->{PD}{credit_note}, $locale->text('Credit Note')) : undef;
+ ) : undef;
push @SENDMODE,
opthash("attachment", $form->{SM}{attachment}, $locale->text('Attachment')),
reformat_numbers($output_numberformat, $precision, @{ $field_list });
}
- my $extension = '';
+ my $extension = 'html';
if ($form->{format} eq 'postscript') {
$form->{postscript} = 1;
$extension = 'tex';