Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 133c31d7

Von Thomas Heck vor etwa 12 Jahren hinzugefügt

Lieferdatum u. Auftragsdatum beim 'als neu speichern' von Aufträgen neuberechnen

  • Auftragsdatum wird aufs aktuelle Datum gesetzt
  • Lieferdatum wird genau so wie beim Erstellen eines neuen Auftrags gesetzt. Das ist: Auftragsdatum (sprich aktuelles Datum in unserem Fall) + 1 Tag aufgerundet auf den nächsten Arbeitstag (Freitag -> Montag)
    fixt #1959

Unterschiede anzeigen:

bin/mozilla/oe.pl
1629 1629
    delete($form->{$idx});
1630 1630
  }
1631 1631

  
1632
  # clear reqdate unless changed
1633
  if ($form->{reqdate} && $form->{id}) {
1632
  # clear reqdate and transdate unless changed
1633
  if ( $form->{reqdate} && $form->{id} ) {
1634 1634
    my $saved_order = OE->retrieve_simple(id => $form->{id});
1635
    if ($saved_order && $saved_order->{reqdate} eq $form->{reqdate}) {
1636
      delete $form->{reqdate};
1635
    if ( $saved_order && $saved_order->{reqdate} eq $form->{reqdate} && $saved_order->{transdate} eq $form->{transdate} ) {
1636

  
1637
      my $dbh = $form->get_standard_dbh;
1638

  
1639
      my $wday         = (localtime(time))[6];
1640
      my $next_workday = $wday == 5 ? 3 : $wday == 6 ? 2 : 1;
1641

  
1642
      my $query = 'SELECT
1643
                     date(current_date + interval \''. $next_workday .' days\') AS reqdate,
1644
                     date(current_date) AS transdate';
1645
      my $ref = selectfirst_hashref_query($form, $dbh, $query);
1646

  
1647
      map(
1648
        { $form->{$_} = $ref->{$_} }
1649
        keys %{$ref}
1650
      );
1637 1651
    }
1638 1652
  }
1639 1653

  

Auch abrufbar als: Unified diff