Routine: BLRDPT31

Information

BLRDPT31 ; IHS/DIR/FJE - PATIENT VARIABLES ;

Package	Total	Call Graph
IHS Changes To Lab	3	IB^BLRDPT2 (GET,KVAR)^BLRDPT30 BLD^BLRDPT32

Package	Total	Caller Graph
IHS Changes To Lab	1	BLRDPT3

Name	Comments	DBIA/ICR reference
EN
CE
ENQ
LODGER	; -- get lodger data
COPY	; copy from primary to other nodes
FIND	;
STORE	; store 'other nodes'
FINDQ

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EN+5, EN+13, STORE+2
^DG(405.2 - [#405.2]	EN+6, STORE+4
^DG(405.3 - [#405.3]	EN+4, STORE+3
^DG(405.4 - [#405.4]	LODGER+4
^DGPM - [#405]	EN+1, EN+2, EN+7, EN+18, LODGER+1, LODGER+3
^DGPM("APMV"	CE+1
^DIC(42 - [#42]	LODGER+2
^UTILITY("VADPTZ"	EN+19, EN+20, EN+23, EN+24, EN+25

Name	Field # of Occurrence
^(	EN+24, EN+25
^(0	EN+2, EN+4, EN+6, STORE+3, STORE+4, LODGER+1, LODGER+2, LODGER+3, LODGER+4
^(1	EN+20

Name	Field # of Occurrence
>> DFN	EN+19, EN+20, EN+23, EN+24, EN+25, CE+1
>> E	EN+1, EN+2, EN+3, CE, CE+1
>> VACN	FIND+4*
>> VADX	EN+10, FIND+2*, STORE+6
VAINDT	EN~, EN+12*
>> VAIP("D"	EN+16
>> VAIP("M"	EN+2, EN+15, EN+16, CE
VAMCC	ENQ!
VAMV	EN~, EN+1, EN+2, EN+18, EN+20, EN+21, EN+22, EN+24, EN+25, FIND+1 , FIND+2, FINDQ, STORE+1, COPY+1
VAMV0	EN~, EN+1, EN+2, EN+4, EN+5, EN+6, EN+12, EN+17, EN+18, EN+20 , EN+21, EN+24, EN+25, FIND+1, FIND+3, FINDQ*, STORE+2, STORE+3, STORE+4, STORE+5 , LODGER+1, LODGER+3
VAMV0X	FIND+1*, FINDQ!
VAMVX	ENQ!, FIND+1*, FINDQ!
VANN	EN+23, EN+24, EN+25, ENQ!
VANODE	EN+15, EN+16, EN+17, EN+18, EN+21, EN+22, EN+24, EN+25, ENQ!, STORE+1 , STORE+2, STORE+3, STORE+4, STORE+6, COPY+1, COPY+3, COPY+5
>> VAPP	EN+10, FIND+2*, STORE+6
>> VAPRC	FIND+4*
>> VAPRT	FIND+4*
>> VARM	EN+10, FIND+2, LODGER+3, LODGER+4*
>> VAS	EN+3, EN+4, EN+5, EN+6, EN+7, EN+10, EN+12, EN+13, EN+15, EN+16 , EN+17, EN+18, EN+21, EN+22, EN+24, EN+25, COPY+3, COPY+5
>> VASET	EN+15*
>> VASET(	EN+15*
>> VASET(13	EN+18
>> VASET(14	EN+16*, EN+22
>> VASET(17	EN+17*, EN+21
>> VATD	EN+9, FIND+4, STORE+5*
>> VATS	EN+10, FIND+2*, STORE+6
>> VAV	EN+3, EN+4, EN+5, EN+6, EN+7, EN+10, EN+12, EN+13, STORE+1, STORE+2 , STORE+3, STORE+4, STORE+6, COPY+1, COPY+3, COPY+5
>> VAWD	EN+10, FIND+2, STORE+6, LODGER+1, LODGER+2*
>> VAX("CA"	EN+1*, EN+7, EN+18, CE, CE+1
>> VAX("DT"	EN+9
VAXE	EN+20, EN+24, EN+25*, ENQ!
>> VAZ	EN+12, EN+13
>> VAZ(2	EN+13
>> Y	EN+4, EN+5, EN+6, EN+7, EN+13, STORE+2, STORE+3, STORE+4