Aufruf eines externen Unterprogramms mit Parameterrückgabe

Veröffentlicht am von

Es wird ein Unterprogramm aufgerufen, dass sich nicht im gleichen Rahmenprogamm befindet und dessen Quellcode nicht „includiert“ ist.

  IF SY-SUBRC = 0.
    PERFORM DYN_IF IN PROGRAM (PROG) CHANGING TRUE.
    IF TRUE  'X'.
      CONTINUE.
    ENDIF.
  ELSE.
    MOVE 'Bitte die Filterbedingung in der Tabelle ZNEBP_FILTER prüfen.' TO TBEST_RETURN-MESSAGE.
    APPEND TBEST_RETURN.
    MOVE MSG TO TBEST_RETURN-MESSAGE.
    APPEND TBEST_RETURN.
    CALL FUNCTION 'Z_POPUP_RETURN_PARAM'
      TABLES
        RETURN = TBEST_RETURN.
  ENDIF.

Schreibe einen Kommentar