REXX exec & display Panel

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Hi,
I am not able to concatenate my personal PDS with neither SYSEXEC nor ISPPLIB nor ISPMLIB. Its show access issue.
Even I not able to run TSO ISRDDN(just checked)..same error..Not Authorized.
Consider above as problem can't be solved as of now and I have to run rexx exec also, what could be possible options to run rexx exec and panels display as well as In my rexx exec,I have used ISPF panels also.

expat · Posted: Mon Apr 15, 2013 4:39 pm

Look at the ALTLIB and LIBDEF statements

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Thanks Expat..I used LIBDEF and its working.

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Hi,
Now I am expericing another problem in same rexx exec.
As per functionality of exec, it display a ISPF panel. When user press a PF key(result of this, is mentioned on panel), rexx exec perform a paragraph which in turn should display another ISPF panel. But it is not happening, instead its giving error IRX0011I Error running <exec name>, line <nn>: Control stack full.
I think it is because of panel not displayed on screen. As I have neither used INTERPRET command nor nesting of 250 levels.
Any help on this.

My rexx exec looks like:-

Bill Woodger · Posted: Tue Apr 16, 2013 3:50 pm

Please always use the Code tags for anything which requires spacing to be preserved.

What was the result of Trace on the code?

enrico-sorichetti · Posted: Tue Apr 16, 2013 4:02 pm

expat · Posted: Tue Apr 16, 2013 4:13 pm

Why are you doing multiple LIBDEF for ISPPLIB when one should suffice.

Recall in the dark and distant past that too many LIBDEF or ALTLIB statements gave the same error

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Enrico,
I agree with you but that code snippet was just for reference.
My main problem is panel(i.e INPUT1) not displaying.

Expat,
I didn't coded multiple LIBDEF in begining but tried it later on as 'hit n trial' method, still no use of doing it.

enrico-sorichetti · Posted: Tue Apr 16, 2013 5:36 pm

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Hi Enrico,
Please help me to understand,what information will suffice to describe the issue, because I might be missing any important point here.

Till now, I had provided code snippet to show logical flow of code.
I had also tried to debug using TRACE and getting RC(20) after control passes through Main_para(shown below).

Main_Para:
ADDRESS ISPEXEC
"LIBDEF ISPPLIB DATASET ID('YY00123.ABCXYZ.PANELS')"
"CONTROL ERRORS RETURN"
"DISPLAY PANEL(INPUT1) CURSOR(SRCE)" ====>SRCE = ' '
"ISPEXEC VGET (ZPFKEY) ASIS"
+++++RC(20)++++
....

enrico-sorichetti · Posted: Tue Apr 16, 2013 5:52 pm

You displayed the VGET RC, NOT the DISPLAY RC

WHAT HAPPENED WHEN YOU TRIED to JUST DISPLAY THE PANEL USING ISPF OPTION 7.2

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Sorry Enrico, I got this point of panel display thru ISPF previously also but i would like to mention that we are working in such a restricted environment of mainframe that can't access ISPF even.I tried to check this many times but didn't get anything. We work using many client specific tools and this is first time, i am trying to work in rexx here.So getting many problems.
Because of this only,I mentined in my initial post as:-
"Hi,
I am not able to concatenate my personal PDS with neither SYSEXEC nor ISPPLIB nor ISPMLIB. Its show access issue.
Even I not able to run TSO ISRDDN(just checked)..same error..Not Authorized. "

enrico-sorichetti · Posted: Tue Apr 16, 2013 6:15 pm

if You work in a restricted environment and You cannot answer the questions we ask ...
then You should not be asking help on public forum

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

I just want to clear out that restricted means with limited access. Please dont take it otherwise.
and
I am just trying to get the things done here with hope that i will be learning more, if I could get this rexx exec work in such a environment.

dick scherrer · Posted: Tue Apr 16, 2013 9:37 pm

Hello,

Suggest you work with whoever supports rexx on your system.

It sounds like you will need help from someone who thoroughly understands your environment and no one here does . . .

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Hi All,

Many thanks to each one of you for taking out some time and answer my queries.
With help and motivation from you all, I had run the rexx exec in our system..WITHOUT any help from our system people or rexx people.

dick scherrer · Posted: Thu Apr 18, 2013 8:05 pm

Hello,

Good to hear you have this working.

mfguy01 · New User Joined: 06 Sep 2010 Posts: 30 Location: India

Surely Dick...I'll surely take care of this.