From: SMTP%"ALLAN@otago.ac.nz" 30-JUL-1991 21:30:56.65 To: hagood@scri1.scri.fsu.edu CC: Subj: FormatPhone Ext Date: Wed, 31 Jul 91 13:14 GMT +1200 From: Allan Udy Subject: FormatPhone Ext To: hagood@scri1.scri.fsu.edu X-VMS-To: IN%"hagood@scri1.scri.fsu.edu" FormatPhone FormatPhone will take a raw string and convert it into a string formatted in the form (###) ###-#### if there are 10 characters in the string ###-#### if there are seven characters in the string and the same way as entered if it has an odd number of characters. (This file must be converted with BinHex 4.0) :%dC[FQeKG&"SEfjP)%9iG#jMF(3!8%&$9%033e3!N!3([`#3"06f!3%Hl`!!"hZ !4AGSGhL+GhPTHS#!H)Z!L%Q)F(ZCQ)PhD)Q+LVLEQJKRCiLSD(U*D(Q(LSPTZj! !PhD)GRD'#AGQF(GhL)U3!*!!S)LC!+Q+N!#V#*!!Qi!!J!#3!!!*QJUVQ`#SS+# DZj!!S(#JS(ZVUT!!N!-!S)Q+Qi#kUT!!ZC!!!!#iS,#jLS#DN!#lQ(TfGJd!!60 &9@CSH)H)!*!!H48608GeC`F)L'L3!!#3"*J*Gh"`N!#!K#3#E$L3!)Dm#3c)G,d GGL`plZjAfIXJqjE(df$qqq[AcXbPSB[0VeUH"`qKS@J9aH(4j1qiAN8C)5If23k 5D2lcfIlrjri!Lff(qP11KcDFDA-jP22cijZG9jeA,Te+HI(3VaVjY1X(U@K(+Vj H66cX")b9XRqpKQ`i80+9DFIl#$lZ%Z'"$5kH$1TC-HCcD@G5jQK6cSeDdDe,-Tl Z0I1Mc+9ErJK0@YNXLH69cr1`%H@rhU(+lfVJfml!eS4V3ZCdfA,qY0lfVpZ6)p$ "`)A2"Yq$im**pE9eU'PEIF342mqdr23dVHjH([k)HjU#!pl)-q+AYp2Ee0r2VDd (Z$69J`X#PT3dYGfX,ZDd-2ZIdeXhJarGj2[@GANF5VFISVGl9V`XrE5UBIFX`cH $Z2q81-)D`3BX@kF6E5jP[McDQ`mUE8K$YC%*1i',M"Z#RAK-YP,fp6PSU`EJT`@ NqC49cJq2#eEV'ZpU11c8%R`Z(T8*602Dle%2'S+fSPie`5fdFI$lQSjGXLLe)Rl 'U$NDmpr4UBqSeDd0+9qTpaU%Q!dfNKD-LNV8DL8`J@rH(NLNViQG6**BH[9kQ0B "2mq(d!4jJ"5&L6Q!3HB"EY4*l`#8r-!jcjJ%Tc!)1X!@F,'Qm!mq(Q28ie%2AL( Y3R(HDR&Vq&*ahR8iPZZ*'%X$Ed20MMi[(SGMrIMd19`q4bB`Zj2%YD0'M*[**Kp 2m#KT@RFSFU%0hMJVrZIQ@B6mc@K3dYAj`KU!69SD0$cD'MqhNmMLi['iI*K"&dr Yc*PqGJ,mQ&pJ3Pd1[$`ijPMfSqPQbBRjVAC(EcIh"pBfZcbL0ak&VXVReI)aH*j !1fb$X6fS5K*H)-h(0K+a2*!!G+cBEUEBph%kpMh3G4`[Sem[$q@a@cCHpCh`c,( @3K(lZ*q1&lPA+%-%fYD5k28Mp+T+cC,rSiRSe,D-k2AXGB5E'TF')E%(H[Qb*'M MlBYc+Chrj-bake3k4G%qcU'P*Zb$0(-,jE(VEQI#q3KZJKBpaXeZUX,5aeABkfX GCf1f&MedVP6GhaA-MBB*mC56D28SqTLHYP3Xr-&[AD,H'k,*I,rVf1UqAac*2mi 4UFDId)G#KT3q3dKlECUqm+%Fk"S#6Yp'rKf1Mf25h%hp[bf2E[j1hk8EAYHPfZM ($q$p1EVQFmFMTCZZr*dUd,2CCd`ihFZEQch8h*mI)j2&SFANa6F86EeTdB@E0R" -HKGSJrA4$[5p'8cJ+-6I9`QpXfqq$6[Tq4GiRV9,M"Y)mLKkY(UHAkL'[pIHjF, 2rKY,h$5'CBpc`*d,YH+-@Kk['lNU9CqKUFF0)hQ`hQRD4MF80'1$#9l'fSDPRZS +UAmCZiRbpR8fejhpjTbj-Vk2mIHMVmDEFTelXelD2MS)Pp&&M(P5mM0cB5jH4+P raK)Dfe*dYKkKSlLZI'(32P,-XGN#IX!R[i1[SD9M`H2r+'a0@5k'M1rbSD@YU+' qG0AEVd)3qRdl'V1m5arq"2rPcVZU'rp80mLK[LrUp#%PMq#D8r!R3UI`m*-Uq6j -2q80V-fFI,hd2KRI$1l2kCf&b*q4'qT6TfafRCRA1%D'Zj3'kZ&[I(KCb,5Aqrb IIXkTH2qSdTI5QH"(LpLEf*[Bdq62Ml'ikI'q1hYm$(SD*'Y-M9l(bjQcVlqjQ`X eTQpfGIGT%+erMB@imNN'ckZ&eCZCHpRrDATidf@[+h'q1eYm((KF(,'M1Pj(GRp [6dmk6)YN%6X+0H&kC*X8rS(jEMP$$+PE$#K*Ym+'d`Djq3l)J&VjJmRp[ZkBUL- YV1`k'T!!PS5"d3X%L"AXl#[0RlFh-YYp#TXFL9[T+PhM6L,'RUNVQ@f4FHh0V5Y KKNH`iEJM(IB2P3YNMKr(2[Zr+&eG1aXHI9bmZ1K5mimB4cUA2MRk'G9V9)dMr+F b[@je21d)e3(@2(P*XlP,!0#RNTi16c@K'km(FlRFq&%#q*Z6Zc'VP)EcL-!6H6( AN!$cffc)GG2mbckI1296rY8X#McdC(Rd[Y4TCmDGB8T9FT,Rc3P5V4Vj16'YSjR ,2AGI+Ga$!ZVV'@&lb2L,#Q$NpbFYQN9e%dPhSPbDH95dF[35[8M(-NpLD1H5q[@ brY065VRe[kp#2,bk9EcVUk`UPI1T4aUq9SFp0)h@,aicUr3MiZrhNcHF#kmLVPj YA3TCqlMKdSm$kNcaIU,qMbElKFRK`NmEV8mYlrFVATc,6jJ9YBIh3Y0p`Z(4"Qd 9K#&r[Te$K!MHq0eMrJfpVkIi['keQc#&[kX,AdqU`CVrUN$fYilhpi0rMIfhq0i 3!*!$F%[F*3!"!!p'Eh*YBA43D'pZC5j&H(3"!*!$#&"&@&3d4%eBSP[cMD*Emj! !!!$haG1I!!)!!!Ud!*!'"h-!N!5%K!!!!: