wintoolbar.i 318 B

1234567891011
  1. DEF INPUT PARAMETER ipAktion AS CHAR NO-UNDO.
  2. IF NOT VALID-HANDLE(hAktionen) THEN RETURN.
  3. IF ipAktion = 'ABBRUCH' THEN DO:
  4. DYNAMIC-FUNCTION('setFlagabbruch':U, INPUT TRUE, INPUT Progname ) NO-ERROR.
  5. RETURN NO-APPLY.
  6. END.
  7. RUN onChoose IN hAktionen ( INPUT ipAktion ).