PARM OLD,NEW ## REPLACE.XEQ - PURGE OLD FILE AND RENAME NEW ONE ## TIM ERICSON IF NOT FINFO("!NEW",0) THEN ECHO FILE !NEW NOT FOUND, NO REPLACE DONE. RETURN ENDIF IF NOT FINFO("!OLD",0) THEN ECHO FILE !OLD NOT FOUND, NO REPLACE DONE. RETURN ENDIF CONTINUE PURGE !OLD RENAME !NEW,!OLD