Routine: GMVER1

Information

GMVER1 ;HOIFO/RM,YH,FT-ENTERED IN ERROR FOR A PATIENT & DATE RANGE ;12/12/01 12:36

Source Information

Source file <GMVER1.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
General Medical Record - Vitals	3	($$WRITECH,CHAR)^GMVCHAR EN1^GMVSAS0 ($$FILLER,$$PERSON)^GMVUTL1
Kernel	2	$$FMTE^XLFDT ($$REPEAT,$$UP)^XLFSTR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMVER0

Entry Points

Name	Field # of Occurrence
$$WRITECH^GMVCHAR	WRT+15, WRT+38
CHAR^GMVCHAR	WRT+14, WRT+37
EN1^GMVSAS0	WRT+7, WRT+30
$$FILLER^GMVUTL1	WRT+54, WRT+55
$$PERSON^GMVUTL1	WRT+49
$$FMTE^XLFDT	WRT+48
$$REPEAT^XLFSTR	WRT+52
$$UP^XLFSTR	WRTDAT+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(120.5 - [#120.5]	EN1+19, SORT+3, SORT+5, WRT+2, WRT+3, WRT+11, WRT+22, WRT+25, WRT+26, WRT+34 , WRT+45, ERREASON+1, ERREASON+3
^GMRD(120.51 - [#120.51]	WRT+5, WRT+28, WRT+50
^TMP($J	EN1+18!, EN1+21, Q+2!, Q+3, Q+4, SORT+5, WRT+1, WRT+56, WRT+57, WRT+66* , WRT+76*

Name	Line Occurrences
$$WRTDAT	WRT+9, WRT+32
@(	WRTDAT+1
ERREASON	WRT+47
SORT	EN1+19
WRT	EN1+21

Name	Field # of Occurrence
^(0	WRT+2, WRT+26, WRT+50

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BADRATE	Q+1!, WRT+71*, WRT+72
DATA	WRTDAT~, WRTDAT+1, WRTDAT+2, T, WT, HT, CG, CVP, PO2, PN* , PN+1, PN+2
GER	ERREASON+2, ERREASON+3, ERREASON+7!
GER(1	ERREASON+3*, ERREASON+4
GER(2	ERREASON+4*, ERREASON+5
GMRDAT	Q+1!
GMRDAT("BAD"	WRT+26, WRT+29, WRT+46, WRT+49, WRT+69, WRT+71
GMRDAT("GOOD"	WRT+2, WRT+6, WRT+23, WRT+59, WRT+61
GMRDATE	EN1+20, EN1+21, Q+1!, WRT+1, WRT+48, WRT+56, WRT+57, WRT+66, WRT+76
GMRP	Q+1!
GMRPR	Q+1!
GMRPR("ENUS"	WRT+49*, WRT+55
GMRPR("TYPE"	WRT+50*, WRT+54
GMRPR("VSDT"	WRT+48*, WRT+53
GMRQUAL	Q+2!
GMRTYPE	Q+1!
GMRVARY	Q+2!, WRT+12!, WRT+13, WRT+14, WRT+15, WRT+35!, WRT+36, WRT+37, WRT+38
GMRVDA	EN1+21, Q+1!, SORT+4, SORT+5*, WRT+1, WRT+25, WRT+26, WRT+34, WRT+37, WRT+38 , WRT+45, WRT+56, WRT+57, WRT+66, WRT+69, WRT+76, ERREASON+1, ERREASON+3
GMRVDATE	EN1+19*, Q+1!, SORT+5
GMRVDT	EN1+19*, Q+1!, SORT+3, SORT+5
GMRVERR	Q+1!, SORT+2, SORT+3, SORT+5, WRT+1*, WRT+2, WRT+3, WRT+11, WRT+14, WRT+15 , WRT+22, WRT+59
GMRVITY	EN1+17, EN1+19, EN1+21*, Q+1!, SORT+3, SORT+5, WRT+1, WRT+5, WRT+14, WRT+28 , WRT+37, WRT+50, WRT+56, WRT+57, WRT+66, WRT+76
GMRVPO	Q+2!, WRT+22, WRT+23, WRT+45, WRT+46
GMRVX	Q+1!, WRT+4!, WRT+5, WRT+9, WRT+16, WRT+18, WRT+23, WRT+27!, WRT+28, WRT+32 , WRT+39, WRT+41, WRT+46, WRT+60, WRT+70
GMRVX(0	WRT+6, WRT+7, WRT+9, WRT+19, WRT+20, WRT+23, WRT+27!, WRT+29, WRT+30, WRT+32 , WRT+42, WRT+43, WRT+46
GMRVX(1	WRT+8, WRT+19, WRT+20, WRT+23, WRT+27!, WRT+31, WRT+42, WRT+43, WRT+46
GMRZZ	Q+2!, WRT+10, WRT+15, WRT+16, WRT+19, WRT+20, WRT+23, WRT+33, WRT+38, WRT+39 , WRT+42, WRT+43, WRT+46
GMVBEG	EN1~, EN1+19, Q+1!
GMVDFN	EN1~, EN1+19, SORT+3, SORT+5
GMVEND	EN1~, EN1+19, Q+1!
GMVNODE	Q+2!, WRT+51, WRT+53, WRT+54, WRT+55, WRT+56, WRT+58, WRT+59, WRT+62, WRT+65 , WRT+66, WRT+68, WRT+69, WRT+72, WRT+75, WRT+76
GMVSPACE	Q+2!, WRT+52*, WRT+54, WRT+55
GOODRATE	Q+1!, WRT+61*, WRT+62
GREASON	Q+2!, WRT+47, WRT+57, ERREASON+5
RESULT	EN1~, Q+4*
TYPE	WRTDAT~, WRTDAT+1
U	WRT+49, WRT+61, WRT+71

Customize PDF page

Package: General Medical Record - Vitals

Routine: GMVER1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
SORT	; loop through the AA x-ref and find patient entries marked as ; entered in error (i.e., node 2 exists).
ERREASON	;ERROR REASON
WRTDAT(TYPE,DATA)	;
PO2
HT
Q	; KILL VARIABLES
WRT	;
WT
T
CVP
CG
PN
EN1(RESULT,GMVDFN,GMVBEG,GMVEND)	; [RPC entry point] ; Returns Entered in Error records for a date range ; Input: ; RESULT = Where data is returned (closed array reference) (Required) ; GMVDFN = A pointer to the Patient file (#2) (Required) ; GMVBEG = Beginning date for all vitals ; GMVEND = Ending date for all vitals