EXEC CICS REWRITE DATASET(WS-OUT-FILE)
FROM(WS-OUTPUT)
END-EXEC
01 WS-OUTPUT.
05 WS-ICN-OUT PIC X(11).
05 WS-LINE-OUT PIC X(03).
05 WS-LTR-CD-OUT OCCURS 3 TIMES PIC X(03).
77 WS-OUT-FILE PIC X(08) VALUE 'CSR22185'.
CSR22185 is a VSAM file with a length of 23. I'm not sure what is
causing this error, so I would really appreciate any help that I can
get. Thanks.
RESP2=30 The command was issued when no prior successful READ UPDATE
command was executed.
Before you can do a re-write you must have done a READ UPDATE.