View previous topic :: View next topic
|
Author |
Message |
Chandran Kallidil
New User
Joined: 11 Mar 2021 Posts: 4 Location: India
|
|
|
|
Hi All,
I am getting SOC7 error while using DFSORT. I want to find out the exact record causing this issue so that I can identify the field from that record. I have millions of records and manual method takes time. I have sysout and sort snap in the JES output. Is there any way to identify the record number from the sort snap output or the key value like account number of that record. Please provide any method by which I can identify the record causing this issue.
Thanks,
Chandran. |
|
Back to top |
|
|
Joerg.Findeisen
Senior Member
Joined: 15 Aug 2015 Posts: 1222 Location: Bamberg, Germany
|
|
|
|
Code: |
//VERIFY EXEC PGM=ICETOOL
//INPUT DD DISP=SHR,DSN=<input>
//DFSMSG DD SYSOUT=*
//TOOLMSG DD SYSOUT=*
//TOOLIN DD *
VERIFY FROM(INPUT) ON(1,4,ZD)
/* |
|
|
Back to top |
|
|
Chandran Kallidil
New User
Joined: 11 Mar 2021 Posts: 4 Location: India
|
|
|
|
Thanks a lot. Will try this out and provide my results.
Thanks,
Chandran. |
|
Back to top |
|
|
Chandran Kallidil
New User
Joined: 11 Mar 2021 Posts: 4 Location: India
|
|
|
|
Hi, I have hundreds of packed decimal fields in the input file. I need to check for each of these fields through this method. I will try this for all the fields.
Is there any other way by looking at sort snap to identify the record number causing the issue?
Thanks,
Chandran. |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
what sort does not know about will not cause am abend
the error occurs for the fields used in the sort control statements,
no need- to solve the abend - to check all the others |
|
Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008 Posts: 2010 Location: USA
|
|
|
|
Chandran Kallidil wrote: |
Hi, I have hundreds of packed decimal fields in the input file. I need to check for each of these fields through this method. I will try this for all the fields. |
For PACKED DECIMAL field use
Code: |
OUTFIL FNAMES=BADRECS,INCLUDE=(1,4,PD,NE,NUM)
OUTFIL FNAMES=GOODRECS,SAVE |
For UNPACKED DECIMAL field use
Code: |
OUTFIL FNAMES=BADRECS,INCLUDE=(1,4,ZD,NE,NUM)
OUTFIL FNAMES=GOODRECS,SAVE |
Another way might be, using INREC to conditionally OVERLAY any non-numeric value with an acceptable one, like +0 in corresponding format.
Code: |
INREC IFTHEN=(WHEN=(1,4,PD,NE,NUM),
OVERLAY=(1:X’0000000C’),
HIT=NEXT),
. . . Other fields . . . . |
|
|
Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008 Posts: 2010 Location: USA
|
|
|
|
Chandran Kallidil wrote: |
Is there any other way by looking at sort snap to identify the record number causing the issue?
Thanks,
Chandran. |
You’ve got very good hints regarding your problem.
Can you, please, RTFM a little bit, about other additional options???!!!
To get the record number you can use parameter SEQNUM. Please, read about it in ANY MANUAL on SORT utility. |
|
Back to top |
|
|
Chandran Kallidil
New User
Joined: 11 Mar 2021 Posts: 4 Location: India
|
|
|
|
Hi, unfortunately I need to do this for all packed decimal fields in my file. I am extracting everything in the file. Verify is a good technique to identify the record and I have now solved my problem. Thanks everyone for the help. Really appreciate the timely help.
Regards,
Chandran. |
|
Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007 Posts: 10872 Location: italy
|
|
|
|
Quote: |
Hi, unfortunately I need to do this for all packed decimal fields in my file. |
then You posted the wrong question in the wrong forum |
|
Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008 Posts: 2010 Location: USA
|
|
|
|
Chandran Kallidil wrote: |
Hi, unfortunately I need to do this for all packed decimal fields in my file. I am extracting everything in the file. Verify is a good technique to identify the record and I have now solved my problem. Thanks everyone for the help. Really appreciate the timely help.
Regards,
Chandran. |
Unfortunately, you don’t want, or just cannot understand the very straightforward hints given to you by several people.
|
|
Back to top |
|
|
|