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 to invoke a SKEL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
sureshbabuamara

New User


Joined: 20 Sep 2007
Posts: 16
Location: India

PostPosted: Fri Mar 07, 2008 6:13 pm    Post subject: Problem to invoke a SKEL
Reply with quote

Hi,

Using a REXX program I am trying to invoke a SKEL, the problem here is only some part of the SKEL copying into the output file but not the entire SKEL.

Code:

   ADDRESS ISPEXEC "CONTROL ERRORS RETURN"
   'ISPEXEC FTCLOSE'                     
   'ISPEXEC FTOPEN'                       
   'ISPEXEC FTINCL 'JOBNAME   ----> "ISPEXEC FTINCL JOBXXXXX"             
   'ISPEXEC FTINCL INTRDR'               
   'ISPEXEC FTCLOSE'                     

Below is the TRACED code

669 *-*        'ISPEXEC FTOPEN'           
    >L>          "ISPEXEC FTOPEN"         
670 *-*        'ISPEXEC FTINCL 'JOBNAME   
    >L>          "ISPEXEC FTINCL "         
    >V>          "JOBXXXXX"               
    >O>          "ISPEXEC FTINCL JOBXXXXX"
    +++ RC(20) +++                         
671 *-*        'ISPEXEC FTINCL INTRDR'   
    >L>          "ISPEXEC FTINCL INTRDR"
672 *-*        'ISPEXEC FTCLOSE'         
    >L>          "ISPEXEC FTCLOSE"



RC(20) is "Severe error"

JOBXXXXX contains 265 rows but only 30 rows are copying into the output file and INTRDR contains 15 rows, these 15 rows are properly appending to the above 30 rows.

Expected rows are 265 + 15 = 280, but actual output file has 30 + 15 = 45.

Can any one tell how can I over come this problem.
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Fri Mar 07, 2008 11:11 pm    Post subject:
Reply with quote

Try to display ZERRSM & ZERRLM to find out the actual problem.

O.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
Location: italy

PostPosted: Fri Mar 07, 2008 11:24 pm    Post subject: Reply to: Problem to invoke a SKEL
Reply with quote

maybe the 31st row has something wrong in it icon_smile.gif
Back to top
View user's profile Send private message
sureshbabuamara

New User


Joined: 20 Sep 2007
Posts: 16
Location: India

PostPosted: Mon Mar 10, 2008 2:48 pm    Post subject:
Reply with quote

Thank you O and enrico sorichetti.

By using ZERRSM & ZERRLM I found out the problem is with the "<" symbol present in the line number 30, so I have removed the "<" symbol and ran the program again, this time error is showing at line 34.

I cant remove these comments in the JCL because these are exisiting JCLS.
Code:
000028 //             DISP=SHR                                                 
000029 //         DD  DSN=DB2LIBC.DSNLOAD,                                     
000030 //             DISP=SHR                                                 
000031 //SYSTSIN  DD  DSN=ENDEVOR.PR.PRM(JOBXXXM1),         ==DSN DB2 RUN PARM
000032 //             DISP=SHR                                                 
000033 //INCTRLF  DD  DUMMY                                                   
000034 //INPARM   DD  DSN=ENDEVOR.PR.PRM(JOBXXXM1),          <==PARAMETER FILE
000035 //             DISP=SHR                                                 
000036 //OUTREP   DD  DSN=JOBXXXM1.&RUN..INPUT.REPT(+1),             
000037 //             DISP=(,CATLG,DELETE),                 ==>TO PRINTEOS     


Can any one help me how to over come this problem
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Mar 10, 2008 3:40 pm    Post subject:
Reply with quote

You can use any character in an ISPF skeleton. Simply read the fine manual.

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

New User


Joined: 20 Sep 2007
Posts: 16
Location: India

PostPosted: Mon Mar 10, 2008 4:24 pm    Post subject:
Reply with quote

Hi O,

I am not using "<" or ">" as an Comparison Operators in my JCL, In the exisitng system while writing a comment in JCL for easy understanding, all the Input file comments will start "<==" for output file with "==>".

In the previous example(post) for record 34, the error messages are:
ZERRLM : "Invalid cond. sub. string, JOBXXXM1 record-34"
ZERRSM : "Substitution error "

My understanding:
I think While loading the Skel, these comments("<==") are treating as an Comparison operator, so the error messages is Substitution error(Condtional operation).

If you don't mind can you please give me the exact URL, which you have mentioned above.

currently I am referring the below link:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iea1b640/17.1.4.2?SHELF=&DT=20000718114500
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
Location: italy

PostPosted: Mon Mar 10, 2008 5:27 pm    Post subject: Reply to: Problem to invoke a SKEL
Reply with quote

I would rather refer to
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ispdgd03/9.1?SHELF=ISPBKM08.bks&DT=19990720104842

which tells the reason why < > are reserved characters even if in a data statement

if You play around a little bit with the )DEFAULT statement You might overcome Your issues

I guess that also all the other posts complaining about ftincl error might have been hit by the <> conditional substitution issue
Back to top
View user's profile Send private message
sureshbabuamara

New User


Joined: 20 Sep 2007
Posts: 16
Location: India

PostPosted: Mon Mar 10, 2008 8:59 pm    Post subject:
Reply with quote

Thank you enrico sorichetti.

By using )DEFAULT statment now entire JCL is getting copied to my output file.
Code:

/*ROUTE PRINT LOCAL
DEFAULT )&?!$¢@    ----   replaced <,|,> with $,¢,@
//SET RUN=PROD,   
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
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Strings with double quotes having pro... raja Arumugam All Other Mainframe Topics 11 Thu Mar 30, 2017 10:34 am
No new posts Problem reading GTF trace output danik56 ABENDS & Debugging 7 Thu Mar 16, 2017 1:02 pm
No new posts INVOKE WEBSERVICE error danik56 CICS 11 Thu Mar 09, 2017 11:52 am
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts SYMNAMES problem jacobdng DFSORT/ICETOOL 7 Thu Dec 22, 2016 7:47 am


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