INPUT

Blocked spanned records on disk

OUTPUT

Blocked spanned records on SYSDA

WORK DATA SETS

Not applicable

USER EXITS

None

FUNCTIONS/OPTIONS

INCLUDE, VLSHRT

//EXAMP    JOB A400,PROGRAMMER                                  01
//COPY     EXEC PGM=SORT                                        02
//SYSOUT   DD SYSOUT=A                                          03
//SORTIN   DD DSN=SMF.DATA,DISP=SHR                             04
//SORTOUT  DD DSN=SMF.VIOL,DISP=(,KEEP),SPACE=(CYL,(2,5)),      05
//  UNIT=SYSDA                                                  06
//SYSIN    DD *                                                 07
  INCLUDE COND=(6,1,FI,EQ,80,AND,19,1,BI,EQ,B'1.......')        08
  OPTION COPY,VLSHRT                                            09

Line

Explanation

01

JOB statement. Introduces this job to the operating system.

02

EXEC statement. Calls DFSORT directly by its alias SORT.

03

SYSOUT DD statement. Directs DFSORT messages and control statements to sysout class A.

04

SORTIN DD statement. The input data set is named SMF.DATA and is cataloged. DFSORT determines from the data set label that the RECFM is VBS, the LRECL is 32760 and the BLKSIZE is 23476.

05-06

SORTOUT DD statement. The output data set is named SMF.VIOL and is to be allocated on SYSDA and kept. DFSORT sets the RECFM and LRECL from SORTIN and selects an appropriate BLKSIZE.

07

SYSIN DD statement. DFSORT control statements follow.

08

INCLUDE statement. COND specifies that only input records with decimal 80 in the 1-byte fixed-point field at position 6 and bit 0 on in the 1-byte binary field at position 19 are to be included in the output data set.

09

OPTION statement. COPY specifies a copy application. VLSHRT specifies that records that are too short to contain all of the INCLUDE compare fields are not to be included in the output data set.