Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How can I get OPCA to invoke a user tool to edit JCL?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> IBM Tools
View previous topic :: :: View next topic  
Author Message
Roy Malcomess

New User


Joined: 16 Aug 2012
Posts: 4
Location: Australia

PostPosted: Tue Aug 21, 2012 5:57 am    Post subject: How can I get OPCA to invoke a user tool to edit JCL?
Reply with quote

ISPF panel EQQAJCLE has instructions:
"User must set a panel name to activate his own JCL edit/browse tool."

HELP for panel EQQABOPL states:
"Specify the J (jcl) command to browse the JCL (available only if edit tool was specified on the EQQXJCLP panel, option 0.6)"

However, when I created a menu panel with options to BROWSE or VIEW the required dataset and member, it was invoked as a DISPLAY panel, so the menu selections were not operative.

How can I get OPCA to SELECT the panel instead of DISPLAYing it?
I would really prefer to invoke a Rexx exec to do the work, but this does not seem to be an option.

My work around has been to create 2 ISPF commands named BJCL and VJCL to BROWSE or VIEW the JCL and then use the DISPLAY panel named in OPC option 0.6 as a pseudo-menu with these ISPF commands shown as options on the panel.
Back to top
View user's profile Send private message

PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Tue Aug 21, 2012 12:54 pm    Post subject: Reply to: How can I get OPCA to invoke a user tool to edit J
Reply with quote

Maybe this will be of help :

http://my.safaribooksonline.com/book/operating-systems-and-server-administration/tivoli/0738491225/customizing-for-job-scan-installations/287#X2ludGVybmFsX0ZsYXNoUmVhZGVyP3htbGlkPTA3Mzg0OTEyMjUvMjg3
Back to top
View user's profile Send private message
Roy Malcomess

New User


Joined: 16 Aug 2012
Posts: 4
Location: Australia

PostPosted: Wed Aug 22, 2012 4:54 am    Post subject: Reply to: How can I get OPCA to invoke a user tool to edit J
Reply with quote

Thanks for the response.

I have already read the relevant sections in that Redbook.
Unfortunately, we do not have JOB/SCAN installed.

My basic problem is that TWS displays the panel specified at option 0.6, instead of selecting it.

I cannot see how JOB/SCAN will get around this problem either, unless they modify the code which uses the JCL edit panel as part of JOB/SCAN implementation.

My method of using a display panel which lists commands available from the ISPF command table works, but is not elegant.

What I would really like, is to be able to specify a Rexx exec to be executed for the purpose of JCL editing. Then if the user enters J to browse the JCL, it would BROWSE the JCL immediatley, instead of displaying a time wasting panel.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Wed Aug 22, 2012 9:59 pm    Post subject:
Reply with quote

Well the manual is saying displaying the panel, in other words you have to do some research how to do the selecting of the panel. But maybe the OPC/TWS people can help you out.
Back to top
View user's profile Send private message
Roy Malcomess

New User


Joined: 16 Aug 2012
Posts: 4
Location: Australia

PostPosted: Thu Aug 23, 2012 4:42 am    Post subject: Reply to: How can I get OPCA to invoke a user tool to edit J
Reply with quote

Thanks for the response.

I have already done the research and not found an answer.
That is why I posted the question here, in the hope that someone else might have implemented a solution to the problem.

Has this problem been resolved at your site?
If so, how?
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Thu Aug 23, 2012 10:58 am    Post subject:
Reply with quote

At my company this feature was not used. So no experience here.
Back to top
View user's profile Send private message
Roy Malcomess

New User


Joined: 16 Aug 2012
Posts: 4
Location: Australia

PostPosted: Thu Aug 23, 2012 11:25 am    Post subject: Reply to: How can I get OPCA to invoke a user tool to edit J
Reply with quote

I have developed my own solution after trawling through the TWS panels:

I changed 2 panels: EQQABOPL and EQQABSDP
I initialised &JCLLIB to the JCL library dsname in both panels.

In panel EQQABOPL, I changed the following line:
&jcl,'MOD(EQQXDSPX,&xjclpan)' /* edit jcl @01A
To:
&jcl,'CMD(%VIEWFL &JCLLIB(&OPJOBNM))' /* edit jcl RoyM

In panel EQQABSDP, I changed the following line:
8,'MOD(EQQXDSPX,&xjclpan)' /* browse jcl @01A
To:
8,'CMD(%VIEWFL &JCLLIB(&OPJOBNM))' /* browse jcl -RoyM


The net effect of the above, is to invoke the in-house Rexx exec VIEWFL to VIEW the JCL member, without the requirement to display another panel in between.

Hope this helps someone else.

Roy.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Thu Aug 23, 2012 11:33 am    Post subject:
Reply with quote

Roy, thanks for sharing.
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 -> IBM Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts SORT - E15 and E35 using same user ex... Abhi Nature DFSORT/ICETOOL 12 Mon Oct 03, 2016 4:33 pm
No new posts Interface from Mainframe to Confluenc... hblun CLIST & REXX 4 Tue Sep 20, 2016 5:47 pm
No new posts User exit in COBOL programs ganasrinivasan PL/I & Assembler 0 Thu Aug 18, 2016 12:48 pm
No new posts Data set is allocated to another job ... Seppe CLIST & REXX 2 Wed Aug 03, 2016 4:31 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us