| 51 |
51 |
use SL::DB::InvoiceItem;
|
| 52 |
52 |
use SL::DB::RecordTemplate;
|
| 53 |
53 |
use SL::DB::Tax;
|
|
54 |
use SL::DB::ValidityToken;
|
| 54 |
55 |
use SL::Helper::Flash qw(flash flash_later);
|
| 55 |
56 |
use SL::Locale::String qw(t8);
|
| 56 |
57 |
use SL::Presenter::Tag;
|
| ... | ... | |
| 174 |
175 |
|
| 175 |
176 |
flash('info', $::locale->text("The record template '#1' has been loaded.", $template->template_name));
|
| 176 |
177 |
|
|
178 |
$::form->{form_validity_token} = SL::DB::ValidityToken->create(scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST())->token;
|
|
179 |
|
| 177 |
180 |
update(
|
| 178 |
181 |
keep_rows_without_amount => 1,
|
| 179 |
182 |
dont_add_new_row => 1,
|
| ... | ... | |
| 261 |
264 |
$form->{"AR_amount_chart_id_1"} = $last_used_ar_chart->id if $last_used_ar_chart;
|
| 262 |
265 |
}
|
| 263 |
266 |
|
|
267 |
if (!$form->{form_validity_token}) {
|
|
268 |
$form->{form_validity_token} = SL::DB::ValidityToken->create(scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST())->token;
|
|
269 |
}
|
|
270 |
|
| 264 |
271 |
&display_form;
|
| 265 |
272 |
$main::lxdebug->leave_sub();
|
| 266 |
273 |
}
|
| ... | ... | |
| 585 |
592 |
sub show_draft {
|
| 586 |
593 |
$::form->{transdate} = DateTime->today_local->to_kivitendo if !$::form->{transdate};
|
| 587 |
594 |
$::form->{gldate} = $::form->{transdate} if !$::form->{gldate};
|
|
595 |
$::form->{form_validity_token} = SL::DB::ValidityToken->create(scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST())->token;
|
| 588 |
596 |
update();
|
| 589 |
597 |
}
|
| 590 |
598 |
|
| ... | ... | |
| 750 |
758 |
|
| 751 |
759 |
$form->mtime_ischanged('ar');
|
| 752 |
760 |
|
|
761 |
my $validity_token;
|
|
762 |
if (!$form->{id}) {
|
|
763 |
$validity_token = SL::DB::Manager::ValidityToken->fetch_valid_token(
|
|
764 |
scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST(),
|
|
765 |
token => $form->{form_validity_token},
|
|
766 |
);
|
|
767 |
|
|
768 |
$form->error($::locale->text('The form is not valid anymore.')) if !$validity_token;
|
|
769 |
}
|
|
770 |
|
| 753 |
771 |
my ($datepaid);
|
| 754 |
772 |
|
| 755 |
773 |
# check if there is an invoice number, invoice and due date
|
| ... | ... | |
| 812 |
830 |
$form->{id} = 0 if $form->{postasnew};
|
| 813 |
831 |
$form->error($locale->text('Cannot post transaction!')) unless AR->post_transaction(\%myconfig, \%$form);
|
| 814 |
832 |
|
|
833 |
$validity_token->delete if $validity_token;
|
|
834 |
delete $form->{form_validity_token};
|
|
835 |
|
| 815 |
836 |
# saving the history
|
| 816 |
837 |
if(!exists $form->{addition} && $form->{id} ne "") {
|
| 817 |
838 |
$form->{snumbers} = "invnumber_$form->{invnumber}";
|
| ... | ... | |
| 880 |
901 |
$form->{duedate} = $payment_terms->calc_date(reference_date => $today)->to_kivitendo if $payment_terms;
|
| 881 |
902 |
}
|
| 882 |
903 |
|
|
904 |
$form->{form_validity_token} = SL::DB::ValidityToken->create(scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST())->token;
|
|
905 |
|
| 883 |
906 |
&update;
|
| 884 |
907 |
|
| 885 |
908 |
$main::lxdebug->leave_sub();
|
Gültigkeitstoken: Debitorenbuchung