DATA: lv_carrid TYPE sflight-carrid VALUE 'AA'.
DATA: lv_date TYPE dats VALUE '20181231'.
DATA: lv_ok TYPE abap_bool VALUE abap_true.
* Eingabefelder
cl_demo_input=>add_field( EXPORTING
text = 'Fluggesellschaft:'
CHANGING
field = lv_carrid ).
cl_demo_input=>add_field( EXPORTING
text = 'Datum:'
CHANGING
field = lv_date ).
* Trennzeile
cl_demo_input=>add_line( ).
cl_demo_input=>add_field( EXPORTING
text = 'Check:'
as_checkbox = abap_true
CHANGING
field = lv_ok ).
* Eingabe anfordern
cl_demo_input=>request( ).
WRITE: / lv_carrid.
WRITE: / lv_date.
WRITE: / lv_ok.