# error message & information message
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
program
---------
data p_var type i VALUE 200.
if p_var = 100.
MESSAGE 'if block ' type 'I'.
write : / 'if block executed'.
ELSE.
MESSAGE 'ELSE block ' type 'E'.
write : / 'else block executed'.
ENDIF.
output
-------
> p_var= 100 then execute message and write statements.
> p_var != 100 then only execute message.
Comments
Post a Comment