SELECTION SCREEN Search Help F4

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_ZZAPP-LOW.
  PERFORM F4_ZZAPP USING S_ZZAPP-LOW.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_ZZAPP-HIGH.
  PERFORM F4_ZZAPP USING S_ZZAPP-HIGH.

FORM F4_ZZAPP USING PV_ZZAPP.                                    
  DATA    LT_RETURN LIKE TABLE OF DDSHRETVAL WITH HEADER LINE.                                    
  CLEAR : LT_RETURN, LT_RETURN[].                                    

  SELECT DDTEXT                                    
         FROM DD07V INTO TABLE @DATA(LT_ZZAPP)                                    
         WHERE DOMNAME = 'Z_DO_ZZAPPCD'.                                    

  CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'                                    
    EXPORTING                                    
      RETFIELD        = 'DDTEXT'                                    
      WINDOW_TITLE    = '품의 진행상태'                                    
      VALUE_ORG       = 'S'                                    
    TABLES                                    
      VALUE_TAB       = LT_ZZAPP                                    
      RETURN_TAB      = LT_RETURN                                    
    EXCEPTIONS                                    
      PARAMETER_ERROR = 1                                    
      NO_VALUES_FOUND = 2                                    
      OTHERS          = 3.                                    

  CHECK SY-SUBRC EQ 0.                                    

  READ TABLE LT_RETURN INDEX 1.                                    
  IF SY-SUBRC = 0.                                    
    PV_ZZAPP = LT_RETURN-FIELDVAL.                                    
    MODIFY SCREEN.                                    
  ENDIF.                                    

ENDFORM.