Print Page as PDF
VADATE ICR (1073)

VADATE    ICR (1073)

Name Value
NUMBER 1073
IA # 1073
DATE CREATED 1994/12/09
CUSTODIAL PACKAGE REGISTRATION
CUSTODIAL ISC Albany
USAGE Supported
TYPE Routine
ROUTINE VADATE
NAME VADATE
GENERAL DESCRIPTION
Generic Date Routine.  This was designed many years ago
(1988-1989) for use with the MAS package.  Since this time, the ToolKit
package has released function calls in XLFDT.  It is our feeling at this point
that those tools should be used for new code.  This integration agreement is
entered for legacy code only.
STATUS Pending
DURATION Till Otherwise Agreed
ID VADATE
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
VADATE
Call routine from top.  D ^VADATE

If nothing is passed in, NOW will be returned in internal and external
formats:  VADATE("I") and VADATE("E").
VARIABLES TYPE VARIABLES DESCRIPTION
VADAT Input
The IA options won't allow entry of the following
subscripted input variables.  All variables defined below are optional:

VADAT("F") - use this to have the date returned in a format other than FM.
set to 1 for MM-DD-YY format
set to 2 for military or DD-MMM-YY format
if defined and set to anything other than 1 or 2, it will
assume VA fileman format.  VADAT("D") - If VADAT("F") is
defined, this variable may be passed to
contain a delimiter if one other than the dash ("-") is
desired.  Pass VADAT("D")="/" to receive MM/DD/YY, for
example.  VADAT("T") - Define if you do NOT want time returned
regardless of date
passed.  VADAT("W") - If a time other than NOW is desired, pass
this as any
date/time (or date) in VA fileman format VADAT("H") - If you only
want to see portions of the date, you may pass
this variable.  '1' will denote day, '2' - month, and '3' -
year.  So to see just month and year, pass VADAT("H") as '23'
or '32'.  Note:  If VADAT("T") is not defined and a time
exists, it will also be returned.  VADAT("S") - If defined,
seconds will be returned.  If not defined, no
seconds will be returned.  VADAT("J") - Pass this as a numeric
value to justify the external
date/time returned.  If the date/time is longer than the
value passed, the entire date/time will be returned.  VADAT("S")
- pass this if you WANT to see seconds.
VADATE Output
The IA options don't allow entry of subscripted
input/output variables.  The following are always returned from this call:

VADATE("I") - the internal format of the date VADATE("E") - the external
format of the date
KVAR
Kills VADAT and VADATE variables.