How do u debug a S0C7 abend? (aswered till we get the field
which caused that)
After knowing the field which caused that how do u know the
record which caused that if it is in production env? (dumb)
Ok let us assume that we got to know that 100th record
caused that and I wanted to skip only 100th record from the
file and process from 101th.
How to do that in JCL using SORT? (tried with STOPAFT
but ended up dumb when he said smthing else is ther)
Answers were Sorted based on User's Feedback
Answer / sandeep negi
If you came to know which field is responsible for that.
you can run your testjcl with output file DISP parameter as
(NEW,CATLG,CATLG), by doing so, your output file will get
created irrespective of SOC7 abend becuase the last record
of your outuput file will be responsible for generating
abend.
Now you can strip off that record (because its bad data)
and run your jcl.
How to Skip any record through JCL -
You can use ICETOOL
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=... input file
//OUT DD DSN=... output file
//TOOLIN DD *
SUBSET FROM(IN) TO(OUT) REMOVE INPUT RRN(100)
this will remove 100th record from your file and will copy
rest all records into ouptput file.
| Is This Answer Correct ? | 3 Yes | 0 No |
what is level 66 means??
how do you reference the variable block file formats from cobol programs
What is length is cobol?
can we redefine 77 level item is it possible
How do you set a return code to the JCL from a COBOL program?
TO abend the data sholud open in which mode? 1.new 2.old 3.mod 4.shr
Give some examples of command terminators?
What type of SDLC u followed? Why?
How can we find out wether to declare the data items like Integer, Char,Comp? If comp types how can we decide wether it is Comp and Comp3.How it is? Please Explain... Cheers.
Can JUSTIFIED be used for all the data types?
why occurs clause not mentioned in 01 level
6 Answers HCL, NIIT, TCS, Tesco,
Consider the following COBOL entries: 05 X PIC 99 VALUE 10. SUBTRACT 20 FROM X. The resultant value of X wil be