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
 
Change todays date into julian date(YYYDDD) format

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
kalpana

New User


Joined: 19 Nov 2004
Posts: 24
Location: Banglore

PostPosted: Wed Jul 19, 2006 11:46 am    Post subject: Change todays date into julian date(YYYDDD) format
Reply with quote

Hi all,
I want to retrieve todays date in to one field. Again i have to change this date into julian date(YYYDDD) format
Please respond to this query.

Thanks
Kalpana
Back to top
View user's profile Send private message

Bharanidharan

New User


Joined: 20 Jun 2005
Posts: 86
Location: Chennai, India

PostPosted: Wed Jul 19, 2006 12:06 pm    Post subject: Re: ASSEMBLER Doubt
Reply with quote

You may wish to use TIME macro in your routines to get the current date/time stamp. It will return the date in the format you request. Here is an example:
Code:

          TIME  DEC,TIMEDATE,LINKAGE=SYSTEM,DATETYPE=YYYYDDD
TIMEDATE  DS    CL16         TIME AND DATE RETURNED

Here TIMEDATE is the variable where system would store the result. The first two full words in TIMEDATE would have time of the day in the format requested (DEC means format would be HHMMSS,milli,micro seconds); third full word would have the date in the format you requested (YYYYDDD); fourth full word must be initialized to zero before issuing TIME macro.

Please let me know if this is not what you want.
Back to top
View user's profile Send private message
yesyemviswa

New User


Joined: 13 Jul 2006
Posts: 2

PostPosted: Thu Jul 20, 2006 1:52 pm    Post subject: Re: Change todays date into julian date(YYYDDD) format
Reply with quote

Thanks a lot Bharanidhar........
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Partial color change of a field in CI... waseem0424 CICS 5 Fri Sep 29, 2017 7:56 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 Fetch Previous month & year in MM... girishb2 DFSORT/ICETOOL 3 Thu Sep 21, 2017 9:54 pm
No new posts Validate the Date girishb2 DFSORT/ICETOOL 9 Tue Sep 19, 2017 1:12 am
No new posts Convert rows and column into JSON for... Dinesh Manivannan DB2 2 Sun Sep 03, 2017 6:50 pm

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