Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: GMTSGAF

Package: Health Summary

Routine: GMTSGAF


Information

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

Source Information

Source file <GMTSGAF.m>

Call Graph

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  
Mental Health 1 GAFHX^YSGAFAPI  
Registration 1 DEM^VADPT  

Entry Points

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

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

Global Variables Directly Accessed

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*

Label References

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
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All