Routine: GMTSOBA2

Package	Total	Call Graph
VA Fileman	4	^DIC ^DIE EN1^DIP ^DIR
Health Summary	3	$$VTE^GMTSOBV NXTCMP^GMTSRM1 (COPY,RNMBR)^GMTSRN

Package	Total	Caller Graph
Health Summary	2	GMTSOBA GMTSOBJ

Entry Points

Name	Comments	DBIA/ICR reference
CH	; Component Header
LB	; Object Label
EXISTS	; Edit an existing health summary type
BL	; Blank Line after Header
DE	; Deceased
LIST	; Lists existing summary parameters
LBL	; Label
LBB	; Label Blank Line
ET(X)	; Edit Type X
GETCNT(GMTSIFN)	; Determine default summary order for new component
SC	; Suppress Components w/o Data
UD	; Underline Header
LM	; Time/Occurence Limits

External References

Name	Field # of Occurrence
^DIC	ET+5
^DIE	ET+13
EN1^DIP	LIST+5
^DIR	CH+6, LM+6, UD+7, BL+6, DE+6, LBL+6, LB+5, LBB+6, SC+6, LIST+3
$$VTE^GMTSOBV	ET+8
NXTCMP^GMTSRM1	EXISTS+2
COPY^GMTSRN	EXISTS+3
RNMBR^GMTSRN	EXISTS+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Editing Health Summary Type '",GMTSN,"'",! Line Location: ET+12
Function Call: WRITE	Prompt: !,"Please hold on while I resequence the summary order" Line Location: EXISTS+3
Routine Call	DIE Line Location: ET+13
Routine Call	DIC Line Location: ET+5
Routine Call	DIR Line Location: CH+6 LM+6 UD+7 BL+6 DE+6 LBL+6 LB+5 LBB+6 SC+6 LIST+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMT(142 - [#142]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142 - [#142]	ET+6, ET+14, GETCNT+1
^GMT(142.5 - [#142.5]	CH+3, LM+3, UD+4, BL+3, DE+3, LBL+4, LB+3, LBB+3, SC+3
^XUSEC("GMTSMGR"	ET+9

Label References

Name	Line Occurrences
$$GETCNT	EXISTS+2
BL	CH+12
EXISTS	ET+15
LB	LBL+9
LBB	LB+8
LIST	ET+15, EXISTS+2
LM	CH+10
UD	CH+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADEL	ET+1~
B	ET+1~, LIST+1~
BY	ET+1~, LIST+1~, LIST+5*
CHANGE	ET+1~, EXISTS+3
CNT	ET+1~, EXISTS+1~, EXISTS+2*
D	ET+3~
D0	ET+3~
D1	ET+3~
DA	LB+3, LBB+3, ET+1~, ET+10*
DHD	ET+1~, LIST+1~, LIST+5*
DIC	ET+1~, ET+5, LIST+1~, LIST+3, LIST+5*
DIC(0	ET+5*
DIE	ET+1~, ET+10*
DIK	ET+1~
DIR	CH+1~, LM+1~, UD+2~, BL+1~, DE+1~, LBL+1~, LB+1~, LBB+1~, SC+1~, ET+1~ , LIST+1~, LIST+3!
DIR("?"	CH+5, LM+5, UD+6, BL+5, DE+5, LBL+5, LB+4, LBB+5, SC+5*
DIR("??"	CH+5, LM+5, UD+6, BL+5, DE+5, LBL+5, LB+4, LBB+5, SC+5*
DIR("A"	CH+2, LM+2, UD+3, BL+2, DE+2, LBL+3, LB+2, LBB+2, SC+2, LIST+3
DIR("B"	CH+5, LM+5, UD+6, BL+5, DE+5, LBL+5, LB+3, LBB+4, SC+5, LIST+3
DIR(0	CH+5, LM+5, UD+6, BL+5, DE+5, LBL+5, LB+4, LBB+5, SC+5, LIST+3
DIROUT	CH+1~, CH+6, LM+1~, LM+6, UD+2~, UD+7, BL+1~, BL+6, DE+1~, DE+6 , LBL+1~, LBL+6, LB+1~, LB+5, LBB+1~, LBB+6, SC+1~, SC+6, ET+1~, ET+7
DLAYGO	ET+1~, ET+5!
DQ	ET+3~
DR	ET+1~, ET+11*
DTOUT	CH+1~, CH+6, LM+1~, LM+6, UD+2~, UD+7, BL+1~, BL+6, DE+1~, DE+6 , LBL+1~, LBL+6, LB+1~, LB+5, LBB+1~, LBB+6, SC+1~, SC+6, ET+1~, ET+7
DUOUT	CH+1~, LM+1~, UD+2~, BL+1~, DE+1~, LBL+1~, LB+1~, LBB+1~, SC+1~, ET+2~ , EXISTS+1, EXISTS+2, LIST+1, LIST+3*
DUZ	ET+1, ET+9
EXISTS	ET+2~, ET+4, ET+14, ET+15
FLDS	ET+2~, LIST+1~, LIST+5*
FR	ET+2~, LIST+1~, LIST+5*
GMTSAL	ET+3~, ET+4, EXISTS+1~, LIST+3
>> GMTSDA	CH+3, LM+3, UD+4, BL+3, DE+3, LBL+4, SC+3
GMTSDEF	CH+1~, CH+3, CH+4, CH+5, LM+1~, LM+3, LM+4, LM+5, UD+2~, UD+4* , UD+5, UD+6, BL+1~, BL+3, BL+4, BL+5, DE+1~, DE+3, DE+4, DE+5 , LBL+1~, LBL+4, LBL+5, LB+1~, LB+3, LBB+1~, LBB+3, LBB+4, SC+1~, SC+3* , SC+4*, SC+5, ET+2~
>> GMTSDES	CH+7, LM+7, UD+8*
GMTSDLD	LBL+1~, SC+1~
GMTSE	CH+1~, CH+3, CH+7, CH+10, CH+11, CH+12, LM+1, LM+6, LM+7, LM+8 , UD+1, UD+7, UD+8, UD+9, LB+1~, LB+5, LB+6, LB+7, LBB+1~, LBB+6 , LBB+7
GMTSEG	ET+2~
GMTSIEN	ET+2~
GMTSIFN	ET+2~, ET+10*, ET+14, EXISTS+2, GETCNT~, GETCNT+1
GMTSMGR	ET+2~, ET+9*
>> GMTSN	ET+6*, ET+12
GMTSNEW	ET+3~, ET+8*, EXISTS+2!, LIST+3
>> GMTSOBJ("BLAN	K LINE" , BL+2*, BL+7!, BL+8!
>> GMTSOBJ("COMP	ONENT HEADER" , CH+2*, CH+8!, CH+9!, CH+10, CH+11, CH+12
>> GMTSOBJ("DECEASED"	DE+2*, DE+7!, DE+8!
>> GMTSOBJ("LABE	L BLANK LINE" , LBL+2!, LB+6!, LB+7!, LBB+2*, LBB+7!, LBB+8!
>> GMTSOBJ("LABEL"	LBL+2!, LB+2, LB+6!, LB+7!, LB+8
>> GMTSOBJ("LIMITS"	LM+2*, LM+8!, LM+9!
>> GMTSOBJ("SUPP	RESS COMPONENTS" , SC+2*, SC+7!, SC+8!
>> GMTSOBJ("UNDERLINE"	UD+3*, UD+9!, UD+10!
>> GMTSOBJ("USE	LABEL" , LBL+2!, LBL+7!, LBL+8*, LB+6!, LB+7!
>> GMTSQ	CH+1, CH+6, CH+7, CH+8, CH+10, CH+11, CH+12, LM+1, LM+7, UD+1 , UD+8, BL+1, BL+6, BL+7, DE+1, DE+6, DE+7, LBL+1, LBL+6, LBL+7 , LB+1, LBB+1, SC+1, SC+6, SC+7
GMTSQIT	ET+3~, ET+4, EXISTS+2!, LIST+1, LIST+2, LIST+3, LIST+4
GMTSUM	ET+3~, ET+7*, LIST+5
GMTSV	ET+3~, ET+8*
GNTSN	ET+2~
IOP	LIST+1~, LIST+5*
L	ET+3~, LIST+1~, LIST+5*
LCNT	ET+3~, GETCNT+1~*, GETCNT+2
LI	ET+3~, GETCNT+1~*
NXTCMP	ET+4~, EXISTS+1~*, EXISTS+3, LIST+2
NXTCMP(0	EXISTS+1*
SELCNT	ET+4~
SOACTION	ET+4~, EXISTS+2!
TO	ET+4~, LIST+1~, LIST+5*
TWEENER	ET+4~, EXISTS+2!
U	CH+3, LM+3, UD+4, BL+3, DE+3, SC+3, ET+4*, ET+7
X	CH+1~, CH+7, CH+9, LM+1~, LM+7, LM+9, UD+2~, UD+8, UD+10, BL+1~ , BL+8, DE+1~, DE+8, LBL+1~, LBL+6, LBL+9, LB+1~, LB+5, LB+7, LB+8 , LBB+1~, LBB+6, LBB+8, SC+1~, SC+8, ET~, ET+4
Y	CH+1~, CH+7, CH+9, LM+1~, LM+7, LM+9, UD+2~, UD+8, UD+10, BL+1~ , BL+8, DE+1~, DE+8, LBL+1~, LBL+6, LBL+8, LBL+9, LB+1~, LB+5, LB+7 , LBB+1~, LBB+6, LBB+8, SC+1~, SC+8, ET+3~, ET+6, ET+7*, ET+8, ET+10 , LIST+1~, LIST+3

Customize PDF page

Package: Health Summary

Routine: GMTSOBA2

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: