Example 1

On the next panel that is displayed, put a message whose ID, ABCX015, is in a dialog variable named TERMSG.

ISPEXEC SETMSG MSG(&TERMSG )

Set the program variable BUFFER to contain:

SETMSG MSG(ABCX015 )

Set program variable BUFLEN to the length of the variable BUFFER. Enter the command:

CALL ISPEXEC (BUFLEN, BUFFER);

CALL ISPLINK ('SETMSG  ','ABCX015 ');