Routine: GMTS

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
Health Summary	6	EN^GMTS1 (ACTPROF,HSOUT,MAIN,PATCOPY,RESUB)^GMTSDVR $$RXAP^GMTSPD2 MENU^GMTSPXU2 ($$PROK,GETRANGE)^GMTSU $$TYPE^GMTSULT
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$VERSION^XPDUTL
Order Entry Results Reporting	1	PATIENT^ORU1

Package	Total	Caller Graph
Health Summary	6	GMTS HS BY PATIENT GMTS HS BY PATIENT & DATE RANG GMTS HS BY PATIENT & VISIT GMTSADH GMTSADOR GMTSPL
Automated Information Collection System	1	IBDFN5
Order Entry Results Reporting	1	ORWRP1

Package

Total

Caller Graph

Health Summary

GMTS HS BY PATIENT GMTS HS BY PATIENT & DATE RANG GMTS HS BY PATIENT & VISIT GMTSADH GMTSADOR GMTSPL

Automated Information Collection System

IBDFN5

Order Entry Results Reporting

ORWRP1

Entry Points

Name	Comments	DBIA/ICR reference
LOAD	; Load GMTSEG() using GMTSPRM abbreviations
ENCWA	; Entry point printing components ; ; GMTSPRM can be set to any component abbreviations ; except ones that require selection items. Needs ; to be valid component abbreviation from the "C" ; x-ref of File 142.1. ; ; Call with DFN, GMTSPRM="CD,CN,CW,ADR", GMTSTITL="TITLE" ; ; GMTSPX1=Optional FM date for ending date ; GMTSPX2=Optional FM date for beginning date ; ; NOTE: Optional date range variables are both ; required if a date range is desired. ;	ICR #164 Status: Active Usage: Controlled Subscription
PQ	; Queued subroutine for HS by patient
END	; Clean up environmental variables and EXIT Health Summary
LOADSEG	; Load enabled components into GMTSEG array
HSOUT	; Output Summary, with DEVICE handling
SELFILE	; Load Selection Items in GMTSEG( array
NOQUE	; Print non-queued output to selected device
SELTYP	; Select a Health Summary Type for printing
SELTYP1	; Get each component record	ICR #745 Status: Active Usage: Controlled Subscription
QUE	; Call TaskMan to Queue output
SELPT	; Select a patient
MAIN	; Controls branching ; ; GMTSPXGO & GMRANGE are set in 2 calling ; options, They aren't meant to be used together. ;

External References

Name	Field # of Occurrence
^%ZIS	HSOUT+3, QUE+5
^%ZISC	NOQUE+2, QUE+4
^%ZTLOAD	QUE+3
EN^GMTS1	PQ+10, HSOUT+2, NOQUE+1, ENCWA+22
ACTPROF^GMTSDVR	PQ+12
HSOUT^GMTSDVR	MAIN+30
MAIN^GMTSDVR	MAIN+5
PATCOPY^GMTSDVR	SELPT+5
RESUB^GMTSDVR	MAIN+27
$$RXAP^GMTSPD2	MAIN+28
MENU^GMTSPXU2	MAIN+16, MAIN+21
$$PROK^GMTSU	SELPT+2
GETRANGE^GMTSU	MAIN+25
$$TYPE^GMTSULT	SELTYP+2
PATIENT^ORU1	MAIN+5, SELPT+3, SELPT+4
$$VERSION^XPDUTL	MAIN+5, SELPT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"For patient ",GMNAME," please answer the following." Line Location: MAIN+15
Function Call: WRITE	Prompt: !!,"For patient ",GMNAME," please answer the following." Line Location: MAIN+20
Function Call: WRITE	Prompt: ! Line Location: MAIN+30
Function Call: WRITE	Prompt: !,"This Summary Type includes no components...Please choose another." Line Location: SELTYP+3
Function Call: WRITE	Prompt: !,$S($D(ZTSK):"Request Queued!",1:"Request Cancelled!") Line Location: QUE+3
Function Call: WRITE	Prompt: !,"The parameter GMTSPRM is undefined.",! Line Location: ENCWA+17
Function Call: WRITE	Prompt: !,"The parameter GMTSTITL is undefined.",! Line Location: ENCWA+18
Function Call: WRITE	Prompt: !,"The parameter DFN is undefined.",! Line Location: ENCWA+19
Routine Call	%ZIS Line Location: HSOUT+3 QUE+5

Name	Line Occurrences (* Changed, ! Killed)
^DISV(	MAIN+8
^DPT - [#2]	MAIN+14
^GMT(142 - [#142]	MAIN+8, SELTYP+2, SELTYP+3, SELTYP1+1, SELFILE+1
^GMT(142.1 - [#142.1]	LOADSEG+1, LOAD+1
^XUSEC("GMTS VIEW ONLY"	HSOUT+2
^XUTL("OR"	SELPT+1!

Name	Line Occurrences
END	MAIN+30, ENCWA+23
LOAD	ENCWA+20
LOADSEG	SELTYP1+1
QUE	HSOUT+4
SELFILE	LOADSEG+2
SELPT	MAIN+19
SELTYP	MAIN+9, SELTYP+3

Name	Field # of Occurrence
^(	SELTYP1+1, SELFILE+2
^("ORLP"	SELPT+1!
^("ORV"	SELPT+1!
^("ORW"	SELPT+1!
^("T"	SELTYP+2
^(0	SELTYP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	QUE+1*
%T	END+1!
>> %ZIS	HSOUT+3*
ABB	ENCWA+20*, ENCWA+21!, LOAD+1
C	END+2!
DFN	MAIN+10~, MAIN+12!, MAIN+14, MAIN+16, MAIN+18, MAIN+19, MAIN+21, MAIN+23, MAIN+31!, PQ+1~ , PQ+5*, PQ+12, ENCWA+19
DIC	MAIN+7!, SELTYP+1*, SELTYP+2!, END+1!
DIC("A"	SELTYP+1*
DIC("B"	MAIN+8*
DIC("S"	SELTYP+1*
DIC(0	SELTYP+1*
DIROUT	MAIN+6~, MAIN+7!, MAIN+9, MAIN+11, MAIN+17*, MAIN+18, MAIN+19, MAIN+22, MAIN+24, MAIN+26 , MAIN+28, PQ+4, PQ+11
>> DTOUT	MAIN+28
DUOUT	MAIN+6~, MAIN+7!, MAIN+9, MAIN+11, SELPT+1~
DUZ	MAIN+8, HSOUT+2
ENTRY	SELFILE+2*, SELFILE+4, END+2!
GMDUOUT	PQ+9~, PQ+11
GMI	SELTYP1+1, SELTYP1+2!, LOADSEG+2, SELFILE+4, ENCWA+15~, ENCWA+16, ENCWA+21, LOAD+2
GMJ	ENCWA+15~, ENCWA+20*
GMNAME	MAIN+6~, MAIN+14, MAIN+15, MAIN+18, MAIN+19, MAIN+20, MAIN+23
GMP	MAIN+31!, SELPT+1!, SELPT+3, SELPT+4, SELPT+5
GMPAT	MAIN+10~, MAIN+11, MAIN+12!, MAIN+17!, MAIN+24, MAIN+27
GMPAT(	MAIN+18, MAIN+23, PQ+4, PQ+5, PQ+6, PQ+7
GMPAT(1	MAIN+14*
GMPATT	MAIN+17!, MAIN+19!, MAIN+31!, SELPT+5
GMPATT(	MAIN+14*, MAIN+19
GMPSAP	MAIN+6~, MAIN+28*
>> GMRANGE	MAIN+25
GMTJ	PQ+2~, PQ+4*, PQ+5, PQ+6, PQ+7
GMTS	PQ+1~, END+1!
GMTS0	LOADSEG+1*, END+1!
GMTS1	PQ+1~, END+1!, ENCWA+16*
GMTS2	PQ+1~, END+1!, ENCWA+16*
GMTSAGE	PQ+1~, END+2!
GMTSDOB	PQ+1~, END+1!
GMTSDTM	PQ+1~, END+2!
GMTSEG	MAIN+31!, SELTYP1+1!, ENCWA+15~, ENCWA+23!
GMTSEG(	LOADSEG+2, SELFILE+4, LOAD+2*
GMTSEGC	MAIN+31!, SELTYP1+2, ENCWA+15~, ENCWA+21, ENCWA+23!
GMTSEGH	END+2!
GMTSEGI	MAIN+31!, SELTYP1+1!, ENCWA+15~, ENCWA+23!
GMTSEGI(	LOADSEG+2, LOAD+2
GMTSEGL	END+2!
GMTSEGN	END+2!
GMTSHDR	END+2!
GMTSLO	PQ+1~, END+1!
GMTSLOCK	END+2!
GMTSLPG	PQ+1~, END+2!
GMTSMULT	MAIN+10~
GMTSNPG	END+2!
GMTSPG	END+2!
GMTSPNF	ENCWA+16*, ENCWA+23!
GMTSPNM	PQ+1~, END+1!
GMTSPRM	ENCWA+17, ENCWA+20, ENCWA+23!
GMTSPRO	SELPT+1~, SELPT+2*, SELPT+3, SELPT+4
GMTSPX1	MAIN+6~, MAIN+14, MAIN+16, MAIN+17, MAIN+18, MAIN+20, MAIN+21, MAIN+23, MAIN+25, PQ+6* , PQ+8!
GMTSPX2	MAIN+6~, MAIN+14, MAIN+16, MAIN+17, MAIN+18, MAIN+20, MAIN+21, MAIN+23, MAIN+25, PQ+7* , PQ+8!
>> GMTSPXGO	MAIN+5, MAIN+16, MAIN+21, PQ+6
GMTSQIT	END+2!
GMTSRB	PQ+2~, END+1!
GMTSSN	PQ+2~, END+1!
GMTSTIM	END+2!
GMTSTITL	MAIN+31!, SELTYP+2*, ENCWA+18, ENCWA+23!
GMTSTOF	PQ+2~, END+2!
GMTSTYP	MAIN+7, MAIN+9, MAIN+31!, SELTYP+1, SELTYP+2, SELTYP+3, SELTYP1+1, SELFILE+1
GMTSVER	SELPT+1~, SELPT+2*, SELPT+3, SELPT+4
GMTSWARD	PQ+2~, END+1!
GMTSX	END+2!
GMX	MAIN+31!, SELTYP1+1*, LOADSEG+1, LOADSEG+2
I	MAIN+31!, PQ+2~
IFN	ENCWA+21!, LOAD+1*, LOAD+2
IO("Q"	HSOUT+4, QUE+1!
ION	QUE+2
IOP	HSOUT+3!, QUE+5*
IX0	PQ+2~
J	PQ+2~
M4	PQ+2~
>> ORVP	MAIN+11, MAIN+13, MAIN+14, MAIN+19
P17	PQ+2~
POP	HSOUT+3, END+2!
S1	SELTYP1+1*, SELTYP1+2!, SELFILE+1
S2	SELTYP1+2!, SELFILE+1~*, SELFILE+2, SELFILE+4
SEX	PQ+2~, END+2!
SF	SELFILE+1~, SELFILE+3*, SELFILE+4
SR	SELFILE+1~, SELFILE+2*, SELFILE+3, SELFILE+4
TRFAC	PQ+3~
U	MAIN+8, MAIN+14, MAIN+18, MAIN+23, LOADSEG+2, SELFILE+2, SELFILE+3, PQ+6, PQ+7
VA	END+1!
VADM	END+1!
VAEL	END+1!
VAERR	PQ+3~, END+1!
VAIN	PQ+3~, END+1!
VAINDT	END+1!
VAPA	END+1!
X	MAIN+31!, END+1!
Y	MAIN+31!, SELTYP+2*, END+1!
Z1	END+2!
ZTDESC	QUE+2*, QUE+4!
ZTDTH	QUE+4!
ZTIO	QUE+2*, QUE+4!
ZTRTN	MAIN+6~, MAIN+29, QUE+2, QUE+4!
ZTSAVE	QUE+1!, QUE+4!
ZTSAVE(	QUE+1*
ZTSK	HSOUT+1!, QUE+3, QUE+4!

Customize PDF page

Package: Health Summary

Routine: GMTS

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items