VADPT ;ALB/MRL,MJK,ERC,TDM,ARF,JAM,JMM - RETURN PATIENT VARIABLE ARRAYS [DRIVER];7/17/14
Source file <VADPT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
DEM | ;Demographic Variables
|
|
DEMUPD | ; Updated Demographic Variables ;dg*5.3*996 add preferred name to Demographic Variables in new VADEMO array;VADEMO added to KVAR
|
|
OPD | ;Other Patient Data
|
|
ADD | ;Current Address
|
|
OAD | ;Other Patient Variables
|
|
INP | ;Inpatient Data [pre-version 5]
|
|
IN5 | ;Inpatient Data [v5.0 and above]
|
|
ELIG | ;Eligibility Information
|
|
MB | ;Monetary Benefits
|
|
SVC | ;Service Information
; DG*5.3*1103 - Increase VAN(1) to 15 for adding the TERA indicator ; DG*5.3*1121 - Increase VAN(1) to 17 for adding the Persian Gulf Deployment Indicator and Persian Gulf Indicator Last Change Date ; S VAN=9,VAN(1)=15,VAV="VASV" D ^VADPT0 Q |
|
REG | ;Registration data
|
|
SDE | ;Enrollment Information
|
|
SDA | ;Appointment Information
|
|
PID | ;Patient Id
|
|
CAI | ; COMPACT Act Indicator; DG*5.3*1061
; Store CAI value in array VACOM. (Array VACOM added to KVAR) |
|
TESTPAT(DFN) |
|
|
V5 | ||
OERR | ;
|
|
1 |
|
|
2 |
|
|
3 |
|
|
4 |
|
|
5 |
|
|
6 |
|
|
7 |
|
|
8 |
|
|
9 |
|
|
10 |
|
|
51 |
|
|
52 |
|
|
53 |
|
|
ALL |
|
|
A5 |
|
|
SEL |
|
|
MULT | ||
Q | ||
KVA |
|
|
KVAR |
|
|
DATIM(DATIM) | ;If time not specified see if movement on that date
|
|
TG | ;
|
|
TAG | ;;^DEM^OPD^INP^IN5^ADD^OAD^ELIG^SVC^MB^REG^SDE^SDA^
|