Routine: GMTSADH2

Package	Total	Call Graph
Health Summary	2	(GETCPTM,GETHOSP,GETICD,GETIME,GETNAME,GETOCC,GETPROV)^GMTSADH4 ($$FLOC,$$FNAM)^GMTSU
Order Entry Results Reporting	1	EN^ORUS
VA Fileman	1	^DIC

Package

Total

Call Graph

Health Summary

(GETCPTM,GETHOSP,GETICD,GETIME,GETNAME,GETOCC,GETPROV)^GMTSADH4 ($$FLOC,$$FNAM)^GMTSU

Order Entry Results Reporting

EN^ORUS

VA Fileman

^DIC

Package	Total	Caller Graph
Health Summary	2	GMTSADH1 GMTSUP

Package

Total

Caller Graph

Health Summary

GMTSADH1 GMTSUP

Entry Points

Name	Comments	DBIA/ICR reference
GETSEL	; Updates GMTSEG array with Selections
COMPILE(GMTEST)	; Compile menu for ORUS call
SHOWDEF	; Writes out loaded (default) selection items
CMPLIM	; Get Limits and Selection Items
RESOLVE(GMREF,GMTSEG,GMI)	; Call ORUS to resolve compound items
HEADER	; Write Header
SELECT	; Get Selection Items

External References

Name	Field # of Occurrence
^DIC	GETSEL+25
GETCPTM^GMTSADH4	CMPLIM+7
GETHOSP^GMTSADH4	CMPLIM+4
GETICD^GMTSADH4	CMPLIM+5
GETIME^GMTSADH4	CMPLIM+3
GETNAME^GMTSADH4	CMPLIM+8
GETOCC^GMTSADH4	CMPLIM+2
GETPROV^GMTSADH4	CMPLIM+6
$$FLOC^GMTSU	GETSEL+13
$$FNAM^GMTSU	SELECT+6, GETSEL+8
EN^ORUS	RESOLVE+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Default selection items are " Line Location: SELECT+3
Function Call: WRITE	Prompt: ! Line Location: SELECT+5
Function Call: WRITE	Prompt: "Push Return at the first prompt to select default items.",! Condition for execution: GMTSJ Line Location: SELECT+5
Function Call: WRITE	Prompt: "Select new "_$$FNAM^GMTSU(+SEL)_" items one at a time in the sequence",!,"you want them displayed. " Line Location: SELECT+6
Function Call: WRITE	Prompt: "You may select " Line Location: SELECT+7
Function Call: WRITE	Prompt: "any number of items.",! Line Location: SELECT+7
Function Call: WRITE	Prompt: "up to ",SELCNT," items.",! Line Location: SELECT+8
Function Call: WRITE	Prompt: !?2,$C(7),"MAXIMUM # OF ITEMS SELECTED.",! Line Location: SELECT+10
Function Call: WRITE	Prompt: !,"Select TITLE: " Line Location: GETSEL+7
Function Call: WRITE	Prompt: !,"Select "_$$FNAM^GMTSU(+SEL)_" Selection Item: " Line Location: GETSEL+8
Function Call: WRITE	Prompt: !!,"No SELECTION ITEMS chosen.",! Line Location: SHOWDEF+2
Function Call: WRITE	Prompt: ! Condition for execution: GMTSWHL>1 Line Location: SHOWDEF+3
Function Call: WRITE	Prompt: ?30,$P(@(GMTSEG(SBS,GMTSJ,0)_GMTSEG(SBS,GMTSJ,GMTSN)_",0)"),U) Line Location: SHOWDEF+3
Function Call: WRITE	Prompt: $C(7)," INVALID TEST...Please choose another." Line Location: RESOLVE+12
Function Call: WRITE	Prompt: !!?15,"Select the tests which you wish to include, in the",!?19,"sequence in which you wish them to appear." Line Location: HEADER+1
Function Call: WRITE	Prompt: !!?((80-$L(GMHEAD))\2),GMHEAD,! Line Location: HEADER+2
Routine Call	DIC Line Location: GETSEL+25

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142.1 - [#142.1]	CMPLIM+9, SELECT+4, GETSEL+16
^LAB(60 - [#60]	GETSEL+33, RESOLVE+9, COMPILE+2, COMPILE+3, COMPILE+4, COMPILE+9
^XUTL("OR"	RESOLVE+2!, RESOLVE+10, RESOLVE+11, RESOLVE+12!, RESOLVE+13, RESOLVE+16!, COMPILE+6, COMPILE+7

Name	Line Occurrences
COMPILE	RESOLVE+10, COMPILE+9
GETSEL	SELECT+9
RESOLVE	GETSEL+33
SELECT	CMPLIM+9
SHOWDEF	SELECT+3, GETSEL+12

Name	Field # of Occurrence
^("ORU"	RESOLVE+16!
^("ORV"	RESOLVE+2!, RESOLVE+16!
^("ORW"	RESOLVE+2!, RESOLVE+16!
^(0	CMPLIM+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ASKCPQIT	GETSEL+11, GETSEL+28
>> CREC	CMPLIM+2, CMPLIM+3, CMPLIM+4, CMPLIM+5, CMPLIM+6, CMPLIM+7
DIC	SELECT+1~, GETSEL+13*, GETSEL+32, GETSEL+33
DIC("S"	GETSEL+14, GETSEL+17, GETSEL+19, GETSEL+23, GETSEL+24*
DIC("W"	GETSEL+20*
DIC(0	GETSEL+13*
>> DIROUT	CMPLIM+2, CMPLIM+3, CMPLIM+4, CMPLIM+5, CMPLIM+6, CMPLIM+7, CMPLIM+8, SELECT+9, GETSEL+10, GETSEL+26 , GETSEL+27
DTIME	GETSEL+9
>> DTOUT	GETSEL+26
>> DUOUT	CMPLIM+2, CMPLIM+3, CMPLIM+4, CMPLIM+5, CMPLIM+6, CMPLIM+7, CMPLIM+8, GETSEL+28
GETSLQIT	SELECT+1~, GETSEL+11, GETSEL+28
GMC	COMPILE+1~, COMPILE+6*, COMPILE+7
GMHEAD	RESOLVE+1~, RESOLVE+9*, HEADER+2
GMI	SELECT+1~, SELECT+9, SELECT+10, GETSEL+29, GETSEL+30, GETSEL+33, GETSEL+34, RESOLVE~, RESOLVE+6, RESOLVE+8 , RESOLVE+18, COMPILE+1~, COMPILE+2, COMPILE+3, COMPILE+9
GMJ	RESOLVE+1~, RESOLVE+17, RESOLVE+18, COMPILE+1~, COMPILE+3, COMPILE+4, COMPILE+7
GMREF	RESOLVE~, RESOLVE+9, RESOLVE+10
GMROOT	COMPILE+1~, COMPILE+4*, COMPILE+5, COMPILE+7
GMTEST	COMPILE~, COMPILE+2, COMPILE+3, COMPILE+9
GMTSEG	GETSEL+33, RESOLVE~
GMTSEG(	CMPLIM+9, SELECT+2, SELECT+4, GETSEL+12, GETSEL+32!, GETSEL+34, SHOWDEF+2, SHOWDEF+3, RESOLVE+18*
GMTSF	SELECT+1~, SELECT+2, GETSEL+32
GMTSFUNC	CMPLIM+1~
GMTSJ	SELECT+1~, SELECT+2, SELECT+3, SELECT+5, SHOWDEF+2, SHOWDEF+3
GMTSN	SHOWDEF+1~, SHOWDEF+3*
GMTSWHL	SHOWDEF+1~, SHOWDEF+3*
>> GMX	GETSEL+16
>> ORUS	RESOLVE+13*
>> ORUS("A"	RESOLVE+14*
>> ORUS("B"	RESOLVE+15*
>> ORUS("T"	RESOLVE+13*
>> ORUS(0	RESOLVE+13*, RESOLVE+14, RESOLVE+15
>> SBS	CMPLIM+9, SELECT+2, SELECT+4, GETSEL+12, GETSEL+32, GETSEL+34, SHOWDEF+2, SHOWDEF+3, RESOLVE+18
SEL	CMPLIM+9~*, SELECT+6, GETSEL+7, GETSEL+8, GETSEL+13, GETSEL+14, GETSEL+15, GETSEL+20, GETSEL+23, GETSEL+24 , GETSEL+32, GETSEL+34, RESOLVE+18
SELCNT	SELECT+1~, SELECT+4*, SELECT+7, SELECT+8, SELECT+9, SELECT+10, RESOLVE+8
SELCT	RESOLVE+1~, RESOLVE+8*, RESOLVE+13
TEMP	SELECT+1~
U	CMPLIM+2, CMPLIM+3, CMPLIM+4, CMPLIM+5, CMPLIM+6, CMPLIM+7, CMPLIM+9, SELECT+4, GETSEL+16, GETSEL+33 , SHOWDEF+3, RESOLVE+9, RESOLVE+11, RESOLVE+13, RESOLVE+14, RESOLVE+15, COMPILE+5, COMPILE+6, COMPILE+7
X	SELECT+1~, GETSEL+9*, GETSEL+10, GETSEL+11, GETSEL+12, GETSEL+29, GETSEL+30, GETSEL+32, RESOLVE+1~
Y	SELECT+1~, SELECT+9, GETSEL+10, GETSEL+11, GETSEL+29, GETSEL+30, GETSEL+31, GETSEL+33, GETSEL+34, RESOLVE+1~ , RESOLVE+17
Y(	RESOLVE+17, RESOLVE+18

Customize PDF page

Package: Health Summary

Routine: GMTSADH2

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: