Werte hoch-/ runterzählen

Wenn Sie auf einem Report-Selektionsbild Werte eines Feldes hoch- und runterzählen möchten, dann schauen Sie sich doch mal dieses Programm an.

Ein Bild sagt mehr als tausend Worte…


Werte per Druckknopf ändern

 Das Programm

REPORT zzenno11 .

type-pools icon.

*** SELEKTIONSBILD ***
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(12) text-001.
PARAMETERS p_monat(2) TYPE n DEFAULT ’04’.
SELECTION-SCREEN PUSHBUTTON 20(4) down USER-COMMAND down.
SELECTION-SCREEN PUSHBUTTON 24(4) up   USER-COMMAND up.
SELECTION-SCREEN END OF LINE.

*** Vorbelegun der Buttons mit Icons ***
INITIALIZATION.
  down = icon_column_left.  “<<
  up   = icon_column_right. “>>

*** Abfrage der Pushbuttons ***
AT SELECTION-SCREEN.
  CASE sy-ucomm.
    WHEN ‘UP’.
      ADD 1 TO p_monat.
    WHEN ‘DOWN’.
      SUBTRACT 1 FROM p_monat.
  ENDCASE.

*** Ein-/Ausschalten der Pushbuttons ***
AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF screen-name = ‘DOWN’.
      IF p_monat > 1.
        screen-input = 1.
      ELSE.
        screen-input = 0.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
    IF screen-name = ‘UP’.
      IF p_monat < 12.
        screen-input = 1.
      ELSE.
        screen-input = 0.
      ENDIF.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

START-OF-SELECTION.

 

Enno Wulff
Letzte Artikel von Enno Wulff (Alle anzeigen)