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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: YTMMPI2P

Package: Mental Health

Routine: YTMMPI2P


Information

YTMMPI2P ;SLC/DKG,ALB/ASF-TEST PKG: MMPI2 PROFILE ;Nov 09, 2023@15:02:43

Source Information

Source file <YTMMPI2P.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Mental Health 6 CR^YTDRIV  END^YTMMPI2  LK^YTMMPI2A  ^YTMMPI2C  ^YTMMPI2P  IR^YTREPT  
Kernel 1 $$FMTE^XLFDT  
VA FileMan 1 DD^%DT  

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: 4

Package Total Caller Graph
Mental Health 4 YTMMPI2  YTMMPI2A  YTMMPI2B  YTMMPI2P  

Entry Points

Name Comments DBIA/ICR reference
A ;
L ;
W ;
END ;
WL ;
WS ;
DTA ;
WAIT ;
; %% ANOTHER READER CALL ???? LOOK YSLFT = YSTOUT %%%
NK ;NON-K CORRECTED
HD ;
BOTTM ;
CR ;COPYRIGHT
WPO ;

External References

Name Field # of Occurrence
DD^%DT CR+1
$$FMTE^XLFDT DTA+1, DTA+2
CR^YTDRIV CR+1
END^YTMMPI2 BOTTM+7
LK^YTMMPI2A NK+1
^YTMMPI2C BOTTM+8
^YTMMPI2P HD+2
IR^YTREPT BOTTM+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?YSLM,YSLL,"|"
  • Line Location: WL+1
Function Call: WRITE
  • Prompt: $S(B(I):$E($P(YSSNM1,",",I)_" ",1,3),1:" ")
  • Line Location: WL+2
Function Call: WRITE
  • Prompt: $S($D(V(I)):"|",1:" ")
  • Line Location: WL+2
Function Call: WRITE
  • Prompt: $S(B(I)=2:" + ",B(I):$E($P(YSSNM1,",",I)_" ",1,3),1:" ")
  • Line Location: WL+3
Function Call: WRITE
  • Prompt: $S($D(V(I)):"|",1:" ")
  • Line Location: WL+3
Function Call: WRITE
  • Prompt: $S(B(I):X,1:" ")
  • Line Location: WL+4
Function Call: WRITE
  • Prompt: "|",$E(YSLL,3,5)
  • Line Location: WL+5
Function Call: WRITE
  • Prompt: ?YSLM,YSLL,"|"
  • Line Location: WS+1
Function Call: WRITE
  • Prompt: $S(B(I):$P(YSSNM1,",",I)_"-",1:"---")
  • Line Location: WS+2
Function Call: WRITE
  • Prompt: $S($D(V(I)):"|",1:"-")
  • Line Location: WS+2
Function Call: WRITE
  • Prompt: "-",$S(B(I)=2:"+-",B(I):$P(YSSNM,",",I),1:"--")
  • Line Location: WS+3
Function Call: WRITE
  • Prompt: $S($D(V(I)):"|",1:"-")
  • Line Location: WS+3
Function Call: WRITE
  • Prompt: $S(B(I):X,1:"----")
  • Line Location: WS+4
Function Call: WRITE
  • Prompt: "|",$E(YSLL,3,5)
  • Line Location: WS+5
Function Call: READ
  • Variable: YSLFT
  • Timeout: DTIME
  • Line Location: WAIT+2
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: WAIT+2
Function Call: WRITE
  • Prompt: #
  • Line Location: WAIT+2
Function Call: WRITE
  • Prompt: @IOF,!!?25,"K and Non-K Corrected Profile",!
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !?YSLM+6
  • Line Location: BOTTM+1
Function Call: WRITE
  • Prompt: $E($P(YSSNM,",",I)_" ",1,4)
  • Line Location: BOTTM+1
Function Call: WRITE
  • Prompt: !?2,"Raw Score:"
  • Line Location: BOTTM+2
Function Call: WRITE
  • Prompt: $J($P(YSRNK,U,I),4)
  • Line Location: BOTTM+2
Function Call: WRITE
  • Prompt: " "
  • Condition for execution: I=3
  • Line Location: BOTTM+2
Function Call: WRITE
  • Prompt: !!?2,"K Corr.",?27,$J(X*.5,2,0),?$X+10,$J(X*.4,2,0),?$X+10,$J(X,2)," ",$J(X,2)," ",$J(X*.2,2,0)
  • Line Location: BOTTM+3
Function Call: WRITE
  • Prompt: !!?2,"T Score: "
  • Line Location: BOTTM+4
Function Call: WRITE
  • Prompt: $J($P(S,U,I),4)
  • Line Location: BOTTM+4
Function Call: WRITE
  • Prompt: " "
  • Condition for execution: I=3
  • Line Location: BOTTM+4
Function Call: WRITE
  • Prompt: !!?2,"+Non-K Corr.",!?3,"T Score:",?26,$J(C(4),3),?$X+9,$J(C(7),3),?$X+9,$J(C(10),3)," ",$J(C(11),3)," ",$J(C(12),3)
  • Line Location: BOTTM+5
Function Call: WRITE
  • Prompt: !!?2,"? Cannot Say (Raw): ",YSQR
  • Line Location: BOTTM+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: BOTTM+7
Function Call: WRITE
  • Prompt: !
  • Line Location: WPO+3
Function Call: WRITE
  • Prompt: !,"Printed by: ",$P(^VA(200,DUZ,0),U),!
  • Line Location: WPO+4
Function Call: WRITE
  • Prompt: "Ordered by: ",$P(^(0),U)
  • Line Location: WPO+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VA(200 - [#200] WPO+4, WPO+6
^YTD(601.2 - [#601.2] DTA+1, WPO+5
^YTT(601 - [#601] CR+1
^YTT(601.3 - [#601.3] CR+1

Label References

Name Line Occurrences
CR BOTTM+7
DTA BOTTM+7
END W+1, W+2
L W+4
WAIT WL+1, WS+1, BOTTM+7
WL W+2
WPO CR+2
WS W+1

Naked Globals

Name Field # of Occurrence
^(0 CR+1, WPO+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A END+1!, BOTTM+6!
A( A+1*, L+1, NK+1*
B END+1!
B( L+1*, WL+2, WL+3, WL+4, WS+2, WS+3, WS+4
C BOTTM+6!
C( L+1, NK+1*
C(10 BOTTM+5
C(11 BOTTM+5
C(12 BOTTM+5
C(4 BOTTM+5
C(7 BOTTM+5
>> DOT HD+1*
DT DTA+2
DTIME WAIT+2
DUZ WPO+4
H END+1!
H( A+5*, A+8*, W+1
>> I A+4*, A+5*, L+1*, WL+2*, WL+3*, WL+4*, WS+2*, WS+3*, WS+4*, NK+1*
BOTTM+1*, BOTTM+2*, BOTTM+4*
IOF HD+2
IOSL WL+1, WS+1, WPO+3
IOST WL+1, WS+1, WAIT+2, CR+2
>> J A+1*, A+3*, A+5*, NK+1*
S NK+1*, HD+1*, BOTTM+4, BOTTM+6!
U A+1, WL+4, WS+4, DTA+1, NK+1, BOTTM+2, BOTTM+3, BOTTM+4, CR+1, WPO+4
WPO+5, WPO+6
V END+1!
V( WL+2, WL+3, WS+2, WS+3
V(3 HD+1*
>> X A+1*, WL+4*, WS+4*, BOTTM+3*
>> Y CR+1*
YSA END+1!
YSA( A+1*
>> YSAGE DTA+2
YSAST A+1!*, DTA+3
YSAST( A+1*, A+3
YSBV A+1*, W+4, END+1!
>> YSCD CR+1*
>> YSCH CR+1*
>> YSCHN CR+1*
>> YSDFN DTA+1, WPO+5
>> YSDTA DTA+1*, DTA+3
>> YSED WPO+5
>> YSET DTA+1, WPO+5
>> YSFORM BOTTM+7*
>> YSHD DTA+1, DTA+2, HD+1
>> YSHDR DTA+2*, DTA+3
YSHS A+2*, A+5, A+8*, W+1*, END+1!
YSI WPO+2~, WPO+3*
YSIN2 A+7*, L+1, W+1, END+1!
YSINC A+1*, A+7, W+4, END+1!
YSLC1 A+7*, L+2, W+3*, END+1!
YSLE A+1*, L+2, W+3, END+1!
>> YSLFT A+1*, W+1, W+2, WL+1, WS+1, WAIT+2*, HD+2, BOTTM+7
YSLL L+2*, END+1!, WL+1, WL+5, WS+1, WS+5
>> YSLM A+6*, WL+1, WS+1, BOTTM+1
>> YSLV A+7*, L+1, L+2, W+1, W+4*
YSNRK BOTTM+6!
>> YSNS A+1, A+3, A+4, A+6, L+1, WL+2, WL+3, WL+4, WS+2, WS+3
WS+4, HD+1*, BOTTM+1, BOTTM+2, BOTTM+4
>> YSORD WPO+5*, WPO+6
>> YSQR BOTTM+6
YSRAW WL+4, WS+4, BOTTM+6!
>> YSRNK NK+1, BOTTM+2, BOTTM+3
>> YSSCALE A+1, HD+1*
>> YSSCALEB HD+1
>> YSSIG DTA+2
>> YSSK WL+2, WL+3, WL+4, WS+2, WS+3, WS+4, HD+1*
>> YSSNM A+3*, A+4, WL+4, WS+3, WS+4, HD+1*, BOTTM+1
>> YSSNM1 A+4*, WL+2, WL+3, WS+2
>> YSSX DTA+2
>> YSTEST CR+1
>> YSTOUT WAIT+2*
YSTV A+1*, A+7, END+1!
YSTVL END+1!
>> YSUOUT WAIT+2*
YSVS A+2*, END+1!
YSWS W+1*, W+2, END+1!
>> Z1 A+1*, A+3*, WL+1*, WS+1*, WAIT+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All