WRITEQ TS command
Stores temporary data (records) in a temporary storage (TS) queue in main or auxiliary storage. In Smalltalk, the parameters of the WRITEQ TS command are contained in two classes: CICSWriteqts and CICSWriteqtsResult.
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 CICSWriteqts
| | | | |
AUXILIARY | auxiliary | Input | Switch | |
FROM(data-area) | from: | Input | Variable | |
ITEM(data-area) | item: | I/O | Binary 16 | |
LENGTH(data-value) | length: | Input | Binary 16 | |
MAIN | main | Input | Switch | |
NOSUSPEND | nosuspend | Input | Switch | |
QUEUE(name) | queue: | Input | Fixed(8) | |
REWRITE | rewrite | Input | Switch | |
SYSID(systemname) | sysid: | Input | Fixed(4) | Remote systems only |
Parameters returned by CICS in CICSWriteqtsResult
| | | | |
ITEM(data-area) | item | I/O | Binary 16 | |
RESP | resp | Output | Fixed(2) | Inherited from CICSResult. |
RESP2 | resp2 | Output | Fixed(2) | Inherited from CICSResult. |
Example
Builds a temporary storage queue using the WRITEQ TS command. MyKsdsFile is a subclass of OsPtr.
| newRecord result |
newRecord := MyKsdsFile new.
newRecord lastName: 'Record'.
newRecord firstName: 'New'.
newRecord city: 'NewCounty'.
newRecord state: 'NS'.
result := CICS writeqts
queue: 'TSQUEUE';
from: newRecord;
length: 80;
exec.
Last modified date: 07/09/2019