Peter Farley wrote on 05/16/2007 08:56:46 AM:
> You could process the file as RECFM=VB with a JCL override and scan for
byte
> 3 NE x'00'. Sort should handle this nicely.
>
> Something like this (untested):
>
> SORT FIELDS=COPY
> INCLUDE COND=(3,1,NE,X'00')
Well, that would be:
INCLUDE COND=(3,1,BI,NE,X'00')
but it actually won't work because DFSORT "assembles" the spanned record
into an
unspanned record before it processes the INCLUDE statement. So the INCLUDE
statement
will see an RDW with the total length in the first and second bytes and
X'00' in the
third byte, rather than an SDW with the partial length in the first and
second bytes
and the segment descriptor in the third byte.
Frank Yaeger - DFSORT Development Team (IBM) - [EMAIL PROTECTED]
Specialties: PARSE, JFY, SQZ, ICETOOL, IFTHEN, OVERLAY, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
