How to Print or Load a CA View Report to a Physical Sequential Data Set

Products

• Deliver
• View

Issue/Introduction

Using SARBCH, CA View reports can be written to a physical sequential dataset.

Environment

z/OS

Resolution

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:

• There are two methods that can be used to create a data set without a report banner:
   
• Using LOAD:

     //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
     /*
     //

• Using PRINT:

     //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=*
     /*
     //
  
  

• The DDNAME=... parameter overrides a //SARLOAD DD statement, if one is specified.
  (The //SARLOAD DD statement defines a user-maintained, sequential data set into which the LOAD
  function is to load the SYSOUT).
   
• If DCB attributes for the DD statement are omitted, the following are used:
   
• A record format of VBM
   
• A record size of the SYSOUT group record size, plus four
   
• A block size of 32760
   
• Statement field of "BANNER=*" indicates banner suppression.
   
• Use this method to create a data set with a report 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
    /*
    //
  
  

• If DCB attributes for the DD statement are omitted, the following are used:
   
• A record format of VBM
   
• A record size of the SYSOUT group record size, plus four
   
• A block size of 32760
   
• Use this method to create a data set, with a report banner, of index data for a specific logical view of a report:

     //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
     /*
     //
  
  

• If DCB attributes for the DD statement are omitted, the following are used:
   
  • A record format of VBM
     
  • A record size of the SYSOUT group record size, plus four
     
  • A block size of 32760