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

External References

Name	Field # of Occurrence
^DIWP	CF+3
GETLIST^GMPLHS	MAIN+1
GETICDDX^GMTSPXU1	WRT+47
TXTFMT^GMTSPXU1	WRT+87
REGDT4^GMTSU	WRT+38, WRT+42, WRT+43
CKP^GMTSUP	WRT+95, L1+1, LN+1, LC+3, LC2+3, SUBHDR+2, SUBHDR2+1
$$DSMONE^LEXU	WRT+54

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: WRT+95
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: ?3 Condition for execution: I=1 Line Location: LC2+3
Function Call: WRITE	Prompt: ?7 Condition for execution: I>1 Line Location: LC2+3
Function Call: WRITE	Prompt: $G(T),! Line Location: LC2+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+31, WRT+35, WRT+49, WRT+50, WRT+52, WRT+60, WRT+64, WRT+65, DC+2 , DC+3, DC+4, DC+5, QUAL+3, QUAL+5, SUBHDR+1
^UTILITY($J	WRT+88, WRT+90, WRT+94!, L1+1, LN+1, LC+1!, LC+2, LC+3, LC2+1!, LC2+2 , LC2+3, CF+2!

Label References

Name	Line Occurrences
$$LD	CF+1, RF+4
$$RF	WRT+86
$$RM	WRT+83
$$RT	LC+3, LC2+3
$$UP	WRT+44, WRT+53, WRT+71, WRT+74, WRT+81
CF	LC+1, LC2+1
DC	WRT+92
L1	WRT+91
LC	DC+6
LC2	QUAL+6
LN	WRT+91
MAIN	ACTIVE+1, INACT+1, ALL+1
QUAL	WRT+93
SUBHDR	MAIN+1
SUBHDR2	WRT+95, L1+1, LN+1, LC+3, LC2+3
WRT	MAIN+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

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