Timestamp Long in Timestamp Short konvertieren

Immer wieder im kommt es vor das man einen langen Timestamp, vom Format YYYYMMDDhhmmssmmmuuun, in einen kurzen Timestamp, Format YYYYMMDDhhmmss, umwandeln muss. Dank der CONVERT Funktion ist das kein Hexenwerk.

DATA: lv_timestamp_long TYPE timestampl,
      lv_timestamp_short TYPE timestamp.

CONVERT TIME STAMP lv_timestamp_long TIME ZONE sy-zonlo INTO DATE DATA(lv_date) TIME DATA(lv_time).
CONVERT DATE lv_date TIME lv_time INTO TIME STAMP lv_timestamp_short TIME ZONE sy-zonlo.