IBM Support

Can DWWLC create the DWWCOPY1 output dataset as RECFM=U?

Question & Answer


Question

When testing CICS VSAM Recovery for z/OS (CICS VR) V5.2, I ran the DWWLC utility program to offload the data in my user journal. The output dataset was allocated as RECFM=VB, LRECL=32756, BLKSIZE=32760. In the JCL, I had specified RECFM=U, BLKSIZE=32760, but it looks like that was overridden. When I went to read the output dataset, I got an error in the program.

We are running CA Filesave and it allows us to create the output dataset as RECFM=U, BLKSIZE=32760.

If the DWWLC program only creates the output dataset as VB, do we have to use the DFHJUP program to offload the user journals so the dataset can be created with RECFM=U?

Answer

The following feedback has been submitted to update the documentation for CICS VSAM Recovery to add a usage note to Using the log stream copy utility to copy your MVS log streams

DWWLC cannot use DCB specification RECFM=U for DWWCOPYn data sets as a RECFM=U data set would have incorrect records for recovery.(Each output record will be a logstream block instead of a logstream record.)

The DWWLC program creates the DWWCOPYn data sets with VB format to provide FTP sending to remote sites for recovery.

The CICS VR recovery utility (DWWCO) supports 2 formats of MVS log stream copies data sets:

  • new format with variable-length blocked records(VB)

  • old format with undefined-length (U) unblocked records

The support of the old format has been left for compatibility with CICS VR 2.3 log copies.

If you require RECFM=U for your logstream copy data set you can reformat a log stream copy data set from VB to U unblocked format using dfp utilities (for example, IEBGENER), or the CICSVR PRECOPY exit.

Here is an example of IEBGENER job that reformats the CICSVR logstreamcopy data set, produced by DWWLC:

 //userid JOB (acct),'userid',TIME=2
 //INIT EXEC PGM=IEBGENER,REGION=2M
 //SYSPRINT DD SYSOUT=*
 //SYSUT1  DD DISP=SHR,DSN=CICSVR.SYSA.LSCOPY1
 //SYSUT2  DD DSN=CICSVR.OLGA.LSCOPY1.U,UNIT=SYSDA,DISP=(,CATLG),
 //        SPACE=(CYL,(5,1)),DCB=(RECFM=U,BLKSIZE=32760)
 //SYSIN DD DUMMY

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSQJMU","label":"CICS VSAM Recovery for z\/OS"},"Platform":[{"code":"PF035","label":"z\/OS"}],"Component":"","Version":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Product Synonym

CICSVR CICS VR

Document Information

Modified date:
24 February 2016

UID

dwa1253883