|
View previous topic :: View next topic
|
| Author |
Message |
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
Hi,
I have a tool that will invoke a panel from a changeman program which is in edit mode. This will make some modification into my program. After that I have to compile the program. The first F3 shows the lines changed which is correct. However, the next F3 should go to the compile options but it goes completely out of changeman and displays an error that "Panel not found". Also when i open that program again from the changeman there are no changes saved.
Please help me out in this regard.
Thanks.. |
|
| Back to top |
|
 |
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| Quote: |
| Please help me out in this regard. |
check line 153 of Your REXX script |
|
| Back to top |
|
|
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
| Quote: |
| check line 153 of Your REXX script |
Could you please brief me out in this regard..
Thanks |
|
| Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| Is this supposed to be a Changeman question? |
|
| Back to top |
|
|
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
Hi SuperK,
This might be related to be a changeman question.
But something need to be added to my rexx script which is invoking the pannel in changeman in order to reset with the changeman flow after making the modifications as mentioned in my main post.
Correct me if i'm wrong.
Thanks. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| Quote: |
| Could you please brief me out in this regard.. |
<holy> <deity>
the only thing You really need to be briefed about is....
how to ask questions, see for example catb.org/~esr/faqs/smart-questions.html
a nonsense question deserves a nonsense reply ...
You wrote something... OK
It does not work OK
You ask for help OK
what info did You provide that You expect help from ??
abso*******lutely nothing 
but before posting this reply I checked Your profile and I realized that
nothing better could be expected by somebody qualifying himself as TechnicalDirector
| Quote: |
| Is this supposed to be a Changeman question? |
who knows... given the premises  |
|
| Back to top |
|
|
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
Hi enrico,
As a global moderator please respond properly (Mind your words).. |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
never fails,
the incompetents that can not express themselves,
always complain and say - talk nice. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| Quote: |
| As a global moderator please respond properly (Mind your words).. |
given the posting style I was even too kind!
anyway
looks like we are just wasting our time trying to help You
You are just whining and telling absolutely nothing helpful to diagnose Your issue |
|
| Back to top |
|
|
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
Yes enrico..
| Quote: |
As a global moderator please respond properly (Mind your words)..
|
I apologize for this.
Let me modify my question.
I have coded a REXX script which will be invoked while editing a program which is present in changeman package.
This Rexx script has a logic to invoke a panel which return some values from the user. Based on these values the modifications will be made to program (i.e insert or delete certain lines of code). As per the changeman tool's flow whenever we make some changes to the program that the flow follows to display changes made, requesting for compilation optios, etc.
Here i'm facing the issue that is insted of requesting for compilation options it completely got out of changeman and also the changes not saved even the script executed as expected.
The error which i got is "Panel not found" after coming out of changeman tool.
I hope i need to have certain commands to be added to the rexx script for continuing the changeman flow after invoking the temporay panel via the rexx script.
Please let me know if you have any idea in this regard. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
looks like there is a language barrier here
as I said before ... You are just telling that something that You expect to work
...
does not work
what are we supposed to say / suggest ??? |
|
| Back to top |
|
|
CICS Guy
Senior Member
Joined: 18 Jul 2007
Posts: 2146
Location: At my coffee table
|
|
|
|
| Santty wrote: |
| The error which i got is "Panel not found" after coming out of changeman tool. |
Trying not to sound too stupid, but what panel was not found? |
|
| Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne
|
|
|
|
I have to admit complete ignorance with changeman,
but, when attempting to do things with panel in endevor,
i notice the environment (appl) is not ISPF-edit but endevor - application.
the point i am getting at, is that the return from a TSO ALLOC
while in a pure ISPF/EDIT environment - appl
is different when in endevor.
I would guess that the pds containing your panel is not allocated to the
changeman environment - application
i keep stressing the term appl - as in invoke command new appl. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
the whole thing could be an edit macro which displays a panel asking for additional info in order to proceed
but ... who knows ?
I have done it a few times, without any issues,
but until the TS let' s us know a bit more very little can be said
lots of traffic for nothing  |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2594
Location: Silicon Valley
|
|
|
|
| Show us the trace. |
|
| Back to top |
|
|
prino
Senior Member
Joined: 07 Feb 2009
Posts: 1315
Location: Vilnius, Lithuania
|
|
|
|
| Wild guess: he's doing a LIBDEF? |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
| Santty wrote: |
| I have a tool that will invoke a panel from a changeman program which is in edit mode. This will make some modification into my program. After that I have to compile the program. The first F3 shows the lines changed which is correct. However, the next F3 should go to the compile options but it goes completely out of changeman and displays an error that "Panel not found". Also when i open that program again from the changeman there are no changes saved. |
| Santty wrote: |
| I have coded a REXX script which will be invoked while editing a program which is present in changeman package. |
You keep using words like "tool" and "rexx script". Why don't you use the correct terminology and say the magic words: "a rexx macro" ?
How do you "show the lines changed" ?
Do you have a SAVE command anywhere in your macro ?
Do you alter in any way the environment you're in (by using LIBDEF, ALLOC, FREE or similar commands ) ? |
|
| Back to top |
|
|
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
Thanks to you all for your replies.
| Quote: |
| Do you alter in any way the environment you're in (by using LIBDEF, ALLOC, FREE or similar commands ) ? |
In the rexx (edit)macro, i'm using LIBDEF for the DSN which is having the panel design.
| Quote: |
Do you have a SAVE command anywhere in your macro ?
|
I do not have any save command in the rexx macro.
I'm executing this rexx macro while editing a program which is present in changeman package. i have inserted/deleted the lines in the program using the rexx macro.
| Quote: |
How do you "show the lines changed" ?
|
As per the changeman tool,
After the above mentioned change is done i've pressed F3. Here i got the report of the lines chages at the earlier version and current version of the program. (This is default in changeman tool and i do not have any commands to display this in my rexx macro).
Then, In next F3 I should get the request for compiler options(This is also default in changeman tool and i do not want to do this by my rexx macro).
But i'm not getting the compiler options panel from the changeman tool instead it got completely out of the changeman tool,Where i got the "panel not found". (This is the error for changeman compiler options panel)
i.e I would like to modify the rexx macro to edit the lines at the program in changeman as well as it should not affect the changeman tool flow.
Note: I have edited the program based on the input from the panel designed by me when i invoked this rexx macro while editing the program from normal PDS.
And i would like to use this rexx macro in changeman too.
Thanks. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
until You show the coding everything is just pure speculation and a waste of time!
You keep on telling absolutely nothing useful to provide any help |
|
| Back to top |
|
|
prino
Senior Member
Joined: 07 Feb 2009
Posts: 1315
Location: Vilnius, Lithuania
|
|
|
|
| As I already guessed, the OP is doing a LIBDEF! (And very obviously doesn't know how to properly do LIBDEFs!) |
|
| Back to top |
|
|
Santty
New User
Joined: 20 Nov 2007
Posts: 37
Location: USA
|
|
|
|
Hi all,
| Code: |
DSNISPP= "'" || USERID() || ".TOOL.ISPPLIB'"
ADDRESS ISPEXEC 'LIBDEF ISPPLIB DATASET ID('DSNISPP')'
"ISPEXEC ADDPOP"
"VPUT (TYP,MMSG) SHARED"
"DISPLAY PANEL (TEST)"
"VGET (TYP,X) SHARED" |
This is what the code i've used in my rexx macro. This overrides the system ISPPLIBs which is the reason for the issue i faced.
Now i've modified the code as follows:
| Code: |
DSNISPP= "'" || USERID() || ".TOOL.ISPPLIB'"
ADDRESS ISPEXEC 'LIBDEF ISPPLIB DATASET ID('DSNISPP') STACK'
"ISPEXEC ADDPOP"
"VPUT (TYP,MMSG) SHARED"
"DISPLAY PANEL (TEST)"
"VGET (TYP,X) SHARED" |
Atlast i have added
| Code: |
| ADDRESS ISPEXEC 'LIBDEF ISPPLIB' |
to reset the system ISPPLIB.
And It works fine as i expected.
Thanks to all for making me to learn by myself  |
|
| Back to top |
|
|
|
|
