🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: alt.lang.asm
Article #372

Re: HOW 2: Count days between two dates

#372
From: Manuel Algora
Date: Sat, 15 May 1999 00:00
12 lines
1290 bytes
On Fri, 14 May 1999 13:12:30 +0200, "TMF" <tmf3@hotmail.com> wrote:

>How can I count the days between two dates in D-M-YYYY format?

Make a Julian Date function.

Julian date = 1721028.5367 + D + 367*Y -7*(Y+(M+9)\12)\4
-3*((Y+(M-9)\7)\100+1)\4	+ 275*M\9

Apply to both dates, and substract.
Manuel Algora
mac@encomix.es
Technical Details
Message-ID: <373dbbfd.2014231@news.ctv.es>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <7hh0gu$3qn$1@zonnetje.NL.net>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 111659,c8153b5b519ca029
X-Google-Attributes: gid111659,public
X-Google-Thread: f7d8d,c8153b5b519ca029
X-Google-Attributes: gidf7d8d,public
X-Google-Thread: 10cc59,c8153b5b519ca029
X-Google-Attributes: gid10cc59,public
X-Google-Thread: 108ebd,c8153b5b519ca029
X-Google-Attributes: gid108ebd,public
From: mac@encomix.es (Manuel Algora)
Subject: Re: HOW 2: Count days between two dates
Date: 1999/05/15
Message-ID: <373dbbfd.2014231@news.ctv.es>
X-Deja-AN: 478006967
Content-Transfer-Encoding: 7bit
References: <7hh0gu$3qn$1@zonnetje.NL.net>
Content-Type: text/plain; charset=us-ascii
X-Complaints-To: usenet@lola.ctv.es
X-Trace: lola.ctv.es 926727388 13468 212.25.132.206 (15 May 1999 00:16:28 GMT)
Organization: CTV/JET
Mime-Version: 1.0
NNTP-Posting-Date: 15 May 1999 00:16:28 GMT
Newsgroups: alt.lang.asm,borland.public.turbopascal,comp.lang.pascal,comp.lang.pascal.borland