IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

problem in displaying a panel


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
asr1983

New User


Joined: 31 May 2005
Posts: 11

PostPosted: Wed Aug 17, 2005 2:49 pm
Reply with quote

hi all ,
this is what i have code in my rexx code ....

/******** REXX ***********/
SAY 'STARTING TO RUN A JOB'
"ISPEXEC LIBDEF ISPPLIB DATASET ID('TAXI@.OFFSHORE.JCL.MAY05'"
"ISPEXEC DISPLAY PANEL (PANEL1)"
SAY 'JOB RUN'
RETURN


and in my panel definition , i have coded

) ATTR DEFAULT(%+)
% TYPE(TEXT) INTENS(HIGH)
+ TYPE(TEXT) INTENS(LOW)
) BODY
+ A Sample panel - REXX Training
+ -------------------------------------
+
+ Enter your name please ==>
+
+ Name cannot exceed more than 15 chars +
+
+ Press ENTER to continue,PF3 to exit +
+
+
+
)end




and this is the output i am getting....

) ATTR DEFAULT( )
TYPE(TEXT) INTENS(HIGH)
TYPE(TEXT) INTENS(LOW)
) BODY
A Sample panel - REXX Training
-------------------------------------

Enter your name please ==>

Name cannot exceed more than 15 chars

Press ENTER to continue,PF3 to exit



can u tell me the reason why i am getting the output as such with all the lines given in PANEL and not as required whihc is only in the body
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Wed Aug 17, 2005 6:41 pm
Reply with quote

First, are you missing a closing parenthese here:
Code:

"ISPEXEC LIBDEF ISPPLIB DATASET ID('TAXI@.OFFSHORE.JCL.MAY05'"

Should't this be:
Code:

"ISPEXEC LIBDEF ISPPLIB DATASET ID('TAXI@.OFFSHORE.JCL.MAY05')"


Second, are there spaces on your panel section definions?
Code:

) ATTR DEFAULT(%+)
% TYPE(TEXT) INTENS(HIGH)
+ TYPE(TEXT) INTENS(LOW)
) BODY
+ A Sample panel - REXX Training
+ -------------------------------------
+
+ Enter your name please ==>
+
+ Name cannot exceed more than 15 chars +
+
+ Press ENTER to continue,PF3 to exit +
+
+
+
)end

instead of this:
Code:

)ATTR DEFAULT(%+)
% TYPE(TEXT) INTENS(HIGH)
+ TYPE(TEXT) INTENS(LOW)
)BODY
+ A Sample panel - REXX Training
+ -------------------------------------
+
+ Enter your name please ==>
+
+ Name cannot exceed more than 15 chars +
+
+ Press ENTER to continue,PF3 to exit +
+
+
+
)end

By the way, I would say:
Press ENTER to continue, END to exit
as there is no guarantee that the user has END assigned to the PF3 key.
Back to top
View user's profile Send private message
bluebird

Active User


Joined: 03 Feb 2004
Posts: 127

PostPosted: Wed Aug 17, 2005 6:49 pm
Reply with quote

there goes :

)ATTR (yours has a space)
)body (yours has a space

and the )ATTR field needs three default attribute characters (not 2 as specified in your example)
Back to top
View user's profile Send private message
asr1983

New User


Joined: 31 May 2005
Posts: 11

PostPosted: Wed Aug 17, 2005 6:54 pm
Reply with quote

hi all ,
i tried giving the )attr and )body without giving a space at the front ...

but following is the error message

ISPP111

Panel 'PANEL1' error
Illegal characters or statement type found in )ATTR section.






Panel line where error was detected:
)ATTR
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Wed Aug 17, 2005 7:07 pm
Reply with quote

Why don't you start over and copy in a new panel model.

Open a new member (PANEL1A maybe) in your ISPPLIB dataset. Make sure that you have NUMS OFF in your PROFILE.

Enter MODEL.

Select Option 6 PANELS - Panel formats and statements.

Scroll down to:
Panel Formats:
F0 PANFORM

and enter F0.

Use the model for F1 ENTRY - Data entry
by entering F1.

SAVE the panel definition. Now, you can use this as a template for your panel.
Back to top
View user's profile Send private message
asr1983

New User


Joined: 31 May 2005
Posts: 11

PostPosted: Wed Aug 17, 2005 7:36 pm
Reply with quote

Thanks for the reply
I am still facing problem
i have copied the panel defintion in new member

but i am unable to use MODEL command

i tried using MODEL command but it gives me message saying "MODEL PENDING"
and there is no options from where i can select option 6
Please let me know more in details

Thanks once again
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Thu Aug 18, 2005 7:00 pm
Reply with quote

I'm at a loss as to how to proceed.

The ISPPLIB (panel) PDS should be allocated as FB, LRECL=80, DSORG=PO. If it isn't, then that could be the problem. From what you have described, it's almost as if your panel definition is somehow corrupted. MODEL is a standard ISPF EDIT command, so, if it is not working, you need to get in touch with your systems programmers.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts IBM OnDemand Folders displaying to al... IBM Tools 6
No new posts Call program, directly from panel CLIST & REXX 9
No new posts z/vm installation problem All Other Mainframe Topics 0
Search our Forums:

Back to Top