MT#62283 exclude "for update no lock" in tests

Change-Id: I12ff4d1f8ba0b150a1918de40dafa1efd6a92c10
(cherry picked from commit 764ab7d2d1)

lib/NGCP/Panel/Controller/API/Contracts.pm

@@ -98,7 +98,7 @@ sub GET :Allow {
             c => $c,
             rs => $contracts_rs,
             contract_id_field => 'id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my (@embedded, @links);
         my $form = $self->get_form($c);

lib/NGCP/Panel/Controller/API/Customers.pm

@@ -171,7 +171,7 @@ sub GET :Allow {
             c => $c,
             rs => $customers_rs,
             contract_id_field => 'id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my (@embedded, @links);
         my $form = $self->get_form($c);

lib/NGCP/Panel/Controller/API/SubscriberPreferences.pm

@@ -96,7 +96,7 @@ sub GET :Allow {
             c => $c,
             rs => $subscribers_rs,
             contract_id_field => 'contract_id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my $now = NGCP::Panel::Utils::DateTime::current_local;
         my (@embedded, @links, %contract_map);

lib/NGCP/Panel/Controller/API/Subscribers.pm

@@ -323,7 +323,7 @@ sub GET :Allow {
             c => $c,
             rs => $subscribers_rs,
             contract_id_field => 'contract_id',
-            skip_locked => 1,
+            skip_locked => ($c->request->header('X-Delay-Commit') ? 0 : 1),
         );
         my $now = NGCP::Panel::Utils::DateTime::current_local;
         my (@embedded, @links, %contract_map);