File: DVTEST.BI of Tape: Various/Tests/dsk1c
(Source file text) 

$JO
.TE DVTEST.FT
.KOM DVTEST<DVTEST
.LADE DVTEST,TTY:<DVTEST,BCDBIN,DVINP
*$
.EXEC DVTEST
*DVTEST$
$EN