It may be a number of things. Do a DSPFD and see if there are a lot of deleted records. If so you may want to run a RGZPFM to cut down the size of the indexes. Yes the old deleted data is still there, and may be recoverable, until to run the RGZPFM. If this is a common issue you can change the file parameter to reuse deleted records. Second may be to add a KEY to the file if one does not exist. Then the program may need to be modified to SETLL on the starting date to speed things up.