From 7d33971a91de55dfd2891d6ba068b03f82965ddd Mon Sep 17 00:00:00 2001
From: Rodrigo Rodriguez <me@rodrigorodriguez.com>
Date: Sun, 17 Dec 2023 00:51:43 -0300
Subject: [PATCH] fix(basic.gblib): Allow MERGE keyword in storage #380.
 @othonlima

---
 packages/basic.gblib/services/SystemKeywords.ts | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/packages/basic.gblib/services/SystemKeywords.ts b/packages/basic.gblib/services/SystemKeywords.ts
index 9e6ce081..c47ad57e 100644
--- a/packages/basic.gblib/services/SystemKeywords.ts
+++ b/packages/basic.gblib/services/SystemKeywords.ts
@@ -2346,7 +2346,7 @@ export class SystemKeywords {
 
               let value = row[p];
               if (typeof (value) === 'string') {
-                value = value.substr(0, fieldsSizes[j]);
+                value = value.substr(0, fieldsSizes[j]-1);
               }
 
               fieldsValues.push(value);