Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Wed Mar 10, 2010 12:13 pm Post subject:
It's not clear what you want to do. Please be more specific. Show an example of your input records and what you expect for output. Give the RECFM and LRECL of the input and output files. Give the starting position, length and format of all relevant fields. Explain clearly what it is you want to do. _________________ Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
I can't post from my work place so I'm gonna do my best.
I want to read an idcams listcat sysout with dfsort, identify the dsn next to the string "nonvsam" and write a file "x" that will be used as the sysin in another idcams.
the text in the file "x" record can't be longer than 72 characters and so I need to have 2 lines (records) in this file.
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Wed Mar 10, 2010 1:33 pm Post subject:
The LISTCAT output has RECFM=VB, so assuming you want &&filex to have RECFM=FB and LRECL=80, with the REPRO statement split across two lines, you can use these DFSORT statements:
Code:
SORT FIELDS=COPY
INCLUDE COND=(5,6,CH,EQ,C'NONVSAM')
OUTFIL VTOF,BUILD=(C' REPRO IDS(''',12,44,C''') -',80:X,/,
C' OUTFILE OUTPUT')
_________________ Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
FWIW, HEADERn/TRAILERn were designed for reports, and will involve carriage control characters for them to work the way they were designed to work. I think this is what you were referring to when you said "TRAILER1 requires a specif recfm" - the carriage control characters require RECFM=FBA.
Having said that, you can suppress the carriage control by using the OUTFIL REMOVECC (REMOVE Carriage Control) operand.
Hope that helps... _________________ Not an expert, but I did stay at a Holiday Inn... though it has been a while...
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Mon Mar 29, 2010 11:27 am Post subject:
And REMOVECC will also remove the need for the 'A' in the RECFM (e.g. it will use RECFM=FB instead of RECFM=FBA). _________________ Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum