error in creating panel



TSO Programming, ISPF, SDF, SDSF and PDF, FTP, TCP/IP Concepts, SNA & SNA/IP etc...

error in creating panel

Postby syamcs » Thu Feb 10, 2011 5:43 pm

I want to design a panel but the program is showing error ,the following is my code

/*REXX*/
ADDRESS ISPEXEC
"DISPLAY PANEL(PNL)"
/* MEMBER PNL
) PANEL
) ATTR DEFAULT(%+_)
% TYPE(TEXT) INTENS(HIGH)
+ TYPE(TEXT) INTENS(LOW)
) BODY
 +               A SAMPLE PANEL
 +     ########################################
 +     %ENTER YOUR NAME PLEASE===>_URNAME              +
 +
 +     +PRESS ENTER TO CONTINUE,PF3 TO EXIT            +
 +
 +
) INIT
) PROC
    VER (&URNAME,NE,ALPHAB)
)END
*/

the following is the error i am getting

ISPV021
Invalid GET request
Variable name ')' is not a valid REXX variable name.
syamcs
 
Posts: 56
Joined: Thu Feb 10, 2011 5:36 pm
Location: chennai
Has thanked: 0 time
Been thanked: 0 time

Re: error in creating panel

Postby enrico-sorichetti » Thu Feb 10, 2011 5:59 pm

You are mixing ISPF panel constructs with rexx code

here are the links to the relevant manuals
for REXX/TSO
http://publibz.boulder.ibm.com/cgi-bin/ ... s/IKJ4BK90

for ISPF
http://publibz.boulder.ibm.com/cgi-bin/ ... s/ISPZPM70
cheers
enrico
When I tell somebody to RTFM or STFW I usually have the page open in another tab/window of my browser,
so that I am sure that the information requested can be reached with a very small effort
enrico-sorichetti
Global moderator
 
Posts: 3002
Joined: Fri Apr 18, 2008 11:25 pm
Has thanked: 0 time
Been thanked: 164 times

Re: error in creating panel

Postby MrSpock » Thu Feb 10, 2011 6:35 pm

Yes. This part is fine for coding in REXX:

/*REXX*/
ADDRESS ISPEXEC
"DISPLAY PANEL(PNL)"


The calling code would be similar in any other language as well, like COBOL:
CALL ISPLINK ('DISPLAY ','PNL').


Then you need a member "PNL" in your panel library (ISPPLIB):

)PANEL
)ATTR DEFAULT(%+_)
% TYPE(TEXT) INTENS(HIGH)
+ TYPE(TEXT) INTENS(LOW)
)BODY
+               A SAMPLE PANEL
+     ########################################
+     %ENTER YOUR NAME PLEASE===>_URNAME              +
+
+     +PRESS ENTER TO CONTINUE,PF3 TO EXIT            +
+
+
)INIT
)PROC
    VER (&URNAME,NE,ALPHAB)
)END
User avatar
MrSpock
Global moderator
 
Posts: 809
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times

Re: error in creating panel

Postby Akatsukami » Thu Feb 10, 2011 9:00 pm

Note that, as Mr. Spock implies, the proximate cause of the error that you are getting is the spaces between the right parentheses and the keywords INIT and PROC.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: error in creating panel

Postby NicC » Fri Feb 11, 2011 2:04 am

the following is the error i am getting

ISPV021
Invalid GET request
Variable name ')' is not a valid REXX variable name.

1 - as shown the Rexx code is perfectly valid - just fails with panel not found
2 - once you create the panel THEN you get the errors specified
2 - once you fix the spaces after the )s I found, on my system, that ALPHAB is invalid
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: error in creating panel

Postby syamcs » Fri Feb 11, 2011 5:39 pm

thanks Mr.spock its working fine
syamcs
 
Posts: 56
Joined: Thu Feb 10, 2011 5:36 pm
Location: chennai
Has thanked: 0 time
Been thanked: 0 time


Return to TSO & ISPF

 


  • Related topics
    Replies
    Views
    Last post