ZIPC \’³à20),"ZIP CODE CHECK" J†"FILE TO CHECK ",K$\†"DRIVE NUMBER ",K4$\K4$õ","ãK4$\„»àK$ãK4$)ñ3²š ; ‰šè\K1$õK$ã"G"ãK4$\K2$õK$ã"B"ãK4$\K$õK$ãK4$\„F9ñ1²šK !†"GOOD FILE ",K1$\K1$õK1$ãK4$ (†"BAD FILE ",K2$\K2$õK2$ãK4$ 2†"# OF FIELDS ",K\„Kð0²š2 *<†"FIELD # TO CHECK ",K8\„K8ð0íK8öK²š< %F†"MAX FIELD LENGTH ",K1\„K1ð0²šF K žK1$,2\žK2$,2 $PK9õKâàK1ã4)\‹G$àK1ã20),R$àK9ã20) ZG$õ""\R$õ"" d—#1,K$\—#2,K1$\—#3,K2$\K2õ1 n‰š, .xT9õT9ã1\’T9," ",G$,\„Q3õ1²’" GOOD"´’" BAD" }„Q3õ1²T8õT8ã1´T7õT7ã1 ‚„Qõ1²šÈ\„Q3õ1²š ,ŒXõ1±ÌàR$)\™#3,&¶àR$àX,X))\ƒX\R$õ""\K2õ1 –‰š,\ˆšx , Xõ1±ÌàR$)\™#2,&¶àR$àX,X))\ƒX\R$õ""\K2õ1 ª‰š,\ˆšx È˜#3\˜#2 Ò &Ü ’"FILE ",K$," HAS ",T9," RECORDS" =æ ’"FILE ",K1$," HAS ",T8," ENTRIES WITH A VALID ZIP CODE" @ð ’"FILE ",K2$," HAS ",T7," ENTRIES WITHOUT A VALID ZIP CODE" +ú ’"PRESS ANY KEY TO RETURN TO THE MENU" A$õºà0) › "MENU" 0,Ÿš;,X,X\…#1,&A\„Aõ26íAõ1²š;\„Aö127²AõAå128 16R$õR$ãµàA)\„Añ13²š,\…#1,&A\R$õR$ãµàA)\Ÿ\ˆš@ ;Qõ1 @Tõ1±ÌàR$)\Aõ¶àR$àT,T)) !J„Añ34²š^\„A1õ0²šT\A1õ0\ˆš^ TA1õ1 ^„A1õ0²šh´šr h„Aõ44²š† rG$õG$ãµàA) |ƒT\„K2õK8²šˆ\G$õ""\ˆšˆ †„K2ñK8²š‡\–šˆ -‡K2õK2ã1\G$õ""\„K2öK²–šˆ\„TöÌàR$)²š‡´š| ,ˆG$õG$ã" "\G$õG$à1,10)\K2õ1\A1õ0 8‰Q3õ1\Xõ1±5\„G$àX,X)ô"0"²Q3õ0\„G$àX,X)ö"9"²Q3õ0\ƒX\Š )è R”INE ± LOAD ì DISPLAY FIELD NAMES 5ò „ »àK$à1,4)ãK4$)õ5 ² šü\F9õ1\Š\ » DOES ÷ EXIST ü —#0%5,K$à1,4)ãK4$ … #0,K,K1,K8 1 ‹ L$àKâ15),Q$àK1)\ Nõ1 ± K1\Q$àN,N)õ"*"\ƒ N … #0,L$ $ ˜#0 ) F9õ0\Š . Nõ1 ± K ,8 ’@àNã4,1),L$àNâ15å14,Nâ15),@àNã4,18),Q$ B ƒ N L Š NY KEY TO RETURN TO THE MENUBite 200"Boadway,