Revision 7e4a1765
Von Bernd Bleßmann vor fast 2 Jahren hinzugefügt
bin/mozilla/ir.pl | ||
---|---|---|
954 | 954 |
|
955 | 955 |
$form->mtime_ischanged('ap'); |
956 | 956 |
|
957 |
my $validity_token; |
|
958 |
if (!$form->{id}) { |
|
959 |
$validity_token = SL::DB::Manager::ValidityToken->fetch_valid_token( |
|
960 |
scope => SL::DB::ValidityToken::SCOPE_PURCHASE_INVOICE_POST(), |
|
961 |
token => $form->{form_validity_token}, |
|
962 |
); |
|
963 |
|
|
964 |
$form->error($::locale->text('The form is not valid anymore.')) if !$validity_token; |
|
965 |
} |
|
966 |
|
|
967 | 957 |
$form->{defaultcurrency} = $form->get_default_currency(\%myconfig); |
968 | 958 |
|
969 | 959 |
$form->isblank("invdate", $locale->text('Invoice Date missing!')); |
... | ... | |
1035 | 1025 |
|
1036 | 1026 |
relink_accounts(); |
1037 | 1027 |
if (IR->post_invoice(\%myconfig, \%$form)){ |
1038 |
|
|
1039 |
$validity_token->delete if $validity_token; |
|
1040 |
delete $form->{form_validity_token}; |
|
1041 |
|
|
1042 | 1028 |
# saving the history |
1043 | 1029 |
if(!exists $form->{addition} && $form->{id} ne "") { |
1044 | 1030 |
$form->{snumbers} = qq|invnumber_| . $form->{invnumber}; |
Auch abrufbar als: Unified diff
Gültigkeitstoken in Transaction abfragen und löschen: "alte" Controller
Lieferscheine
Einkaufsrechnung
Verkaufsrechnung
Kreditorenbuchung
Debitorenbuchung
Dialogbuchung