<HAScript name="test" description="" timeout="6000" pausetime="20" promptall="true" blockinput="false" author="sr" creationdate="" supressclearevents="false" usevars="true" ignorepauseforenhancedtn="true" delayifnotenhancedtn="0" ignorepausetimeforenhancedtn="true" continueontimeout="false">
<import>
<type class="java.util.Random" name="javaRandom"/>
<type class="java.lang.String" name="javaString"/>
<type class="javax.swing.JOptionPane" name="javaOptionPane"/>
</import>
<vars>
<create name="$random$" type="javaRandom" value="$new java.util.Random()$"/>
<create name="$letters$" type="javaString" value="$new java.lang.String('ABCDEFGHIJKLMNOPQRSTUVWXYZ')$"/>
<create name="$randIndex$" type="integer" value="$random.nextInt(26)$"/>
<create name="$randLetter$" type="javaString" value=""/>
</vars>
<screen name="ScreenStart" entryscreen="true" exitscreen="true" transient="false">
<description>
<oia status="NOTINHIBITED" optional="false" invertmatch="false"/>
</description>
<actions>
<varupdate name="$randIndex$" value="$random.nextInt(26)$"/>
<!-- <trace type="SYSOUT" value="$randIndex$" /> -->
<varupdate name="$randLetter$" value="$letters.substring($randIndex$,$randIndex$+1)$" />
<!-- <trace type="SYSOUT" value="'Random Letter: ' + $randLetter$"/> -->
<perform value="$javaOptionPane.showMessageDialog(null,'Random Letter: ' + $randLetter$)$" />
</actions>
</screen>
</HAScript>
------------------------------
Sabine Rein
------------------------------
Original Message:
Sent: Fri February 09, 2024 05:24 AM
From: tudis lei
Subject: HAScript: How to generate random characters [A-Z]?
Using 'Character.toString(65)' from the Java.lang.Character combining with Java.lang.Math is my first attempt.
But on some of the computers I tried,
It throws a runtime error: 'Java.lang.Character does not contain the specified method toString'
As I am not allowed to make much changes on those computers,
is there any way to generate random characters [A-Z]?
Thank you very much.
------------------------------
tudis lei
------------------------------
#IBMiAccessClientSolutions