cpuhawg
Active User
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
|
|
|
|
In the below examples from the DFSORT manual, what is the significance of the 5X paramenter.
Code: |
OUTREC FIELDS=(21,20,SQZ=(SHIFT=RIGHT),5X,
152,18,SQZ=(SHIFT=LEFT,PREBLANK=X’05’,
LEAD=C’VOL=SER=’,MID=C’,’,PAIR=QUOTE,LENGTH=30))
|
Code: |
OUTFIL FNAMES=TRIM3,VLTRIM=C’*’,
OUTREC=(1,15,5X,16,8,5X,28)
|
Code: |
INREC FIELDS=(1,10,
21,20,JFY=(SHIFT=RIGHT),5X,
52,12,JFY=(SHIFT=LEFT,PREBLANK=C’()’,LEAD=C’VOL=SER=’,
LENGTH=16))
|
|
|
cpuhawg
Active User
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
|
|
|
|
I have one followup. What would be the best method of taking a fixed file of records. removing all blanks, and substituting a hex '05' as a delimiter to create a downloadable spreadsheet file?
Code: |
AAAAAAAAAA BBBBBBBBB CCCCC DDD
|
Let say @ is representative of the hex '05' delimiter. The output should look like:
Code: |
AAAAAAAAAA@BBBBBBBBB@CCCCC@DDD@
|
|
|
cpuhawg
Active User
Joined: 14 Jun 2006 Posts: 331 Location: Jacksonville, FL
|
|
|
|
Please disregard my question. I was successful using:
Code: |
SORT FIELDS=COPY
OUTFIL FNAMES=OUTFILE,CONVERT,
OUTREC=(1,80,SQZ=(SHIFT=LEFT,MID=X'05',TRAIL=X'05'))
|
|
|