Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref

Author Message
sobana

New User

Joined: 11 Nov 2006
Posts: 3

 Posted: Wed Nov 22, 2006 7:42 pm    Post subject: Subtract two dates in cobol HI can anyone help me to subtract two dates using any function in cobol

William Thompson

Global Moderator

Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

 Posted: Wed Nov 22, 2006 8:02 pm    Post subject: 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)
priyesh.agrawal

Senior Member

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

Posted: Thu Nov 23, 2006 9:45 am    Post subject: Re: Subtract two dates using any function in cobol

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.
 All times are GMT + 6 Hours
 Page 1 of 1

Search our Forum:

 Topic Author Forum Replies Posted Similar Topics Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 2 Tue Sep 26, 2017 3:07 am Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm Dynamic output file creation in cobol... smileheal COBOL Programming 7 Thu Jun 15, 2017 10:53 pm

 © 2003-2017 IBM MAINFRAME Software Support Division
 Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us