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

Panel 'INDXSCR' error, Panel Not Found


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
diwa_thilak

Active User


Joined: 13 Jul 2006
Posts: 205
Location: At my desk

PostPosted: Thu Feb 08, 2007 5:46 pm
Reply with quote

Hi Friends,

I have designed a panel and when i try to compile the program using ISPF option 7.2, i am getting the following error message.

* ISPP100 *
* *
* Panel 'INDXSCR' error *
* Panel not found. *
INDXSCR is name of the panel and the panel is available in my personnel dataset SPM444.TEST.PANEL.

Then i tried updating my CLIST with the PDS member name.
But still i could not resolve this error.

Any suggestions ?

Thanks,
Diwakar

Nobody is perfect i am Nobody
Back to top
View user's profile Send private message
cpuhawg

Active User


Joined: 14 Jun 2006
Posts: 331
Location: Jacksonville, FL

PostPosted: Thu Feb 08, 2007 6:48 pm
Reply with quote

Do you have the panel library defined in your REXX?

Code:

ADDRESS ISPEXEC "LIBDEF ISPPLIB DATASET ID('SPM444.TEST.PANEL')"     
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Thu Feb 08, 2007 6:51 pm
Reply with quote

You can type the LIBDEF ISPPLIB in 7.6 screen, just before 7.2.

O.
Back to top
View user's profile Send private message
diwa_thilak

Active User


Joined: 13 Jul 2006
Posts: 205
Location: At my desk

PostPosted: Fri Feb 09, 2007 4:34 pm
Reply with quote

Hi,

When i tried executing the above command i am getting the following error message.

Service RC = 4.

Please let me know to execute the panel ?

I have the following doubts.

1. Is there restrictions for the LRECL (for panel) ?
2. Is there restriction that the panel should start @ specified cols.

Thanks,
Diwakar

Nobody is perfect. I am Nobody
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Fri Feb 09, 2007 9:51 pm
Reply with quote

Have you tried the fine manual???

It looks like you want us to teach you the basics...

O.
Back to top
View user's profile Send private message
diwa_thilak

Active User


Joined: 13 Jul 2006
Posts: 205
Location: At my desk

PostPosted: Sat Feb 10, 2007 10:18 am
Reply with quote

Thanks ofer..

The manually really helped a lot....
Back to top
View user's profile Send private message
ug123
Warnings : 1

New User


Joined: 01 Mar 2007
Posts: 39
Location: Chennai

PostPosted: Thu Mar 01, 2007 8:23 pm
Reply with quote

Hi all,

I too have the same problem but with different panel error name

Im running the rexx tool using a command

My scenario is like this
Im going to comment a set of lines at a time for a jcl by giving a single command in the command line. It will invoke a panel and the panel will get the input as 'J' for JCL and it will comment the selected lines

Problem is if I open the jcl from a pds member im not getting this error, but if I open the jcl from the spool (using sj), similarly it will invoke the panel and the control will go back to the program, but it will throw the panel error. The following is the error that im getting.


ISPP100

Panel 'ISFEPAN4' error
Panel not found.


Enter HELP command for further information regarding this error.
Press ENTER key to terminate the dialog.


Below is the part of rexx code that I coded for panel description

Code:

MYLIB = 'BOST.NBK2YYK.REXX.PANELS'           
"ISPEXEC LIBDEF ISPPLIB DATASET ID('"MYLIB"')"
"ISPEXEC DISPLAY PANEL(COMTPANL)"   /*DISPLAYS


And my panel looks like this

Code:

)ATTR DEFAULT(%+_)                                               
       _ TYPE(INPUT) INTENS(HIGH) CAPS(ON) JUST(LEFT) COLOR(RED)
       # TYPE(TEXT) INTENS(HIGH) COLOR(GREEN)                   
       ? TYPE(TEXT) INTENS(HIGH) COLOR(WHITE)                   
)BODY                                                           
.
.
.
.
)INIT                 
)PROC                 
  VER (&COMT,NB,ALPHAB)
)END                   


Thanks,
Ugandar
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 Mar 01, 2007 8:41 pm
Reply with quote

If your code specifes this:

"ISPEXEC DISPLAY PANEL(COMTPANL)"

meaning that your panel name is COMTPANL, then why is the message stating:

Panel 'ISFEPAN4' error
Panel not found.

Where is the panel name ISFEPAN4 coming from?
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Fri Mar 02, 2007 12:29 am
Reply with quote

ISFEPAN4 sounds to me like an SDSF panel...

O.
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Fri Mar 02, 2007 9:01 pm
Reply with quote

It is an SDSF panel
Back to top
View user's profile Send private message
ug123
Warnings : 1

New User


Joined: 01 Mar 2007
Posts: 39
Location: Chennai

PostPosted: Sat Mar 03, 2007 9:17 am
Reply with quote

I dont know whether it's an sdsf panel or not. But my panel name is 'COMTPANL'

I have n't used sdsf panel but i dont know how it is coming

Any other way to handle sdsf panel error


Thanks,
Ugandar
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Mon Mar 05, 2007 8:33 pm
Reply with quote

If you will use the save and restore commands it might solve your problem.

"CONTROL DISPLAY SAVE"

"ISPEXEC DISPLAY PANEL(COMTPANL)" /*DISPLAYS */

"CONTROL DISPLAY RESTORE"
Back to top
View user's profile Send private message
ug123
Warnings : 1

New User


Joined: 01 Mar 2007
Posts: 39
Location: Chennai

PostPosted: Wed Mar 07, 2007 9:04 am
Reply with quote

Thanks Mickey but still my problem is not yet solved

I will send my code, anyone try this and solve my problem please

This is my code...

/*REXX*/
/*COMMENTS SINGLE LINE OR BLOCK OF LINES AT A TIME*/
'ISREDIT MACRO NOPROCESS'
'ISPEXEC CONTROL ERRORS RETURN'
'ISREDIT PROCESS RANGE S'
IF RC ?= 0 THEN /*CHECKS FOR OUT OF RANGE*/
DO;
ZEDSMSG='COMMAND CONFLICT'
"ISPEXEC SETMSG MSG(ISRE046)"
EXIT
END;
'ISREDIT (FLIN) = LINENUM .ZFRANGE'
'ISREDIT (LLIN) = LINENUM .ZLRANGE'
MYLIB = 'BOST.NBK2YYK.REXX.PANELS'
"ISPEXEC LIBDEF ISPPLIB DATASET ID('"MYLIB"')"
"ISPEXEC CONTROL DISPLAY SAVE"
"ISPEXEC DISPLAY PANEL(COMTPANL)" /*DISPLAY PANELS*/
"ISPEXEC CONTROL DISPLAY RESTORE"
SAY RC
DO WHILE FLIN <= LLIN
'ISREDIT (ROW) = LINE &FLIN'
IF COMT = 'J' THEN
DO
ROW = ('//*'||ROW)
END
ELSE IF COMT = 'C' THEN
DO
ROW = OVERLAY('*',ROW,7)
END
ELSE IF COMT = '' THEN
SAY 'OPTION IS NOT SPECIFIED'
ELSE SAY 'INVALID OPTION'
'ISREDIT LINE &FLIN = (ROW)'
FLIN = FLIN + 1
END


This is my panel...

)ATTR DEFAULT(%+_)
_ TYPE(INPUT) INTENS(HIGH) CAPS(ON) JUST(LEFT) COLOR(RED)
# TYPE(TEXT) INTENS(HIGH) COLOR(GREEN)
? TYPE(TEXT) INTENS(HIGH) COLOR(WHITE)
)BODY
# +
#********************************************************
#*+ #*
#*+ #*
#*+ #*
#*+ #*
#*+ #-------------------------------------------------- #*
#*+ # SIMPLE WAY TO COMMENT JCL OR COBOL #*
#*+ #-------------------------------------------------- +#*
#*+ #*
#*+ #ENTER J FOR JCL COMMENT +#*
#*+ +#*
#*+ #ENTER C FOR COBOL COMMENT #*
#*+ #*
#*+ #OPTION _COMT #*
#*+ #*
#*+ #*
#*+ #*
#*+ #*
#*+ +PRESS ENTER TO CONTINUE,PF3 TO EXIT #*
#*+ #*
#********************************************************
# +
)INIT
)PROC
VER (&COMT,NB,ALPHAB)
)END



Thanks,
Ugandar...
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Thu Mar 08, 2007 12:12 am
Reply with quote

Have you tried running it with TRACE I?

O.
Back to top
View user's profile Send private message
Mickeydusaor

Active User


Joined: 24 May 2006
Posts: 258
Location: Salem, Oregon

PostPosted: Thu Mar 08, 2007 12:39 am
Reply with quote

You also need to add the following command to make this work.


"ISREDIT END"
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Help on IMS -API URL migrating from P... IMS DB/DC 1
No new posts Mark Previous & next lines when a... DFSORT/ICETOOL 9
No new posts JES datasets IO Error ABENDS & Debugging 3
No new posts Error to invoke MPP program through B... IMS DB/DC 3
No new posts Preserve changes to ISPF Panel Variables TSO/ISPF 5
Search our Forums:

Back to Top