Fix issue #103

IBM · Jul 31, 2023 · 7a992b7 · 7a992b7
1 parent b24fa05
commit 7a992b7
Showing 1 changed file with 17 additions and 9 deletions.
diff --git a/src/main/java/com/ibm/as400/access/ProgramCall.java b/src/main/java/com/ibm/as400/access/ProgramCall.java
@@ -763,7 +763,9 @@ public boolean run() throws AS400SecurityException, ErrorCompletingRequestExcept
                 system_.aspName= iasp;
             }
           }catch (Exception e){
-            e.printStackTrace();
+        	  // Log the error, but do not print the stack trace
+        	  Trace.log(Trace.ERROR, e); 
+
           }
       }
       }
@@ -864,14 +866,20 @@ public void setParameterList(ProgramParameter[] parameterList) throws PropertyVe
         //boolean isV7R2 = false;//@RCD
        // boolean isV7R1 = false;//@N6A//@RCD
         boolean isSupport255 = false;//@RCA
-        try {
-          //isV7R2 = system_.getVRM() == 0x00070200; //@RCD
-          //isV7R1 = system_.getVRM() == 0x00070100;//@RCD //@N6A V7R1 with ptf SI55519 supported parameter with max 255
-          isSupport255 = (system_.getVRM() >= 0x00070100);//@RCA
-        } catch(Exception e) {
-          e.printStackTrace();
-        }
-
+        // only check the VRM if system_ exists
+		if (system_ != null) {
+			try {
+				// isV7R2 = system_.getVRM() == 0x00070200; //@RCD
+				// isV7R1 = system_.getVRM() == 0x00070100;//@RCD //@N6A V7R1 with ptf SI55519
+				// supported parameter with max 255
+				isSupport255 = (system_.getVRM() >= 0x00070100);// @RCA
+			} catch (Exception e) {
+				// Log the error but do not print the stack trace
+				Trace.log(Trace.ERROR, e);
+
+			}
+		}
+
         if ((isSupport255)&& parameterList.length > 255)//@N6C //@RCC
         {
           Trace.log(Trace.ERROR, this, "Parameter list length exceeds limit of 255 parameters:", parameterList.length); //@L8