use strict;
-my $print_post;
-
1;
# end of main
if(!exists $form->{addition}) {
$form->{snumbers} = qq|donumber_| . $form->{donumber};
$form->{addition} = "SAVED";
- $form->save_history($form->dbconnect(\%myconfig));
+ $form->save_history;
}
# /saving the history
if(!exists $form->{addition}) {
$form->{snumbers} = qq|donumber_| . $form->{donumber};
$form->{addition} = "DELETED";
- $form->save_history($form->dbconnect(\%myconfig));
+ $form->save_history;
}
# /saving the history
for my $i (1 .. $form->{rowcount}) {
# für bug 1284
- if ($form->{discount}){ # Falls wir einen Kundenrabatt haben
+ if ($form->{discount}){ # Falls wir einen Kundenrabatt haben
# und keinen anderen discount wert an $i ...
$form->{"discount_$i"} ||= $form->{discount}*100; # ... nehmen wir den kundenrabatt
}
$form->{print_and_save} = 1;
- $print_post = 1;
-
my $saved_form = save_form();
save();