| $$GET(DUZ[,DATE]) |
Returns the
"IEN^Profession^Specialty^Sub-specialty^Effect date^Expired date^VA code" for
the person identified by the DUZ in effect on the date passed in, in internal
FileMan format, (TODAY if no date passed in). Returns -1 if DUZ doesn't point
to a valid user or user has never had a Person Class assigned. Returns -2 if
no active Person Class on that date.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
DUZ |
Input |
Internal entry number for the Person being checked in
the New Person file.
|
DATE |
Input |
Date in internal FileMan format, to indicate
effective date for determination.
|
|
$$IEN2CODE(IEN) |
Returns the VA CODE from the PERSON CLASS file that
corresponds to the IEN number passed in. If the IEN passed in does not match
a valid entry in file 8932.1, an empty string is returned
|
|
$$CODE2TXT(IEN or Vcode) |
This extrinsic function returns the three parts of
the HCFA text from the person class file based on passing in the IEN or the
VA's Vcode.
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
IEN or Vcode |
Input |
Pass in either the IEN or the VA Vcode for the text
that should be returned.
|
$$CODE2TXT |
Output |
Text for the code.
|
|
$$IEN2DATA(IEN or Vcode) |
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
$$IEN2DATA |
Output |
Person class data for an IEN
|
IEN |
Input |
IEN to file 200
|
|
$$VCLK(X) |
|
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
X |
Input |
Vcode
|
$$VCLK |
Output |
IEN to file 200
|
|