Cacher is the code snippet organizer for pro developers

DATA lv_date(8).
DEFINE set_date.
  IF &1 NE space.
  lv_date = &1.
  CALL FUNCTION 'CONVERT_DATE_TO_INTERN_FORMAT'
  EXPORTING
  datum         = lv_date
  dtype         = 'DATS'
  IMPORTING
  idate         = &2.
  ENDIF.
END-OF-DEFINITION.