Changeset 983 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql.pm

Timestamp:

05/17/12 09:58:27 (12 years ago)

Author:

nanardon

Message:

• add task module to validate automated request

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql.pm (modified) (1 diff)

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

@@ -423 +423 @@
 }
 
+sub list_auto_pending_requests {
+    my ($self) = @_;
+
+    my $sth = $self->db->prepare(q{
+        select id from request
+        where done is null
+            and apply < now()
+            and automated = true
+        order by apply
+    });
+    $sth->execute;
+    my @ids;
+    while (my $res = $sth->fetchrow_hashref) {
+        push(@ids, $res->{id});
+    }
+
+    @ids
+}
+
 1;