This example defines the workstation address and title variables, and invokes the WSCON service to initiate a GUI display.
DECLARE
GUI_TITLE CHAR(64),
IP_ADDRESS CHAR(64),
BLANKS CHAR(8);
IP_ADDRESS = '32.225.17.228';
CALL ISPLINK('VDEFINE ','MYADDR ',IP_ADDRESS,'CHAR',64);
GUI_TITLE = 'THIS IS MY TITLE FOR MY GUI SESSION';
CALL ISPLINK('VDEFINE ','MYTITLE ',GUI_TITLE,'CHAR',64);
CALL ISPLINK('WSCON ',
'MYADDR', /* IP */
BLANKS, /* LU */
BLANKS, /* FI */
'MYTITLE', /* TITLE */
'FIX', /* FRAME */
'STD', /* BACKGROUND COLOR */
37, /* CODEPAGE */
697, /* CHARACTER SET */
BLANKS, /* NOGUIDSP */
'ONERROR'); /* PANEL */