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. (This file must be converted with BinHex 4.0) :%dj[9fKTG'96F'0P)%9iG#jMF(3!8%&$9%033e3!N!3%i3#3"&k[!3&MU!!!"*f !4QKjKhU!C`TkLT!!S(#3!*LS3(#DJ(J+L@L(LRLDQAKhUSKkGiGiLTPUL(GiHSQ CUSH9KQ9hGTPQ9APQ9jH)S)!!#T!!!*Q+#U!)S!!+S)QU!!#3!)#J!+N*S!!!UU# J!)!!N!#!!*!$UD!!UTUJS*!!S!S!Q*!!!!N*S!!!LJ#J#J"`J)KQ$!!"-d9Q9eC hF!"`"``L-dGSD!GRCAKP!)#%+3#H0qQ%-!")H[BiFD0Q5L1c*l%XGU5lGPX4ZfC UmXEGQa0Cf2SeTr[l0QLA6fUmYA2kY&-0HIRp,8bFld1P5K6fRX1KhBIMpRIp[dr rrP!MHlh"QVeF20kdHI*YfSk&b@@Dh*09M(hSj(RHEj`P9)8XR1e-q&,+rC!!qXb 0m6hi3qZ!Qm`S8lIlkIQ!Rj02I3Tj1GRp)-2)8`U3!2jC1E@cS9+@PPHj$d"YmDR YG6+r9$A#rq*#G,+r@#Z"["8rE@eI&Zk2ci1,`2a3q5piFHD'&8e)8JUa!-a1,8i 1A#P@lP,eIY!4QD&p#,%cHCj2Mr"c*S3r0QFbpi1Mf8&-["cFrb-Re)CQIHhH"ei 8VflScAYd'UQMU9Zj$YjI"c1CI[9!e[hTi3j32)Q9-ZVI[2aeScH,GqhP`TKjh1E hlhKd1riYdH2Ti[qqKr@riIJQ[H#dC&TD#45Yi,rA5#D!8CZKp9#6qer`qIhXAjD h6MVIHrl#T@q)ccVTGDfV#'MEmAJdEGi",rJVGbpHVG1YYU-I2$M4-#aL-CU@MPB Q*Qm[Ir5r2br@ap2PkAj1&cG,XC0,bY(q'&Urd[q(RC[Ullp(IKKCR1KLHTK4jf0 phSIc[r,jrHU3!+h6aYERpQYrIMF@'"mfMM6`hZPcFfR(FK[41aGMIIjTDI,hrqZ Km0r`qM$Arj(@ih"aYEIqcmfMmRGVI%"A"MVE8-6&i[d1G5f-$hG6e+IEe+fh#&2 ihIlG*APap6CPZdA,-fabG@5eCXIFfC,Ph$L@,Np(DdpQcVdF2$``Nde*)m+,C0' 5j,'IAL`EZeF0SaMC"ZD0QDLABPZ9F2$FF)l9bH[+G""*&Mc&))a&iBFf)h*D0Zj 0GMCSMZ@D0Q-PUe('h%3lU)H0'Z2mPHL8JPb@h2l%YJpiHM2YVmF&LeCZd*'[B5@ 4ajTj[,LfJF0a!Xc(EFVP@C&DZ(cd6-K#&e@+*ibEG%pZ5LcA)TeJCfTEPH5l+U) bETTYL&%l6ZQTpL2'F4VFXKA&qS)E5p8K%dPSYCCl&RAejENXe&Q5L@28PSh$5%G Y'KFEY6lM6PDPS@JS,8E1hGMe*c+lXY"3YQIEY@!qGIeJr0f%i4Ira"I(j)fj1VC YlGXBTYJ8cd4aq4b(V0""jPbHh(6QPNpC)(Tckp'iFQm5206`c$pk28I2$iqRpR) iq4NF6l'6b2-r$KiDF9fj1Y(EA1MQphJZZ'+150f`3fkA)Ni%GB0,%mCTk%(CJG- q%#[2EYQBADVcGADmIr$lrL`hRBa+IrNh9$dQYe3Dh9#(#AG8)FI+l4Tl"hRYpM+ l9qq)IlJhL`-`2DK[2Er"p4jep`Y2NJ(`ZE``!*!$N8*GjJ!"!!p1EeGSDA4P8h" MC5j&H(3"!*!$#&"&@&3d4%eBSP[eLk*EpBi!!2JAE"S!!J!!"JF!N!B%P3#3",P !!!!: