Code: Alles auswählen.
FORM COM_DLLUNREGISTERSERVER USING FILENAME
CHANGING RETURN TYPE I.
PERFORM COM_INIT.
IF COM_INIT IS INITIAL.
RETURN = 999. EXIT.
ENDIF.
CALL METHOD OF H_COM1 'UnregisterServer' = RETURN
EXPORTING #1 = FILENAME.
IF SY-SUBRC <> 0.
RETURN = 888.
ENDIF. "// SY-SUBRC
ENDFORM.
Code: Alles auswählen.
* PERFORM CLEAR_LINEBUFFER.