Server Guide

Example

Sends the text data from sendTextData to the terminal.

|  result |
               
result := CICS sendtext
               from: (self sendtextData);
               length: (self sendtextData size);
               exec.

sendTextData contains the following text:

sendtextData
 
^'This is sample data for the CICS SEND TEXT command. This data is long enough',
' to check what happens when the data is longer than the terminal width. CICS',
' should split it on a word boundary and start on the next line. ',
' This line is before a new-line character.', (16r0A asCharacter asString),
' This is the line after a new-line character.'.


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]