Using SARBCH, CA View reports can be written to a physical sequential dataset.
When the need arises to print a CA View report to a physical sequential data set, you can accomplish that using the following SARBCH jobs:
//XXXXXXXX JOB ... //SARBCH DD EXEC PGM=SARBCH,PARM='VIEW.DB1' <=== Modify DB name //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used //SYSPRINT DD SYSOUT=* //REPORT DD SYSOUT=* //RPTOUT01 DD DSN=XXXXXX.XXXXXX.RPTOUT, // DISP=(,CATLG,DELETE), // DCB=(...), <=== See below //SYSIN DD * /LOAD ID=xxxxxxxxxxxx GEN=nnn SEQ=n DDNAME=RPTOUT01 <=== See below /* //
//XXXXXXXX JOB ... //SARBCH DD EXEC PGM=SARBCH,PARM='VIEW.DB1' <=== Modify DB name //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used //SYSPRINT DD SYSOUT=* //REPORT DD SYSOUT=* //RPTOUT01 DD DSN=XXXXXX.XXXXXX.RPTOUT, // DISP=(,CATLG,DELETE), // DCB=(...), <=== See below //SYSIN DD * /PRINT ID=xxxxxxxxxxxx GEN=nnn SEQ=n DDNAME=RPTOUT01 BANNER=* /* //
//XXXXXXXX JOB ... //SARBCH DD EXEC PGM=SARBCH,PARM='VIEW.DB1' <=== Modify DB name //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used //SYSPRINT DD SYSOUT=* //REPORT DD SYSOUT=* //RPTOUT01 DD DSN=XXXXXX.XXXXXX.RPTOUT, // DISP=(,CATLG,DELETE), // DCB=(...), <=== See below //SYSIN DD * /PRINT ID=xxxxxxxxxxxx GEN=nnn SEQ=n DDNAME=RPTOUT01 /* //
//XXXXXXXX JOB ... //SARBCH DD EXEC PGM=SARBCH,PARM='VIEW.DB1' <=== Modify DB name //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used //SYSPRINT DD SYSOUT=* //REPORT DD SYSOUT=* //RPTOUT01 DD DSN=XXXXXX.XXXXXX.RPTOUT, // DISP=(,CATLG,DELETE), // DCB=(...), <=== See below //SYSIN DD * /PRINTIDX ID=xxxxxxxxxxxx GEN=nnn SEQ=n INDEX=... VIEW=... DDNAME=RPTOUT01 /* //