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

Package: Mental Health

Routine: YTMCMI3


Information

YTMCMI3 ;ALB/ASF,HIOFO/FT - MCMI3 ;5/1/13 10:28am

Source Information

Source file <YTMCMI3.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Mental Health 2 PTVAR^YSLRP  REPT^YTMCMI3R  
Kernel 1 $$FMDIFF^XLFDT  
Registration 1 (IN5,KVAR)^VADPT  

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

Package Total Caller Graph
Mental Health 2 YTMCMI3R  ^YTT(601.6  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;displays the MCMI3 report text
RD ;retrieve answer codes
VALIDITY ;check if ok to score
RAW ; raw scores
BR ;base rate scores
DCA ;disclosure adjustment
ADA ;anxiety/depression adjust
T2 ;non inpt/long axis1
T3 ;inpt dur<1 week
T4 ;inpt dur1-4
LIMIT ;set 0-115 range
INPTAD ;inpatient adjustment
DENIAL ;denial/complaint
INP(YSDFN,YSDOT) ;Determine if inpatient and duration
; Input: YSDFN = dfn
; YSDOT = date of test
; Output: piece1^piece2
; where piece 1 = I for Inpatient or O for Outpatient
; piece 2 = duration of stay before test given
; 0 = more than 4 weeks
; 1 = less than 1 week
; 2 = 1- 4 weeks
FMDIFF(YSX1,YSX2,YSX3) ;Calculate number of days between admission and
WSCALE ;calculate Inconsistent responses

External References

Name Field # of Occurrence
IN5^VADPT INP+14
KVAR^VADPT INP+16
$$FMDIFF^XLFDT FMDIFF+9
PTVAR^YSLRP MAIN+2
REPT^YTMCMI3R MAIN+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YTD(601.2 - [#601.2] RD+2
^YTT(601 - [#601] RAW+3, BR+2, BR+5, BR+6, DCA+2, DCA+11, WSCALE+3

Label References

Name Line Occurrences
$$FMDIFF INP+18
$$INP RD+5
ADA MAIN+8
BR MAIN+6
DCA MAIN+7
DENIAL MAIN+10
INPTAD MAIN+9
LIMIT MAIN+7, MAIN+8, MAIN+9, MAIN+10
RAW MAIN+4
RD MAIN+3
T2 ADA+6, ADA+9
T3 ADA+7
T4 ADA+8
VALIDITY MAIN+5
WSCALE RAW+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A MAIN+1~
B MAIN+1~
DFN INP+9~, INP+13*
G MAIN+1~, RAW+3*, RAW+4, RAW+6*, DCA+2*, DCA+5, DCA+7, DCA+11*, DCA+13, DCA+15
I MAIN+1~, RAW+3*, RAW+4*, RAW+5*, BR+2*, DCA+9*, DCA+17*, T2+3*, T2+5*, T3+3*
, T3+5*, T4+3*, T4+5*, LIMIT+1*, DENIAL+1*, DENIAL+3*
L1 MAIN+1~
L2 MAIN+1~
N MAIN+1~, RAW+2*, RAW+3, RAW+4
>> R VALIDITY+3, VALIDITY+4, VALIDITY+6, RAW+1*, RAW+4*, RAW+5*, RAW+6*, BR+2, BR+3, BR+4
, BR+5, BR+6, DCA+3, WSCALE+9*
>> S BR+1*, BR+2*, BR+3*, BR+4*, BR+5*, BR+6*, DCA+9*, DCA+17*, ADA+1, T2+3*
, T2+5*, T3+3*, T3+5*, T4+3*, T4+5*, LIMIT+1*, INPTAD+1*, INPTAD+2*, DENIAL+1, DENIAL+3
, DENIAL+4*
U RD+6, RD+7, VALIDITY+3, VALIDITY+4, VALIDITY+6, RAW+4, RAW+5, RAW+6, BR+2, BR+3
, BR+4, BR+5, BR+6, DCA+3, DCA+5, DCA+7, DCA+9, DCA+13, DCA+15, DCA+17
, ADA+1, T2+3, T2+5, T3+3, T3+5, T4+3, T4+5, LIMIT+1, INPTAD+1, INPTAD+2
, DENIAL+1, DENIAL+3, DENIAL+4, INP+15, WSCALE+4, WSCALE+5, WSCALE+9
VAINDT INP+9~, INP+13*
>> VAIP(3 INP+15
X MAIN+1~, RD+2*, RD+3, VALIDITY+2, RAW+4, DCA+3*, DCA+4, DCA+5, DCA+6, DCA+7
, DCA+8, DCA+12, DCA+13, DCA+14, DCA+15, DCA+16, T2+1*, T2+2, T2+4, T3+1*
, T3+2, T3+4, T4+1*, T4+2, T4+4, INP+9~, WSCALE+9
>> X1 T2+2*, T2+3, T2+4*, T2+5, T3+2*, T3+3, T3+4*, T3+5, T4+2*, T4+3
, T4+4*, T4+5
Y INP+9~
YS176177 RD+1~, RD+5*, RD+6, RD+7
>> YSADA ADA+3*, ADA+4*, ADA+5*, T2+1, T3+1, T4+1
YSADMDT INP+9~, INP+15*, INP+17, INP+18
>> YSAGE VALIDITY+5
YSANS MAIN+1~, RAW+4*
>> YSAX ADA+1*, ADA+2, ADA+3, ADA+4, ADA+5
>> YSBR DENIAL+1*, DENIAL+3*
YSDAS MAIN+1~
YSDAS1 MAIN+1~
YSDAYS INP+9~, INP+18*, INP+19, INP+20, INP+21, INP+22
>> YSDD ADA+1*, ADA+2, ADA+3, ADA+4, ADA+5
YSDFN RD+2, RD+5, INP~, INP+10*, INP+11, INP+13
YSDOT INP~, INP+10*, INP+12, INP+13, INP+18
>> YSDUR RD+3*, RD+4, RD+7*, ADA+6, ADA+7, ADA+8, ADA+9, INPTAD+1, INPTAD+2
>> YSDVA DCA+4*, DCA+5*, DCA+6*, DCA+7*, DCA+8*, DCA+9
>> YSDVA1 DCA+12*, DCA+13*, DCA+14*, DCA+15*, DCA+16*, DCA+17
>> YSED RD+2, RD+5
YSFLAG INP+9~, INP+10*, INP+11, INP+12, INP+17, INP+19, INP+23
>> YSHI DENIAL+1*, DENIAL+2, DENIAL+3*, DENIAL+4
YSIN MAIN+1~, RAW+4*
>> YSINPT RD+3*, RD+4, RD+6*, ADA+6, ADA+7, ADA+8, ADA+9, INPTAD+1, INPTAD+2
>> YSSEX BR+2
YSSID MAIN+1~
>> YSTEST RD+2, RAW+3, BR+2, BR+5, BR+6, DCA+2, DCA+11, WSCALE+3
YSTOUT MAIN+1~
>> YSTY MAIN+11
YSUOUT MAIN+1~
YSVFLAG MAIN+1~, VALIDITY+1*, VALIDITY+2*, VALIDITY+3*, VALIDITY+4*, VALIDITY+5*, VALIDITY+6*
YSWA1 WSCALE+1~, WSCALE+7*, WSCALE+9
YSWA2 WSCALE+1~, WSCALE+8*, WSCALE+9
YSWI WSCALE+1~, WSCALE+2*, WSCALE+3
YSWNODE WSCALE+1~, WSCALE+3*, WSCALE+4, WSCALE+5
YSWP WSCALE+1~, WSCALE+4*, WSCALE+5
YSWPAIR WSCALE+1~, WSCALE+5*, WSCALE+6
YSWQ1 WSCALE+1~, WSCALE+7*, WSCALE+9
YSWQ2 WSCALE+1~, WSCALE+8*, WSCALE+9
YSWQA1 WSCALE+1~, WSCALE+6*, WSCALE+7
YSWQA2 WSCALE+1~, WSCALE+6*, WSCALE+8
>> YSWT RAW+4*
YSX1 FMDIFF~, FMDIFF+6*, FMDIFF+7, FMDIFF+9
YSX2 FMDIFF~, FMDIFF+6*, FMDIFF+8, FMDIFF+9
YSX3 FMDIFF~, FMDIFF+6*, FMDIFF+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All