Routine: GMTSXAR

Package	Total	Call Graph
VA Fileman	6	%XY^%RCR ^DIC FIELD^DID ^DIE $$GET1^DIQ ^DIR
Health Summary	1	($$MGR,$$PDI,$$PDN)^GMTSXAW3

Package	Total	Caller Graph
Health Summary	1	GMTSXA

Entry Points

Name	Comments	DBIA/ICR reference
SOH1	; Help - Single ?
AE(X)	; Allowable Entity
CHKM	; Check (Menu)
REO	; Re-order
TOT(X)	; Total Allowable Entities
SET	; Set Order
SOL	; List
ADED	; Add/Edit
CONTM	; Continue Menu
DA(GMTSI,X)	; Get DA
EN	; Main Entry
SOH2	; Help - Double ??
ED	; Edit Record
CHK	; Check if OK
CONTH	; Continue Help
CONT(X)	; Ask to Continue
L	; Lock Record
L2	; Lock Record
OK(X)	; Ask if OK
SO	; Select Order
OKH	; OK Help
ORD	; Order of Entities

External References

Name	Field # of Occurrence
%XY^%RCR	EN+7
^DIC	DA+2, L2+4, AE+7
FIELD^DID	ADED+10
^DIE	L+6, L2+7
$$GET1^DIQ	AE+4
^DIR	SO+10, CONT+8, OK+2
$$MGR^GMTSXAW3	EN+4, ADED+3
$$PDI^GMTSXAW3	EN+6, ADED+5, AE+3
$$PDN^GMTSXAW3	ED+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!," Please select the order in which you want these to be entities" Line Location: ORD+4
Function Call: WRITE	Prompt: ! Line Location: SO+5
Function Call: WRITE	Prompt: ! Line Location: SO+6
Function Call: WRITE	Prompt: $S($L($P(GMTSEXIT,"^",2)):"...",1:""),$P(GMTSEXIT,"^",2) Line Location: SO+15
Function Call: WRITE	Prompt: !,?5,$J(GMTSC,4)," ",GMTST Line Location: SOL+4
Function Call: WRITE	Prompt: !,?11,"Select a Health Summary Type entity to list" Line Location: SOH1+3
Function Call: WRITE	Prompt: " ",GMTSNXC Condition for execution: $L($G(GMTSNXC)) Line Location: SOH1+3
Function Call: WRITE	Prompt: " (1-",GMTSC,")",! Line Location: SOH1+3
Function Call: WRITE	Prompt: !,?11,"Select a Health Summary Type entity to list ",GMTSN," (1-",GMTSC,")",! Line Location: SOH1+4
Function Call: WRITE	Prompt: !,?11,"Parameter """,GMTSPARM,""" has multiple " Line Location: SOH2+2
Function Call: WRITE	Prompt: !,?11,"allowable entities for which Health Summary Types may" Line Location: SOH2+3
Function Call: WRITE	Prompt: !,?11,"be assigned and displayed on the CPRS reports tab. Now" Line Location: SOH2+4
Function Call: WRITE	Prompt: !,?11,"you must select the order in which you want these entites" Line Location: SOH2+5
Function Call: WRITE	Prompt: !,?11,"to be used by the site.",! Line Location: SOH2+6
Function Call: WRITE	Prompt: !!!," Parameter """,GMTSPARM,""" has ",GMTSTOT," allowable entities" Line Location: CONT+3
Function Call: WRITE	Prompt: !," which may have the Health Summary Types on the CPRS reports tab " Line Location: CONT+4
Function Call: WRITE	Prompt: !," and are used in the following order:" Line Location: CONT+5
Function Call: WRITE	Prompt: ! Line Location: CONT+8
Function Call: WRITE	Prompt: !," Enter either 'Y' or 'N'" Line Location: CONTH+1
Function Call: WRITE	Prompt: ! Condition for execution: GMTSC=1 Line Location: CONTM+4
Function Call: WRITE	Prompt: !,$J(GMTSC,6)," ",GMTST Line Location: CONTM+4
Function Call: WRITE	Prompt: !!,?8,"You have selected to resequenced the Health Summary Type" Line Location: CHK+3
Function Call: WRITE	Prompt: !,?8,"entities in the following order:",! Line Location: CHK+4
Function Call: WRITE	Prompt: !,?7,$J(GMTSC,4),?13,$P($G(GMTSCUR(GMTSI)),"^",5),?33,$P($G(GMTSORD(GMTSI)),"^",5) Line Location: CHKM+4
Function Call: WRITE	Prompt: ! Line Location: OK+1
Function Call: WRITE	Prompt: !," Enter either 'Y' or 'N'",!,!," Resequence entities:",! Line Location: OKH+1
Function Call: WRITE	Prompt: !,?5," Unable to resequence at this time." Line Location: ED+4
Function Call: WRITE	Prompt: !," Another user is editing this entry.",!," Unable to resequence at this time." Line Location: L+3
Function Call: WRITE	Prompt: !! Line Location: ADED+6
Function Call: WRITE	Prompt: "'" Condition for execution: $L(GMTSPARM) Line Location: ADED+6
Function Call: WRITE	Prompt: GMTSPARM Line Location: ADED+6
Function Call: WRITE	Prompt: "'" Condition for execution: $L(GMTSPARM) Line Location: ADED+6
Function Call: WRITE	Prompt: GMTSPARM Line Location: ADED+6
Function Call: WRITE	Prompt: !," Another user is editing this entry.",!," Unable to resequence at this time." Line Location: L2+3
Routine Call	DIE Line Location: L+6 L2+7
Routine Call	DIC Line Location: DA+2 L2+4 AE+7
Routine Call	DIR Line Location: SO+10 CONT+8 OK+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^XTV(8989.51 - [#8989.51]	FIELD^DID
8989.513	GET1^DIQ
^XTV(8989.518 - [#8989.518]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMT(142.98 - [#142.98]	SO+11
^XTV(8989.51 - [#8989.51]	L+1, L+7, L2+1, L2+7

Label References

Name	Line Occurrences
$$CONT	ORD+3
$$DA	L+6
$$OK	CHK+5
$$TOT	ORD+2, SO+1
CHK	EN+15
CHKM	CHK+5, OKH+1
CONTM	CONT+6, CONTH+2
ED	CHK+5
L	L+2
L2	L2+2
ORD	EN+15
REO	SO+5, SET+1
SET	SO+4, SO+16
SO	ORD+5
SOH1	SOH2+1
SOL	SO+5, SOH1+5, SOH2+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%X	EN+1~, EN+7*
%Y	EN+1~, EN+7*
DA	EN+1~, ED+1~, L+6, DA+1~, ADED+1~, L2+5, L2+6*, AE+1~, AE+5~
DA(1	ED+5, L+6, DA+1, DA+2, ADED+7, ADED+8, L2+5
DIC	EN+1~, ED+1~, ED+5, DA+1~, DA+2, ADED+1~, ADED+8, L2+5~, AE+1~, AE+5~*
DIC("B"	AE+7*
DIC("DR"	ADED+9*
DIC("P"	ADED+11*
DIC("S"	AE+6*
DIC(0	DA+2, ADED+8, AE+5*
DIDEL	EN+1~, ED+1~
DIE	EN+1~, ED+1~, ED+5, ADED+1~, ADED+8, L2+5~*
DIR	EN+1~, SO+6~, CONT+6~, OK+1~
DIR("?"	SO+7, CONT+8, OK+1*
DIR("??"	SO+7, CONT+8, OK+1*
DIR("A"	SO+8, CONT+7, OK+2*
DIR("B"	SO+9!, CONT+8, OK+2*
DIR(0	SO+7, CONT+8, OK+2*
DIROUT	EN+1~, SO+6~, SO+14, CONT+6~, OK+1~
DIRUT	EN+1~, SO+6~
DLAYGO	ADED+1~, ADED+10*
DR	EN+1~, ED+1~, ED+5, ADED+1~, L2+6
DTOUT	EN+1~, SO+6~, SO+14, CONT+6~, OK+1~, ED+1~, DA+1~, ADED+1~, AE+1~, AE+5~
DUOUT	EN+1~, SO+6~, SO+14, CONT+6~, OK+1~, DA+1~, ADED+1~, AE+1~, AE+5~
GMTSA	EN+1~, SOL+1~, SOL+2, SOL+3, CONT+6~, CONTM+2, CONTM+3, CHK+1~, CHK+5*
GMTSC	EN+1~, EN+8, EN+12, EN+13, EN+14, ORD+1~, SO+1~, SO+5, SOL+1~, SOL+2* , SOL+4, SOH1+1~, SOH1+3, SOH1+4, SET+5, SET+7, REO+1~, REO+3, CONT+6~, CONTM+1 , CONTM+4, CHK+1~, CHK+2, CHKM+1~, CHKM+2, CHKM+3*, CHKM+4
GMTSCHG	EN+1~, EN+5, EN+16, CHK+2, L+6*
GMTSCNT	EN+1~, ORD+1~, ORD+2, SO+2, ED+1~, ED+2, L+1, L+2, L+3, ADED+1~ , ADED+7, L2+1, L2+2, L2+3
GMTSCONT	EN+1~, ORD+3*
GMTSCT	EN+1~, SOH1+1~*, SOH1+2
GMTSCUR	EN+1~
GMTSCUR(	EN+13*, CONTM+1, CONTM+2, CHK+1, CHKM+1, CHKM+2, CHKM+4
GMTSCUR(0	CONT+1, CONT+2
GMTSD	EN+1~, SO+11~*, SO+12
GMTSDEF	ADED+1~, AE+1~, AE+2, AE+4, AE+7
GMTSENT	ADED+1~, AE+1~, AE+2*, AE+4
GMTSEQ	EN+1~, ED+1~, L+5*, L+6
GMTSEQ(	EN+9*, SET+3
GMTSEXIT	EN+1~, EN+15, ORD+3, ORD+5, ORD+6, SO+12, SO+14, SO+15, CONT+1*
GMTSF	EN+2~, EN+11~*, EN+13
GMTSFI	EN+2~, ED+1~, L+5*
GMTSI	EN+2~, EN+8, EN+9, EN+10, EN+13, EN+14, ORD+1~, ORD+2, SO+1~, SO+5 , SOL+1~, SOL+2, SOH1+1~, SET+5, SET+6, SET+7, REO+1~, REO+2, REO+3, TOT+1~* , CONT+6~, CONTM+1, CONTM+2, CHK+1~, CHKM+1~, CHKM+2, CHKM+4, ED+1~, L+4*, L+5 , DA~, DA+1
GMTSIE	EN+2~, EN+9~, EN+10, EN+11
GMTSM	EN+2~, DA+1~, ADED+2~
GMTSMAX	EN+2~, SO+1~, SO+6*, SO+7
GMTSMGR	EN+3~, EN+4, ADED+2~, ADED+3
GMTSN	EN+2~, SOL+1~, SOL+2, SOL+3, SOH1+1~, SOH1+2, SOH1+3, SOH1+4, CONT+6~, CONTM+2* , CONTM+3
GMTSNEW	EN+2~, ADED+2~, L2+4*
GMTSNXC	EN+2~, ORD+1~, SO+3*, SO+8, SOH1+3
GMTSNXT	EN+2~, ORD+1~, SO+2*, SO+3, SOH1+1
GMTSO	EN+2~, SET+1~*, SET+4
GMTSO("AL"	EN+8, EN+10, EN+11
GMTSO("ET"	EN+7!, EN+11, EN+13
GMTSOK	EN+2~
GMTSOLD	EN+2~, ORD+5
GMTSOLD(	EN+13*, SOL+1, SOL+2, SOH1+1, SET+6, SET+7!, REO+2, REO+3, TOT+1
GMTSOLD("B"	EN+14*, SO+1!
GMTSON	EN+2~, ORD+1~, ORD+2, SET+3, SET+4
GMTSORD	EN+2~, SO+13!
GMTSORD(	SET+4*, CHK+1, CHKM+1, CHKM+4, L+4, L+5
GMTSORD(" "	SET+1
GMTSORD("@"	SO+13*
GMTSORD(0	ED+3
GMTSPARM	EN+2~, EN+5, EN+6, SOH2+1, SOH2+2, CONT+1, CONT+2, CONT+3, ED+3, ADED+2~ , ADED+4, ADED+5, ADED+6, AE+1~, AE+2*, AE+3
GMTSPI	EN+2~, EN+6, EN+7, ED+2, ED+3, ED+5, L+1, L+7, ADED+2~, ADED+5* , ADED+7, L2+1, L2+5, L2+7, AE+1~, AE+3*, AE+4
GMTSREM	EN+2~, ORD+1~, SO+1*, SO+2, SO+4, SO+6, SO+16
GMTSREO	EN+3~, SO+1~, REO+1!
GMTSREO(	SET+2, SET+4, SET+7!, REO+3*
GMTSREO(0	SO+9
GMTSSO	ORD+1~, ORD+2, SO+2
GMTSSSO	EN+3~
GMTST	EN+3~, ORD+1~, ORD+2, SOL+1~, SOL+3, SOL+4, CONT+6~, CONTM+3, CONTM+4, ED+1~ , L+1, L+2, L+3, ADED+2~, L2+1*, L2+2, L2+3
GMTST("DID"	ADED+11
GMTSTOT	EN+3~, ORD+1~, ORD+2*, SO+2, CONT+1, CONT+2, CONT+3
GMTSUSR	EN+3~, SO+11
X	EN+1~, SO+6~, SO+10, TOT~, TOT+1, TOT+2, CONT~, CONT+9, OK~, OK+2* , L+6, DA~, DA+1, DA+2, ADED+1~, AE~, AE+2, AE+7, AE+8
Y	EN+1~, SO+4, SO+6~, SO+10, SO+13, SO+14, SO+16, SET+2, SET+4, SET+7 , CONT+9, OK+2, DA+1~, DA+2, ADED+1~, L2+4, L2+5, L2+6, AE+1~, AE+5~ , AE+7

Customize PDF page

Package: Health Summary

Routine: GMTSXAR

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: