Download no-whitespace-ext.hqx (2,603 KB)
From: SMTP%"ALLAN@otago.ac.nz" 30-JUL-1991 21:20:54.40
To: hagood@scri1.scri.fsu.edu
CC:
Subj: NoWhiteSpace Ext
Date: Wed, 31 Jul 91 13:03 GMT +1200
From: Allan Udy
Subject: NoWhiteSpace Ext
To: hagood@scri1.scri.fsu.edu
X-VMS-To: IN%"hagood@scri1.scri.fsu.edu"
NoWhiteSpace(Thestring;ValidChars;UpShift)
NoWhiteSpace processes a string (TheString) and returns it with all "whitespace" characters removed. You pass a list of valid (non- whitespace) characters in the ValidChars string.
Pass 1 in UpShift to automatically Uppercase the returned string. Passing 0 in UpShift means that the external will differentiate between upper and lowercase letters and thus both sets should be passed in ValidChars.
TheString & ValidChars have a maximum length of 255 characters.