Are you actually getting an abend in step2 or are you getting a RC=12?  Do you 
have a job scheduler/rerun/restart product forcing the delete?

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
Elaine Beal
Sent: Monday, July 22, 2019 12:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [External] JCL disp on abend

We have a job that is coded as follows-

step1 - idcams repro dummy in to file1,disp=(mod,catalg)

step2  repro above (dummied) file1 , disp=(old,delete,keep) to file2 
disp=(,catlg)

when we get a B37 on step2 file2, file1 is deleted even though it has 
disp=(old,delete,keep)

I've scoured the rules and this seems it should work.


Effect of abnormal termination during execution When a step abnormally 
terminates but is not automatically restarted, its data sets are disposed of as 
specified by the abnormal termination disposition. If an abnormal termination 
disposition is not specified, the normal termination disposition is processed.

Effect of abnormal termination during allocation If a job step fails during 
step allocation, the system disposes of the data sets as follows: 
•       Deletes a data set being created in the step.
•       Keeps a data set that existed before the step.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to