.c ;ACCSPLIT program .c ;A program to divide the Accounting file .s 3 This program will chop up the accounting file into smaller 'monthly' chunks that are a lot easier to use and move around. It was written by Mark Johnson at HMC. It is used there to divide the accouting file as necessary, and the pieces are put back together with the COPY or the APPEND command. A dialog of use follows: .s .nf $ R ACCSPLIT ACCSPLIT -- program to split the accounting file Version 1.0 Enter name of accounting file to split: ACCOUNTNG.DAT;6 Opening file OCT1981.DAT Opening file NOV1981.DAT Opening file DEC1981.DAT Enter name of accounting file to split: Done $ .s .f As you can see, it generates file names based upon the date/time of the records that are in the file. If you specify more than one accounting file, and if the subsequent file has the same month information as the previous file, it will concatenate them for free. If you have an accounting file with bogus date/times in it (eg after running that other operating system...) it will generate multiple versions of files if necessary. These must be concatenated manually by COPY, APPEND, or something similar. .s It unfortunately does not handle errors very well. Due to some disk problems, I lost a few days of data when the accounting file was garbaged, so I suggest that you generate new accounting files more frequently than once a month. If you have any ideas for improvements, please send me a note at the address below. .s .nf To generate this program: .s $ FORTRAN ACCSPLIT $ LINK ACCSPLIT .s Mark Johnson Harvey Mudd College Computing Services Claremont, CA 91711