View previous topic :: View next topic
|
Author |
Message |
chaoj
Active User
Joined: 03 Jun 2010 Posts: 103 Location: Dalian
|
|
|
|
There's a code in my production system , it was old and no one knows its original design , a REXX PGM call a CLIST ,
But When I test it in test system , not work .
This is the REXX call command
Code: |
address ispexec "SELECT CMD( CISEXE03 PNAME( "panel" )",
"LOCLANG(" local_lang ") ) NEWAPPL PASSLIB"
|
This is the CLIST first line was called
Code: |
PROC 0 PNAME() LOCLANG()
|
The error is
Code: |
1 +++ PROC 0 PNAME() LOCLANG()
Error running CISEXE03, line 1: Routine not found
|
How can I call a CLIST with a REXX ? |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
But Why do you need Clist ?
Cant you convert it to REXX and call it? |
|
Back to top |
|
|
chaoj
Active User
Joined: 03 Jun 2010 Posts: 103 Location: Dalian
|
|
|
|
Pandora-Box wrote: |
But Why do you need Clist ?
Cant you convert it to REXX and call it? |
Thanks Pandora,
We have z/OS VersionUp and DB2 VersionUp
I need to test this PGM in test system , I can not change it and also CLIST is too complicated to change to REXX . |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Quote: |
Error running CISEXE03, line 1: Routine not found |
where is CISEX03 located?????????? |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
Code: |
Error running CISEXE03, line 1: Routine not found |
Probably I would atleast suggest you to ask someone who is familiar with the code |
|
Back to top |
|
|
chaoj
Active User
Joined: 03 Jun 2010 Posts: 103 Location: Dalian
|
|
|
|
dbzTHEdinosauer wrote: |
Quote: |
Error running CISEXE03, line 1: Routine not found |
where is CISEX03 located?????????? |
the same lib with the REXX PGH which call it .
oh.....I should change it ? |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
Ah Dick,
Welcome back
Pretty happy to see you again
Was indeed missing you and reading your old posts two days back |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
Quote: |
oh.....I should change it ? |
only if that library is not in the concatenation of libraries that ISPF searches.
also, there is no problem invoking a CLIST via REXX.
it seems as if you skipped all the intoductory info provided in the manual
that explains how the operating system works.
Pandora,
thanks for the welcome. It seems as if you have been holding your own. |
|
Back to top |
|
|
chaoj
Active User
Joined: 03 Jun 2010 Posts: 103 Location: Dalian
|
|
|
|
dbzTHEdinosauer wrote: |
Quote: |
oh.....I should change it ? |
only if that library is not in the concatenation of libraries that ISPF searches. |
from the error msg , it was found and executed , cause the first line of CISEXE03 is PROC 0 PNAME() LOCLANG()
Code: |
1 +++ PROC 0 PNAME() LOCLANG()
Error running CISEXE03, line 1: Routine not found
|
|
|
Back to top |
|
|
chaoj
Active User
Joined: 03 Jun 2010 Posts: 103 Location: Dalian
|
|
|
|
dbzTHEdinosauer wrote: |
Quote: |
oh.....I should change it ? |
only if that library is not in the concatenation of libraries that ISPF searches.
also, there is no problem invoking a CLIST via REXX.
it seems as if you skipped all the intoductory info provided in the manual
that explains how the operating system works.
Pandora,
thanks for the welcome. It seems as if you have been holding your own. |
Thanks Dick , could you tell me which reference I should read ?
I'll read it . |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Hi there DBZ .............. long time no see |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
CLISTs -have- to be in the SYSPROC concatenation. EXECs can be in either the SYSPROC or the SYSEXEC concatenation.
By the error message produced, likely the clist is in the SYSEXEC concatenation, so it is invoked as a rexx program. |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
Quote: |
CLISTs -have- to be in the SYSPROC concatenation. EXECs can be in either the SYSPROC or the SYSEXEC concatenation.
By the error message produced, likely the clist is in the SYSEXEC concatenation, so it is invoked as a rexx program. |
Pedro now I get a dumb question if the routine is not found then how does say
Code: |
1 +++ PROC 0 PNAME() LOCLANG()
Error running CISEXE03, line 1: Routine not found |
??
Please advice |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
Nevermind I figured it out |
|
Back to top |
|
|
Ed Goodman
Active Member
Joined: 08 Jun 2011 Posts: 556 Location: USA
|
|
|
|
No no, CISEXE03 is not found in SYSEXEC. Just try putting the same library in a DD named SYSPROC and see what happens. |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
Quote: |
Just try putting the same library in a DD named SYSPROC and see what happens. |
I did not try it. But I am confident that my advice was accurate.
In the reported symptom:
Code: |
1 +++ PROC 0 PNAME() LOCLANG()
Error running CISEXE03, line 1: Routine not found |
Clearly CISEXE03 is found: line 1 is shown but causes an error. The 'not found' part is because the clist was launched as a rexx program. And in the rexx language syntax, 'PNAME()' appears as a function call. The rexx processor could not find a routine named 'PNAME'.
In the future, to gather more debugging information, you should issue
and recreate the problem. You will likely see that it is message IRX0043I. And though the explanation does not say 'you ran a clist as a rexx exec', you should now know that IRX is the prefix for rexx messages only. |
|
Back to top |
|
|
Pandora-Box
Global Moderator
Joined: 07 Sep 2006 Posts: 1592 Location: Andromeda Galaxy
|
|
|
|
Yes i figured that
I was asking that question with a mind thinking of cobol
I realised it later |
|
Back to top |
|
|
chaoj
Active User
Joined: 03 Jun 2010 Posts: 103 Location: Dalian
|
|
|
|
Pedro wrote: |
Quote: |
Just try putting the same library in a DD named SYSPROC and see what happens. |
I did not try it. But I am confident that my advice was accurate.
In the reported symptom:
Code: |
1 +++ PROC 0 PNAME() LOCLANG()
Error running CISEXE03, line 1: Routine not found |
Clearly CISEXE03 is found: line 1 is shown but causes an error. The 'not found' part is because the clist was launched as a rexx program. And in the rexx language syntax, 'PNAME()' appears as a function call. The rexx processor could not find a routine named 'PNAME'.
In the future, to gather more debugging information, you should issue
and recreate the problem. You will likely see that it is message IRX0043I. And though the explanation does not say 'you ran a clist as a rexx exec', you should now know that IRX is the prefix for rexx messages only. |
You're right ! Pedro , I put CISEXE03 into SYSPROC concatenation LIB and it worked !
Thanks ! |
|
Back to top |
|
|
|