SUB OPENU. (FIL$,CHNL%,REC.SIZ%)
	MAP (FCSERR) ERR1%,ERR2%
	CALL OPEN. (FIL$,"U",CHNL%,REC.SIZ%)
	IF ERR1% = -26% THEN CALL OPEN. (FIL$,"W",CHNL%,REC.SIZ%)
	SUBEND