View previous topic :: View next topic
|
Author |
Message |
jramuk
New User
Joined: 14 Nov 2007 Posts: 18 Location: US
|
|
|
|
Hi,
PROC 0 ZCMD()
CONTROL NOLIST NOPROMPT MSG
ALTLIB ACTIVATE APPLICATION(EXEC) +
DATASET('a.b.c')
ALTLIB ACTIVATE APPLICATION(CLIST) +
DATASET('a.b.c')
ISPEXEC LIBDEF ISPPLIB DATASET +
ID('a.b.d')
ISPEXEC SELECT PANEL(AST) OPT(&ZCMD) NEWAPPL(WER) +
PASSLIB SCRNAME(TOOL)
ALTLIB DEACTIVATE APPLICATION(CLIST)
ISPEXEC LIBDEF ISPPLIB
EXIT
When I execute this prog. I'm getting a error
: F &:PROC 0 ZCMD()::CONTROL NOLIST NOPROMPT MSG:sALTLIB ACTIVATE APP
THIS STATEMENT HAS AN INVALID SYMBOLIC VARIABLE
Could someone tell me how to solve this.
Regards,
jramuk |
|
Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006 Posts: 2547 Location: Silicon Valley
|
|
|
|
How as the file created? It looks like there are additional characters in the file. Perhaps change all p'^' to ' '.
Try editing and issue HEX ON. Is there anything besides '40'x where you expect blanks to be? |
|
Back to top |
|
|
jramuk
New User
Joined: 14 Nov 2007 Posts: 18 Location: US
|
|
|
|
Pedro,
All blanks are only '40' and no other junk value is present. I tried both options, but in vain. |
|
Back to top |
|
|
Adrian Stern
New User
Joined: 13 Feb 2008 Posts: 12 Location: Sweden
|
|
|
|
I pasted your code into a blank pds member and ran it with no problems apart from the obvious - I don't have the datasets.
Can you post the screen dump of the error message as what you posted looks very odd?
aDRIAN |
|
Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006 Posts: 1353 Location: Israel
|
|
|
|
Maybe you have PACK ON in your edit PROFILE ? |
|
Back to top |
|
|
jramuk
New User
Joined: 14 Nov 2007 Posts: 18 Location: US
|
|
|
|
Hi,
Thanks... the PROF had PACK ON |
|
Back to top |
|
|
|