685 OPEN XDDA$+DS$+EXT$ FOR APPEND AS #3