Routine: GMTSRM

Package	Total	Call Graph
Health Summary	6	^GMTSLOAD NXTCMP^GMTSRM1 ADEL^GMTSRM2 SELCMP^GMTSRM5 (COPY,RNMBR)^GMTSRN $$TYPE^GMTSULT
VA Fileman	3	^DIE EN1^DIP ^DIR

Package

Total

Call Graph

Health Summary

^GMTSLOAD NXTCMP^GMTSRM1 ADEL^GMTSRM2 SELCMP^GMTSRM5 (COPY,RNMBR)^GMTSRN $$TYPE^GMTSULT

VA Fileman

^DIE EN1^DIP ^DIR

Package	Total	Caller Graph
Health Summary	6	GMTS IRM/ADPAC ADHOC EDIT GMTS TYPE ENTER/EDIT GMTSCM GMTSPP GMTSRM1 GMTSRM4

Package

Total

Caller Graph

Health Summary

GMTS IRM/ADPAC ADHOC EDIT GMTS TYPE ENTER/EDIT GMTSCM GMTSPP GMTSRM1 GMTSRM4

Entry Points

Name	Comments	DBIA/ICR reference
EXISTS	; Edit an existing health summary type
ENADHOC	; Entry point for AD HOC edit
LIST	; Lists existing summary parameters
SELTYP	; Select Health Summary Type to Edit
GETCNT(GMTSIFN)	; Determine default summary order for new component
CHKDEL	; Check for Possible Deletion (New Type without Component)
MAIN	; Main loop to modify multiple health summary types	ICR #3578 Status: Active Usage: Private

Name	Field # of Occurrence
^DIE	SELTYP+18, ENADHOC+9
EN1^DIP	LIST+6
^DIR	SELTYP+16, LIST+4
^GMTSLOAD	ENADHOC+7
NXTCMP^GMTSRM1	EXISTS+2
ADEL^GMTSRM2	CHKDEL+1
SELCMP^GMTSRM5	SELTYP+22
COPY^GMTSRN	EXISTS+3
RNMBR^GMTSRN	EXISTS+3
$$TYPE^GMTSULT	SELTYP+5, ENADHOC+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: SELTYP+2
Function Call: WRITE	Prompt: !,$C(7),"Alteration of this summary report is restricted to its owner.",!,"See the Clinical Coordinator if you need additional help." Line Location: SELTYP+10
Function Call: WRITE	Prompt: !!,$C(7),"WARNING: You are about to edit a Health Summary Type that is being used" Line Location: SELTYP+12
Function Call: WRITE	Prompt: !,"by a Health Summary Object. Changing the structure of this Health Summary" Line Location: SELTYP+13
Function Call: WRITE	Prompt: !,"Type will alter how the Object will display.",! Line Location: SELTYP+14
Function Call: WRITE	Prompt: !!,">>> EDITING the GMTS HS ADHOC OPTION Health Summary Type" Line Location: ENADHOC+4
Function Call: WRITE	Prompt: !,"Please hold on while I resequence the summary order" Line Location: EXISTS+3
Routine Call	DIE Line Location: SELTYP+18 ENADHOC+9
Routine Call	DIR Line Location: SELTYP+16 LIST+4

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

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142 - [#142]	SELTYP+7, SELTYP+10, SELTYP+19, SELTYP+21, CHKDEL+1, GETCNT+1
^GMT(142.5 - [#142.5]	SELTYP+11
^XUSEC(	SELTYP+8
^XUSEC("GMTSMGR"	SELTYP+6

Name	Line Occurrences
$$GETCNT	EXISTS+2
CHKDEL	SELTYP+20, SELTYP+22
ENADHOC	ENADHOC+7
EXISTS	SELTYP+21, SELTYP+22, ENADHOC+11
LIST	SELTYP+21, SELTYP+22, ENADHOC+11, EXISTS+2
SELTYP	MAIN+2

Name	Field # of Occurrence
^(0	SELTYP+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	MAIN+1~, ENADHOC+1~
B	LIST+1~
BY	LIST+1~, LIST+6*
C	ENADHOC+1~
CHANGE	SELTYP+1~, ENADHOC+1~, EXISTS+3
CNT	EXISTS+1~, EXISTS+2*
DA	SELTYP+1~, SELTYP+5, SELTYP+7, SELTYP+10, SELTYP+11, SELTYP+16, SELTYP+17, SELTYP+18, ENADHOC+1~, ENADHOC+9*
DHD	LIST+1~, LIST+6*
DIC	SELTYP+1~, SELTYP+2, SELTYP+5!, ENADHOC+1~, ENADHOC+6, LIST+1~, LIST+4, LIST+6
DIC("A"	SELTYP+3*
DIC("S"	SELTYP+4*
DIC(0	SELTYP+2, ENADHOC+6
DIE	SELTYP+1~, SELTYP+18, ENADHOC+1~, ENADHOC+9
DIR	SELTYP+15~, LIST+1~, LIST+4!
DIR("A"	SELTYP+16, LIST+4
DIR("B"	SELTYP+15, LIST+4
DIR(0	SELTYP+15, LIST+4
DIROUT	SELTYP+15~, SELTYP+17, SELTYP+19, ENADHOC+7
DIRUT	MAIN+1~, ENADHOC+7
DLAYGO	SELTYP+1~, SELTYP+4*
DR	SELTYP+1~, SELTYP+18, ENADHOC+1~, ENADHOC+9
DTOUT	MAIN+1~, SELTYP+15~, SELTYP+17, SELTYP+19
DUOUT	MAIN+1~, SELTYP+1~, SELTYP+15~, SELTYP+17, SELTYP+19, ENADHOC+1~, EXISTS+1, EXISTS+2, LIST+2, LIST+4*
DUZ	SELTYP+6, SELTYP+8, SELTYP+10, CHKDEL+1
EXISTS	MAIN+1~, MAIN+2, SELTYP+1~, SELTYP+21, SELTYP+22, ENADHOC+1~, ENADHOC+8*
FLDS	LIST+1~, LIST+6*
FR	LIST+1~, LIST+6*
GMTSEG	SELTYP+1~
GMTSFUNC	MAIN+1~, ENADHOC+3~
GMTSIFN	SELTYP+1~, SELTYP+5, SELTYP+18, SELTYP+19, SELTYP+21, CHKDEL+1, ENADHOC+1~, ENADHOC+2~, ENADHOC+8*, ENADHOC+9 , EXISTS+2, GETCNT~, GETCNT+1
GMTSMGR	SELTYP+1~, SELTYP+6, SELTYP+7, SELTYP+8, SELTYP+9, SELTYP+10, CHKDEL+1
GMTSN	ENADHOC+1~
GMTSNCNT	ENADHOC+1~
GMTSNEW	SELTYP+1~, SELTYP+6, SELTYP+10, SELTYP+21, CHKDEL+1, ENADHOC+1~, ENADHOC+5, EXISTS+2!, LIST+4
GMTSQIT	MAIN+1~, MAIN+2, SELTYP+5, SELTYP+17, SELTYP+20, SELTYP+22, ENADHOC+3~, ENADHOC+5, EXISTS+2!, LIST+2 , LIST+3, LIST+4, LIST+5
GMTSUM	SELTYP+1~, SELTYP+6, ENADHOC+2~, ENADHOC+8, LIST+6
I	ENADHOC+1~
IOP	LIST+1~, LIST+6*
L	LIST+1~, LIST+6*
LCNT	GETCNT+1~*, GETCNT+2
LI	GETCNT+1~*
NXTCMP	EXISTS+1~*, EXISTS+3, LIST+3
NXTCMP(0	EXISTS+1*
P	MAIN+1~, ENADHOC+2~
SELCNT	SELTYP+1~, ENADHOC+2~
SOACTION	EXISTS+2!
TO	LIST+1~, LIST+6*
TWEENER	EXISTS+2!
U	SELTYP+2*, SELTYP+6, SELTYP+7, SELTYP+8, SELTYP+10, CHKDEL+1, ENADHOC+8
X	SELTYP+1~, SELTYP+15~, ENADHOC+3~, ENADHOC+6*
Y	SELTYP+1~, SELTYP+5, SELTYP+6, SELTYP+15~, SELTYP+16, SELTYP+18, SELTYP+19, ENADHOC+3~, ENADHOC+7, ENADHOC+8 , ENADHOC+10, LIST+1~, LIST+4

Customize PDF page

Package: Health Summary

Routine: GMTSRM

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: