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

Subtract two dates in cobol


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sobana

New User


Joined: 11 Nov 2006
Posts: 3

PostPosted: Wed Nov 22, 2006 7:42 pm
Reply with quote

HI
can anyone help me to subtract two dates using any function in cobol
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 Nov 22, 2006 8:02 pm
Reply with quote

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
View user's profile Send private message
priyesh.agrawal

Senior Member


Joined: 28 Mar 2005
Posts: 1448
Location: Chicago, IL

PostPosted: Thu Nov 23, 2006 9:45 am
Reply with quote

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
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
No new posts Generate random number from range of ... COBOL Programming 3
Search our Forums:

Back to Top