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 |  Marked Items  | All
Print Page as PDF
Routine: YTSMCMIA

Package: Mental Health

Routine: YTSMCMIA


Information

YTSMCMIA ;BAL/KTL- Extention of YTSMCMI4 MHAX ANSWERS SPECIAL HANDLING ; 9/14/18 3:19pm

Source Information

Source file <YTSMCMIA.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 $$GET1^DIQ  

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 YTSMCMI4  

Entry Points

Name Comments DBIA/ICR reference
ADDRSL
SCOREDAT ;SCALE IEN|RAW VALUE STORAGE TYPE|QUES#^QUES#...
CALW ; Calculate the W Scale
WADD(PAIR) ;
SCORESV ;
EXTANS ;
BR ;Get the Base Rate for each scale
BRADJ1 ;Adjust the Base Rate score for scales 1-8B and S-PP depending on the X Raw Score
SETADJ(STEND) ; Set up the Base Rate Adjustment Array
BRADJ2 ;Adjust the Base Rate based on Scales A and CC
PR ;Get the Percentile for each scale based on adjusted Base Rate for Personality/Psychopathology
; Get the Percentile for each Facet Scale based on RAW score for Grossman Facet Scales

External References

Name Field # of Occurrence
$$GET1^DIQ ADDRSL+11, ADDRSL+17, ADDRSL+29, ADDRSL+32, ADDRSL+33, ADDRSL+34, SCORESV+9, SCORESV+10, BR+4, BRADJ1+10
BRADJ1+22, BRADJ2+12, BRADJ2+23, PR+5, PR+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: Scale
  • Line Location: CALW+0
Function Call: WRITE
  • Prompt: INCONSISTENCY
  • Line Location: SCORESV+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.75 - [#601.75] GET1^DIQ
^YTT(601.87 - [#601.87] GET1^DIQ
^YTT(601.91 - [#601.91] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("YKTL" BRADJ2+4*, BRADJ2+10*, BRADJ2+14*, BRADJ2+16*, BRADJ2+21*, BRADJ2+25*, BRADJ2+27*
^TMP($J SCORESV+2!, SCORESV+6*, SCORESV+16*, SCORESV+17*
^YTT(601.91 - [#601.91] ADDRSL+31

Label References

Name Line Occurrences
ADDRSL YTSMCMIA+7
BR YTSMCMIA+9
BRADJ1 YTSMCMIA+10
BRADJ2 YTSMCMIA+11
CALW YTSMCMIA+8
PR YTSMCMIA+12
SCORESV YTSMCMIA+13
SETADJ BRADJ1+4, BRADJ1+6, BRADJ1+17, BRADJ1+19, BRADJ2+8, BRADJ2+19
WADD CALW+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABR BRADJ2+1~, BRADJ2+2*, BRADJ2+4, BRADJ2+5, BRADJ2+6
ACC BRADJ2+1~, BRADJ2+6*, BRADJ2+9, BRADJ2+20
ADD WADD+1~, WADD+4*, WADD+5
ADJ BRADJ1+1~, BRADJ1+8*, BRADJ1+12, BRADJ1+20*, BRADJ1+24, BRADJ2+9*, BRADJ2+10, BRADJ2+15, BRADJ2+20*, BRADJ2+21
BRADJ2+26
ADJARR BRADJ1+1~, BRADJ1+14!, BRADJ2+1~
ADJARR( BRADJ1+8, BRADJ1+20, SETADJ+3*, BRADJ2+9, BRADJ2+20
ADVAL ADDRSL+3~, ADDRSL+12*, ADDRSL+23
ANS ADDRSL+26~, ADDRSL+35*, ADDRSL+36, EXTANS+3~, EXTANS+6*, EXTANS+7*, EXTANS+8, EXTANS+10
BEG SETADJ+1~, SETADJ+2*, SETADJ+3
BR BRADJ1+1~, BRADJ1+11*, BRADJ1+12*, BRADJ1+13, BRADJ1+23*, BRADJ1+24*, BRADJ1+25, BRADJ2+13*, BRADJ2+14, BRADJ2+15*
BRADJ2+16, BRADJ2+17, BRADJ2+24*, BRADJ2+25, BRADJ2+26*, BRADJ2+27, BRADJ2+28, PR+2~, PR+6*, PR+7
CCBR BRADJ2+1~, BRADJ2+3*, BRADJ2+4, BRADJ2+5, BRADJ2+6
CNT SCORESV+1~, SCORESV+7*, SCORESV+13*, SCORESV+16
DATA ADDRSL+14~, ADDRSL+16*, ADDRSL+17
END SETADJ+1~, SETADJ+2*, SETADJ+3
I ADDRSL+3~, ADDRSL+26~, ADDRSL+28*, ADDRSL+29, ADDRSL+31, SCORESV+1~, SCORESV+8*, SCORESV+9, SCORESV+10, SCORESV+11
BR+1~, BR+2*, BR+4, BRADJ1+1~, BRADJ1+9*, BRADJ1+10, BRADJ1+21*, BRADJ1+22, SETADJ+1~, SETADJ+3*
BRADJ2+1~, BRADJ2+11*, BRADJ2+12, BRADJ2+22*, BRADJ2+23, PR+2~, PR+3*, PR+5, PR+9*, PR+10
LINE ADDRSL+1~, ADDRSL+2*, ADDRSL+10*
MHK ADDRSL+26~, ADDRSL+31*, ADDRSL+32, ADDRSL+33, ADDRSL+34
>> N CALW+5*
NODE ADDRSL+14~, ADDRSL+15*, ADDRSL+16
NXTLIN ADDRSL+3~, ADDRSL+5*, ADDRSL+6, ADDRSL+8
NXTQUES ADDRSL+1~, ADDRSL+8*, ADDRSL+9
NXTSCL ADDRSL+3~, ADDRSL+6*, ADDRSL+7
PAIR CALW+1~, CALW+3*, CALW+4, WADD~, WADD+2, WADD+3
PCE BR+1~, PR+2~
PTR EXTANS+3~, EXTANS+6*, EXTANS+9, EXTANS+10
Q1 WADD+1~, WADD+2*, WADD+4
Q2 WADD+1~, WADD+3*, WADD+4
QUES ADDRSL+26~, ADDRSL+32*, ADDRSL+35, EXTANS+6*, EXTANS+8, EXTANS+9
QUEST EXTANS+3~
QUESTIONS ADDRSL+3~, ADDRSL+4*, ADDRSL+9*, ADDRSL+13, ADDRSL+15
RAW ADDRSL+14~, ADDRSL+17*, ADDRSL+23, BR+5*, BR+6, PR+2~, PR+11*, PR+12
RAWTYPE ADDRSL+3~, ADDRSL+4*, ADDRSL+12
RVAL ADDRSL+3~, ADDRSL+12*, ADDRSL+23
SCAL BR+1~, BR+4*, BR+5, BR+6, BRADJ1+1~, BRADJ1+10*, BRADJ1+11, BRADJ1+13, BRADJ1+22*, BRADJ1+23
BRADJ1+25, BRADJ2+12*, BRADJ2+13, BRADJ2+14, BRADJ2+16, BRADJ2+17, BRADJ2+23*, BRADJ2+24, BRADJ2+25, BRADJ2+27
BRADJ2+28, PR+2~, PR+5*, PR+6, PR+7, PR+10*, PR+11, PR+12
SCALE ADDRSL+3~, ADDRSL+4*, ADDRSL+11
SCALSTR BR+1~, BRADJ1+1~, PR+2~
SCARR SCORESV+1~
SCARR( SCORESV+11*, SCORESV+12, SCORESV+14
SCLRAW ADDRSL+3~, ADDRSL+4*, ADDRSL+7
SEQ SCORESV+1~, SCORESV+9*, SCORESV+12*, SCORESV+14
SNAM ADDRSL+3~, ADDRSL+11*, ADDRSL+23, ADDRSL+24, ADDRSL+26~, ADDRSL+29*, ADDRSL+39, SCORESV+1~, SCORESV+10*, SCORESV+11
SCORESV+14*, SCORESV+16
STEND BRADJ1+3*, BRADJ1+4, BRADJ1+5*, BRADJ1+6, BRADJ1+16*, BRADJ1+17, BRADJ1+18*, BRADJ1+19, SETADJ~, SETADJ+2
BRADJ2+7*, BRADJ2+8, BRADJ2+18*, BRADJ2+19
STR EXTANS+3~, EXTANS+6*
TAR ADDRSL+26~, ADDRSL+33*, ADDRSL+36
TEXT ADDRSL+1~, ADDRSL+2*, ADDRSL+4
TOT ADDRSL+26~, ADDRSL+30*, ADDRSL+36*, ADDRSL+39
U ADDRSL+13, ADDRSL+15, ADDRSL+17
VAL ADDRSL+26~, ADDRSL+34*, ADDRSL+36, SETADJ+1~, SETADJ+2*, SETADJ+3
X EXTANS+3~, EXTANS+4*, EXTANS+5*, EXTANS+6
XI ADDRSL+1~, ADDRSL+13*, ADDRSL+15
XRAW BRADJ1+1~, BRADJ1+7*, BRADJ1+8, BRADJ1+20
>> YBRS( SCORESV+16, BR+6*, BRADJ1+11, BRADJ1+13*, BRADJ1+23, BRADJ1+25*, BRADJ2+13, BRADJ2+17*, BRADJ2+24, BRADJ2+28*
PR+6
>> YBRS("A Gener alized Anxiety" , BRADJ2+2
>> YBRS("CC Majo r Depression" , BRADJ2+3
>> YPRS( SCORESV+16, PR+7*, PR+12*
>> YSDATA( ADDRSL+16, CALW+5*, EXTANS+5, EXTANS+6
>> YSQANS( WADD+2, WADD+3, EXTANS+8*, EXTANS+9*
>> YSQANS2( ADDRSL+35, EXTANS+10*
YSRAWRSL ADDRSL+27!
YSRAWRSL( ADDRSL+23*, ADDRSL+24*, ADDRSL+39*, SCORESV+16, BR+5, PR+11
YSRAWRSL("W I nconsistency" , CALW+2*, CALW+5, WADD+5*
YSRAWRSL("X D isclosure" , BRADJ1+7

Marked Items

Name Field # of Occurrence
$T(SCOREDAT+LINE ADDRSL+2
$T(SCOREDAT+LINE+1 ADDRSL+5
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 |  Marked Items  | All