|
View previous topic :: View next topic
|
| Author |
Message |
prav_06
Warnings : 1
Active User
Joined: 13 Dec 2005
Posts: 154
Location: The Netherlands
|
|
|
|
Dear All,
My requirement it to convert a VB file of lrecl=1004 to lrecl=197, i tried the sort card
| Code: |
SORT FIELDS=COPY
RECORD TYPE=V,LENGTH=(1,197) |
but its throwing a U016 Abend, could you please let me know the way out
Regards,
Thanmilzan. |
|
| Back to top |
|
 |
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
| I have no idea, but maybe OUTREC and BUILD? |
|
| Back to top |
|
|
prav_06
Warnings : 1
Active User
Joined: 13 Dec 2005
Posts: 154
Location: The Netherlands
|
|
|
|
Hi dbzTHEdinosauer,
Could you pelase share the syntax with OUTREC and BUILD.
Regards,
Thamilzan. |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
Thanmilzan,
LENGTH=(1,197) says your input records have a length of 1 and your records after E15 have a length of 197. You can't just use random syntax and expect it to work.
You can use a DFSORT job like the following to do what you asked for:
| Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file (VB/1004)
//SORTOUT DD LRECL=197,DSN=... output file (VB/197)
//SYSIN DD *
OPTION COPY,VLLONG
INREC BUILD=(1,4,5)
/*
|
BTW, saying:
| Quote: |
| its throwing a U016 Abend |
does not give us any information to help you with. A U016 Abend indicates DFSORT detected an error. DFSORT issues error messages for the problems it detects. You need to look at the messages and/or post them. |
|
| Back to top |
|
|
prav_06
Warnings : 1
Active User
Joined: 13 Dec 2005
Posts: 154
Location: The Netherlands
|
|
|
|
Hi Frank,
Thanks a lot for your reply
| Quote: |
| does not give us any information to help you with. A U016 Abend indicates DFSORT detected an error. DFSORT issues error messages for the problems it detects. You need to look at the messages and/or post them |
.
Sorry for not posting the SYSOUT, Well its friday evening 10 my time, people at my office were driving me out and I was in a hurry to type a reply to the forum.
Am not in front of my Mainframe now but if I am not wrong my SYSOUT said some thing reg the mismatch of the lrecl in the sortin and sortout for this control card
| Code: |
SORT FIELDS=COPY
RECORD TYPE=V,LENGTH=(1,197) |
Does this gives some clarity?
Regards,
Thamilzan. |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
I would have to see your JCL and all of the messages. However, as I said, that RECORD statement does NOT make sense so it's probably not worth pursuing.
Try the DFSORT job I provided. It should do what you asked for. |
|
| Back to top |
|
|
|
|
