Routine: GMRVSR0

Information

GMRVSR0 ;HIRMFO/RM,YH-VITAL SIGNS RECORD SF 511 ;2/12/99 12:25

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
General Medical Record - Vitals	7	WARDPAT^GMRVED0 EN1^GMRVED2 EN3^GMRVED6 ^GMRVLBP0 ^GMRVLPO0 ^GMRVLWT0 (SELECT,SETT,SF511)^GMRVSR1
Kernel	4	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD $$UP^XLFSTR
VA Fileman	2	^%DT (,NOW)^%DTC
Registration	1	(DEM,INP,KVAR)^VADPT

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMRV SF511
Nursing Service	1	NURCVPR0
Order Entry Results Reporting	1	ORPRS14

Entry Points

Name	Comments	DBIA/ICR reference
Q1
DATELN	;
Q2
PAT
PRT	;
DEV
EN1	; ENTRY POINT FROM OPTION GMRV SF511, SELECT TYPE OF GRAPH FOR THE REPORT
EN2	; ENTRY TO PRINT THIS REPORT AFTER IT HAS BEEN QUEUED ; NOTE: THIS REPORT MUST BE QUEUED TO A PRINTER.
EN3	; ENTRY TO PRINT REPORT FOR ALL OR SELECTED GROUP OF PATIENTS, FOR WARD STORED IN GMRWARD
EN4	; ENTRY POINT IF DFN IS KNOWN TO PRINT THIS REPORT
EN5	; ENTRY POINT FOR APPLICATION TO GET REPORT. INPUT VARIABLES: ; DFN=PATIENT NUMBER ; GMRDATE=START DATE^FINISH DATE OF REPORT^TYPE OF GRAPH ; (OPTIONAL) GMRVWLO=LOCATION GROUPING OF PATIENT IF DIFFERENT HAN 42 FILE
DATE
EN6(DFN,GMRDATE)	; APPLICATION PROGRAM INTERFACE FOR SINGLE PATIENT REPORT. INPUT VARIABLES: DFN=PATIENT NUMBER ; GMRDATE=START DATE^FINISH DATE OF REPORT

External References

Name	Field # of Occurrence
^%DT	DATE, DATE+1
^%DTC	DATE+3
NOW^%DTC	DATE+1
^%ZIS	DEV+1, DEV+4
HOME^%ZIS	DEV+6
^%ZISC	Q2+1, EN6+5
^%ZTLOAD	DEV+6
WARDPAT^GMRVED0	EN1+2
EN1^GMRVED2	EN3+2
EN3^GMRVED6	PAT+1
^GMRVLBP0	EN2+5
^GMRVLPO0	EN2+7
^GMRVLWT0	EN2+6
SELECT^GMRVSR1	EN1+1
SETT^GMRVSR1	EN2+10
SF511^GMRVSR1	EN2+11
DEM^VADPT	PAT, PRT+1, EN6+2
INP^VADPT	EN4+1, EN5+4, EN6+2
KVAR^VADPT	Q1
$$UP^XLFSTR	EN2+4, Q1+2, Q2+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"Ending date of range needs to be greater that starting date.",!?5,$C(7),"PLEASE REENTER!!" Line Location: DATE+4
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: !!,"Sorry, you must select a DEVICE that can print 132 columns. Try again." Line Location: DEV+3
Routine Call	%ZIS Line Location: DEV+6
Routine Call	%ZIS Line Location: DEV+1 DEV+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	DATELN+1
^GMRD(120.52 - [#120.52]	EN2+2
^TMP($J	Q2!, EN3+2

Label References

Name	Line Occurrences
@(	EN2+3, EN2+4
DATE	DATE+4
DATELN	DATE+5, EN5+5, EN6+10
DEV	DEV+3
EN2	DEV+4, PRT+1, EN5+5, EN6+10
EN3	DEV+4, DEV+7
PAT	EN4+1
PRT	EN3+2
Q1	EN1+2, PAT+2, DATE, DATE+1, DEV+1, DEV+4, DEV+6, EN2+3, EN2+4, EN2+5 , EN2+6, EN2+7, EN2+8, EN3+3
Q2	DEV+6, EN3+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DATE+1
%DT	DATE!, DATE+1!, Q1+1!
%DT("A"	DATE, DATE+1
%DT("B"	DATE, DATE+1
%T	Q1!
%ZIS	DEV*, DEV+4!, Q1+1!
%ZIS("B"	DEV*
DFN	EN1+2!, DEV+6!, Q2!, EN3+2*, EN4+1, EN5+4, EN6~, EN6+2
DIK	Q1+1!
DIPGM	Q1+1!
DT	DATE+1
G	DEV+5*, Q1!
GAPICAL	EN2+2~*
GBRACHI	EN2+2~*
GDA	Q1+1!
GDT	Q2!
GDTA	Q2!
GFLAG	EN1+1*!, EN1+2!, PAT+2!, Q2+1!
GFOUND	Q2!
GIVDT	Q2+1!
GLINE	Q1+1!
GMR	Q1!
GMR3	Q1!
GMRAGE	Q2!
GMRBED	Q2!
GMRBTH	Q2!
GMRCOL	Q2!
GMRDAT	Q1!
GMRDATE	EN5+4, EN5+5, EN6~, EN6+2, EN6+10
GMRDIV	Q1+1!
GMRDT	Q1!
GMREDB	EN1+2!, PAT, PAT+1, PAT+2!, DEV+4, DEV+5, DEV+7, EN2+3, EN2+4, EN2+5 , EN2+6, EN2+7, EN2+8, Q1+2, Q2!, EN4+1, EN5+4, EN6+2*
GMREN	Q1!
GMRFIN	DATE+3, DATE+4, EN2+9, Q2!, EN5+4, EN6+2*, DATELN+1
GMRHDR1	Q1!
GMRHDR10	Q1!
GMRHDR11	Q1!
GMRHDR2	Q1!
GMRHLOC	Q2!
GMRHT	Q1!, Q1+1!
GMRI	Q1!
GMRIFN	DEV+6!
GMRII	Q2!, EN3+2*
GMRINF	Q1+1!
GMRJ	Q1!
GMRK	Q1!
GMRLEN	DEV+6!, Q1+1!
GMRLINE	Q1!
GMRMSL	Q1!
GMRNAM	PAT, Q2!, EN3+2
GMRNM	Q1!
GMROLD	Q1!
GMROP	Q2!
GMROUT	EN1+1!, EN1+2!, PAT+2!, DEV+6!, Q2!, EN4+1, EN5+4, EN6+2
GMRP	Q1!
GMRPDIF	Q1!
GMRPERR	EN2+8, Q1+1!, EN3+1, PRT+1
GMRPG	Q1!
GMRPGC	Q1!
GMRPGS	Q1!
GMRPHI	Q1!
GMRPLO	Q1!
GMRPOFF	Q1+1!
GMRQ	EN2+9*, Q1+1!
GMRQUAL	Q1+1!, Q2!
GMRRMBD	Q2!
GMRRMST	DEV+6!, Q1+1!
GMRROOM	Q2!, EN3+2*
GMRS	EN2+9*, Q1+1!
GMRSEX	Q2!
GMRSITE	Q2!
GMRSTRT	DATE, DATE+3, DATE+4, DEV+6!, EN2+9, Q2!, EN5+4, EN6+2*, DATELN+1
GMRT	Q1!
GMRTDIF	Q1!
GMRTHI	Q1!
GMRTLO	Q1!
GMRTNM	Q1!
GMRTOFF	Q1+1!
GMRTY	EN2+10*, Q1!
GMRVADM	Q2!
GMRVARY	Q1+1!
GMRVDEV	DEV+2~*, DEV+4, DEV+5
GMRVDVIC	EN6+4*, EN6+7, EN6+8!
GMRVFLAG	Q2+1!
GMRVHLOC	Q1+1!, Q2!, EN4+1*
GMRVLOC	DEV+6!
GMRVPS	Q1+1!
>> GMRVWLO	EN5+4
GMRVWLOC	EN1+1*!, Q1+1!
GMRVX	Q1+1!
GMRWARD	EN1+2!, PAT+2!, DEV+6!, Q2!, EN4+1, EN5+4, EN6+2*
GMRWARD(1	EN4+1, EN5+4, EN6+2*
GMRX	Q1!
GMRX1	Q1!
GMRX2	Q1!
GMVRMBD	Q2+1!
GMVWRD	Q2+1!
GN	Q2+1!
GNDATE	Q2+1!
GNSHFT	Q2+1!
GRADIAL	EN2+2~*
GRAPH	EN1+1!, EN1+2!, PAT+2!, EN2+3, EN2+4, EN2+5, EN2+6, EN2+7, EN2+8, Q2+1! , EN4+1, EN5+5, EN6+10
GROUTN	EN2+3, EN2+4, Q2+1!
GRPT	Q2!
GSOL	Q2+1!
GSTAR	Q2+1!
GSTRFIN	Q2+1!, DATELN+1*
GSUB	Q2!
GTYPE1	Q2!
GVAR	Q1+1!
IO	EN2+11
IO("Q"	DEV+4, DEV+5, DEV+6, PRT+1
IO("S"	Q1+2
IOF	Q2+1
IOM	DEV+2, DEV+3, EN6+3
ION	DEV+2
>> IOP	DEV+4*
IOSL	DEV+2
IOST	DEV+2, EN2+3, EN2+4, Q1+2, Q2+1, EN6+4
J	Q1!
>> ORL	EN4+1
POP	DEV+1, DEV+4, Q2!
SNN	Q2+1!
SSN	PAT, Q2!, PRT+1, EN6+2*
U	EN6+2
VA	Q1!
VA("PID"	EN6+2
>> VADM(1	PAT
>> VADM(2	PAT, PRT+1
>> VAIN(4	EN4+1, EN5+4, EN6+2
>> X	DATE+4
>> X1	DATE+3*
>> X2	DATE+3*
>> Y	DATE, DATE+1, DATE+2, DATE+3, DATELN+1*
>> ZTDESC	DEV+5*
ZTIO	DEV+5*, DEV+6!, Q2!
>> ZTQUEUED	Q2
>> ZTREQ	Q2*
ZTRTN	DEV+5*, Q2+1!
ZTSAVE	Q2+1!
ZTSAVE(	DEV+5*
ZTSK	DEV+6!, Q2!

Customize PDF page

Package: General Medical Record - Vitals

Routine: GMRVSR0

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: