ADDSUB CZDxBLANK CZD mENTER CZD" GUIDE CZD+ zGUIDE DOC7qMIS DZF: NAMEBRK CZD= d REFDEX NZXI;REFERALSDZFOYREFS CMDR%SEARCH CZDVSHOWFIL CMD]SOME DZF` SORTED DZFcSTRINGS DZFfقSUBDEX NZXj^SUBJECTSDZFpvSUBS CMDt vADDSUB.CMD$ $B!LBɤA@a2bq DRP@e7F,XoGIi7Ia9D#)?7̢h*T4Lu1F< 1M)@bʤ!A,bh@T4fb8v2LT!r8R-9 : )r͋˦)>C(FS*D\Ȟ Rm N(d"",O98ZrB ?idRd~BP)IfG'6q"C ҡ3 񏯴ےF#Qy ]F| ,Zܷ̺ Cf Zi랃f *hEE0A!!4_RO n@#J8&8g?@ P,pB&')ELAq&j(T( ppTR?Z©\ +ё@D XMK3goQ6/dBP((B B LpM'Z:`~? 8k ¹ G( a١4q D*}\}X݁_`T08A+k&Q ~C(i%<2jWE4! "tPDV* $Z5d6."|3(,> ˘.QǷ?K0ę2f0qEثz7:SҴD ($((PTѨPM+җWZxiylcL}-&{e-cS/%Vp : vS{R@?Ф5 ,WX&T^ EaB[عccM鎓v>LheB CJB0(%aKr02~Q@2L=6o%Qک/~0z5%-`T@߸oa^8'5Aoj&kD@կ.E.-ʧk*cpl|QF<[ʃ@&a\Et "WLPuTh~%xHC.ދF0}w\/RRl-B(^,ymn"w,I:*wU3&jt9:C\h}n5zwJ-ƚo-yH<|ꆃ` uĮ| evcDwa sv2eA%]LmSWrۅ&FenK1<$o;;{Px Zg3F^_2@*,P"|@-ZLK9ҶDpͤ,DMGo{1hN7VNY74\Ea{WFGMOgz7FO}+HpHWs`pIބ~cRs&J5W5bu9X5|bz8WXT#SbIST!TEWXJzG;G & ~OkWcq%dܔ '#mUmЊӭ0-r.w\Az6HEIblYBOlyxz"V PECm(, B) \ ƖXDF{Y ɻc +uغXD#7P@ r8 c`BbdRWCwLp|, )J.'B_\$۷F[rk$lVFoڨ ]Ձk7EpFO.=Q8T7],QRčDvc8[ $AJ׈drWѤzq,z9}[]kiXatAj)B 0 0Ѐ"FZJ<&@t%xDE\ | aN-WWPDAD?`QKHHLV( \# %ǣVXyO<<"3wOO<(BFdcL0u-kfIς tn2(~oݰe|"<a,ئƇ&"G( Ąr?f9e@yo4(ވ7$! [ccfY8#cQ Z.9Ap #cB. IxOӋWR$S0mu@wyO\$+a24ρc̐36 G 4f "e;e6{oJpy1,@t7*ki=닟s~`D h 4 txMj SHTg=ߣ C6I3̧BMH~Tj<`IE3E@%*|qڃ3aBA ἤhC a@<t?Q'RjzĴ S,>yjy0 >S 'Uj*^rLIBRARY ROUTINE ADDSUB.CMD NAMEBRK.CMD SHOWFIL.CMD SUBJECTS.DBF BLANK.CMD REFDEX.NDX SOME.DBF SUBS.CMD ENTER.CMD REFERALS.DBF SORTED.DBF GUIDE.CMD REFS.CMD STRINGS.DBF MIS.DBF SEARCH.CMD SUBDEX.NDX To run this program enter "DO GUIDE" at the dBASE II dot prompt. - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - vMIS.DBF$ @ !4D)JX0\bI0N a KH0 aEHRPd,T  L Xa N" s Di1MIi;LS w4 IX ( -ȦT /).)G')JV3FSIe9ZNdt0B"WkyMViwjC2'O<; ,$0ka= ޲J>K -sj4GHZnM̷v"eksyk.Bxޜ-ACTd 'k%d3Џ.-d# "gBaKdf%tM @d8a9r킹^{ 4dOdu:ׇszOZnܛMM,Z!ԒsX危xYqiGrtƉTS<*h$R Y pDу7BpdB dc+m ПcD<&H%:w}q5 fS^Dȁj >#A *|"CEPp)fkFe@* [-a'O.R=Hvu)v.j2*TD<нH FV0ʎ{z+HN ,F6rY?\А dovREFDEX.NDX$  $ 1$E EaHS"JD2A,Y P("Jd`RL@ 6HpOoBOh@8 ʤ"QT"v?!d³+4=pƍw^t (A*`GsAe""JĒ H N*JBT |#DI e7 aʹr(~ )qF3cq $q b0LFx !y N,țQ@i>I' qrAݢB ~ڶAAAPHaU4PD G8 P@0iN@@EJ&7gP@Q$GAo &8mx@<фguf%IfHmfoAWrѕχAvqx'zR}_wH~ XM`5kaxfaSQ'pb.#ɫ#ZPHFnB$IH8 )YRV%)ƈ/!oesGcEI)Y 4N|^Th/9/ ?pC@*vREFERALS.DBF$ aL"Jd@N.N`1$E`XE dYŒxS!%m"q%dqA 6dBapfS 7ʃW$I[~ HvO'!s`ͭ'0m@2 Џ2oGCEhe1*.grBhRFS5`^i)ڑȥFM%<V!$JDfL=m`| hfnۑ5snQ1Iml[4pq&a%hBlexsucHcbwU^aCR1rQeed f|# .R5Y.gɸdUowBO%gHIZ HW QcMIҖL$dHwYy"|S nE:ͯ5 DE1@Lq8ES7I(:ڶRjюVVh"ԠCQ6:A=cl$!w(䑏di,^uERQ0BXȞ`ji0E{X w`0$#˜!oRj}0t4W.º[38${hB ;TB" H()0" $H~ቛƲOA=?JHNOضLgHmvv-7|ߡNP* filename SHOWFIL.CMD - displays the structure of all files named in * the file B:MIS.DBF * last revised 7/20/82 by M. Timin set talk off SELE PRIM USE B:MIS * SET PRINT ON ? CHR(12) ? ? do while .NOT. EOF STORE DRIVE+":"+FILENAME TO FILNAM SELE SECO USE &FILNAM DISP STRU ? SELE PRIM SKIP ENDDO * SET PRINT OFF ME TO FIvSOME.DBF$ @ !F$eH0 \ : !qR Ra|~BRICx T,ƈaVA*d yZ$ #A!C !hj 8Rz ?c@3F!c8cɸj6 Kd38I:NWib3·S1f0ڀgf18$c=O3!e:fM&k1cMSo$ gc)j2&Qk3Yʟu1G8!yvSORTED.DBF$ @ !F$eH0 \ : !qR Ra|~BRICx T,ƈaVA*d yZ$ #A!C !hj 8Rz ?c@31a53 n5gͨj8 g9nùr< j<ɈxqiIv0Nn4sF q;ēub5 7c k5 z9f-oUwvSTRINGS.DBF$ @ !F$eH0 \ : !qR Ra|~BRICx T,ƈaVA*d yZ$ #A!C !hj 8Rz ?c@3h*j D9HM).raA IoDɂbg8dDəN$u5AMOOHUEDyiOnQagW:VP@Yc*Zkf*RBWffsV|$?lIaTg76ñT vpPDzUv%@Dm{h@U^Lz-JʹPHS ~IO@o  QamRa0LDeI5J29bUQA4vSUBJECTS.DBF$ aL:%K  U@2E!!B1u{@ HH$I4L$E2,1L&E9Xy1flEX@4w0 NMS¿W7 C 85S)]*$vڭ 3F Xb, @b2Mչl2ΆS% <׮BI7^NFQn7^jάj:nS'Lt:l)k{:4kqZot}[t0&L/&`Ui ai&l@ia>彘_!ZW1,lb\ugU_2|H^v5xA9Igᆎ$|!ei!viշt]6 VSas* SUBS.CMD - subprogram to list all SUBJECTS in SUBJECTS.DBF ERASE SELE SECO GOTO TOP STORE " " TO SAME STORE 0 TO COLCOUNT DO WHILE .NOT. EOF IF SUBJECT <> SAME STORE SUBJECT TO SAME ?? SUBJECT STORE COLCOUNT+1 TO COLCOUNT IF COLCOUNT = 3 STORE 0 TO COLCOUNT ? ENDIF ENDIF SKIP ENDDO ? "Hit any key to continue" wait RETURN F