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 |  Caller 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: YSASGPH

Package: Mental Health

Routine: YSASGPH


Information

YSASGPH ;ALB/ASF,HIOFO/FT - ASI MULTIPLE OUTPUT ;1/30/13 11:20pm

Source Information

Source file <YSASGPH.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 HOME^%ZIS  $$FMTE^XLFDT  EN^XUTMDEVQ  
VA FileMan 2 ^DIC  $$GET1^DIQ  
Mental Health 1 ($$CSA,$$CSD,$$CSES,$$CSFSR,$$CSLS,$$CSMS,$$CSPS)^YSASCSA  
Registration 1 (DEM,KVA)^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 YSAS ASI COMPOSITE SCORES  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point for YSAS ASI COMPOSITE SCORES option
GR2 ;change scores
GR ;LOOP OUTPUT
PT ;patient lookup
GR1 ;output loop
ENQ ;queue task entry
TLP ; print list
TLD ;load ASI list

External References

Name Field # of Occurrence
HOME^%ZIS EN+9
^DIC PT+3
$$GET1^DIQ TLD+7, TLD+8, TLD+9, TLD+10
DEM^VADPT TLP+3
KVA^VADPT TLP+6
$$FMTE^XLFDT GR1+2
EN^XUTMDEVQ EN+8
$$CSA^YSASCSA TLD+14
$$CSD^YSASCSA TLD+15
$$CSES^YSASCSA TLD+13
$$CSFSR^YSASCSA TLD+17
$$CSLS^YSASCSA TLD+16
$$CSMS^YSASCSA TLD+12
$$CSPS^YSASCSA TLD+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No ASIs found for this patient.",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"Date Medical Emp/Sup Alcohol Drug Legal Family Psych"
  • Line Location: GR+1
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT($P(G,U,2),"5ZD")
  • Line Location: GR1+2
Function Call: WRITE
  • Prompt: $S($P(G,U,I)?.E1N.E:$J($P(G,U,I),9,2),1:$J("--",9))
  • Line Location: GR1+3
Function Call: WRITE
  • Prompt: !!,"Change "
  • Line Location: GR2+2
Function Call: WRITE
  • Prompt: $S(G1=""!(G2=""):$J("--",9),1:$J(G1-G2,9,2))
  • Line Location: GR2+5
Function Call: WRITE
  • Prompt: !,VADM(1)," ","xxx-xx-"_$E($P(VADM(2),U,2),8,11),?$X+5,"ASI Composite Scores",!
  • Line Location: TLP+5
Routine Call
  • %ZIS
  • Line Location:
    • EN+9
Routine Call
  • DIC
  • Line Location:
    • PT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^YSTX(604 - [#604] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J ENQ+8!, TLD+1!, TLD+11*, TLD+12*, TLD+13*, TLD+14*, TLD+15*, TLD+16*, TLD+17*, TLD+18*
, GR+2, GR1+1, GR2+4, TLP+1
^YSTX(604 - [#604] EN+4, TLD+4

Label References

Name Line Occurrences
GR ENQ+7
GR1 GR+2
GR2 ENQ+7
PT EN+2
TLD ENQ+5
TLP ENQ+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN TLP+2~, TLP+3*
DIC PT+1~, PT+2*
DIC(0 PT+2*
G ENQ+3~, GR1+1*, GR1+2, GR1+3, GR1+4
G1 ENQ+3~, GR2+4*, GR2+5
G2 ENQ+3~, GR2+4*, GR2+5
I ENQ+3~, GR1+3*, GR2+3*, GR2+4
IO ENQ+1
IOF TLP+4
IOST TLD+6
N ENQ+3~, GR+2*, GR1+1
U TLD+11, TLD+12, TLD+13, TLD+14, TLD+15, TLD+16, TLD+17, TLD+18, GR1+2, GR1+3
, GR1+4, GR2+4, TLP+5
>> VADM(1 TLP+5
>> VADM(2 TLP+5
>> Y PT+4
YSASC ENQ+4~, TLD+3*, TLD+5*, TLD+11, TLD+12, TLD+13, TLD+14, TLD+15, TLD+16, TLD+17
, TLD+18, GR2+1, GR2+4
YSASCL ENQ+4~, TLD+7*, TLD+11
YSASDT ENQ+4~, TLD+8*, TLD+11
YSASIEN TLD+2~, TLD+3*, TLD+4*, TLD+7, TLD+8, TLD+9, TLD+10, TLD+11, TLD+12, TLD+13
, TLD+14, TLD+15, TLD+16, TLD+17, TLD+18
YSASIG ENQ+4~, TLD+10*, TLD+11
YSASINT ENQ+4~, TLD+9*, TLD+11
YSASPIEN EN+1~, EN+3, EN+4, PT+4*, TLD+4, TLP+3
ZTDESC EN+6~, EN+7*, EN+8
>> ZTQUEUED ENQ+2
>> ZTREQ ENQ+2*
ZTRTN EN+6~, EN+7*, EN+8
ZTSAVE EN+6~, EN+8
ZTSAVE("YSASPIEN" EN+7*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All