From: SMTP%"ALLAN@otago.ac.nz" 30-JUL-1991 21:20:09.92 To: hagood@scri1.scri.fsu.edu CC: Subj: NumberFilter Ext Date: Wed, 31 Jul 91 13:02 GMT +1200 From: Allan Udy Subject: NumberFilter Ext To: hagood@scri1.scri.fsu.edu X-VMS-To: IN%"hagood@scri1.scri.fsu.edu" numberFilter v1.00 This external checks the validity of a numerical entry. It is primarily useful for enterable variables in a dialog box that must accept more than one data type. (This file must be converted with BinHex 4.0) :%'jeE@*PFNCTE(4PFLjMF(3!8%&$9%033e3!N!3-"J#3"'03!3%G'J!!#h1!4iG hCfChGSQ!N!"iUSQJ#J"+N!!!#(N)HRU)L*S)QALRUDLRQ)S'#T!!G`#BJ)QB#3S !"ACNCQ@S9e9T9PCiPJS!!(L!U3#JUD!!N!-+#3N!U+QU#*S!#J!!N!!*S!!*!*! $S*UJ!!#!!*!$N!!!N!!+!*!$S*UT!!S+UJ#3!`S)!*!%S!X!!6-eCRKAJ)!!#!i 63eCfCh9iF!J!Gi!)L2rqM$`H(PkIbS'e15(ei3B0UHq%Y*JcSarQ08BI[Kc!0mL N[NKd`Cp5M&$D"+Y***YE[drFqI6rGU@d#3Kb[Rr$$Nd)D%0!1IHTcFA$+[Xcd@5 VZhA4dH2TEI4k0hHUbCkjm@1b2mBp,dr5p12ApEZAYq2VGMf,hDZhEREacjBbp`B 8c84[ijAqpPMCMP(MQSR`6fCieBBc4)c+ZHq)j8f9jpZ0kb)jb9cm8eFp'H1E,,$ QSMKUV4&+ZEKS5#9cS*baRT),JRQSUa4iD[F*&0C(LcCE)cAlmXJ-UVNKDQ09-Si *V*SfCmNYZlGlAGhqherCh,YafZl)0hXIHkeiPQ+9I"AkmTU1Y+ZZU[HU`5p!V6) VQj(Y@9cdiZYGZA0aEF!dX+dPX*3P9(KNfJ*B"mqaQ1j&`JX'I6QldQE4R`aR@&P %RC&'H@h'QU1#9me44PMFZ43*'DLLV[NSId0MZak,j$fS5a10D(Qd%X@H3Tl'jMJ "j&lYalSSd!lRGFV-eG-X%EiFbN@b9bbQLM8+k9"fDLc+R1U$e`XFEh"k[Bl53!a rG5T,)0R&99JFaAd&2IEk3IPaC$VI,C@a2TK2(RbBj*bh4RBVe!VJUc*e+j3QkM5 cXLp&%6m0da[ErEl(iZakl(rZKrVdC-Fh$+bHqC60A0I6Hf'V05D#lCRf'FlPRL1 Q`kqIZk3CKVP,[QYYU1HV0(LQABLFKTX5DR2(*QVb9"1r9a'rEjipL'UM6&IIRbR B6ZZ1-8r'VQE[cCpU2$Q1KUEp'E!Qd6KiY0rRjBm(ipZ2!BLjZSibh)j+*6+KTjp L85R%V3c@Ur,"QVN1,frfH"I1P9,H1(P%iUZ-Z%`Ljr&%fB[)LE(-a,l0a9CXTp! A,f&E&42hPR#HYR)pY*U2!YYiFf,,Y4ac&+3IPcBX8XYNp9)@,Yq929IIQTX54C5 kBj(Hb0k0ml-RRNlF(9K#l)lelY4pVUp,Tp6SlA6k[6k[j%`2`H'dlpllZVZkZlE mGV$EmY[bfr(FrlVG69hGICepQlr@eXDRafr*c)DqcVB`jj,INYqA9hG6r@YMZp# hj0,KYBE@aVhZAXA2JYBG(qd$f+"0F#A3*rN#Il2FAf!*%#Hb"*3KSRijSK$4`J6 [(aECK$6qd"2Pil)FF10!J%T2L%G1"mMmh3j,I*T!r6jAQ150)rb`)0p$li%p3#I iFQIr#6mi#HF"1J"1i"2B!RYJ6qC-qD"2V!6D!Q!#8!6p)%m@I0i2#(BD)%dd#D# *r%"2j!6k!*ribicl5)qpcEc`*m3%rJP#r0i2$V'8rJ5"kc3ZhT`jbBMDd@r4rlY 3cq`69#*#4!kl!U-18-p+&T4fa$QRq4cSHI$mm2GKqL([3r9$pF2JKqb(LKqf(`` qD(p#*rC!!*!$J%9SH(KSD@HJChT`LSL!QTKCB)"`LV#iL'L+HU#)Q)LRGeGiHfK lL'PjGSQ(LU#UPhH)CAGhQAKRHQKRQBL3!+!!Gi!!S(Q`!*Q,J*!!USN!#J#DX,# JTkS!!)#*Zk#JN!#3!+"iN!#JN!#*U3!+H*U`!,S!!+S+X!#T!!LkUDQ!S,#3!*P lGJm!!63d9eCiL)L!L3#3!j!!%a0%99CBKRGiB!!!B!!!#("`J)#%)J*ZGj!!K0! N2Zf-UcS@)q0a[c4jA(K9aFIP`KEIBS9G'A2cqVk3!"D&I5kR5PXBHGRfCE'4bqY CkN`Ei[,k22[F,RG''Tf,Ci-hIXrLr2cJ4ElRr5aMFlr2'K#CiVI'jf9k%YL'0KF iMNcqZiaTFUY(cTFIQFh#K$EIKh02Vk-YM"bV&DVJFp'Ahr'NdXrd)qGPCfI,BIm ibbjPer+%bjrP#(qA[3QIYrhYZq8pii-rT9K#hrfUI0Yr(UD8H$[i8j2epkmLTi2 [Drr@$6NNNeqpXGLmQSFSiA@KLDIRff&TpDeLDJ)e-2#hmADe24MrGUGVX9TR`pM `DIQI"Dr[KkH*KCNc#dkH%`4UANhJEQTTCAkSiL$F1&Y4KPIJiGr#f"f46d)@h$# PpbH"p$@m1,ke6BmheUH2IFQ(dYE`ak%,HEfBEMSI&6p1'(`jS@KVH(%hfC3Ql%0 aNcR99pbFQ$"N@YiHIka%,FM%iLP$@m,$'m3a8dVlDdc1ZiSlkMN4j($LdB8+(rP 2LrpqChl@c8dU1qT0-A@[Nc,Ti@Mb+)@lPcdjP#ja[8S"kKqp`mV+KZlVHAF2q)Z R-ZiTNN,@C1UbHe0k(l,@cPc1l"e4S`X3&Pci,QYEi[JS4BF-(j+%6XZhj,Z+X`Q @BAG$%`+mba&hC+rMl(HpI!aT-5rd,VZ5D%bP-ZYHVIZ0T,QTT8rLS8ZEmHfK#JN NXP*CNGe[-cb1cJ5lZVJIALhp1mjRr2MG$i,@cQ6XD6'e4erlCKI53hA0rM2Qaj( fc2G6SE8+GHe$Km+%p-Qhh#K0Uiq9#eji5S)D"RekGID9%(K0D#Q)K4U$G28#i8* f9$DekRR4j(Pr(#HrdJR-N!"1FLP)*E&FM%&M@erCf0EAZ2(L(-Y)dQmeaXc-8bc (kprkq"Nc*0iQ('CDpp"!30(*pCdFL6f*2B3)i)UE%H3R(PL&e$qI-Lq5K"#A&CY $Y3PhTSU(mm6iIG2'AbaH$'KPff0kQMmY@+YiR*iZX[KAE4-#8,5%0(FHeUp"QTP *C0['Ui08Ghf2pHll!Hq9lB)@SpiVjp&X28pe6(rcj-0,)Z)a5hdqrLK@RF9,+iL @9SS%J[,hir)SkXH"8f%I4i[XlkTi)q0&5l2kBVZ2V62cE(jB6imIKDCIh@LT8HX &T[Cp5a2lQT,G8G128mR[aAG%88GA`D`Uiffh[Xme@$RMacNTNND8f0G--I4MHM$ -Y)XS*A'c8m#*N!#QC2Uhpl$Zl[(09GQ5qJr65H8P0F6jSIi6X6!qD&jj2IRFfEa S@mceFZlTpDGc6Efh2cIddk"6T'TT3Z$HeY5j-A[rM`p'JR$RFk28hAFk0G4REkN hZGZ[-UE(fGAcGAcGAKc@UY[8f%lhUG#emdCpU5BZM!%8+&$%[mZ%*e%+FAh,9TT EJ3LRhm1$Mkq%HJ%*A9#IJ3LaqpK4Dm53!!a-94QBkmfP-CCh"*AYE2+qp#+eYI6 30ml@4$YIK@[R'Rm*pG$b%Z,`V@eCC*,ZP3K2N!#E14UhbB3l9)30S5P#"3h#+`N C!0N&A6Cprq,-X#F!96jq,#*iFf3aL!5HbP%(FPq4DPpar8Car1+-dhZj[R4eMAr +[l@djN,Z9l@eRPA5&ZC-,9fle)ZFS3UHG8dURYl@pUHhDm@YrFmp6i4AZ&cqA#, bZfL5,)`G$4kpM1c-fc(V4m6MmEMai'Ik1GAMjX[TCh9Z([fE`,1E,8dZTb1CAXq AB2eA2j%YLaJk&DAkP`TU2bSkYQarM'$SjDpQaeil1K(dTBqRQbp2d*De`p145$* Fb8@jfA(bZ)U0(+3I,2N1Fm38QRd-@"r`VKXj"eR5X9qUbC@*HVTCpQ23beAA&+2 P4jQKS9QMq$a!K,e0'ceiqVCXA("iS2kZGAc-q@20kqMQbeip#[RpHii2e3a@d0, T"LY,dmlU&A'$NQpa`Ee$M5ZMS&4SEEC9a`IV4mV!cp(0bLBj5@#Z"(hrJ3fflq& IQX2Y3QAZ&bqL$0lHb9$qGKH-dh#(&CThFEEHHVjAEY@ML(mN0Y[!U`CqJ'GhG2M 69j9j&jc!(p3!!*!!U9NZ!!-!M'jeE@*PFNCTE(4PFJ!#%@jeE@*PFNCTE(4PFLj %Ef0c!3#3!`KA4%*1690A4+#FZSZJRPXS!!$Vj1"-!!3!N!B)!*!(",J3ER9YBQ9 b4QPXG'9bAd9iG!%!!!6!8%9B9$4%69LJRDY0S*fY-!!!lm,1P3!#!!!*LJ#3"JD c!*!%PES!!!: