Displaying time as popup

REPORT ztest .

data: help_info type help_info,
SELECT_VALUE type HELP_INFO-FLDVALUE,
DYNPSELECT type DSELC occurs 0 with header line,
DYNPVALUETAB type DVAL occurs 0 with header line.

initialization.

HELP_INFO-CALL = 'V'.
HELP_INFO-OBJECT = 'F'.
HELP_INFO-PROGRAM = sy-repid.
HELP_INFO-DYNPRO = sy-dynnr.
HELP_INFO-TABNAME = 'BTCH3071'.
HELP_INFO-FIELDNAME = 'FROM_TIME'.
HELP_INFO-FIELDTYPE = 'TIME'.
HELP_INFO-FIELDLNG = '08'.
HELP_INFO-SPRAS = 'E'.
HELP_INFO-MENUFUNCT = 'HC'.

start-of-selection .

CALL FUNCTION 'DD_SHLP_CALL_FROM_DYNP'
EXPORTING
help_infos = help_info
IMPORTING
SELECT_VALUE = SELECT_VALUE
TABLES
dynpselect = dynpselect
dynpvaluetab = dynpvaluetab
.

write:/ 'the selected value is:' , SELECT_VALUE.