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

Convert a JOBGROUP into an OPC (TWS/IWS) AD


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

New User


Joined: 01 Feb 2007
Posts: 89
Location: Stockholm, Sweden

PostPosted: Tue Sep 18, 2018 12:06 pm
Reply with quote

I want to convert a JCL JOBGROUP into an OPC (/TWS/IWS) AD definition...
But I'm feeling a bit lazy icon_smile.gif and wondered if anyone had developed a neat little tool for this?
This is my (obfuscated) JOBGROUP...
Code:
//ABCBLGRP JOBGROUP (SJ,P),'ABC JOBGROUP',
//*        TYPE=SCAN,
//         ONERROR=STOP,
//         OWNER=ABC1234
//ABCBLS2T GJOB
//ABCBLS2F GJOB
//         AFTER NAME=ABCBLS2T,WHEN=(RC>0 OR ABEND)
//ABCBLSET JOBSET
//         AFTER NAME=ABCBLS2T,WHEN=(RC=0)
//ABCBLR10 SJOB
//ABCBLR12 SJOB
//ABCBLR20 SJOB
//ABCBLR23 SJOB
//ABCBLR40 SJOB
//ABCBLR44 SJOB
//ABCBLR50 SJOB
//ABCBLR55 SJOB
//ABCBLITA SJOB
//ABCBLCLA SJOB
//ABCBLSET ENDSET
//ABCBLSEF GJOB
//         AFTER NAME=ABCBLSET,WHEN=(RC>0 OR ABEND)
//ABCBLRPT GJOB
//         AFTER NAME=ABCBLSET
//         AFTER NAME=ABCBLS2T,WHEN=(RC=0)
//ABCBLGRP ENDGROUP
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 COnvert a column with mix of hex ,cha... DB2 5
No new posts To convert numeric to Packed Decimal DFSORT/ICETOOL 9
No new posts how to convert Hex String t char hex PL/I & Assembler 6
This topic is locked: you cannot edit posts or make replies. DFSORT-How to convert ZD to ZS in DFSORT DFSORT/ICETOOL 2
No new posts Convert a packed decimal value to zon... DB2 6
Search our Forums:

Back to Top