Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 7e4a1765

Von Bernd Bleßmann vor fast 2 Jahren hinzugefügt

  • ID 7e4a17657742a65bb69c79136a4f5b1aeb2a3712
  • Vorgänger 57657390
  • Nachfolger ec03bff2

Gültigkeitstoken in Transaction abfragen und löschen: "alte" Controller

Lieferscheine
Einkaufsrechnung
Verkaufsrechnung
Kreditorenbuchung
Debitorenbuchung
Dialogbuchung

Unterschiede anzeigen:

bin/mozilla/is.pl
1063 1063
  $main::auth->assert('invoice_edit');
1064 1064
  $form->mtime_ischanged('ar');
1065 1065

  
1066
  my $validity_token;
1067
  if (!$form->{id}) {
1068
    $validity_token = SL::DB::Manager::ValidityToken->fetch_valid_token(
1069
      scope => SL::DB::ValidityToken::SCOPE_SALES_INVOICE_POST(),
1070
      token => $form->{form_validity_token},
1071
    );
1072

  
1073
    $form->error($::locale->text('The form is not valid anymore.')) if !$validity_token;
1074
  }
1075

  
1076 1066
  $form->{defaultcurrency} = $form->get_default_currency(\%myconfig);
1077 1067
  $form->isblank("invdate",  $locale->text('Invoice Date missing!'));
1078 1068
  $form->isblank("customer_id", $locale->text('Customer missing!'));
......
1205 1195
    }
1206 1196
  }
1207 1197

  
1208
  $validity_token->delete if $validity_token;
1209
  delete $form->{form_validity_token};
1210

  
1211 1198
  if(!exists $form->{addition}) {
1212 1199
    $form->{snumbers}  =  'invnumber' .'_'. $form->{invnumber}; # ($form->{type} eq 'credit_note' ? 'cnnumber' : 'invnumber') .'_'. $form->{invnumber};
1213 1200
    $form->{what_done} = 'invoice';

Auch abrufbar als: Unified diff