Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

problem in displaying a panel

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
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    Post subject: problem in displaying a panel
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

Moderator Team Head


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

PostPosted: Wed Aug 17, 2005 6:41 pm    Post subject: Re: problem in displaying a panel
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    Post subject:
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    Post subject: Re: problem in displaying a panel
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

Moderator Team Head


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

PostPosted: Wed Aug 17, 2005 7:07 pm    Post subject: Re: problem in displaying a panel
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    Post subject: Re: problem in displaying a panel
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

Moderator Team Head


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

PostPosted: Thu Aug 18, 2005 7:00 pm    Post subject: Re: problem in displaying a panel
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    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm
No new posts ISPF - How to come out of ISPF Panel parasmalik20 TSO/ISPF 5 Tue Feb 21, 2017 7:44 pm
No new posts the use of 'B3'x character in a panel Pedro TSO/ISPF 1 Thu Feb 16, 2017 3:09 am
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts Design of ISPF panel prino TSO/ISPF 2 Wed Jan 25, 2017 10:31 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us