From 757bc0ec9135e4ed1eeae2aae8ce2ff458f5638d Mon Sep 17 00:00:00 2001
From: Nadir K Amra <amra@us.ibm.com>
Date: Tue, 15 Oct 2024 12:39:39 -0500
Subject: [PATCH] Index out of bounds

Signed-off-by: Nadir K Amra <amra@us.ibm.com>
---
 .../com/ibm/as400/security/auth/ProfileTokenImplRemote.java     | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/main/java/com/ibm/as400/security/auth/ProfileTokenImplRemote.java b/src/main/java/com/ibm/as400/security/auth/ProfileTokenImplRemote.java
index 616b70ee..010167db 100644
--- a/src/main/java/com/ibm/as400/security/auth/ProfileTokenImplRemote.java
+++ b/src/main/java/com/ibm/as400/security/auth/ProfileTokenImplRemote.java
@@ -445,7 +445,7 @@ public byte[] refresh(int type, int timeoutInterval) throws RefreshFailedExcepti
             parmlist[6] = new ProgramParameter(CharConverter.stringToByteArray(sys, remoteIpAddress));
 
             // Input: Length of remote IP address
-            parmlist[7] = new ProgramParameter(BinaryConverter.intToByteArray((isRemoteIPNull) ? 0 : parmlist[13].getInputData().length));
+            parmlist[7] = new ProgramParameter(BinaryConverter.intToByteArray((isRemoteIPNull) ? 0 : parmlist[6].getInputData().length));
 	    }
 
 	    try {