| Subprocedure randomString returns a string
        up to 1024 random characters.
        The caller controls the
        number of characters returned, the contents and case
        of the first character, and the contents and case of the
        remaining characters. This procedure can be used for assigning temporary names
        for user spaces, stream files, file members, etc.
 Parameters: 
        For more information, see
        CGIDEV2/QRPGLESRC member XXXRANDOM.Number of characters to return (0 - 1024)If 0, a null string is returned.
 If > 1024, 1024 characters are returned.
First character (if not passed, defaults to *mixedDigit)
            *upperLetter (upper case letter only)
            *lowerLetter (lower case letter only)
            *mixedLetter (upper or lower case letter only)
            *upperDigit (upper case letter or digit)
            *lowerDigit (lower case letter or digit)
            *mixedDigit (upper or lower case letter or digit)
            *digit (digit only)
            Remaining characters (if not passed, defaults to *mixedDigit)
            same choices as first characterUpperChars - characters that are "upper case")
            If not passed or has length = 0,
             defaults to 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'LowerChars - characters that are "lower case")
            If not passed or has length = 0,
             defaults to 'abcdefghijklmnopqrstuvwzyz'DigitChars - characters that are "digits")
            If not passed or has length = 0, defaults to '0123456789' Example:
         | 
        | 
D UsrSpcName      s             10
C                   eval      usrSpcName = RandomString(
C                             10:'*UpperLetter':'*UpperDigit')
         |  | 
 |