SUB OPENA. (FIL$,CHNL%)
	MAP (FCSERR) ERR1%,ERR2%
	CALL OPEN. (FIL$,"A",CHNL%,0%)
	IF ERR1% = -26% THEN CALL OPEN. (FIL$,"W",CHNL%,0%)
	SUBEND