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 Need to convert date format DFSORT/ICETOOL 20
No new posts Keep leading zero(s) after convert fl... SYNCSORT 7
No new posts Convert single row multi cols to sing... DFSORT/ICETOOL 6
No new posts convert file from VB to FB and use tr... DFSORT/ICETOOL 8
No new posts Convert HEX to Numeric DB2 3
Search our Forums:

Back to Top