From 5e6b599eb968503be2039ac2dcc1a627b18ff43b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lucas=20Hil=C3=A1rio=20da=20Costa?=
 <lucashcosta.lhc@gmail.com>
Date: Tue, 18 Nov 2025 14:53:54 -0300
Subject: [PATCH] Fix state parameter indexing in GetCredentials

---
 rtn/OAUTH2.ZAUTHENTICATE.mac | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtn/OAUTH2.ZAUTHENTICATE.mac b/rtn/OAUTH2.ZAUTHENTICATE.mac
index 3b0c7ca..5a07776 100644
--- a/rtn/OAUTH2.ZAUTHENTICATE.mac
+++ b/rtn/OAUTH2.ZAUTHENTICATE.mac
@@ -96,7 +96,7 @@ ZAUTHENTICATE(ServiceName, Namespace, Username, Password, Credentials, Propertie
 	quit sc
 }
 GetCredentials(ServiceName,Namespace,Username,Password,Credentials) Public {
-	if ServiceName="%Service_WebGateway", $data(%request.Data(##class(%OAuth2.Login).#SessionQueryParameter),state) {
+	if ServiceName="%Service_WebGateway", $data(%request.Data(##class(%OAuth2.Login).#SessionQueryParameter,1),state) {
 		// Supply user name and password for authentication via a subclass of %OAuth2.Login
 		Set HashedToken = $zcrc(state,7) 
 		set Username="OAuth2"_HashedToken