Example:

	GTM>DO ^%DATE
	Date:
	GTM>ZWRITE
	%DN=59105
	

This example invokes %DATE at the GTM> prompt. After pressing <RETURN> at the Date: prompt, %DATE converts today's date (for example, 10/28/2002) to the $HOROLOG format. ZWRITE displays the contents of the output variable.

Example:

	GTM>DO INT^%DATE
	GTM>ZWRITE
	%DN=59105
	

This example invokes INT^%DATE, which converts the current date non-interactively into $HOROLOG format. ZWRITE displays the contents of the output variable.

Example:

	GTM>SET %DS="10/20/2002"
	GTM>DO INT^%DATE
	GTM>ZWRITE
	%DN=59097
	%DS="10/20/2002"
	

This example sets the input variable %DS prior to invoking INT^%DATE, which converts that date non-interactively to $HOROLOG format.

Example:

	GTM>WRITE $$FUNC^%DATE("10/20/2002")
	59097	
	

This example invokes %DATE with the label FUNC as an extrinsic function to convert an input date to $HOROLOG. If the invocation does not supply a date for $$FUNC^%DATE, FUNC converts the current date.

Example:

	GTM>WRITE $ZDATEFORM
	1975
	GTM>WRITE $$FUNC^%DATE("10/20/80")
	51062
	GTM>WRITE $ZDATE(51062)
	10/20/1980
	GTM>WRITE $$FUNC^%DATE("10/20/10")
	62019
	GTM>WRITE $ZDATE(62019)
	10/20/2010
	

This example shows the use of a year limit in $ZDATEFORM. Two digit years are interpreted to be in the interval (1975, 2074) since $ZDATEFORM is 1975; the input year "80" is interpreted as the year "1980" and "10" is interpreted as the year "2010". The example invokes FUNC^%DATE to convert the input date to $HOROLOG format. $ZDATE() is used to convert the $HOROLOG format date to mm/dd/yyyy format.