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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: GMTSYTQS

Package: Health Summary

Routine: GMTSYTQS


Information

GMTSYTQS ;SLC/JMH & ALB/ASF - MHA SCORE ; 10/3/07 12:05pm

Source Information

Source file <GMTSYTQS.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Mental Health 3 ADMINS^YTQAPI5  GAFRET^YTQAPI6  GETSCORE^YTQAPI8  
Health Summary 2 REGDTM4^GMTSU  CKP^GMTSUP  
VA FileMan 2 $$EXTERNAL^DILFD  $$GET1^DIQ  
Kernel 1 ($$FMADD,$$NOW)^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
EN ; MHA SCOREIT
ASISCORE ;
GET ; Get and Format Data
GAFGET ;get axis5
GAFSCORE ;
ITM(X) ; Inverse date to Mental Health formats
HDR ; Header
ASIGET ;
SCORE ;
DTM(X) ; Current Date and Time (External)
LINE ; Output One Line
OUT ; Output

External References

Name Field # of Occurrence
$$EXTERNAL^DILFD OUT+7, OUT+8
$$GET1^DIQ ASISCORE+3, ASISCORE+4, ASISCORE+5, ASISCORE+6, ASISCORE+7, ASISCORE+8, ASISCORE+9
REGDTM4^GMTSU ITM+1, DTM+1
CKP^GMTSUP SCORE+10, LINE+1, HDR+2
$$FMADD^XLFDT EN+5, EN+6, EN+7, EN+8
$$NOW^XLFDT EN+5, EN+7, DTM+1
ADMINS^YTQAPI5 GET+10
GAFRET^YTQAPI6 GAFGET+3
GETSCORE^YTQAPI8 SCORE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?42,$J(GMTSRAW,5)," ",$J(GMTSTRA,8)," ",GMTSSCL,!
  • Line Location: SCORE+12
Function Call: WRITE
  • Prompt: $J($P(GMTSJ,U,2),5),!
  • Line Location: GAFSCORE+1
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",8.12),5),$J($$GET1^DIQ(604,IFN_",",.61),8)," Medical",!
  • Line Location: ASISCORE+3
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",9.34),5),$J($$GET1^DIQ(604,IFN_",",.62),5)," Employment",!
  • Line Location: ASISCORE+4
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",11.18),5),$J($$GET1^DIQ(604,IFN_",",.63),5)," Alcohol",!
  • Line Location: ASISCORE+5
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",11.185),5),$J($$GET1^DIQ(604,IFN_",",.635),5)," Drug",!
  • Line Location: ASISCORE+6
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",14.34),5),$J($$GET1^DIQ(604,IFN_",",.64),5)," Legal",!
  • Line Location: ASISCORE+7
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",18.29),5),$J($$GET1^DIQ(604,IFN_",",.65),5)," Family",!
  • Line Location: ASISCORE+8
Function Call: WRITE
  • Prompt: ?42,$J($$GET1^DIQ(604,IFN_",",19.33),5),$J($$GET1^DIQ(604,IFN_",",.66),5)," Psychiatric",!
  • Line Location: ASISCORE+9
Function Call: WRITE
  • Prompt: GMTSDAY,?20,$J($E(GMTSTN,1,20)_$S($L(GMTSTN)>20:"* ",1:" "),22)
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: "Date",?31,"Instrument Raw Trans Scale",!
  • Line Location: HDR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.84 - [#601.84] EXTERNAL^DILFD
^YSTX(604 - [#604] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN+12
^TMP("GMTSYTQS" EN+3!, EN+17, OUT+4, OUT+5, OUT+14!, GET+19, GET+20*, ASIGET+12*, GAFGET+11*
^TMP("GMTSYTQSEG" EN+3!, OUT+14!, GET+2!, GET+6*, GET+14, GET+22, GET+24
^TMP($J SCORE+3, SCORE+4, SCORE+5
^YSD(627.8 - [#627.8] GAFGET+7
^YSTX(604 - [#604] ASIGET+4, ASIGET+5, ASIGET+7
^YTT(601.71 - [#601.71] GET+6

Label References

Name Line Occurrences
$$DTM EN+10
$$ITM OUT+6
ASIGET GET+24
ASISCORE OUT+12
GAFGET GET+22
GAFSCORE OUT+11
GET EN+17
HDR OUT+3, SCORE+11, LINE+2, HDR+2
LINE OUT+10
OUT EN+17
SCORE OUT+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT GET+1~
>> DFN EN+12*, SCORE+1, GET+10, ASIGET+4, GAFGET+3
G ASIGET+1~, ASIGET+5*, ASIGET+6, GAFGET+1~, GAFGET+6*, GAFGET+7, GAFGET+11
GMTS1 EN+1~, EN+5*, EN+7*, EN+9*
GMTS2 EN+1~, EN+5*, EN+9*
GMTSAI EN+1~, GET+6*
GMTSAJ EN+1~, GET+6*
>> GMTSBEG EN+5*, EN+6*, EN+9, GET+16, ASIGET+9, GAFGET+8
GMTSCC EN+1~, GET+4*, GET+5, GET+6
GMTSCOR EN+1~, SCORE+5*, SCORE+6, SCORE+8, SCORE+9
GMTSCS EN+1~
GMTSCS(1 EN+16*
GMTSCS(2 EN+16*
GMTSCS(3 EN+16*
GMTSCS(4 EN+16*
GMTSCW EN+1~
GMTSCW("L" EN+15*, HDR+1
GMTSCW(0 EN+13*, EN+14
GMTSCW(1 EN+14*, EN+15, EN+16
GMTSCW(2 EN+14*, EN+15, EN+16
GMTSCW(3 EN+14*, EN+15, EN+16
GMTSCW(4 EN+14*, EN+15
GMTSDATA EN+1~, SCORE+2, GET+10, GET+21!, GET+23!, GAFGET+3
GMTSDATA( GET+12, GET+13, GET+15, GET+20, GAFGET+5, GAFGET+6
GMTSDATA(2 GAFGET+4
GMTSDATA(3 GET+11
GMTSDAY EN+2~, OUT+6*, LINE+3
GMTSDTM EN+2~, EN+10*
>> GMTSEG( GET+4, GET+6
GMTSELS ASIGET+1~, ASIGET+7*, ASIGET+8
>> GMTSEND EN+5*, EN+7*, EN+8*, EN+9, GET+17, ASIGET+10, GAFGET+9
GMTSGIV EN+2~, OUT+4*, OUT+5, OUT+6, SCORE+1, GET+1~, GET+15*, GET+16, GET+17, GET+19*
, GET+20, ASIGET+6*, ASIGET+9, ASIGET+10, ASIGET+12, GAFGET+7*, GAFGET+8, GAFGET+9, GAFGET+11
GMTSI EN+2~, OUT+1~, HDR+1~*
GMTSIEN ASIGET+1~, ASIGET+3*, ASIGET+4*, ASIGET+5, ASIGET+7, ASIGET+12
GMTSJ EN+2~, OUT+1~, OUT+5*, OUT+7, OUT+8, SCORE+1, GAFSCORE+1, ASISCORE+2
GMTSLO EN+2~, EN+10*
GMTSLOC EN+2~, OUT+8*
GMTSLPG EN+2~, EN+10*
>> GMTSNDM EN+4
GMTSNN EN+2~, OUT+1~, OUT+2*, OUT+4, OUT+9*, GET+1~, GET+8*, GET+12, GET+18*, ASIGET+1~
, ASIGET+2*, ASIGET+11*, GAFGET+1~, GAFGET+2*, GAFGET+5, GAFGET+10*
GMTSNPG EN+2~, SCORE+11, LINE+2, HDR+2
GMTSOR EN+2~, OUT+7*
GMTSQIT EN+2~, SCORE+10, LINE+1, HDR+2
GMTSRAW EN+2~, SCORE+8*, SCORE+12
GMTSSCL EN+2~, SCORE+6*, SCORE+7*, SCORE+12
GMTSTITL EN+2~, EN+11*
GMTSTN EN+2~, OUT+4*, OUT+5, OUT+11, OUT+12, OUT+13, SCORE+1, LINE+3, GET+1~, GET+13*
, GET+14, GET+19, GET+20
GMTSTRA EN+2~, SCORE+9*, SCORE+12
GMTSX EN+2~, SCORE+1!, SCORE+2, GET+9!, GET+10, GAFGET+3
GMTSX("AD" SCORE+1*
GMTSX("ADATE" SCORE+1*
GMTSX("CODE" SCORE+1*
GMTSX("COMPLETE" GET+10*
GMTSX("DFN" SCORE+1*, GET+10*, GAFGET+3*
IFN ASISCORE+1~, ASISCORE+2*, ASISCORE+3, ASISCORE+4, ASISCORE+5, ASISCORE+6, ASISCORE+7, ASISCORE+8, ASISCORE+9
IOM EN+13
MAX EN+2~, EN+4*, OUT+4, GET+12, GAFGET+5
N EN+2~, SCORE+4*, SCORE+5, GET+12*, GET+13, GET+15, GET+20, GAFGET+1~, GAFGET+5*, GAFGET+6
U OUT+7, OUT+8, SCORE+8, SCORE+9, GAFSCORE+1, GET+6, GET+13, GET+15, ASIGET+6, ASIGET+7
, GAFGET+7, GAFGET+11
X GET+1~, ITM~, ITM+1*, DTM~, DTM+1*
Y GET+1~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All