Routine: GMTSPLST

Package	Total	Call Graph
Health Summary	3	(GETICDDX,TXTFMT)^GMTSPXU1 REGDT4^GMTSU CKP^GMTSUP
Lexicon Utility	1	$$DSMONE^LEXU
Problem List	1	GETLIST^GMPLHS
VA FileMan	1	^DIWP

Entry Points

Name	Comments	DBIA/ICR reference
ACTIVE	; Get Active Problems
INACT	; Get Inactive Problems
ALL	; Get All Problems (Active and Inactive)
MAIN	; Driver
WRT	; Writes Problem List Component,X
L1	; Line #1 Problem, date, provider
LN	; Line >1 Problem (other)
DC	; Comments are displayed if there are any
LC	; List Comments (unnumbered and numbered)
CF(GMC,GMT)	; Formats GMC (count) and GMT (text) together
SUBHDR	; Subheader for Problem List Component
SUBHDR2	; Will be written on new pages
RM(X)	; Remove MST
RF(X)	; Remove Leading Spaces/Punctuation
LD(X)	; Uppercase Leading Character
RT(X)	; Right Trim Spaces
UP(X)	; Uppercase

External References

Name	Field # of Occurrence
^DIWP	CF+3
GETLIST^GMPLHS	MAIN+1
GETICDDX^GMTSPXU1	WRT+50
TXTFMT^GMTSPXU1	WRT+89
REGDT4^GMTSU	WRT+41, WRT+45, WRT+46
CKP^GMTSUP	WRT+96, L1+1, LN+1, LC+3, SUBHDR+2, SUBHDR2+1
$$DSMONE^LEXU	WRT+56

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: WRT+96
Function Call: WRITE	Prompt: STAT Condition for execution: STATUS="ALL" Line Location: L1+1
Function Call: WRITE	Prompt: ?3,$G(^UTILITY($J,"W",DIWL,GMTSX,0)),?53,LASTMDT,?65,$E(PROV,1,15),! Line Location: L1+1
Function Call: WRITE	Prompt: ?3,$G(^UTILITY($J,"W",DIWL,GMTSX,0)),! Line Location: LN+1
Function Call: WRITE	Prompt: ?3 Condition for execution: I=1 Line Location: LC+3
Function Call: WRITE	Prompt: ?7 Condition for execution: I>1 Line Location: LC+3
Function Call: WRITE	Prompt: $G(T),! Line Location: LC+3
Function Call: WRITE	Prompt: ?50,NUM_$S(STATUS="A":" Active",STATUS="I":" Inactive",1:"")_" Problems",! Line Location: SUBHDR+2
Function Call: WRITE	Prompt: "ST" Condition for execution: STATUS="ALL" Line Location: SUBHDR2+1
Function Call: WRITE	Prompt: ?3,"PROBLEM",?53,"LAST MOD",?65,"PROVIDER",! Line Location: SUBHDR2+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("GMPLHS"	MAIN+1!, WRT+33, WRT+37, WRT+52, WRT+54, WRT+62, WRT+66, WRT+67, DC+2, DC+3 , DC+4, DC+5, SUBHDR+1
^UTILITY($J	WRT+90, WRT+92, WRT+95!, L1+1, LN+1, LC+1!, LC+2, LC+3, CF+2!

Label References

Name	Line Occurrences
$$LD	CF+1, RF+4
$$RF	WRT+88
$$RM	WRT+85
$$RT	LC+3
$$UP	WRT+47, WRT+55, WRT+74, WRT+77, WRT+84
CF	LC+1
DC	WRT+94
L1	WRT+93
LC	DC+6
LN	WRT+93
MAIN	ACTIVE+1, INACT+1, ALL+1
SUBHDR	MAIN+1
SUBHDR2	WRT+96, L1+1, LN+1, LC+3
WRT	MAIN+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADDINFO	WRT+35~, WRT+45, WRT+46, WRT+87
CMT	DC+1~, DC+6*, LC+1
CNT	DC+1~, DC+3, LC+1*
CODE	WRT+35~, WRT+56, WRT+69, WRT+70, WRT+71, WRT+76, WRT+77
DATE	DC+1~
>> DFN	MAIN+1
DIWF	CF+2~
DIWL	WRT+31~, WRT+32, WRT+89, WRT+92, L1+1, LN+1, CF+2~
DIWR	CF+2~*
EXP	WRT+35~, WRT+44*, WRT+85, WRT+86
>> EXT	WRT+85*
GMC	CF~, CF+1*, CF+3
GMCOL	CF+2~*
GMDIAC	WRT+34~, WRT+35~, WRT+36, WRT+51, WRT+57, WRT+59, WRT+61, WRT+63, WRT+64, WRT+65 , WRT+73, WRT+80, WRT+83
GMDIAG	WRT+34~, WRT+39*, WRT+49, WRT+50
GMDIAS	WRT+34~, WRT+56, WRT+59, WRT+61, WRT+63, WRT+65, WRT+67, WRT+68*, WRT+69
GMDIAT	WRT+34~, WRT+35~, WRT+36, WRT+51, WRT+71, WRT+76, WRT+84
GMDSM	WRT+35~, WRT+56, WRT+57, WRT+58*, WRT+60, WRT+61
GMDSMS	WRT+35~, WRT+56, WRT+60, WRT+61*, WRT+69
GMICD	WRT+35~, WRT+43, WRT+50, WRT+51, WRT+71, WRT+76, WRT+77, WRT+78, WRT+81, WRT+84 , WRT+86, WRT+87, WRT+88*, WRT+89
GMNODE	WRT+34~, WRT+37*, WRT+38, WRT+39, WRT+40, WRT+42, WRT+43, WRT+44
>> GMPXICDF	WRT+47*, WRT+48, WRT+49, WRT+50, WRT+84
>> GMPXNARR	WRT+54
GMR	DC+1~, DC+4*, DC+5
GMREC	WRT+31~, WRT+32, WRT+33, WRT+37, WRT+52, WRT+54, WRT+62, WRT+66, WRT+67, DC+2 , DC+3, DC+4, DC+5
GMSCT	WRT+34~, WRT+43*, WRT+63, WRT+64, WRT+65
GMT	CF~, CF+1*, CF+3
GMTAB	WRT+31~, WRT+32*, WRT+89
GMTSCSYS	WRT+34~, WRT+40*, WRT+50
GMTSDINT	WRT+34~, WRT+40*, WRT+50
GMTSICL	WRT+31~, WRT+32*, WRT+89
GMTSILBL	WRT+35~, WRT+40*, WRT+59, WRT+63, WRT+65, WRT+84
>> GMTSNPG	WRT+96, L1+1, LN+1, LC+3
>> GMTSQIT	WRT+33, WRT+92, WRT+96, L1+1, LN+1, DC+2, DC+4, LC+3, SUBHDR+2, SUBHDR2+1
GMTSTXTF	WRT+31~, WRT+32, WRT+48, WRT+51
GMTSX	WRT+35~, WRT+91, WRT+92, L1+1, LN+1
GMVHAT	WRT+34~, WRT+43*, WRT+63, WRT+64
I	DC+1~, LC+2~*, LC+3
IOST	WRT+85
LASTMDT	WRT+34~, WRT+39, WRT+41, L1+1
LEX	WRT+35~, WRT+52, WRT+54, WRT+55, WRT+70*, WRT+78, WRT+80, WRT+81, WRT+83
LEXI	WRT+35~, WRT+55*, WRT+56
LINE1	WRT+31~, WRT+91, WRT+93
LOC	DC+1~, DC+2, DC+3, DC+4, DC+5
NARR	WRT+35~, WRT+53, WRT+54, WRT+73, WRT+74, WRT+76, WRT+77, WRT+78, WRT+81, WRT+84 , WRT+87*, WRT+89
NODE	DC+1~, DC+5, DC+6, SUBHDR+1~
NUM	SUBHDR+1~, SUBHDR+2
ONSETDT	WRT+34~, WRT+42*, WRT+45
PLIFN	WRT+35~
PROV	WRT+34~, WRT+42*, L1+1
RESDT	WRT+35~, WRT+43*, WRT+46
SERV	WRT+34~
STAT	WRT+34~, WRT+39*, WRT+45, WRT+46, L1+1
STATUS	ACTIVE+1~, INACT+1~, ALL+1~*, MAIN+1, L1+1, SUBHDR+1, SUBHDR+2, SUBHDR2+1
T	WRT+66~, WRT+67, DC+1~, LC+2~, LC+3
TOT	SUBHDR+1~*, SUBHDR+2
U	WRT+39, WRT+40, WRT+42, WRT+43, WRT+44, WRT+67, DC+6, SUBHDR+1
UCNT	DC+1~, DC+3*, LC+1
UNARR	WRT+74~*, WRT+75
X	WRT+35~, WRT+41, WRT+45, WRT+46, DC+1~, CF+2~, CF+3, RM~, RM+1, RM+2 , RM+3, RM+4, RM+5, RF~, RF+1, RF+2, RF+3, RF+4, LD~, LD+1 , RT~, RT+1*, RT+2, UP~, UP+1

Customize PDF page

Package: Health Summary

Routine: GMTSPLST

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: