IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

IBM Tool to Abend Job


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
AJAYREDDY

New User


Joined: 17 Feb 2007
Posts: 52
Location: USA

PostPosted: Sat Feb 02, 2013 12:54 am
Reply with quote

Is there any IBM tool (similar to IEBGENER ICETOOL) to abend the Job based on condition code parameter?

Right now I am giving like this. The program AA0000CP is cobol program. It will run only when return code of previous step AC000111 is not equal to zeros. Then the Job will abend (beause this program has only abend routine in Procedure division). But instead, if there is any IBM tool that would be more helpful.

//AA0000CP EXEC PGM=AA0000CP,COND=(0,GE,AC000111)

If there is no tool can we write a abend step using ICETOOL ?
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Sat Feb 02, 2013 1:10 am
Reply with quote

Assuming that your shop doesn't not already have a program to produce an abend at will -- most have had such for decades -- you can write a trivial one in the language of your choice that calls CEE3ABD or CEE3AB2.
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Sat Feb 02, 2013 1:55 am
Reply with quote

I believe there is a Utility from the old System/365 days. It is called IEBNPH.

Code:
//PICKLE EXEC PGM=IEBNPH,COND=blah stuff


It needs no DD statements, not even SYSOUT or SYSIN, STEPLIB or JOBLIB, but you can code them if you want. It has a reputation for being even shorter in code volume than IEFBR14, but if you locate it and browse it, you'll be able to confirm or deny that.

Works for me. Gets S806 every time. Remarkable how it has survived unchanged through so many versions of the Operating System.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Sat Feb 02, 2013 2:01 am
Reply with quote

icon_eek.gif

using a non existing program to abend a job has been common practice since ,
let me think.... about 1975

the standard name was EXPCT806 ( expect an s806 )

and it was used mostly when OPC was pretty primitive and needed an aben for proper resource cleanup

nowadays it is a pretty outdated technique
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Sat Feb 02, 2013 4:14 am
Reply with quote

I use PGM=NOTFOUND

For trying out JCL condition codes I have a little program that takes a parameter that is the return code required or even a parameter that will cause the program to abend.
Back to top
View user's profile Send private message
AJAYREDDY

New User


Joined: 17 Feb 2007
Posts: 52
Location: USA

PostPosted: Tue Feb 05, 2013 11:57 pm
Reply with quote

Thank you all for inputs. I think right now I will go with my usual cobol program AA0000CP which calls CEE3ABD. This program has only this Call in procedure division with no other statements (except DISPLAY statements).
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts ISAM and abend S03B JCL & VSAM 9
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts Abend S0C4 11 (Page Translation Excep... PL/I & Assembler 16
No new posts WER999A - UNSUCCESSFUL SORT 8ED U Ab... SYNCSORT 5
No new posts Mass JCL release via IDZ tool(eclipse... CA Products 1
Search our Forums:

Back to Top