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

How to give Symbolic overrides in INCLUDE statement of SYSIN


IBM Mainframe Forums -> DFSORT/ICETOOL
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Tamanna

New User


Joined: 07 Oct 2006
Posts: 6
Location: Chennai

PostPosted: Wed Apr 25, 2007 3:05 pm
Reply with quote

Can any one please let me know how to give a Symbolic overrides within SYSIN card of SORT statement in JCL .

Example:

Code:

//SYSIN    DD *                         
  SORT FIELDS=COPY
  INCLUDE COND=(20,01,CH,EQ,C'R',AND,       
            90,07,CH,GE,C'2070416',AND,
            90,07,CH,LE,C'2070422')     


Can the date variables '2070416' and '2070422' be overriden ?
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ

PostPosted: Wed Apr 25, 2007 3:25 pm
Reply with quote

Input can not be overriden directly but a sysin dataset can be created dynamically.
Back to top
View user's profile Send private message
Tamanna

New User


Joined: 07 Oct 2006
Posts: 6
Location: Chennai

PostPosted: Wed Apr 25, 2007 3:34 pm
Reply with quote

Can you please let me know the procedure to create Dynamic Sysin card so that manual updation of data can be avoided within the INCLUDE statement
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Wed Apr 25, 2007 8:19 pm
Reply with quote

You can use DFSORT Symbols for fields or constants in DFSORT and ICETOOL statements. For example, you could use:

Code:

...
//SYMNAMES DD *
MYDATE1,'2070416'
MYDATE2,'2070422'
/*
//SYSIN DD *
  SORT FIELDS=COPY
  INCLUDE COND=(20,01,CH,EQ,C'R',AND,       
            90,07,CH,GE,MYDATE1,AND,
            90,07,CH,LE,MYDATE2)     
/*


You can then override MYDATE1 and MYDATE2 with any dates you supply in SYMNAMES. For example:

Code:

//SYMNAMES DD *
MYDATE1,'2070501'
MYDATE2,'2070512'
/*


SYMNAMES can also point to a sequential data set or pds member as long as it has RECFM=FB and LRECL=80.

For more information on DFSORT symbols, see:

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA20/7.0?DT=20060615185603

If that's not what you want to do, then you need to explain in more detail what it is you want to do.
Back to top
View user's profile Send private message
Tamanna

New User


Joined: 07 Oct 2006
Posts: 6
Location: Chennai

PostPosted: Thu Apr 26, 2007 1:54 pm
Reply with quote

Thanks frank.

The above code is working fine. But please find a small change to it.

Code:

//SYMNAMES DD *                             
MYDATE1,C'2070501'                         
MYDATE2,C'2070502'                     
/*                                         
//SYSIN    DD *                             
  SORT FIELDS=COPY                           
  INCLUDE COND=(20,01,CH,EQ,C'R',AND,       
                90,07,CH,GE,MYDATE1,AND,     
                90,07,CH,LE,MYDATE2)         
/*
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Thu Apr 26, 2007 8:59 pm
Reply with quote

A small, unnessary change. DFSORT will treat:

MYDATE1,'2070501'

the same as:

MYDATE1,C'2070501'

You can code the C if you like but you don't need it.
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 -> DFSORT/ICETOOL

 


Similar Topics
Topic Forum Replies
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts JOIN STATEMENT PERFORMANCE. DFSORT/ICETOOL 12
No new posts Generate output lines (SYSIN card for... DFSORT/ICETOOL 4
No new posts pass data as symbolic parameter from ... CLIST & REXX 2
No new posts How to give complex condition in JCL . CLIST & REXX 30
Search our Forums:

Back to Top