Rätsel aus der Praxis

[Alva1590]

Hallo,

ich habe es erst eben gesehen!

p_ultimo = p_datum - p_datum+6(2).

Das ist echt genial und genau das wonach ich gesucht habe!

Vielen Dank

Volker

[Jamie619]

Hallo!
Wie müsste ich dieses Unterprogramm aufrufen?

Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)

1. FORM get_ultimo USING    p_datum  TYPE d
2.                 CHANGING p_ultimo TYPE d.
3. * Hier findet die Ermittlung statt
4.   p_ultimo(6) = p_datum(6).
5.   p_ultimo+6(2) = '01'.
6.   subtract 1 from p_ultimo.
7. ENDFORM.                    "get_ultimo  

GeSHi ©

Grüße

[Logan3964]

hallo,

so sollte es funken:

DATA: datum TYPE d,
ultimo TYPE d.

datum = sy-datum.
PERFORM get_ultimo USING datum
CHANGING ultimo.

mfg
richard