Hi

I am trying to use SyncSort for zOS V1.4.0.1R to deblock a file.

For each input record, I want to write the first 82 bytes as output record 1, 
followed by the next 82 bytes as output record 2, 
followed by the next 82 bytes as output record 3,
and so on until all 22 output records (22x82=1804) have been written.

I coded a simple jobstep to perform this activity for the first three chunks of 
82 bytes.

The input attributes are DSORG=DA RECFM=F LRECL=1804 BLKSIZE=1804.

I am letting SyncSort calculate the output attributes, but I expect to get
DSORG=PS RECFM=F LRECL=82.

Here is my trial jobstep.

//STEP1    EXEC PGM=SORT
//*
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//*
//SORTIN   DD DISP=SHR,DSN=xxx.xxxxxx
//*
//PIECES   DD SYSOUT=*
//*
//SYSIN    DD *
 OPTION COPY
 OUTFIL FNAMES=PIECES,OUTREC=(0001,0082,/,0083,0164,/,0165,0246)
//*

The output below shows that SyncSort is placing the first 246 bytes of
every input record into a single output record.

This is unexpected.

Can anyone see what I am doing incorrectly?

********************************* TOP OF DATA **********************************
 SYNCSORT FOR Z/OS  1.4.0.1R    U.S. PATENTS: 4210961, 5117495   (C) 2010 SYNCSO
                                       xxxxxxxxxxxxxxxxxxxxxxxx    z/OS   1.12.0
 SYNCSORT LICENSED FOR CPU SERIAL NUMBER xxxxx, MODEL xxxx xxx             LICEN
 SYSIN :
  OPTION COPY
  OUTFIL FNAMES=PIECES,OUTREC=(0001,0082,/,0083,0164,/,0165,0246)
 WER108I  SORTIN   : RECFM=F    ; LRECL=  1804; BLKSIZE=  1804
 WER073I  SORTIN   : DSNAME=xxx.xxxxxx
 WER110I  PIECES   : RECFM=F    ; LRECL=   246; BLKSIZE=   246
 WER074I  PIECES   : DSNAME=xxxxxxx.DEBLOCK.JOB09224.D0000104.?
 WER405I  PIECES   :  DATA RECORDS OUT      81190; TOTAL RECORDS OUT     243570
 WER449I  SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE
 WER054I  RCD IN      81190, OUT      81190
 WER169I  RELEASE 1.4 BATCH 0520 TPF LEVEL 0.1
 WER052I  END SYNCSORT - DEBLOCK,STEP1,,DIAG=8400,5284,A88C,0064,CC72,688B,2EC8,
******************************** BOTTOM OF DATA ********************************

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to