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
 

 

How to add comments in SYSTSIN * and execute uncomment ones

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1013
Location: India

PostPosted: Thu Apr 29, 2010 2:30 am    Post subject: How to add comments in SYSTSIN * and execute uncomment ones
Reply with quote

Hi,

I have a JCL like the below one...
Code:
//TEST     EXEC PGM=IKJEFT01                                         
//SYSTSPRT DD SYSOUT=*                                               
//SYSPRINT DD SYSOUT=*                                               
//SYSABEND DD SYSOUT=*                                               
//SYSUDUMP DD SYSOUT=*                                               
//SYSMDUMP DD SYSOUT=*                                               
//SYSTSIN  DD *                                                       
DSN SYSTEM(DB2D)                                                     
-DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)                         
END                                                                   
//*---------------------------------------------NEED TO COMMENT HERE 
DSN SYSTEM(DB2M)                                                     
-DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)                         
END                                                                   
//*---------------------------------------------NEED TO COMMENT HERE 
DSN SYSTEM(DB2Q)                                                     
-DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)                         
END                                                                   
/*                                                                   

When i executed it, i am able to see only the results of below command,not the other two.
Code:
DSN SYSTEM(DB2D)                                                     
-DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)                         
END                                                                   

In JESJCL output is like below,
Code:
      //****************************************************************   
    2 //TEST     EXEC PGM=IKJEFT01                                         
    3 //SYSTSPRT DD SYSOUT=*                                               
    4 //SYSPRINT DD SYSOUT=*                                               
    5 //SYSABEND DD SYSOUT=*                                               
    6 //SYSUDUMP DD SYSOUT=*                                               
    7 //SYSMDUMP DD SYSOUT=*                                               
    8 //SYSTSIN  DD *                                                       
      //*---------------------------------------------NEED TO COMMENT HERE 
    9 //SYSIN     DD *               GENERATED STATEMENT                   
      //*---------------------------------------------NEED TO COMMENT HERE 
   10 //SYSIN     DD *               GENERATED STATEMENT                   


Can you please tell me how comment particular lines in SYSTSIN...

Thank You,
Sushanth
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Apr 29, 2010 3:47 am    Post subject:
Reply with quote

only a guess, can't find it in the manual, though the manual says
SYSTSIN consists of
  • comments
  • commands
  • subcommands


try the same as a db2 comment in spufi -- (two hypens)

the // in cols 1 & 2 are jes command indicators and as such,
delimit your instream SYSTSIN data.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8125
Location: East Dubuque, Illinois, USA

PostPosted: Thu Apr 29, 2010 5:18 am    Post subject:
Reply with quote

I would try a /* */ starting in column 2 or later, ending by column 71.
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1013
Location: India

PostPosted: Thu Apr 29, 2010 5:59 am    Post subject:
Reply with quote

Thank You Very Much Dino & Robert.

/* */ Works
Code:
//TEST     EXEC PGM=IKJEFT01                                           
//SYSTSPRT DD SYSOUT=*                                                 
//SYSPRINT DD SYSOUT=*                                                 
//SYSABEND DD SYSOUT=*                                                 
//SYSUDUMP DD SYSOUT=*                                                 
//SYSMDUMP DD SYSOUT=*                                                 
//SYSTSIN  DD *                                                         
 /* --   DSN SYSTEM(DB2M)                                            */
 /* --    -DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)              */
 /*--    END                                                         */
                                                                       
 /*      DSN SYSTEM(DB2M)                                               
                                                                       
       DSN SYSTEM(DB2D)                                                 
       -DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)                   
       END                                                             

Also i found that, i don't get any error messages if i leave */
Code:
READY                                                                   
 /* --   DSN SYSTEM(DB2M)                                            */
READY                                                                   
 /* --    -DISPLAY DATABASE(BOBT1) SPACENAM(*) LIMIT(*)              */
READY                                                                   
 /*--    END                                                         */
READY                                                                   
READY                                                                   
 /*      DSN SYSTEM(DB2M)                                               
READY                                                                   

Can you tell me the link where i can find info regarding SYSTSIN

Sushanth
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8125
Location: East Dubuque, Illinois, USA

PostPosted: Thu Apr 29, 2010 6:20 am    Post subject:
Reply with quote

Check the TSO manual. Actually, the DD name SYSTSIN is, by itself, almost meaningless. What is important is that you are executing IKJEFT01, which is the main TSO program. So the DD names and options are going to be found in the TSO manuals.
Back to top
View user's profile Send private message
sushanth bobby

Senior Member


Joined: 29 Jul 2008
Posts: 1013
Location: India

PostPosted: Thu Apr 29, 2010 6:32 am    Post subject:
Reply with quote

Found It... Thank You Robert.




Sushanth
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 Execute TSO ACF commands from COBOL-I... supreethi.srid TSO/ISPF 0 Tue Feb 21, 2017 5:19 pm
No new posts execute APP if they are not ADDRESS T... italo_pm CLIST & REXX 3 Fri Aug 12, 2016 2:15 am
No new posts Execute multiple DB2 Load commands in... faizm DB2 4 Wed Aug 03, 2016 12:53 pm
No new posts CEXEC not able to execute if no SLINE... boyti ko CLIST & REXX 2 Wed Apr 13, 2016 4:31 pm
No new posts CALL MACRO EXECUTE FORM - Setting the... sudarshan.srivathsav PL/I & Assembler 7 Tue Feb 09, 2016 10:32 pm


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