Changeset 1994 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Employment.pm

Timestamp:

04/27/17 02:51:50 (7 years ago)

Author:

nanardon

Message:

Fix date checking on employment change/creation

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Employment.pm (modified) (2 diffs)

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

@@ -359 +359 @@
     my $id = ref $obj ? $obj->id : $obj;
 
-    my $firstday = exists($changes{firstday}) ? $changes{firstday} : $obj->get_attributes('firstday');
-    my $lastday  = exists($changes{lastday}) ?  $changes{lastday}  : $obj->get_attributes('lastday');
+    my $firstday = exists($changes{firstday}) 
+        ? $changes{firstday} : 
+            $obj ? $obj->get_attributes('firstday') : undef;
+    my $lastday  = exists($changes{lastday})
+        ?  $changes{lastday} :
+            $obj ? $obj->get_attributes('lastday') : undef;
 
     if ($lastday) {
@@ -380 +384 @@
             return;
         }
+    } elsif (!$firstday) {
+        $base->log(LA_ERR, "No firstday given");
+        return;
     } else {
         my $sth = $base->db->prepare_cached(q{