View previous topic :: View next topic
|
Author |
Message |
sobana
New User
Joined: 11 Nov 2006 Posts: 3
|
|
|
|
HI
can anyone help me to subtract two dates using any function in cobol |
|
Back to top |
|
|
William Thompson
Global Moderator
Joined: 18 Nov 2006 Posts: 3156 Location: Tucson AZ
|
|
|
|
Enterprise COBOL for zOS Language Reference Version 3 Release 3 igy3lr20
Chapter 22. Intrinsic functions
INTEGER-OF-DATE
The INTEGER-OF-DATE function converts a date in the Gregorian calendar from standard date form (YYYYMMDD) to integer date form.
Number-of-Days = Integer-of-Date (YYYYMMDD)
- Integer-of-Date (YYYYMMDD) |
|
Back to top |
|
|
priyesh.agrawal
Senior Member
Joined: 28 Mar 2005 Posts: 1448 Location: Chicago, IL
|
|
|
|
Sobana,
As Mr. William already guided you on to right way, just few lights on the functioning.
INTEGER-OF-DATE function returns value as an integer that is the number of days that the input date succeeds December 31, 1600 in the Gregorian calendar. The function result is a seven-digit integer with a range from 1 to 3,067,671.
So basically INTEGER-OF-DATE(INPUTDATE) would return an integer representing number of days between 12/31/1600 and your input date.
So now you should not be having problem understanding how this works:-
Code: |
COMPUTE NUMBER-DAYS-1 = FUNCTION INTEGER-OF-DATE(YYYYMMDD). //*input date 1
COMPUTE NUMBER-DAYS-2 = FUNCTION INTEGER-OF-DATE(YYYYMMDD). //*input date 2
COMPUTE DIFFERENCE-DAY= NUMBER-DAYS-1 - NUMBER-DAYS-2. |
|
|
Back to top |
|
|
|