-d 8'*{\b} -d {\b'*}['011] -d {'*}['011] \b['011]['040'011]*\n |{}\n '|\w\n '|\n -d '}{[~'015]++}\n '{'<'>'} [.pa]} '{'<Mc'>'} [Mc.pa]Mc} '{'<'>'} [.pa]} '{',\b'<'>'} [.pa],\s} '{'<'>'} [.pa]} '{',\b'} [.xpa],\s} '| !8'* '|496-6 !8'*922-6 '| !9(415) '| !8'*923- ('||'!)'[']'}\n Rname:\s\nName:\s\nOffice\sNumber:\s\n\n :PhoneSubst.Tioga "Trans" command file to convert PARC phone list to CNF file for Thrush/Finch Last Edited by: Swinehart, October 19, 1985 2:57:03 pm PDT Regularize Intelnet numbers Eliminate "temp" designations Insert temporary punctuation, eliminate trailing white space For external locations, copy phone number from trailing position to extension position Get rid of Phone number or location information following name. Deal with these forms of RName designations: {, Johan} => [deKleer.pa] deKleer, Johan} {, Joe} => [JoeMcFee.pa]McFee, Joe} {, Ann} => [AnnBDerrick.pa]Derrick, Ann} (but watch out for McX) Includes as a subset {, Doug} => [Terry.pa]Terry, Doug} {Anderson, } => [Lee.pa]Anderson, Lee} {Zellweger, Polle } => [PolleZ.pa]Zellweger, Polle} {Abraham, Margaret} => [MAbraham.xpa]Abraham, Margaret} Convert all telephone numbers to standard Intelnet or DDD form. nxn-xxx-xxxx => 8*(nxn)xxx-xxxx 496-6xxx => 8*922-6xxx xxx-xxxx => 9(415)xxx-xxxx xxxx => 8*923-xxxx Convert to CNF form. Ê0˜J™J™LJ™:J˜™J˜ —J˜™J˜J˜ —J˜™