Zeitraum berechnen mit immer 30 Tagen pro Monat

Code: Alles auswählen.

DATA: g_jahr_diff TYPE i,
      g_monat_diff TYPE i,

      g_tage    TYPE i.

PARAMETERS: p_dat_v TYPE sy-datum DEFAULT sy-datum,
            p_dat_b TYPE sy-datum DEFAULT sy-datum.

START-OF-SELECTION.

IF p_dat_v > p_dat_b.
  WRITE: / 'Bis-Datum muss größer Von-Datum sein!'.
ELSE.

* Wie viele Jahre?
  g_jahr_diff  = p_dat_b(4) - p_dat_v(4).
* Wie viele Monate?
  g_monat_diff = p_dat_b+4(2) - p_dat_v+4(2).

* Ein Jahr hat 360 Tage, ein Monat 30, plus die Tage des Bis-Monats, minus die Tage des Von-Monats
  g_tage = g_jahr_diff * 360 + g_monat_diff * 30 - p_dat_v+6(2) + p_dat_b+6(2).

* Sonderlocke für die 31 Datümer
  IF p_dat_v+6(2) = 31.
    g_tage = g_tage + 1.
  ENDIF.

  IF p_dat_b+6(2) = 31.
    g_tage = g_tage - 1.
  endif.

* Tage ausgeben
  WRITE: / g_tage.
ENDIF.