Try :

OPTION COPY
 OUTFIL FNAMES=SORTOUT,OUTREC=(0001,0082,/,0083,0082,/,0165,0082)

-frank

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Gary Jacek
Sent: Tuesday, December 11, 2012 12:16 PM
To: [email protected]
Subject: Using SyncSort to deblock records in a file

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

________________________________

This e-mail message (including any attachments) is for the sole use of
the intended recipient(s) and may contain confidential and privileged
information. If the reader of this message is not the intended
recipient, you are hereby notified that any dissemination, distribution
or copying of this message (including any attachments) is strictly
prohibited.

If you have received this message in error, please contact
the sender by reply e-mail message and destroy all copies of the
original message (including attachments).

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

Reply via email to