\ CHECK F@2,1),"1-PRINTER 0-CRT ",\A$0)\A$)48A$)49\PA$) \20),"PRINT DATA" P0Q120Q157 a "FILE NAME ",K$\"DRIVE NUMBER ",K1$\K1$","K1$\#P,"FILE NAME ===== ",K$,"======="\#P\#P K$K1$)3 ' \K$K$K1$\ F90 2  "# OF FIELDS ",K\K0 0("MAX LENGTH OF LARGEST FIELD ",K1\K10( 72K9KK14)\B$K9),G$K120),R$K920)\G$""\R$"" <#1,K$\K21 NF#1,&A\A1A26\A127AA128\R$R$A)\A13F\#1,&A\R$R$A) GT1R$)\AR$T,T)) !HA34N\A10I\A10\N IA11 NA10PZ PA44d ZG$G$A) _T :dF90f\#P,"FIELD ",K2," ",G$\QQ1\QQ1\i 3f #P,L$K21514,K215)," ",G$\QQ1\QQ1 iG$""x :nB$K2K14)K13),K2K14)K13)G$)1)G$\G$"" &xK2K21\K2K\TR$)x_ T1T11\#P\QQ1\QQ1 5X1K9\B$X,X)" "\X\G$""\R$""\K21\A10\F :P1\"PRESS ANY KEY TO CONTINUE"\L1$0)\\Q0\ #P,12)\Q0\ ) #P,"FILE ",K$," HAS ",T1," RECORDS" .,P11\"PRESS RETURN FOR MENU ",L$\6 1#P,12) 6"MENU" ) RINE LOAD DISPLAY FIELD NAMES 5 K$1,4)K1$)5 \F91\\ DOES EXIST  #0%5,K$1,4)K1$  #0,K,K1,K8 1 L$K15),Q$K1)\ N1 K1\Q$N,N)"*"\ N  #0,L$ $ #0 ) F90\ . N1 K ,8 @N4,1),L$N1514,N15),@N4,18),Q$ B N L