*LOCAL DATA DEFINITION
DATA: ivals TYPE TABLE OF sval,
xvals TYPE sval,
lv_waers TYPE waers.
* SET THE TABLE NAME AND FIELD NAME
xvals-tabname = 'TCURC'.
xvals-fieldname = 'WAERS'.
APPEND xvals TO ivals.
* CALL FUNCTION TO CALL POPUP AND GET VALUES
CALL FUNCTION 'POPUP_GET_VALUES'
EXPORTING
popup_title = 'What is your name?'
TABLES
fields = ivals
EXCEPTIONS
error_in_fields = 1
OTHERS = 2.
* READ TABLE LOOKING FOR SPECIFIC FIELD AND GET THE TYPED VALUE
READ TABLE ivals INTO xvals WITH KEY fieldname = 'WAERS'.
IF sy-subrc = 0.
* TRANSFER TO A VAROABLE THE TYPED VALUE
lv_waers = xvals-value.
ENDIF.
