Routine: GMVSC1

Package	Total	Call Graph
General Medical Record - Vitals	3	FOOTER^GMVSC0 (HDR,SETLN)^GMVSC2 (CLIO,F1205)^GMVUTL
Kernel	1	^%ZISC
Registration	1	KVAR^VADPT

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMVSC0

Entry Points

Name	Comments	DBIA/ICR reference
SETAR1	; PXRMINDX index doesn't have entered-in-error records, so use AA x-ref
QT	;
PRT	;PRINT V/M BY DATE/TIME
SETND	;
SETUT	;
Q	; KILL VARIABLES
EN1	; ENTRY TO PRINT REPORT FROM TASKMAN {called from GMVSC0}
SETAR	; get clio records
SETND1	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"THERE IS NO DATA FOR THIS REPORT" Line Location: EN1+5
Function Call: WRITE	Prompt: ! Line Location: QT+1
Function Call: WRITE	Prompt: ! Line Location: QT+2
Function Call: WRITE	Prompt: !,$E(GMRDATE,4,5)_"/"_$E(GMRDATE,6,7)_"/"_$E(GMRDATE,2,3) Line Location: PRT+2
Function Call: WRITE	Prompt: !,$P($P(Y,"@",2),":",1,2) Line Location: PRT+3

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRT+2
^GMR(120.5 - [#120.5]	SETAR1+5, SETND1+2
^GMRD(120.51 - [#120.51]	EN1+4
^PXRMINDX(120.5	SETAR+3, SETND+2
^TMP($J	EN1+2!, EN1+5, EN1+7, QT+3!, Q+1!, SETUT+1*, PRT+4, PRT+5

Name	Field # of Occurrence
%T	Q+3!
DFN	Q+3!, SETAR+3, SETAR1+5, SETND+2, SETND1+2
DIPGM	Q+3!
GBED	Q+3!
GDATA	Q+3!
GERROR	Q+3!, PRT+5!
GERST	Q+3!
GFLAG	Q+3!
GMR1ST	Q+3!
GMRDAT	Q+3!
GMRDATE	EN1+6, EN1+7, Q+3!, SETAR+3, SETND1+6, SETUT+1, SETUT+2, PRT+2, PRT+4, PRT+5
GMRDATE(0	EN1+3, PRT+2
GMRDSH	Q+3!
GMRDT	Q+3!, SETAR+2, SETAR+3, SETAR1+3, SETAR1+4, SETAR1+5*, SETND+2, SETND1+2
GMRLN	Q+3!, PRT+5!
GMROUT	EN1+3*, EN1+7, QT+2, Q+3!, PRT+1, PRT+3, PRT+5
GMRPDT	Q+3!
GMRPG	Q+3!
GMRQUAL	Q+3!
GMRSITE	Q+3!
GMRSP	Q+3!
GMRST	Q+3!
GMRV	QT+3!
GMRVARY	Q+2!
GMRVDA	Q+3!, SETND+1, SETND+2, SETND+3, SETND+4, SETND+5, SETND1+1, SETND1+2, SETND1+3, SETUT+1 , PRT+5*
GMRVDT	EN1+2!, QT+3!
GMRVDT(	EN1+7, SETUT+2*
GMRVER	Q+3!
>> GMRVFDT	SETAR+3, SETAR1+3
GMRVFDT1	SETAR1+1~
>> GMRVHT	EN1+3*
GMRVITY	EN1+4*, Q+3!, SETAR+3, SETAR1+5, SETND+2, SETND1+2
>> GMRVSDT	SETAR+2, SETAR1+3
GMRVSDT1	SETAR1+1~, SETAR1+3, SETAR1+4, SETAR1+5
GMRVTY	EN1+4, Q+3!, SETUT+1, PRT+5
GMRVX	Q+3!
GMRX	Q+3!
GMRY	Q+3!
GMRZZ	Q+2!
GMVCLIO	EN1+1~, SETAR+1!, SETAR1+2!, SETND+5, SETND1+3
GMVCLIO(0	SETND+6, SETND+7, SETND1+4, SETND1+5, SETND1+6, SETUT+1
GMVCLIO(2	SETND+6, SETND1+4, SETUT+1
GMVCLIO(5	SETND+6, SETND1+4, SETUT+1
GOTHR	QT+3!
>> GPRT(	PRT+5*
GWARD	Q+3!
GX	Q+3!
IOSL	QT+1, PRT+1, PRT+3
POP	Q+3!
U	SETND+7, SETND1+5, SETND1+6, SETUT+1
VA	Q+4!
>> X	QT+1*
>> Y	PRT+2*, PRT+3