REWRITE command
Updates a record in a file on a local or a remote system. In Smalltalk, the parameters of the REWRITE command are contained in two classes: CICSRewrite and CICSRewriteResult.
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 CICSRewrite
| | | | |
FILE(filename) | file: | Input | Fixed(8) | |
FROM(data-area) | from: | Input | Variable | |
LENGTH(data-area) | length: | Input | Binary 16 | |
SYSID(systemname) | sysid: | Input | Fixed(4) | |
Parameters returned by CICS in CICSRewriteResult
| | | | |
RESP | resp | Output | Fixed(2) | Inherited from CICSResult. |
RESP2 | resp2 | Output | Fixed(2) | Inherited from CICSResult. |
Example
Rewrites a record in a KSDS file.
| recordRead result |
result := CICS read
file: 'KSDSF1';
keylength: 20;
ridfld: ('Record' abrPadWithBlanks: 20);
update;
exec.
recordRead := MyKsdsFile copyFromOSMemory: (result set).
recordRead city: 'UpdateCounty'.
result := CICS rewrite
file: 'KSDSF1';
from: recordRead;
length: 80;
exec.
Last modified date: 07/09/2019