Routine: GMTSULT6

Information

GMTSULT6 ; SLC/KER - HS Type Lookup (Select) ; 08/27/2002

Source Information

Source file <GMTSULT6.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
VA Fileman	4	RECALL^DILFD ^DIM $$GET1^DIQ ^DIR
Health Summary	1	$$EN^GMTSUMX

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Health Summary	2	GMTSULT GMTSULT2

Entry Points

Name	Comments	DBIA/ICR reference
Y(X)	; Set Y
MULTI	; Selection when Multiple Entries are found
SEL(X)	; Select multiple
SDISV	; Save Default Value (Spacebar-Return)
WRO1	; Write one entry of single selection
WRM1	; Write one entry of muli selection
OK(X)	; Select one if DIC(0)["A" Ask OK
ONE	; One entry on the selection list
PARSE	; Parse a long string to screen length
LONG	; Handle a long string
MX(X)	; Mix Case
DICW(X)	; Check for valid DIC("W")
DEF	; Select Default Entry

External References

Name	Field # of Occurrence
RECALL^DILFD	SDISV+2
^DIM	DICW+2
$$GET1^DIQ	SDISV+1
^DIR	SEL+5, OK+2
$$EN^GMTSUMX	MX+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: MULTI+4
Function Call: WRITE	Prompt: !,GMTSTOT," Health Summary Types found" Condition for execution: +GMTSTOT>1 Line Location: MULTI+4
Function Call: WRITE	Prompt: ! Condition for execution: GMTSI#5=1 Line Location: MULTI+9
Function Call: WRITE	Prompt: !,$J(GMTSI,4),". " Line Location: MULTI+9
Function Call: WRITE	Prompt: ! Line Location: MULTI+14
Function Call: WRITE	Prompt: $P(GMTS,"^",1)," " Line Location: WRM1+3
Function Call: WRITE	Prompt: !!," " Line Location: WRO1+1
Function Call: WRITE	Prompt: ! Line Location: WRO1+2
Function Call: WRITE	Prompt: $P(GMTS,"^",1)," " Line Location: WRO1+3
Function Call: WRITE	Prompt: ! Line Location: WRO1+3
Function Call: WRITE	Prompt: ! Line Location: WRO1+4
Function Call: WRITE	Prompt: ! Condition for execution: GMTSLN>1 Line Location: LONG+3
Function Call: WRITE	Prompt: ?GMTSP,GMTSTR Line Location: LONG+3
Function Call: WRITE	Prompt: ! Condition for execution: GMTSLN>1 Line Location: PARSE+10
Function Call: WRITE	Prompt: ?GMTSP,GMTSTO Line Location: PARSE+10
Routine Call	DIR Line Location: SEL+5 OK+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMT(142 - [#142]	RECALL^DILFD
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142 - [#142]	MULTI+17, WRM1+1, ONE+13, WRO1+1, DEF+2, Y+2, Y+3, Y+4, Y+5, SDISV+1
^TMP("GMTSULT"	MULTI+3, MULTI+7, MULTI+8, MULTI+16, SEL+2, SEL+3, ONE+6, ONE+8, ONE+9, ONE+12 , DEF+1

Label References

Name	Line Occurrences
$$DICW	MULTI+2
$$MX	Y+4
$$OK	ONE+10
$$SEL	MULTI+13, MULTI+14
DEF	MULTI+1, ONE+1
LONG	WRM1+2, WRO1+2
ONE	MULTI+3
PARSE	LONG+2
SDISV	Y+6
WRM1	MULTI+12
WRO1	ONE+10
Y	MULTI+18, ONE+14, DEF+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DIC(0	Y+4, Y+5, Y+6
DIR	SEL+5!, ONE+2~, OK+1~
DIR("?"	SEL+4*
DIR("??"	SEL+4*
DIR("A"	SEL+2, SEL+3, OK+2*
DIR("B"	OK+1*
DIR(0	SEL+5, OK+1
DIROUT	SEL+1~, OK+1~
DIRUT	SEL+1~
DTOUT	SEL+1~, SEL+5, OK+1~, OK+2
DUOUT	SEL+1~, OK+1~, OK+2
DUZ	SDISV+1, SDISV+2
GMTS	WRM1+1~, WRM1+3, WRO1+1~, WRO1+3
GMTSCHR	LONG+1~, PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5*, PARSE+6, PARSE+7, PARSE+8, PARSE+9
>> GMTSDEF	MULTI+1, ONE+1
>> GMTSDIC0	WRM1+3, WRM1+4, ONE+3, ONE+7, WRO1+3, WRO1+4, Y+4, Y+5, Y+6, SDISV+1
>> GMTSDICB	MULTI+1, ONE+1
GMTSDICW	MULTI+2*!, WRM1+2, WRM1+3, WRM1+4, WRO1+2, WRO1+3, WRO1+4
GMTSE	MULTI+3~, MULTI+8*, MULTI+10
GMTSEX	MULTI+5~, MULTI+7, MULTI+13, MULTI+14, MULTI+15, ONE+2~, ONE+4, ONE+10*, ONE+11
GMTSI	MULTI+5~, MULTI+7*, MULTI+8, MULTI+9, MULTI+13, MULTI+14, SEL+2, SEL+3
GMTSIEN	MULTI+3~, MULTI+10, WRM1+1, ONE+2~, ONE+6, WRO1+1
GMTSLEN	MULTI+5~, WRM1+2, ONE+2~, ONE+3, WRO1+2, LONG+2, PARSE+1
GMTSLN	LONG+1~, LONG+3, PARSE+10*
GMTSM	MULTI+3~, MULTI+9, MULTI+13, MULTI+14, SEL+1~, SEL+2, SEL+3, SEL+4, SEL+5
GMTSNAM	MULTI+16~, MULTI+17, ONE+12~, ONE+13, DEF+1~, DEF+2*
GMTSO	MULTI+3~, MULTI+10*, MULTI+11
GMTSOK	LONG+1~, PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5*
GMTSOLD	LONG+1~*
GMTSP	LONG+1~*, LONG+3, PARSE+10
GMTSPSN	LONG+1~, PARSE+1*, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+8, PARSE+9
>> GMTSQ	ONE+3*, ONE+7
GMTSREM	LONG+1~, PARSE+6, PARSE+7, PARSE+8, PARSE+9, PARSE+10
GMTSS	MULTI+5~, MULTI+7, MULTI+13, MULTI+14*, MULTI+15, MULTI+16
GMTST	MULTI+3~, MULTI+10*
GMTSTO	LONG+1~, PARSE+6, PARSE+7, PARSE+8, PARSE+9, PARSE+10
GMTSTOT	MULTI+3~*, MULTI+4
GMTSTR	MULTI+5~, MULTI+10, MULTI+11, WRM1+2, ONE+2~, ONE+8, ONE+9, WRO1+2, LONG+1, LONG+2 , LONG+3, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+8, PARSE+9, PARSE+10*
GMTSTR2	MULTI+5~, ONE+2~
GMTSTR3	MULTI+5~
>> GMTSWY	Y+5*
GMTSX	ONE+2~
GMTSY	ONE+2~
U	MULTI+10, SEL+5, ONE+8, ONE+9
X	MULTI+5~, SEL~, SEL+1, SEL+5, ONE+2~, ONE+8~, OK~, OK+2, DICW~, DICW+1* , DICW+2, DICW+3, Y~, Y+1*, Y+2, Y+3, Y+4, Y+5, MX~, MX+1
Y	MULTI+16!, MULTI+17!, MULTI+18, MULTI+19!, WRM1+1~, SEL+1~, ONE+3, ONE+10, ONE+11, ONE+12!* , ONE+13!, ONE+14, ONE+15!, WRO1+1~, OK+2, DEF+1!, DEF+2!, DEF+3, Y+1!, Y+2 , Y+3*, SDISV+1, SDISV+2
Y(0	Y+4*

Customize PDF page

Package: Health Summary

Routine: GMTSULT6

Call Graph Total: 5

Caller Graph Total: 2