SEND TEXT command
Sends text data without mapping. In Smalltalk, the parameters of the SEND TEXT command are contained in two classes: CICSSendtext and CICSSendtextResult. VA Smalltalk Server supports standard basic mapping support (BMS) which is an interface between CICS application programs and terminal devices.
See CICS Application Programming Reference for the syntax of the command and a description of its parameters.
Defined instance methods
Parameters supplied to CICS in CICSSendtext
 
Parameter
Instance method
Mode
Type
Notes/exceptions
ALARM
alarm
Input
Switch
 
CURSOR(data-value)
cursor:
Input
Binary 16
 
ERASE
erase
Input
Switch
 
FORMFEED
formfeed
Input
Switch
 
FREEKB
freekb
Input
Switch
 
FROM(data-area)
from:
Input
Variable
 
LENGTH(data-value)
length:
Input
Binary 16
 
NLEOM
nleom
Input
Switch
 
PRINT
print
Input
Switch
 
Parameters returned by CICS in CICSSendtextResult
 
Parameter
Instance method
Mode
Type
Notes/exceptions
RESP
resp
Output
Fixed(2)
Inherited from CICSResult.
RESP2
resp2
Output
Fixed(2)
Inherited from CICSResult.
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.'.
Last modified date: 07/09/2019