Changeset 2138

Timestamp:

05/28/18 18:44:56 (6 years ago)

Author:

nanardon

Message:

Compute departure always for next status

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm (modified) (4 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm

@@ -256 +256 @@
                     my ($attr) = @_;
                     my $self = $attr->object;
-                    $self->_computeEndEmployment($self->base->config('employment_delay') || 0, 1, 1);
+                    $self->_computeEndEmployment($self->base->config('employment_delay') || 0, 1);
                 },
                 label => l('Start of employment'),
@@ -1802 +1802 @@
 
 sub _computeEndEmployment {
-    my ($self, $delay, $any, $workday) = @_;
+    my ($self, $delay, $workday) = @_;
 
     $delay ||= 0;
@@ -1845 +1845 @@
             }
             $end = $tend
-        } elsif ((!$res->{current}) && (!$any)) {
-            last;
         }
         $end = DateTime->from_epoch(epoch => str2time($res->{lastday}));
@@ -1853 +1851 @@
     }
     $list_empl->finish;
-
-    $end ||= $pend if($any);
 
     if ($end) {