From 52f6f86316486ea7af828d0effb811eacf81a28f Mon Sep 17 00:00:00 2001
From: Rodrigo Rodriguez <me@rodrigorodriguez.com>
Date: Fri, 25 Aug 2023 18:13:10 -0300
Subject: [PATCH] new (basic.gbapp): ALLOW ROLE keyword.

---
 packages/basic.gblib/services/DialogKeywords.ts | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/packages/basic.gblib/services/DialogKeywords.ts b/packages/basic.gblib/services/DialogKeywords.ts
index b929512dd..7299a2afd 100644
--- a/packages/basic.gblib/services/DialogKeywords.ts
+++ b/packages/basic.gblib/services/DialogKeywords.ts
@@ -532,10 +532,14 @@ export class DialogKeywords {
    * @example ALLOW ROLE "DevOps"
    *
    */
-  public async allowRole({ pid, value: role }) {
+  public async allowRole({ pid, role }) {
     const { min, user, proc } = await DialogKeywords.getProcessInfo(pid);
     const sys  = new SystemKeywords();
 
+    if (!role){
+      throw new Error(`Invalid access. NULL role specified.`);
+    }
+
     // Updates current roles allowed from now on this dialog/process.
 
     proc.roles = role;