Routine: GMRVXCH2

Package	Total	Call Graph
VA Fileman	2	FILE^DICN UPDATE^DIE

Package

Total

Call Graph

FILE^DICN UPDATE^DIE

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMRVXCH0

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
TYP(TYPE)	; This function will return the external text for the Vital ; Type pointed to by TYPE.
CONV52	; Loop through 120.52 to convert
QUAL(TYPE,FILE,CHAR)	; Given a Qualifier (CHAR), the Vital Type (TYPE) ; ptr and the file from which this which the qualifier is from ; (FILE), this function will return the generic Category (CAT).
MOVE53	; Loop through 120.53 and move data from that ; file to the 120.52 file.

Name	Field # of Occurrence
FILE^DICN	CONV52+19
UPDATE^DIE	MOVE53+5, MOVE53+13

Name	Line Occurrences (* Changed, ! Killed)
^GMRD(120.51 - [#120.51]	MOVE53+10, QUAL+5, TYP+2
^GMRD(120.52 - [#120.52]	CONV52+1, CONV52+2, CONV52+6, CONV52+8, CONV52+9, CONV52+25
^GMRD(120.53 - [#120.53]	MOVE53+2, MOVE53+3, MOVE53+8, MOVE53+9
^TMP($J	CONV52+3, CONV52+4, CONV52+11, CONV52+14, CONV52+21, CONV52+23, MOVE53+6, MOVE53+14*

Name	Line Occurrences
$$QUAL	CONV52+11, MOVE53+14

Name	Field # of Occurrence
^(	MOVE53+6*

Name	Field # of Occurrence
CAT	QUAL+4~, QUAL+6, QUAL+7, QUAL+8
CHAR	QUAL~
DA	CONV52+28!
DA(1	CONV52+17*
DD	CONV52+19!
DIC	CONV52+17*, CONV52+28!
DIC(0	CONV52+18*
DINUM	CONV52+19!
DLAYGO	CONV52+18*, CONV52+28!
DO	CONV52+19!
FILE	QUAL~, QUAL+6, QUAL+7
>> GMRVCAT	CONV52+22, CONV52+23, CONV52+24
GMRVCHAR	CONV52+2, CONV52+3, CONV52+4, CONV52+11, CONV52+14, CONV52+21, CONV52+28!, MOVE53+3, MOVE53+4, MOVE53+6 , MOVE53+14, MOVE53+17!
GMRVCNV	CONV52+4, CONV52+5, CONV52+6, CONV52+21, CONV52+22, CONV52+24, CONV52+25, CONV52+28!
GMRVD0	MOVE53+2*, MOVE53+3, MOVE53+6, MOVE53+8, MOVE53+9, MOVE53+17!
GMRVD1	MOVE53+7, MOVE53+8, MOVE53+9, MOVE53+17!
GMRVDA	CONV52+1, CONV52+2, CONV52+5, CONV52+6, CONV52+8, CONV52+9, CONV52+17, CONV52+25, CONV52+28!, MOVE53+7 , MOVE53+12, MOVE53+17!
GMRVFDA	MOVE53+4!, MOVE53+11!, MOVE53+17!
GMRVFDA(99	MOVE53+4, MOVE53+12
GMRVIEN	MOVE53+4!, MOVE53+11!
GMRVIEN(1	MOVE53+5, MOVE53+7
GMRVTDA	CONV52+7, CONV52+8, CONV52+9, CONV52+10, CONV52+15, CONV52+16, CONV52+19, CONV52+25, CONV52+28!
GMRVTYP	CONV52+9, CONV52+10, CONV52+11, CONV52+13, CONV52+14, CONV52+15, CONV52+17, CONV52+21, CONV52+28!, MOVE53+9 , MOVE53+10, MOVE53+12, MOVE53+14, MOVE53+17!
GMRVVTYP	CONV52+2!, CONV52+28!
GMRVVTYP(	CONV52+10*, CONV52+15
GTYPE	QUAL+4~, QUAL+5*, QUAL+6, QUAL+7
TYPE	QUAL~, QUAL+5, TYP~, TYP+2
X	CONV52+17*, CONV52+28!
>> Y	CONV52+19

Information