*&--------------------------------------------------------------------*
*& Form sound
*&--------------------------------------------------------------------*
* text
*---------------------------------------------------------------------*
FORM sound .
CALL FUNCTION 'WS_EXECUTE'
EXPORTING
program = 'C:sound/Sound.exe' .
IF sy -subrc <> 0 .
MESSAGE ID sy -msgid TYPE sy -msgty NUMBER sy -msgno
WITH sy -msgv1 sy -msgv2 sy -msgv3 sy -msgv4 .
ENDIF .
ENDFORM . "sound
*& Form sound
*&--------------------------------------------------------------------*
* text
*---------------------------------------------------------------------*
FORM sound .
CALL FUNCTION 'WS_EXECUTE'
EXPORTING
program = 'C:sound/Sound.exe' .
IF sy -subrc <> 0 .
MESSAGE ID sy -msgid TYPE sy -msgty NUMBER sy -msgno
WITH sy -msgv1 sy -msgv2 sy -msgv3 sy -msgv4 .
ENDIF .
ENDFORM . "sound