IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

Moving from JCLPREP to JCLPLUS


IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic
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
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
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

Moderator Emeritus


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

PostPosted: Wed Apr 23, 2014 11:49 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> All Other Mainframe Topics

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts Moving a COMP-3 Variable to a Numeric... COBOL Programming 2
No new posts Moving a PS file as body of a mail! JCL & VSAM 4
No new posts Moving UDB database to Db2 on z/OS DB2 4
No new posts Moving values to a variable of copybo... COBOL Programming 6
No new posts Moving a PD to PD DFSORT/ICETOOL 8

Back to Top