Displays a status message on the System Transcript window or on the CICS terminal, depending on where it is issued.
CICSTTY show: 'Your Smalltalk code is running on CICS Transaction Server.'; cr.
Displays a status message on the System Transcript window or on the CICS terminal, depending on where it is issued.
CICSTTY cr;
nextPutAll: 'Your Smalltalk program is running on CICS';
nextPut: '/';
nextPutAll: 'ESA.';
space: 2;
nextPutAll: 'Congratulations!';
flush.