Guardian Procedure Calls Reference Manual (G06.25+)

Guardian Procedure Calls (C)
Guardian Procedure Calls Reference Manual—522629-013
3-90
COMPUTEJULIANDAYNO Procedure
COMPUTEJULIANDAYNO Procedure
Summary
Syntax for C Programmers
Syntax for TAL Programmers
Parameters
Related Programming Manual
Summary
The COMPUTEJULIANDAYNO procedure converts a Gregorian calendar date on or
after January 1, 0001, to a Julian day number.
The Julian calendar is the integral number of days since January 1, 4713 B.C. The
formal definition of the Julian day states that it starts at 12:00 (noon), Greenwich mean
time (GMT).
The Gregorian calendar is the common civil calendar that we use today.
Syntax for C Programmers
•
CEXTDECS (through the included file TNSINTH) defines 32-bit values as the
typedef __int32_t which for TNS and TNS/R compiles is defined as long and for
TNS/E compiles is defined as
int.
Syntax for TAL Programmers
Parameters
julian-day-num returned value
INT(32)
returns the Julian day number or -1 if any input parameter is not within the valid
range
#include <cextdecs(COMPUTEJULIANDAYNO)>
__int32_t COMPUTEJULIANDAYNO ( short year
,short month
,short day
,[ short _near *error-mask ] );
julian-day-num := COMPUTEJULIANDAYNO ( year ! i
,month ! i
,day ! i
,[ error-mask ] ); ! o