HP3000-L Archives

February 2006, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Charles Finley <[log in to unmask]>
Reply To:
Charles Finley <[log in to unmask]>
Date:
Wed, 8 Feb 2006 14:02:19 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (42 lines)
This looks like it could do the trick.

http://www.simotime.com/cblday01.htm#DifferenceInDaysRoutine

Charles Finley
619-795-0720 

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]]On
Behalf Of Eben Yong
Sent: Wednesday, February 08, 2006 1:44 PM
To: [log in to unmask]
Subject: HP COBOL routine to calculate the difference between 2 dates


I'm slightly embarrassed to even post this question, as I feel I should be 
able to produce this code in a snap, but for some reason my brain must be 
somewhat tired today.  In any event, excuses aside, here is the question:

Would someone pls share their COBOL code that will calculate the 
difference between two given dates, and return the results in terms of 
years, months, and days?

For example, the difference between 20060125 and 20040611 is 1 year 7 
months and 14 days.  

Care to share?  
Thanks as always,
Eben Yong
Health Plan of San Mateo

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

__________ NOD32 1.1400 (20060208) Information __________

This message was checked by NOD32 antivirus system.
http://www.eset.com

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2