/IF NOT DEFINED(QUSEC_T)
      /DEFINE QUSEC_T
      *
     D QUSEC_T         DS                  Qualified
     D  ErrBytesProv                 10I 0 Inz(%size(QUSEC_T))
     D  ErrBytesAvail                10I 0 Inz
     D  ErrMsgID                      7A
     D                                1
     D  ErrMsgDta                   512A
      *
      /ENDIF