REPORT  Z11_010.
DATA lt_seqg  LIKE SEQG3 OCCURS 0 WITH HEADER LINE.
DATA LV_AUFNR TYPE AUFNR.
LV_AUFNR = '0000123456'.
DO 5 TIMES.
    CALL FUNCTION 'ENQUEUE_READ'
      EXPORTING
        gname                 = 'AUFK'
        guname                = space
      TABLES
        enq                   = lt_seqg
      EXCEPTIONS
        communication_failure = 1
        OTHERS                = 2.
    IF NOT lt_seqg[] IS INITIAL.
      READ TABLE lt_seqg WITH KEY garg+3(12) = Lv_aufnr.
      IF sy-subrc EQ 0.
        WAIT UP TO 1 SECONDS.
      ELSE.
        EXIT.
      ENDIF.
    ELSE.
      EXIT.
    ENDIF.
  ENDDO.