View previous topic :: View next topic
|
Author |
Message |
boyti ko
New User
Joined: 03 Nov 2014 Posts: 78 Location: Malaysia
|
|
|
|
Hi,
We have this CLIST to invoke and view the copybook immediately.
The CLIST program is named as VCOPY. To use it, I just need to put in command line:
Code: |
Command ===> VCOPY somecopy |
Now I tried to copy the member in the same library, named it as VPARM, no update on the program yet. (I plan to edit the CLIST to view the parm immediately)
After invoking it,
Code: |
Command ===> VPARM somecopy |
I am now receiving this message
Code: |
ENTER POSITIONAL PARAMETER CPY - |
When I try to reply to it:
Code: |
ENTER POSITIONAL PARAMETER CPY -
somecopy
|
I will have this 'Command not executed' message.
How come I won't get the same scenario even though I have the exact program codes? Is there any table or something for CLIST which I need to add first in order for it to work like the original one? Please help.
Here's a copy of the program:
Code: |
PROC 1 CPY /* */
CONTROL NOFLUSH NOMSG END(ENDO)
ISPEXEC CONTROL ERRORS RETURN
ERROR DO
SET &RC = &LASTCC
RETURN
ENDO
SET &RC = 0
IF &SUBSTR(1:1,&CPY) = &STR(Y) THEN DO
ISPEXEC VIEW DATASET(XXXX.FPS.COPYLIB(&CPY))
ENDO
ELSE DO
ISPEXEC VIEW DATASET(YYYY.FCS.COPYLIB(&CPY))
ENDO
IF &RC > 8 THEN DO
WRITE BROWSE - RC(&RC)
EXIT
ENDO |
Note: It will work correctly if I invoke this.
|
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2455 Location: Hampshire, UK
|
|
|
|
Temporarily rename your VPARM clist to something else then try entering VPARM again on the command line. There is probably something else called VPARM. |
|
Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015 Posts: 712 Location: Denmark
|
|
|
|
It looks like there are ISPF command table entries for VCOPY and VPARM. You need to find out what those entries look like. |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
Similar to Nic's comment, I think you have some other member called VPARM that is found first.
The search order is something like this:
* load module concatenation
* SYSPROC concatenation
* SYSEXEC concatenation
Try using a less common name.
Issue TSO ISRDDN followed by command: MEMBER VPARM
It will show you which datasets have that member. |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
Because you are getting:
Code: |
ENTER POSITIONAL PARAMETER CPY - |
My next guess is that you were previously issuing command somewhere else, but the failure is when you issue from the editor. It starts as if it was an editor macro, but it is not coded as one.
BTW: I recommend that you write using REXX rather than CLISTs. |
|
Back to top |
|
|
boyti ko
New User
Joined: 03 Nov 2014 Posts: 78 Location: Malaysia
|
|
|
|
Hi,
Thank you for all of your reply. I renamed the VPARM into VPARM1 and tried to run again.
Code: |
COMMAND VPARM NOT FOUND
*** |
I also tried to check using the TSO ISRDDN method, but still, I haven't able to find the same program.
Moving forward, same as Pedro's recommendation, I have created a REXX program for this one. |
|
Back to top |
|
|
|