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)

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What is the utilization of copybook in cobol? Could we utilize a similar copybook?

721


What is amode(31)

726


HOw can I get the negative sign while deduct high value from low value

1795


How to print 10 to 1 if the input have only 10 digit number?

814


how do you define single dimensional array and multidimensional array in your cobol?

682






which is Best IBM Mainframe Training and Placement Institute in Ameerpet Hyderabad

1024


What are INPUT PROCEDURE and OUTPUT PROCEDURE?

691


How do get the result of your program directly on your pc?

1886


There are 5 fields and 1000 records in a file. Unload it into an array. Write the syntax for declaration and how will you unload it.

934


What is the local-storage section?

684


Mention the guidelines to write a structured cobol program?

620


what happens if parmparameter passes zero bytes to the program

1667


What is the default value(s) for an initialize and what keyword allows for an override of the default?

697


input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?

1876


How to get the last record in vsam file in cluster? And how can you get the kids file records into your cobol program?

744