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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YTPAI

Package: Mental Health

Routine: YTPAI


Information

YTPAI ;ASF/ALB- PAI TEST ;7/14/00 10:26

Source Information

Source file <YTPAI.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Mental Health 2 (,IR,SUBS)^YTPAI1  (DTA,SCR)^YTREPT  
Kernel 1 $$SQRT^XLFMTH  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 YTPAI1  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
OUT
DONE
RD
SCOR ;
FS ;full scales
ICNR ;score ICN
A ;icn absolutes
KK
STND ;stanard T scores
ADDIT ;additional indexes
XBAR ;
FIT ;coeff of fit
FITW
FIT1
FITLOOP ;get individual items
CRIT ;
CRITW ; write critical items

External References

Name Field # of Occurrence
$$SQRT^XLFMTH FIT1+5, FIT1+8
^YTPAI1 MAIN+5
IR^YTPAI1 OUT
SUBS^YTPAI1 MAIN+7
DTA^YTREPT MAIN+3, OUT, ADDIT+1, CRIT+1
SCR^YTREPT MAIN+3, MAIN+6, MAIN+8, MAIN+11, MAIN+13, FIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!!,"PAI: Too many missing items to score"
  • Line Location: MAIN+3
Function Call: WRITE
  • Prompt: !?2,"Malingering Index = ",YSINDX
  • Line Location: ADDIT+11
Function Call: WRITE
  • Prompt: !?2,"Defensiveness Index = ",$J(YSINDX,3)
  • Line Location: ADDIT+21
Function Call: WRITE
  • Prompt: !?2,"Mean Clinical Elevation = ",$J(YSINDX/11,4,0)
  • Line Location: XBAR+2
Function Call: WRITE
  • Prompt: !!,"Database Profile",?30,"Coefficient of Fit"
  • Line Location: FIT+1
Function Call: WRITE
  • Prompt: !,$P(^YTT(601,YSTEST,"G",1,1,K,0),U,1),?35,$J(9-N,6,3)
  • Line Location: FITW+0
Function Call: WRITE
  • Prompt: !?10,"Critical Items",!!,"Delusions and Hallucinations"
  • Line Location: CRIT+2
Function Call: WRITE
  • Prompt: !!,"Potential for Self-Harm"
  • Line Location: CRIT+4
Function Call: WRITE
  • Prompt: !!,"Potential for Aggression"
  • Line Location: CRIT+5
Function Call: WRITE
  • Prompt: !!,"Substance Abuse"
  • Line Location: CRIT+6
Function Call: WRITE
  • Prompt: !!,"Potential Malingering"
  • Line Location: CRIT+7
Function Call: WRITE
  • Prompt: !!,"Unreliability/Resistance"
  • Line Location: CRIT+8
Function Call: WRITE
  • Prompt: !!,"Traumatic Stressors"
  • Line Location: CRIT+9
Function Call: WRITE
  • Prompt: !,$S($E(X,I)=2:"ST",$E(X,I)=3:"MT",1:"VT")," "
  • Line Location: CRITW+2
Function Call: WRITE
  • Prompt: ^YTT(601,YSTEST,"Q",I,"T",1,0)
  • Line Location: CRITW+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YTD(601.2 - [#601.2] RD
^YTT(601 - [#601] SCOR+1, ICNR+13, STND+1, FITW, FIT1+1, CRITW+3, CRITW+4

Label References

Name Line Occurrences
A ICNR+2, ICNR+3, ICNR+4, ICNR+5, ICNR+6, ICNR+7, ICNR+8, ICNR+9, ICNR+10, ICNR+11
ADDIT MAIN+9
CRIT MAIN+12
CRITW CRIT+3, CRIT+4, CRIT+5, CRIT+6, CRIT+7, CRIT+8, CRIT+9
DONE MAIN+6, MAIN+8, MAIN+11, MAIN+13, FIT+3
FIT MAIN+10
FIT1 FIT+2
FITLOOP FIT1+2
FITW FIT+3
KK SCOR+1
OUT MAIN+3
RD MAIN+2, CRIT+1
SCOR MAIN+4
STND MAIN+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A DONE!, KK+1*, STND+1*, FIT+2!
A( FIT+3
A(9 FIT1+11*
>> B KK+1*
>> I FS+1*, KK+1*, KK+2, XBAR+1*, FIT1+2*, FITLOOP+1, CRIT+3*, CRIT+4*, CRIT+5*, CRIT+6*
, CRIT+7*, CRIT+8*, CRIT+9*, CRITW+1, CRITW+2, CRITW+3, CRITW+4
IOSL FIT+3
IOST MAIN+3, MAIN+6, MAIN+8, MAIN+11, MAIN+13, FIT+3
>> J STND+1*
>> K FIT+2*, FIT+3*, FITW, FIT1+1, FIT1+11
>> N FIT+3*, FITW, FIT1*, FITLOOP+1*
R MAIN+1*, DONE!, SCOR+1*, FS+1*, ICNR+12*, STND+1
S MAIN+1*, DONE!, ICNR+13*, STND+1*, ADDIT+3, ADDIT+4, ADDIT+5, ADDIT+6, ADDIT+7, ADDIT+8
, ADDIT+9, ADDIT+10, ADDIT+13, ADDIT+14, ADDIT+15, ADDIT+16, ADDIT+17, ADDIT+18, ADDIT+19, ADDIT+20
, XBAR+1, FITLOOP+1
S( STND+1*
U SCOR+1, FS+1, ICNR+12, ICNR+13, KK+1, STND+1, ADDIT+3, ADDIT+4, ADDIT+5, ADDIT+6
, ADDIT+7, ADDIT+8, ADDIT+9, ADDIT+10, ADDIT+13, ADDIT+14, ADDIT+15, ADDIT+16, ADDIT+17, ADDIT+18
, ADDIT+19, ADDIT+20, XBAR+1, FITW, FITLOOP+1
>> X MAIN+3, RD*, ICNR+2, ICNR+3, ICNR+4, ICNR+5, ICNR+6, ICNR+7, ICNR+8, ICNR+9
, ICNR+10, ICNR+11, ICNR+13*, KK+1, STND+1*, CRITW+1, CRITW+2
>> X1 FIT1*, FIT1+4, FITLOOP+1*
>> X12 FIT1*, FIT1+5, FITLOOP+1*
>> Y SCOR+1*, ICNR+2*, ICNR+3*, ICNR+4*, ICNR+5*, ICNR+6*, ICNR+7*, ICNR+8*, ICNR+9*, ICNR+10*
, ICNR+11*, A+1*, KK+1
>> Y1 FIT1*, FIT1+7, FITLOOP+1*
>> Y12 FIT1*, FIT1+8, FITLOOP+1*
>> YSDFN RD
>> YSED RD
>> YSET RD
>> YSFIT FIT1+1*, FITLOOP+1
>> YSICN ICNR+1*, ICNR+12, ICNR+13, A+1*
>> YSINDX ADDIT+2*, ADDIT+3*, ADDIT+4*, ADDIT+5*, ADDIT+6*, ADDIT+7*, ADDIT+8*, ADDIT+9*, ADDIT+10*, ADDIT+11
, ADDIT+12*, ADDIT+13*, ADDIT+14*, ADDIT+15*, ADDIT+16*, ADDIT+17*, ADDIT+18*, ADDIT+19*, ADDIT+20*, ADDIT+21
, XBAR+1*, XBAR+2
>> YSIT KK+1*
>> YSKK SCOR+1*
>> YSLFT YTPAI+5*, MAIN+6, MAIN+8, MAIN+11, MAIN+13, FIT+3
>> YSMX MAIN+1*, KK+1
>> YSNOITEM YTPAI+5*
>> YSNUMX KK*, KK+1*, KK+2
>> YSR FIT1+10*, FIT1+11
>> YSTEST SCOR+1, ICNR+13, STND+1, FITW, FIT1+1, CRITW+3, CRITW+4
>> YSTL SCOR+1*, KK+1*, KK+2*
YSXBAR DONE!, FIT1+4*, FIT1+5, FIT1+10
YSXSD DONE!, FIT1+5*, FIT1+10
>> YSXY FIT1*, FIT1+10, FITLOOP+1*
YSYBAR DONE!, FIT1+7*, FIT1+8, FIT1+10
YSYSD DONE!, FIT1+8*, FIT1+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All