Routine: GMTSGAF

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Interaction Calls
Global Variables Directly Accessed
Label References
Local Variables

Information

GMTSGAF ; SLC/KER - MH Gbl Assessment Funct (GAF) ; 6/20/05 1:44pm

Source Information

Source file <GMTSGAF.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Health Summary	2	REGDTM4^GMTSU CKP^GMTSUP
VA Fileman	2	^%DT C^%DTC
Kernel	1	($$FMADD,$$FMTE,$$NOW)^XLFDT
Registration	1	DEM^VADPT
Uncategorized	1	GAFHX^YSGAFAPI

Entry Points

Name	Comments	DBIA/ICR reference
TOD(X)	; Today
EN	; Global Assessment Functioning Score
HDR	; Header
GET	; Get and Format Data
ERR(X)	; Entered in Error
DTM(X)	; Current Date and Time (External)
B(X,Y)	; Graph Bar
DEC(X)	; Deceased Date
SD(GMTSI,DFN,GMTSCORE,GMTSDATE,GMTSPROV,GMTSCOM)	; Save Data
ITM(X)	; convert inverse internal date to internal date to external date
GAF(X)	; 2 Digit GAF Score
ETF(X)	; External to Fileman format
TOM(X)	; Tomorrow
EXT(X)	; convert inverse internal date to internal date, add one day, then to external date
DUE(X)	; GAF Score Due Date
LINE	; Output One Line
SPC	; Get Special Case (Deceased, Due, Entered-in-Error)
OUT	; Output

External References

Name	Field # of Occurrence
^%DT	ITM+4, EXT+4, ETF+1
C^%DTC	ITM+5
REGDTM4^GMTSU	DTM+1
CKP^GMTSUP	LINE+1, HDR+2, HDR+3, HDR+4
DEM^VADPT	DEC+2
$$FMADD^XLFDT	EN+2, EN+3, EN+4, EN+5, DUE+3, EXT+6, TOM+1
$$FMTE^XLFDT	GET+3, GET+5, GET+7, GET+11, ITM+4, ITM+7, EXT+4, EXT+7, TOM+1
$$NOW^XLFDT	EN+2, EN+4, ITM+5, EXT+4, TOM+1, TOD+1, DTM+1
GAFHX^YSGAFAPI	GET+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?GMTSCS(1),$J($E(GMTSCORE,1,3),3),?GMTSCS(2),GMTSDATE,?GMTSCS(3),$E(GMTSPROV,1,GMTSCW(3)),?GMTSCS(4),GMTSCOM,! Line Location: LINE+1
Function Call: WRITE	Prompt: ?GMTSCS(1)," GAF ",?GMTSCS(2),"Date",! Line Location: HDR+2
Function Call: WRITE	Prompt: ?GMTSCS(1),"Score",?GMTSCS(2),"Determined",?GMTSCS(3),"Determined by",?GMTSCS(4),"Graph/Comment",! Line Location: HDR+3
Function Call: WRITE	Prompt: ?GMTSCS(1),GMTSI,! Line Location: HDR+4

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	EN+9, SPC+1, DEC+1
^TMP($J	EN+21, OUT+1, OUT+2, OUT+4!, GET+1!, SD+7*

Name	Line Occurrences
$$B	GET+12
$$DEC	SPC+2
$$DTM	EN+7
$$DUE	SPC+2
$$ERR	SPC+3
$$ETF	ERR+4
$$EXT	EN+13
$$GAF	SD+1
$$ITM	EN+13
$$TOD	GET+5
$$TOM	EN+13
GET	EN+21
HDR	OUT+1, LINE+1, HDR+2, HDR+3, HDR+4
LINE	OUT+3
OUT	EN+21
SD	GET+3, GET+5, GET+13
SPC	GET+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+10~, DEC+1~
%DT	EN+10~, GET+1~, ETF+1~*
%H	EN+10~, DEC+1~
%I	EN+10~, DEC+1~
%T	EN+10~, DEC+1~
%X	EN+10~, DEC+1~
DFN	EN+9, EN+19, EN+21, OUT+1, OUT+2, OUT+4, GET+1, GET+3, GET+5, GET+13 , SPC+1, SPC+2, SD~, SD+1, SD+7, DEC+1~*
>> GMTS1	EN+2, EN+4, EN+6*, EN+13
>> GMTS2	EN+2, EN+6, EN+13
GMTSBAR	EN+11~, B+1~, B+4, B+5, B+6
>> GMTSBEG	EN+2, EN+3, EN+6
GMTSCHAR	B+1~, B+2*, B+4, B+5
GMTSCNT	EN+11~, ERR+1~, ERR+5, ERR+6
GMTSCOM	EN+11~, OUT+1~, OUT+3, LINE+1, GET+1~, GET+3, GET+5, GET+10, GET+11, GET+12 , GET+13, SD~, SD+7
GMTSCORE	EN+11~, OUT+1~, OUT+3, LINE+1, GET+1~, GET+9, GET+12, GET+13, SD~, SD+1* , SD+7
GMTSCS	EN+11~
GMTSCS(1	EN+18*, LINE+1, HDR+2, HDR+3, HDR+4
GMTSCS(2	EN+18*, LINE+1, HDR+2, HDR+3
GMTSCS(3	EN+18*, LINE+1, HDR+3
GMTSCS(4	EN+18*, LINE+1, HDR+3
GMTSCW	EN+11~, B+1~*, B+4, B+5
GMTSCW("L"	EN+17*, HDR+1
GMTSCW(0	EN+15*, EN+16
GMTSCW(1	EN+16*, EN+17, EN+18
GMTSCW(2	EN+16*, EN+17, EN+18
GMTSCW(3	EN+16*, EN+17, EN+18, LINE+1
GMTSCW(4	EN+16*, EN+17
GMTSDATE	EN+11~, OUT+1~, OUT+3, LINE+1, GET+1~, GET+7, GET+8, GET+13, SD~, SD+4* , SD+5, SD+6, SD+7, ERR+1~, ERR+4, ERR+5, DUE+1~, DUE+2, DUE+3
GMTSDT	EN+11~, GET+1~, GET+3, GET+5, GET+7*, GET+13
>> GMTSDTM	EN+7*
>> GMTSEND	EN+2, EN+4, EN+5*, EN+6
GMTSGAF	EN+12~, ERR+1~, ERR+2, ERR+3, ERR+4, B+1~, B+2, B+3, B+4, B+5
GMTSGAF1	EN+12~, EN+13*, EN+20
GMTSGAF2	EN+12~, EN+13*, EN+19
GMTSGAF3	EN+12~, EN+13*, EN+19
GMTSGAFN	EN+12~, EN+14*, EN+20
GMTSGPH	GET+1~*
GMTSI	EN+12~, OUT+1~, OUT+2, HDR+1~, HDR+4, SPC+1~, SPC+2, SPC+3, SD~, SD+3* , SD+5, ERR+1~, ERR+2, ERR+5, DUE+1~, DUE+2, B+1~, B+5
GMTSIG	SD+1~, SD+2, SD+5*, SD+7
GMTSJ	EN+12~, OUT+1~, OUT+2, OUT+3, ERR+1~, ERR+3, ERR+4, DUE+1~, DUE+2
GMTSLEN	EN+12~, B+1~, B+5*
>> GMTSLO	EN+7*
>> GMTSLPG	EN+7*
>> GMTSNDM	EN+1
>> GMTSNPG	LINE+1, HDR+2, HDR+3, HDR+4
GMTSPROV	EN+12~, OUT+1~, OUT+3, LINE+1, GET+1~, GET+9, GET+13, SD~, SD+4*, SD+5 , SD+7
>> GMTSQIT	LINE+1, HDR+2, HDR+3, HDR+4
GMTSRV	EN+12~
>> GMTSTITL	EN+8*
I	EN+10~, GET+6~*, GET+7, GET+9, GET+10, GET+13
IOM	EN+15
MAX	EN+1~*, EN+14
N	EN+10~
SAVX	ITM+1~, ITM+3, ITM+5, ITM+6, EXT+1~, EXT+3, EXT+4, EXT+5
VA	EN+10~, DEC+1~
VADM	EN+10~, DEC+1~
VADM(6	DEC+2
VAERR	EN+10~, DEC+1~
X	EN+10~, GET+1~, ERR~, ERR+6, DUE~, DUE+3, ITM~, ITM+2, ITM+3, ITM+4 , ITM+5, ITM+6, ITM+7, ITM+8, EXT~, EXT+2, EXT+3, EXT+4, EXT+5, EXT+6 , EXT+7, EXT+8, ETF~, ETF+1, TOM~, TOM+1, TOD~, TOD+1, DEC~, DEC+1 , DEC+2, B~, B+1, B+6, GAF~, GAF+1, DTM~, DTM+1
>> X1	ITM+5*
>> X2	ITM+5*
Y	EN+10~, GET+1~, ITM+4, EXT+4, ETF+1~, B~, B+1
YS	EN+10~, GET+1
YS("BEGIN"	EN+19*
YS("DFN"	EN+19*
YS("END"	EN+20*
YS("LIMIT"	EN+20*
YSGAF	EN+10~, GET+1!
YSGAF(	GET+6, GET+7, GET+9, ERR+1, ERR+2, DUE+2
YSGAF("DEC"	GET+2, GET+3, GET+8, SPC+2*, SPC+3
YSGAF("DUE"	GET+4, GET+5, SPC+2*, SPC+3!
YSGAF("ERR"	GET+10, GET+13, SPC+3, ERR+3, ERR+5*
YSGAF("P"	SPC+1*
YSGAF(1	DUE+1*
YSGAF(2	DUE+1

Customize PDF page

Package: Health Summary

Routine: GMTSGAF

Call Graph Total: 7