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
 

 

ISPF Panel error COMMAND NOT FOUND
Goto page 1, 2, 3  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Fri Nov 02, 2007 1:59 am    Post subject: ISPF Panel error COMMAND NOT FOUND
Reply with quote

Hi When I am executing my Panel getting following error.

STMT 17 - LABEL PANEL1 SPECIFIED BUT COMMAND NOT FOUND
***

What is the problem in my panel and calling the panel?...


Code:

PANEL KEYLIST(ISPSAB)                                 
)ATTR                                                 
! TYPE(TEXT) COLOR(YELLOW) INTENS(LOW)  CAPS(OFF)     
# TYPE(TEXT) COLOR(BLUE)   INTENS(HIGH) CAPS(OFF)     
* TYPE(TEXT) COLOR(GREEN)  INTENS(HIGH) SKIP(ON)     
$ TYPE(TEXT) COLOR(TURQ)   INTENS(HIGH) CAPS(OFF)     
% TYPE(TEXT) COLOR(RED)    INTENS(HIGH) CAPS(OFF)     
)BODY EXPAND(//) WINDOW(72,20)                       
#                                                     
#                                                     
#                                                     
#                                                     
#                                                     
#                                                     
#                                                     
#                                                     
%/-/ 
#/-/ SENTHILNATHAN            - WELCOME TO THE MENU       /-/     
!/ / POS HISTORY EXTRACTION   - AUTOMATION TOOL/ /                 
%/-/                                                               
$                                        PRESS ANY TO CONTINUE....
#                                                                 
#                                                                 
)END         



Rexx code :


Code:
****************************************************************/
/*                                                              */
/*  INITIALIZATION                                              */
/*      - DEFINE PANEL / MESSAGES LIBRARY TO THE SYSTEM         */
/*                                                              */
/****************************************************************/
1000_INITIALIZATION:                                               
    ADDRESS ISPEXEC                                               
"ISPEXEC LIBDEF ISPPLIB DATASET ID('CAA1035.REXX.PANEL') UNCOND"   
RETURN                                                             
/****************************************************************/
/*                                                              */
/*  PANLE1   DISPLAY                                            */
/*      - TO DISPLAY THE WELCOME PANEL                          */
/*                                                              */
/****************************************************************/
PANEL1:         
   ADDRESS ISPEXEC                     
   "ADDPOP ROW(0) COLUMN(0)"           
   "ISPEXEC DISPLAY PANEL(PANEL1)"     
   "REMPOP"                           
   RETURN                             
Back to top
View user's profile Send private message

PeD

Active User


Joined: 26 Nov 2005
Posts: 456
Location: Belgium

PostPosted: Fri Nov 02, 2007 2:14 am    Post subject:
Reply with quote

Please show more code; especially the calling parts.
I believe the problem stays before.

STMT 17 ??

If no more code before , then why a "RETURN" at line 10 ??
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Fri Nov 02, 2007 2:22 am    Post subject:
Reply with quote

Hi,

Thats only my code. I am trying to call my panel (panel1) in this program.
For 1000_INITIALIZATION routine I am using RETURN, so once after executing this routine, next PANEL1 will execute.

Basically I am trying to call this panel by displaying welcome message. First time I am trying with panel. I dono why I am getting that error. I am not able to crack that one.
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Fri Nov 02, 2007 2:28 am    Post subject:
Reply with quote

If I put /* REXX */ at the top, it is not showing any error and it is not displaying anything in the screen.
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 456
Location: Belgium

PostPosted: Fri Nov 02, 2007 2:44 am    Post subject:
Reply with quote

remove the 1000_INI..... the return and replace the last return by an EXIT.

You can also execute a first statement TRACE I to trace ( obviously ).

Have a try

Cheers
Pierre
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 456
Location: Belgium

PostPosted: Fri Nov 02, 2007 2:48 am    Post subject:
Reply with quote

Code:
/*   REXX   */                                                               
TRACE I                                                                     
CALL 100_INIT                                                               
CALL PANEL1
EXIT                                                                 
100_INIT:                                                                   
ADDRESS ISPEXEC                                                             
"ISPEXEC LIBDEF ISPPLIB DATASET ID ('CAA1035.REXX.PANEL') UNCOND "     
RETURN                                                                       
                                                                   
PANEL1:                                                                     
ADDRESS ISPEXEC                                                             
 "ADDPOP ROW(0) COLUMN(0)"                                                   
 "ISPEXEC DISPLAY PANEL(PANEL1)"                                           
 "REMPOP"                                                                   
 RETURN                                                                     
 


You know you are using a POP Panel?
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Sat Nov 03, 2007 1:12 am    Post subject:
Reply with quote

Pierre,

Thank you very much.

I know I am using POP panel by using REMPOP command.

Trace command is showing upto which line it went fine


3 *-* CALL 100_INIT
6 *-* 100_INIT:
7 *-* ADDRESS ISPEXEC
8 *-* "ISPEXEC LIBDEF ISPPLIB DATASET ID ('CAA1035.REXX.PANEL') UNCOND "
>L> "ISPEXEC LIBDEF ISPPLIB DATASET ID ('CAA1035.REXX.PANEL') UNCOND
"
9 *-* RETURN
4 *-* CALL PANEL1
11 *-* PANEL1:
12 *-* ADDRESS ISPEXEC
13 *-* "ADDPOP ROW(0) COLUMN(0)"
>L> "ADDPOP ROW(0) COLUMN(0)"
14 *-* "ISPEXEC DISPLAY PANEL(PANEL1)"
>L> "ISPEXEC DISPLAY PANEL(PANEL1)"
***

then I am getting following error.


Code:

******************************************************************************
* ISPP130                                                                    *
*                                                                            *
* Panel 'PANEL1' error                                                       *
* A panel section is out of order or has already been defined.               *
*                                                                            *
*                                                                            *
*                                                                            *
*                                                                            *
*                                                                            *
*                                                                            *
* Panel line where error was detected:                                       *
* )ATTR                                                                      *
*                                                                            *
* Enter HELP command for further information regarding this error.           *
* Press ENTER key to terminate the dialog.                                   *
*                                                                            *
*                                                                            *
*                                                                            *
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Sat Nov 03, 2007 1:24 am    Post subject: Reply to: ISPF Panel error
Reply with quote

Unless You dropped something when cutting/pasting

the panel should start with
Code:
)panel
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Sat Nov 03, 2007 1:30 am    Post subject:
Reply with quote

Yea I used )panel only. When copying I missed ). Still I am hitting the same error. icon_cry.gif
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: Sat Nov 03, 2007 1:52 am    Post subject: Reply to: ISPF Panel error
Reply with quote

The attributes following the )ATTR tag are supposed to be indented. Copy in one of the ATTR section models and see what I mean.
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Sat Nov 03, 2007 2:25 am    Post subject:
Reply with quote

Could you explain more on this?
Back to top
View user's profile Send private message
Mickeydusaor

Active User


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

PostPosted: Sat Nov 03, 2007 3:51 am    Post subject:
Reply with quote

if you do as Enrico stated.. )PANEL KEYLIST(ISPSAB) it work just as is...
Back to top
View user's profile Send private message
sreekanth.sama

New User


Joined: 05 Sep 2007
Posts: 6
Location: bangalore

PostPosted: Sat Nov 03, 2007 4:40 am    Post subject: Reply to: ISPF Panel error
Reply with quote

Hi..
I am not sure whether your problem is resolved or not. But i just tried the same code, but i put as )PANEL in my first line of the panel definition. It went fine for me..

Thanks,
Sreeks
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Sat Nov 03, 2007 6:30 am    Post subject: Reply to: ISPF Panel error
Reply with quote

It is not resolved for me, even I given )PANEL in my first line.

Do you have any idea whether I need to setp any library for this panel.
when I checked TSO DDRSN. My panel library is available in ISPPEXEC.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Sat Nov 03, 2007 4:21 pm    Post subject:
Reply with quote

May I suggest allocating the library where the panel resides into ISPPLIB

The syntax is above in the example given by PeD
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Mon Nov 05, 2007 8:36 pm    Post subject:
Reply with quote

I allocated my panel library in ISPPLIB by using the following command. Still getting the same error.


Code:
ADDRESS ISPEXEC                                                     
"ISPEXEC LIBDEF ISPPLIB DATASET ID ('CAA1035.REXX.PANEL') UNCOND " 



when I do TSO ISRDDN command, I didnt my my panel library listed over there. I dono how to proceed hereafter. Any idea to resolve this.

Code:
AF2R11   SHR,KEEP   >    ISPLLIB  SYS1.SISPLOAD                     
AF2R11   SHR,KEEP   >             SYS1.SISPSASC                     
AF2R11   SHR,KEEP   >             SYS1.SGIMLMD0                     
AF2R11   SHR,KEEP   >             SYS1.DGTLLIB                       
AF2R11   SHR,KEEP   >             SYS1.DFQLLIB                       
AF2R11   SHR,KEEP   >             SYS1.DGTLLIB                       
AF2R11   SHR,KEEP   >             SYS1.SCBDHENU                     
DB2AX2   SHR,KEEP   >             DUD1AXT.RUNLIB.LOAD               
DB2AX2   SHR,KEEP   >             DUD1AXT.DSQLOAD                   
DB2AX1   SHR,KEEP   >             SYS1.AXA.DSNEXIT                   
DB2AX1   SHR,KEEP   >             SYS1.AXA.DSNLOAD                   
DMST02   SHR,KEEP   >             BPRA.JAQC.LOADB           
Back to top
View user's profile Send private message
Mickeydusaor

Active User


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

PostPosted: Mon Nov 05, 2007 8:42 pm    Post subject:
Reply with quote

if this is not your user id CAA1035, then remove the quotes and change the UNCOND to STACK
Back to top
View user's profile Send private message
senmainframe
Currently Banned

New User


Joined: 09 Oct 2007
Posts: 30
Location: USA

PostPosted: Mon Nov 05, 2007 8:49 pm    Post subject:
Reply with quote

CAA1035 is my user-id, I want my REXX panel to be exectuted from this library.
Back to top
View user's profile Send private message
Mickeydusaor

Active User


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

PostPosted: Mon Nov 05, 2007 8:59 pm    Post subject:
Reply with quote

If that is your TSO USERID() then it would work, the ISRDDN display
you showed is for ISPLLIB which is for executable load modules.
You need to be looking at what is defined for ISPPLIB.



ISPPLIB ,HWDX940.SED.ISPPLIB
,HR.DHSPROD1.PLIB
,HR.DHS.Z14.PLIB
,HR.DHS.PLIB
,ISP.SISPPENU
,SYS1.SBPXPENU
,SYS1.DGTPLIB
,ISF.SISFPLIB
,CBC.SCBCPNL
[/list]
Back to top
View user's profile Send private message
PeD

Active User


Joined: 26 Nov 2005
Posts: 456
Location: Belgium

PostPosted: Mon Nov 05, 2007 9:04 pm    Post subject:
Reply with quote

Please post again the complete code of your panel.
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 -> TSO/ISPF All times are GMT + 6 Hours
Goto page 1, 2, 3  Next
Page 1 of 3

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Is the 'prompt' data for the DSLIST p... Willy Jensen TSO/ISPF 2 Tue Dec 06, 2016 4:38 am
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 6 Fri Nov 18, 2016 1:48 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm


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