Routine: BLRDPT

Information

BLRDPT ; IHS/DIR/FJE - RETURN PATIENT VARIABLE ARRAYS ; [ 04/07/1999 9:05 AM ]

Source file <BLRDPT.m>

Package	Total	Call Graph
IHS Changes To Lab	2	(,KVAR)^BLRDPT0 JOB^BLRPARAM

Package	Total	Caller Graph
IHS Changes To Lab	3	BLRAG08 BLRLRRP2 BLRORDK

Name	Comments	DBIA/ICR reference
TAG	;;^DEM^OPD^INP^IN5^ADD^OAD^ELIG^SVC^MB^REG^SDE^SDA^
OAD	;Other Patient Variables
IN5	;Inpatient Data [v5.0 and above]
ELIG	;Eligibility Information
DEM	;Demographic Variables
REG	;Registration data
MULT
51
PID	;Patient Id
1
3
2
5
V5
7
6
9
8
SEL
4
SVC	;Service Information
Q
ADD	;Current Address
TG	;
A5
10
ALL
MB	;Monetary Benefits
OERR	;
KVA
INP	;Inpatient Data [pre-version 5]
53
52
OPD	;Other Patient Data
SDE	;Enrollment Information
SDA	;Appointment Information
KVAR

Name	Field # of Occurrence
^BLRDPT0	DEM+2, OPD+1, ADD+1, OAD+1, INP+1, IN5+1, ELIG+1, MB+1, SVC+1, REG+1 , SDE+1, SDA+1, PID+1
KVAR^BLRDPT0	KVAR
JOB^BLRPARAM	KVAR

Name	Line Occurrences (* Changed, ! Killed)
^DG(43 - [#43]	V5
^UTILITY("VADPT"	KVAR!

Name	Field # of Occurrence
^("VERSION"	V5

Name	Field # of Occurrence
I	KVAR!
VA	KVA!
VA200	KVAR!
VADM	KVAR!
VADPT	KVAR!
VADPT("V"	V5*
VAEL	KVAR!
VAEN	KVAR!
VAERR	KVAR!
VAHOW	KVAR!
VAIN	KVAR!
VAINDT	KVAR!
VAIP	KVAR!
VAIP("V"	IN5+1, KVAR
VAMB	KVAR!
>> VAN	DEM+2, OPD+1, ADD+1, OAD+1, INP+1, IN5+1, ELIG+1, MB+1, SVC+1, REG+1 , SDE+1, SDA+1, PID+1*
>> VAN(1	DEM+2, OPD+1, ADD+1, OAD+1, INP+1, IN5+1, ELIG+1, MB+1, SVC+1*
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+2, OPD+1, ADD+1, OAD+1, INP+1, IN5+1, ELIG+1, MB+1, SVC+1, REG+1 , SDE+1, SDA+1, PID+1*
X	V5*!, KVAR!
Y	KVAR!

Name	Field # of Occurrence
$T(TAG	SEL
$T(TG+VATAG	MULT