Changeset 1856 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 11/21/16 17:51:39 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/User.pm
r1855 r1856 1324 1324 }, 1325 1325 multiple => 1, 1326 }, 1327 employmentHistory => { 1328 reference => 'employment', 1329 multiple => 1, 1330 ro => 1, 1326 1331 }, 1327 1332 hosted => { … … 1665 1670 my %changes; 1666 1671 1672 { 1673 my $sth = $self->db->prepare_cached(q{ 1674 select employment.name from employment 1675 where "user" = ? and employment.firstday < now() 1676 }); 1677 $sth->execute($self->id); 1678 my @values; 1679 while (my $res = $sth->fetchrow_hashref) { 1680 push(@values, $res->{name}); 1681 } 1682 $changes{"employmentHistory"} = \@values; 1683 } 1684 1667 1685 foreach my $attribute (qw(contratType)) { 1668 1686 my $sth = $self->db->prepare_cached(q{
Note: See TracChangeset
for help on using the changeset viewer.