Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
how to read a record using the julien date (yyddd)

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
ksssrikanth

New User


Joined: 21 Jul 2005
Posts: 6

PostPosted: Wed May 02, 2007 4:04 am    Post subject: how to read a record using the julien date (yyddd)
Reply with quote

hi ,
i need to read 5 character julien date yyddd format.
but when i am using DATE3 option in jcl , i am getting the 2007121 ,but i need to read only 07121,

ex :
include cond=(1,5,ch,eq,date3)

here 1,5 represents 07121
but date3 represent 2007121

so is there any command to truncate DATE3 to 5 characters instead of 7 characters.

thanks
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


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

PostPosted: Wed May 02, 2007 4:45 am    Post subject:
Reply with quote

You can use this DFSORT INCLUDE statement:

Code:

   INCLUDE COND=(1,5,Y2T,EQ,Y'DATE3')


For more information, see:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA20/3.7.12?DT=20060615185603
Back to top
View user's profile Send private message
ksssrikanth

New User


Joined: 21 Jul 2005
Posts: 6

PostPosted: Wed May 02, 2007 6:03 pm    Post subject: Re: how to read a record using the julien date (yyddd)
Reply with quote

Thanks , its working ..icon_smile.gif
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts Compare yesterday's date to the one o... migusd SYNCSORT 11 Fri Sep 22, 2017 11:35 pm
No new posts Validate the Date girishb2 DFSORT/ICETOOL 9 Tue Sep 19, 2017 1:12 am
No new posts how to see when the last read access ... Mike 1304 DB2 1 Tue Sep 12, 2017 7:52 pm
No new posts Julian Date to CICS ABSTTIME blayek CICS 3 Wed Aug 30, 2017 11:15 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us