Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Moving from JCLPREP to JCLPLUS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
View previous topic :: :: View next topic  
Author Message
tgo60

New User


Joined: 19 Apr 2006
Posts: 6

PostPosted: Tue Apr 15, 2014 3:50 am    Post subject: Moving from JCLPREP to JCLPLUS
Reply with quote

We are moving from JCLPREP to JCLPLUS, I’ve read through the manuals the vendor provided and have been working with the vendor through our representative for 4 weeks to no resolution and we are about to lose our JCLPREP license in a week.

Issue: When I submit JCLPLUS in batch with the CA7 SCHID to use it seems to ignore it and produces a report of the JCL for each #JI card in the JCL (listed below). In this case I get a report on the JCL with SCHID 101 and SCHID 200, if there are more SCHID’s then more versions of the JCL would be reported.

I use the output of the reports downstream to analyze the data, I could filter out the additional reports but I’d rather not have to do this if this function does work and it’s just my error.

//JCLPLUS EXEC PGM=JCLPLUS,PARM=('RUNTIME-PARM1=TEST')
//SYSPRINT DD SYSOUT=*
//REPORT DD SYSOUT=*
//CHECK DD DISP=SHR,DSN=DVPSC.#PDS.PHOGAN <- JCL
//PROC01 DD DISP=SHR,DSN=DVPNV.UNIT.PPROCLIB <- PROC
//RULES DD DISP=SHR,DSN=SYSES.PRD.SEA.JCLPLUS.SRCLIB(GLOBAL)
//SYSPROC DD DISP=SHR,DSN=SYSPL.REXX
//SYSIN DD *
OPTIONS=MESSAGE-LEVEL=ALL,NOPRINTCC
REPORTS=JCL-OUT,MESSAGE-SUMMARY
SELECT=IMEM=QHKN1BMM
//CA7PARM DD *
ID=101
/*

And also have tried this per vendor.
//CA7PARM DD *
ID(101)
/*

Below are the RULES for CA7 that we have.
//RULES DD DISP=SHR,DSN=SYSES.PRD.SEA.JCLPLUS.SRCLIB(GLOBAL)
CA7ALL=YES,
CA7-JOBCARDS=NO,
EXITS=EXIT7=$TMSEXIT,EXITR=CA7EXITR

Below are the CA7 parameters in the JCL.
#JI,ID=101
// INCLUDE MEMBER=CHK#OBNK
#JI,ID=200
// INCLUDE MEMBER=CHK#OMIN
#JEND
//*
#JI,ID=101
// SCHID=S101
#JI,ID=200
// SCHID=S200
#JEND
Back to top
View user's profile Send private message

tgo60

New User


Joined: 19 Apr 2006
Posts: 6

PostPosted: Wed Apr 23, 2014 11:40 pm    Post subject: Reply to: JCLPLUS
Reply with quote

Thanks for everyone that viewed this topic.

Resolution from Vendor:
1) Because the system default value in SYSES.PRD.SEA.JCLPLUS.SRCLIB(GLOBAL) contains CA7ALL=YES
- An override of CA7ALL=NO is required which is documented in the manual
2) The error in the manual is the syntax of the CA7PARM ID=(101) The correct syntax is ID=101

//RULES DD DISP=SHR,DSN=SYSES.PRD.SEA.JCLPLUS.SRCLIB(GLOBAL)
//SYSIN DD *
OPTIONS=CA7ALL=NO
SELECT=IMEM=QHKN1BMM
/*
//CA7PARM DD *
ID=101
/*
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Wed Apr 23, 2014 11:49 pm    Post subject:
Reply with quote

Good to hear you have a solution - thank you for letting us know icon_smile.gif

d
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Moving UDB database to Db2 on z/OS Keith Hooley DB2 4 Wed Sep 27, 2017 12:38 am
No new posts Moving values to a variable of copybo... Vignesh Sid COBOL Programming 6 Wed Sep 06, 2017 1:04 pm
No new posts Moving a PD to PD spoorni DFSORT/ICETOOL 8 Fri Oct 07, 2016 9:52 pm
No new posts Moving character data to smallint in db2 rikdeb DB2 5 Thu Jul 14, 2016 12:38 am
No new posts MOVING COMP-3 into binary akodakka COBOL Programming 2 Tue Dec 01, 2015 5:02 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us