Oops - I think my fix would still work but the same problem crops up a bunch of times in the program, thus there are several places where the same fix needs to be made. > SNSMO dies for no apparent reason when the last record is flagged. > Problem is in RFFXFG - it's because the IRET=-1 from TABIO gets kept etc. michael bietenholz