Changeset 2138 for trunk/LATMOS-Accounts/lib/LATMOS
- Timestamp:
- 05/28/18 18:44:56 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm
r2136 r2138 256 256 my ($attr) = @_; 257 257 my $self = $attr->object; 258 $self->_computeEndEmployment($self->base->config('employment_delay') || 0, 1 , 1);258 $self->_computeEndEmployment($self->base->config('employment_delay') || 0, 1); 259 259 }, 260 260 label => l('Start of employment'), … … 1802 1802 1803 1803 sub _computeEndEmployment { 1804 my ($self, $delay, $ any, $workday) = @_;1804 my ($self, $delay, $workday) = @_; 1805 1805 1806 1806 $delay ||= 0; … … 1845 1845 } 1846 1846 $end = $tend 1847 } elsif ((!$res->{current}) && (!$any)) {1848 last;1849 1847 } 1850 1848 $end = DateTime->from_epoch(epoch => str2time($res->{lastday})); … … 1853 1851 } 1854 1852 $list_empl->finish; 1855 1856 $end ||= $pend if($any);1857 1853 1858 1854 if ($end) {
Note: See TracChangeset
for help on using the changeset viewer.