Date: Tue, 15 Apr 1997 10:36:18 -0400
Reply-To: REXX Programming discussion list <REXXLIST@UGA.CC.UGA.EDU>
Sender: REXX Programming discussion list <REXXLIST@UGA.CC.UGA.EDU>
From: Tom Hylton <Tom.Hylton@CCMAIL.IRS.GOV>
Subject: Re: for MVS system programmers
Content-Type: text/plain; charset=US-ASCII
Did you remove your LIBDEF before exiting?
Proper way is:
ISPEXEC LIBDEF ISPPLIB DATASET ID('xxxx.Panels')
ISPEXEC LIBDEF ISPPLIB
This removes your "layer" of panels from the ISPPLIB ddname and
allows ISPF's to get back in. I'm guessing your main ISPF menu
is "MENU" and that it can't find this member because it's looking
in your panel library.
Instead of messing with the start up allocations, and everyone's
profile settings, you could:
1st) Create an initializing REXX (Make up a command name that's a
little less generic: MYGO, or MYEDIT or something...) that
ALTLIBs to your REXX library, LIBDEFS to your panels, then
executes your GO program. Then before exit, remember to clean up
by doing another ALTLIB & LIBDEF.
Place this member in a dataset that's already allocated to
SYSPROC at startup. We, for example, have a USER CLIST library
allocated at start up that users can place homegrown apps into.
Then do one or both:
A) Place an option on your main ISPF MENU panel that will execute
MYGO. This will allow you to type MYGO from the main panel or
=MYGO from anywhere else.
B) Have your SYS PROG place your command in the ISP command
table. This will allow MYGO to be executed from any command line.
Hope this made some sense,
______________________________ Reply Separator _________________________________
Subject: for MVS system programmers
Author: REXX Programming discussion list <REXXLIST@UGA.CC.UGA.EDU> at Internet
Date: 4/14/97 4:27 AM
I wrote a system in RExx. The way to use it is at ISPF option 6 you
to type the full path such as:
GO is a Rexx program which also do a LIBDEF for a panels PDS then
every thing would be fine. My systems uses REXX-TSO and ISPF dialog
for full screen edit.
The problem starts up in the short cut way. Users did not want to key the
path. I add this member in to the start up profile
xxxx.ISPF4F.PROFILE(AUTOEXEC) as follows
%#CONCAT SYSPROC 'SYS001.REXXL.PDS'
But when users tried to use it, it abends with OC1
I then tried to concatenate to SYSEXEC instead
%#CONCAT SYSEXEC 'SYS001.REXXL.PDS'
It works then but when my system exit, (users exit out), there is a
said that member MENU does not found. It also said panel MENU not found
Why ? what does the system expects here ?