Default ist letzter Tag (sy-datum)

Code: Alles auswählen.

SELECTION-SCREEN BEGIN OF BLOCK selektion.
SELECT-OPTIONS: so_datum FOR sy-datum.
SELECTION-SCREEN END OF BLOCK selektion.

INITIALIZATION.
* Tagesdatum vorbelegen
  CLEAR so_datum.
  so_datum-sign   = 'I'.
  so_datum-option = 'EQ'.
  so_datum-low    = sy-datum - 1.
  APPEND so_datum.

Code: Alles auswählen.

DATA:
  time_stamp TYPE timestamp,
*  datum      TYPE d,
  datum      LIKE sy-datum,
  zeit       LIKE sy-uzeit.

Code: Alles auswählen.

  CONVERT DATE so_datum TIME zeit DAYLIGHT SAVING TIME 'X'
          INTO TIME STAMP time_stamp TIME ZONE sy-zonlo.
  WRITE: / so_datum.

**CONVERT DATE so_datum [TIME zeit [DAYLIGHT SAVING TIME dst]]
**        INTO TIME STAMP time_stamp TIME ZONE tz.

  IF so_datum IS NOT INITIAL.
    WRITE: /.
*   Ausgewähltes Datum
    WRITE:/1 'Ausgewähltes Datum:'(014), so_datum.
    WRITE: /.
  ENDIF.