VADPT ;ALB/MRL,MJK,ERC,TDM,ARF,JAM,JMM - RETURN PATIENT VARIABLE ARRAYS [DRIVER];7/17/14
Source file <VADPT.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | $$CAI^DGENELA (,KVAR)^VADPT0 |
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^
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(43 - [#43] | V5 |
^DGPM - [#405] | DATIM+4, DATIM+5 |
^DGPM("ADFN" | DATIM+2, DATIM+5 |
^DPT - [#2] | TESTPAT+3 |
^DPT("ATEST" | TESTPAT+2 |
^UTILITY("VADPT" | KVAR! |
Name | Field # of Occurrence |
---|---|
^( | DATIM+2, DATIM+5 |
^("VERSION" | V5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | DATIM+2~*, DATIM+3, DATIM+5*, DATIM+6, DATIM+7, DATIM+8 |
B | DATIM+2~*, DATIM+4, DATIM+5* |
DATIM | DATIM~, DATIM+1, DATIM+2, DATIM+3, DATIM+4, DATIM+5, DATIM+6, DATIM+7 |
DFN | CAI+2, TESTPAT~, TESTPAT+1*, TESTPAT+2, TESTPAT+3, DATIM+2, DATIM+5 |
I | KVAR! |
NODE | TESTPAT+3~*, TESTPAT+4, TESTPAT+5 |
U | DATIM+5 |
VA | KVA! |
VA200 | KVAR! |
VACOM | KVAR! |
VACOM("CAI" | CAI+2* |
VADEMO | KVAR! |
VADM | KVAR! |
VADPT | KVAR! |
VADPT("V" | V5* |
VAEL | KVAR! |
VAEN | KVAR! |
VAERR | KVAR! |
VAHOW | KVAR! |
VAIN | KVAR! |
VAINDT | INP+1~*, KVAR! |
VAINDTT | INP+1~*, IN5+1~* |
VAIP | KVAR! |
VAIP("D" | IN5+1* |
VAIP("V" | IN5+1, KVAR |
VAMB | KVAR! |
>> VAN | DEM+1*, DEMUPD+1*, OPD+1*, ADD+1*, OAD+1*, INP+1*, IN5+1*, ELIG+1*, MB+1*, SVC+4* , REG+1*, SDE+1*, SDA+1*, PID+1* |
>> VAN(1 | DEM+1*, DEMUPD+1*, OPD+1*, ADD+1*, OAD+1*, INP+1*, IN5+1*, ELIG+1*, MB+1*, SVC+4* |
VAOA | KVAR! |
VAPA | KVAR! |
VAPD | KVAR! |
VAROOT | SEL+1*, MULT+1*, Q*! |
VAROOT( | SEL+1, MULT+1 |
VARP | KVAR! |
VARRAY | KVAR! |
VARRAY( | SEL+1* |
VARRAY(0 | SEL |
VASD | KVAR! |
VASV | KVAR! |
VATAG | 1*, 2*, 3*, 4*, 5*, 6*, 7*, 8*, 9*, 10* , 51*, 52*, 53*, ALL*, A5*, SEL*, SEL+1*, MULT*, MULT+1, Q! |
VATAG(1 | SEL+1*, MULT+1* |
VATAG(2 | SEL*, SEL+1, MULT+1* |
VATEST | KVAR! |
>> VAV | DEM+1*, DEMUPD+1*, OPD+1*, ADD+1*, OAD+1*, INP+1*, IN5+1*, ELIG+1*, MB+1*, SVC+4* , REG+1*, SDE+1*, SDA+1*, PID+1* |
X | V5*!, KVAR! |
Y | KVAR! |