CALL  "RDSYSST"

       REQ       :=M239.0

       SZL_ID    :=W#16#292

       INDEX     :=W#16#1

       RET_VAL   :=#ret_valsfc51

       BUSY      :=M239.1

       SZL_HEADER:=#sll_header

       DR        :=P#M 240.0 BYTE 16

      A     M    239.0

      AN    M    239.1

      R     M    239.0

      JC    M001

      S     M    239.0

M001: NOP   0