From 8cbb45aad1d2e5e9550bf7886cf69912eb4f977b Mon Sep 17 00:00:00 2001
From: Rodrigo Rodriguez <me@rodrigorodriguez.com>
Date: Tue, 10 Aug 2021 18:30:32 -0300
Subject: [PATCH] new(basic.gblib) New SET SCHEDULE keyword.

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

diff --git a/packages/basic.gblib/services/SystemKeywords.ts b/packages/basic.gblib/services/SystemKeywords.ts
index b7e91bec..9f1f99f8 100644
--- a/packages/basic.gblib/services/SystemKeywords.ts
+++ b/packages/basic.gblib/services/SystemKeywords.ts
@@ -441,9 +441,11 @@ export class SystemKeywords {
                 const e = result.split(';');
                 const hr = Number.parseInt(filter.value.split(':')[0]);
                 let lastHour = Number.parseInt(e[0]);
+                let found = false;
                 await CollectionUtil.asyncForEach(e, async hour => {
-                  if (lastHour <= hr && hr <= hour) {
+                  if (!found && lastHour <= hr && hr <= hour) {
                     filterAcceptCount++;
+                    found = true;
                   }
                   lastHour = hour;
                 });