'r)$'w)$' *('1*('_*2'b*8'h*8'p*8'v*8'|*8' +`'#+`')+`',+j'Y+j'^+j'`+t'h+t'|+~' --(A.2(D.<( .n(2/n(5/x(Q/x(m/x( )*2")-2,)d2,)o26)u26)x2@) 2J)F3J)L3J)O3O) 4Q)p4Q)v4R) 4T)D5T)J5U) 6W)"6^) 7r),7r)17r)O7r)V7r)Y7{)u7 *&= * > *$>!*I>!*Q>!*Y>!*a>!*}>!* +7@ +=@ +C@ + Af+*Ap+NAp+qAz+}A~+ E$,/E.,^E., E8,9RR$:IF LEN(DATE1$)<8 THEN DATE1$=DATE1$+" " 6232 DATE2$=P2BB$+SEP$+N6CC$+SEP$+C10RR$:IF LEN(DATE2$)<8 THEN DATE2$=DATE2$+" " 6234 DATE3$=P3BB$+SEP$+N7CC$+SEP$+C11RR$:IF LEN(DATE3$)<8 THEN DATE3$=DATE3$+" " 6236 DATE4$=P4BB$+SEP$+N8CC$+SEP$+C12RR$:IF LEN(DATE4$)<8 THEN DATE4$=DATE4$+" " 6238 IF I2$=DATE1$ THEN RPTDORD%=1:RETURN 6240 IF I2$=DATE2$ THEN RPTDORD%=2:RETURN 6242 IF I2$=DATE3$ THEN RP ORD%=3:RETURN OSUB 6440:PUT Sorting Sort Section 3 Completed -- Writing Pointer File*Sort Section 2 CompletedSort Section 1 -- Sorting *2:NEWSORT*** DATA FILE EMPTY ***Quick In Memory Sort -- Reading FileReading File From Disk Into MemoryThis Is A Big File - Sorting It Will Take Several PassesThis File Is Too Big To Sort. 16,000 Activities Max --- PRESS RETURN NOW --- ADD MORE MEMORY TO YOUR COMPUTER. REMOVE SOME MEMORY RESIDENT PROGRAMS, OR AVAILABLE MEMORY. DELETE SOME ACTIVITIES, OR*** YOUR FILE IS TOO BIG TO SORT IN THE ****** THERE ARE NO FILES OF THIS TYPE ON THAT DISK ****** BILLING ENTRIES NOT SORTED! YOU MUST SORT THEM! ***: NOT READY/AVAILABLE*** DRIVE *** TOO LONG ***YOU MUST RE-SORT YOUR ENTRIESDRIVE LETTER CORRECT? IF SO, THEN *** YOUR INDEX FILE, 'NEWSORT' NOT FOUND ON _*** NOT ACCEPTABLE ****** NO PERIODS *** $$#####,.## TOTAL CHARGES: $$#####,.## ($$#####,.##) TOTAL CREDITS: $$#####,.##: $$#####,.## TOTAL # ($$#####,.##) $$#####,.## \ \######,.## O To Overwrite This Old ReportRETURN To Abandon Your New ReportBILLMMXRETURN To PROCEEDX To EXIT To The Operating SystemM To Return To The MAIN MenuProgram To Create A File Of Entries In Date OrderENDING DATE For This Report?STARTING DATE For This Report?*** YOUR DATES NOT FOUND ***:FILEDATE *** AT LINE No.: *** ERROR No. :*.TBL: ARE: NOT FOUND. FILES ON : *** FILE *** File DISKDRVE Not Found. Put DISKDRVE On This Disk.TOT.TBLBilling Code File Name?--- REPORT PREPARED ---BLANK DATE BLANK 99|99|99D To Date Report For The Period Of --- SORT DONE, NOW PREPARING YOUR DATE REPORT ---.DSCRNEWSORT.DTE EXISTS ! ****** WARNING -- .DTEI Will Save Your Date Report As File NO WARNING, If Your Last Sort Was To Prepare Bills, You MUST Re-sortNO To Skip The Sort This TimeRETURN To Re-Sort Your EntriesDrive On Which To Save Your Report?*.BIL Are: Your Files On *** FILE NOT FOUND ON THAT DRIVE ***.BIL:O:TESTXXXX*** NEED LETTER 'A' THROUGH 'L' ***Disk Drive Where You Saved These Entries?. 0Entries To Use For Date Report?Name Of The File Where You Saved TheDISKDRVEI Copyright David M. Alexander, 1986,1987