From a9bb5e517e486e5f4b8c9ae4d41d164a9ff10b9f Mon Sep 17 00:00:00 2001
From: Rodrigo Rodriguez <me@rodrigorodriguez.com>
Date: Thu, 14 Dec 2023 12:44:01 -0300
Subject: [PATCH] fix(basic.gblib): Allow MERGE keyword in storage #380.
 @othonlima

---
 packages/basic.gblib/services/SystemKeywords.ts | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/packages/basic.gblib/services/SystemKeywords.ts b/packages/basic.gblib/services/SystemKeywords.ts
index 1289f9ce..21471f20 100644
--- a/packages/basic.gblib/services/SystemKeywords.ts
+++ b/packages/basic.gblib/services/SystemKeywords.ts
@@ -2155,8 +2155,8 @@ export class SystemKeywords {
             let page = 0, pageSize = 1000;
             let count = 0;
 
-            do {
-              
+            while (page === 0 || count !== pageSize) {
+
               rows = [
                 await t.findAll(
                   paginate(
@@ -2169,7 +2169,7 @@ export class SystemKeywords {
 
               count = rows.length;
 
-            } while (count !== 1000)
+            }
           },
           {
             retries: 5,