How to resolve ISPN104 error in ISPF?



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

Re: How to resolve ISPN104 error in ISPF?

Postby mainframegeek » Wed Nov 28, 2012 1:03 am

Pedro wrote:
TSO EXEC 'XT.MNP121.PNL(XSTN009)''DEBUG'

another example of needing a delimiter between objects. You need a blank before 'DEBUG'


Pedro, in starting of my previous post, Firstly i tried with the space between object '(XSTN009)' and 'DEBUG'. But it threw the error. Both ways i tried, giving a space or without space.

Below mentioned is the statement in which LIBDEF is used.
I have changed DETTBLDS in clist.

Earlier it was like
SET &DETTBLDS = &STR(XT.XRTS.TABLOUT1) 
SET &SECTBLDS = &STR(SYS4.XEVL.TABLOUT) 

Later
SET &DETTBLDS = &STR(XT.XRTS.COMMON.DISK.TABLOUT1
SET &SECTBLDS = &STR(SYS4.XEVL.TABLOUT) 


Code present in the program XRTS2600 is given below.

WS-DATASET = DATASET
ISPF-LIBDEF  = LIBDEF
WS-ISPTLIB =  ISPTLIB
DETTBLDS =XT.XRTS.COMMON.DISK.TABLOUT1
SECTBLDS =SYS4.DEVL.TABLOUT


STRING '('                 DELIMITED BY SIZE 
       QUOTE               DELIMITED BY SIZE 
       DETTBLDS            DELIMITED BY SPACES
       QUOTE               DELIMITED BY SIZE 
       ' '                 DELIMITED BY SIZE 
       QUOTE               DELIMITED BY SIZE 
       SECTBLDS            DELIMITED BY SPACES
       QUOTE               DELIMITED BY SIZE 
       ')'                 DELIMITED BY SIZE 
           INTO            WS-DSN-LIST.       
CALL 'ISPLINK' USING ISPF-LIBDEF WS-ISPTLIB WS-DATASET
                     WS-DSN-LIST.                     


Let me try the option 7.8, i will update soon.
mainframegeek
 
Posts: 35
Joined: Sun Sep 16, 2012 1:57 pm
Has thanked: 3 times
Been thanked: 0 time

Re: How to resolve ISPN104 error in ISPF?

Postby mainframegeek » Wed Nov 28, 2012 1:12 am

Pedro, I tried 7.8 option. I got the below mentioned error.

Esssssssssssssssssssssssssssssss Dialog Test ssssssssssssssssssssssssssssssssN
e   Menu  Save  Utilities  Help                                              e
e sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss  e
e                  Invoke Dialog Function/Selection Panel                    e
e Command ===>                                                               e
e                                                               More:     +  e
e Invoke selection panel:                                                    e
e    PANEL  . .                                                              e
e    OPT  . . .                                                              e
e                                                                            e
e                                                                            e
e Invoke command:                                                            e
e    CMD  . . . TSO EXEC 'XT.MNP121.PNL(XSTN009)'                          e
e                                                                            e
e    LANG . . .                       (APL, CREX, or blank)                  e
e    MODE . . .                       (LINE, FSCR, or blank)                 e
e                                                                            e
e Invoke program:                                                            e
e    PGM  . . .                                                              e
e    PARM . . .                                                              e
e  F1=Help        F2=Split       F3=Exit        F4=Expand      F5=Rfind      e
e  F6=Resize      F7=Backward    F8=Forward     F9=Swap       F10=Actions    e
DssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssM
                                                                             
                                                                             
 Options:                                                                     
 IKJ56500I COMMAND TSO NOT FOUND                                             
 ***                                                                     


ISPD223                                           
                                                   
Invalid command                                   
Command 'TSO' not found or contains invalid syntax.
mainframegeek
 
Posts: 35
Joined: Sun Sep 16, 2012 1:57 pm
Has thanked: 3 times
Been thanked: 0 time

Re: How to resolve ISPN104 error in ISPF?

Postby Pedro » Wed Nov 28, 2012 2:29 am

Remove the TSO and only issue: EXEC 'XT.MNP121.PNL(XSTN009)'
Pedro Vera
User avatar
Pedro
 
Posts: 686
Joined: Thu Jul 31, 2008 9:59 pm
Location: Silicon Valley
Has thanked: 0 time
Been thanked: 53 times

Re: How to resolve ISPN104 error in ISPF?

Postby Pedro » Wed Nov 28, 2012 4:01 am

Earlier it was like
SET &DETTBLDS = &STR(XT.XRTS.TABLOUT1)
Later
SET &DETTBLDS = &STR(XT.XRTS.COMMON.DISK.TABLOUT1


Could it be as simple as a missing parenthesis? You do not show that statement in the clist that you presented to us. It is hard to help you when you do not provide the actual failing code.



Firstly i tried with the space between object '(XSTN009)' and 'DEBUG'. But it threw the error. Both ways i tried, giving a space or without space.

Secondly, I do not think you received the same error with the space.
Pedro Vera
User avatar
Pedro
 
Posts: 686
Joined: Thu Jul 31, 2008 9:59 pm
Location: Silicon Valley
Has thanked: 0 time
Been thanked: 53 times

Re: How to resolve ISPN104 error in ISPF?

Postby mainframegeek » Wed Nov 28, 2012 11:06 pm

Actually the error is due to change in environment, earlier the cobol program which was called from clist was in changeman and now its in endeavour.
WS-DATASET = DATASET
ISPF-LIBDEF  = LIBDEF
WS-ISPTLIB =  ISPTLIB
DETTBLDS =XT.XRTS.COMMON.DISK.TABLOUT1
SECTBLDS =SYS4.DEVL.TABLOUT


STRING '('                 DELIMITED BY SIZE
       QUOTE               DELIMITED BY SIZE
       DETTBLDS            DELIMITED BY SPACES
       QUOTE               DELIMITED BY SIZE
       ' '                 DELIMITED BY SIZE
       QUOTE               DELIMITED BY SIZE
       SECTBLDS            DELIMITED BY SPACES
       QUOTE               DELIMITED BY SIZE
       ')'                 DELIMITED BY SIZE
           INTO            WS-DSN-LIST.       
CALL 'ISPLINK' USING ISPF-LIBDEF WS-ISPTLIB WS-DATASET
                     WS-DSN-LIST.                     


In the string statement its is passing the dataset as "XT.XRTS.COMMON.DISK.TABLOUT1" but its expected as "'XT.XRTS.COMMON.DISK.TABLOUT1'". I changed it and executed the clist.
Thanks Pedro and peter for guiding me.
mainframegeek
 
Posts: 35
Joined: Sun Sep 16, 2012 1:57 pm
Has thanked: 3 times
Been thanked: 0 time

Re: How to resolve ISPN104 error in ISPF?

Postby NicC » Thu Nov 29, 2012 1:09 am

I very much doubt that it has anything to do with a move from Changeman to Endevor.
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: How to resolve ISPN104 error in ISPF?

Postby dick scherrer » Thu Nov 29, 2012 11:22 pm

Hello,

Unless the environments are not compatible. . .
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: How to resolve ISPN104 error in ISPF?

Postby NicC » Fri Nov 30, 2012 2:11 pm

The environment is still mainframe COBOL - the UNSTRING shown being COBOL and not CLIST
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: How to resolve ISPN104 error in ISPF?

Postby dick scherrer » Fri Nov 30, 2012 11:21 pm

Yup, but i wonder if due to inconsistent implementations, the code sent to the compiler is not the same . . .

d
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: How to resolve ISPN104 error in ISPF?

Postby Peter_Mann » Fri Nov 30, 2012 11:46 pm

I'm wondering since the OP never was able to or wanted to provide diagnostics from the DIALOG TEST or the DEBUG that the issue may be as simple as a different ISPF enviorment for each NEWAPPL ?
I know in Changeman creates a new APPL env
NEWAPPL(CMN&SS) NEWPOOL PASSLIB MODE(FSCR) SCRNAME(CMN&SS)
if he's expecting variable from a pool, profile or shared, that's not in his new enviorment, and the clist is not doing any error checking for a syntactically (Sp/fxd) correct or valid dataset, could throw an error
just a thought
Peter
Peter_Mann
 
Posts: 145
Joined: Fri Jun 24, 2011 7:37 pm
Location: Lowell,AR
Has thanked: 15 times
Been thanked: 3 times

PreviousNext

Return to TSO & ISPF

 


  • Related topics
    Replies
    Views
    Last post