fix velocloud edgeqoe

cloud/vmware/velocloud/restapi/custom/api.pm

@@ -274,6 +274,8 @@ sub list_links {
         $self->get_entreprise_id();
     }
 
+    my $start_time = DateTime->now->subtract(seconds => $options{timeframe})->iso8601.'Z';
+
     my $results = $self->request_api(
         method => 'POST',
         path => '/metrics/getEdgeLinkMetrics',
@@ -281,6 +283,9 @@ sub list_links {
             enterpriseId => $self->{entreprise_id},
             edgeId => $options{edge_id},
             metrics => [ 'bytesRx' ],
+            interval => {
+                start => $start_time
+            },
         }
     );
 

cloud/vmware/velocloud/restapi/mode/edgeqoe.pm

@@ -157,7 +157,8 @@ sub manage_selection {
         $self->{edges}->{$edge->{name}}->{display} = $edge->{name};
 
         my $links = $options{custom}->list_links(
-            edge_id => $edge->{id}
+            edge_id => $edge->{id},
+            timeframe => $self->{timeframe}
         );
 
         my $qoes = $options{custom}->get_links_qoe(