DCBPROC  SET      1
UTSPROC  SET      0
         SYSTEM   UTS
M:DO     DSECT    2
         M:DO
         END

