ON ERROR CONTINUE DEL GETNAM.FLL;* DEL GETNAM.FTN;* DEL GETNAM.OBJ;* DEL GETNAM.LST;* ON ERROR STOP FLE GETNAM=GETNAM FOR/SW:(/RO/NOWR/NOSN/CD:EIS) GETNAM DEL GETNAM.FTN;*