Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: YTMCMI2C

Package: Mental Health

Routine: YTMCMI2C


Information

YTMCMI2C ;ALB/ASF,HIOFO/FT - MCMI2 REPORT CONTINUED ;8/7/12 3:46 am

Source Information

Source file <YTMCMI2C.m>

Entry Points

Name Comments DBIA/ICR reference
V ;
CD ;
HP
IA ;
ED ;
SDP ;
DONE ;
RD ;
SCR ;
; Added 5/6/94 LJA
CDX0 ;
CDX ;
CDX1 ;
CDX2
CDXM ;
CDXF ;
TOP ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report is ",$S(V=1:"OF QUESTIONABLE VALIDITY",V>1:"**** INVALID ***",1:"VALID")," based on the validity scale."
  • Line Location: V+1
Function Call: WRITE
  • Prompt: !,"Validity Questioned based on ",$S(+R>150:"high",1:"low")," DISCLOSURE score"
  • Line Location: V+2
Function Call: WRITE
  • Prompt: !!!,"There were less than 164 responses to the items on the inventory.",!,"Computer interpretative analysis of any responses to these",!,"items would not yield valid results."
  • Line Location: V+6
Function Call: WRITE
  • Prompt: !,"Personality Code= "
  • Line Location: CD+1
Function Call: WRITE
  • Prompt: "//"
  • Line Location: CD+1
Function Call: WRITE
  • Prompt: !,"Syndrome Code= "
  • Line Location: CD+2
Function Call: WRITE
  • Prompt: "//"
  • Line Location: CD+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CD+3
Function Call: WRITE
  • Prompt: !!?20,"*** NOTEWORTHY RESPONSES ***",!
  • Line Location: CD+5
Function Call: WRITE
  • Prompt: !?5,^(J3,0)
  • Line Location: HP+0
Function Call: WRITE
  • Prompt: !!,"Interpersonal Alienation"
  • Line Location: IA+1
Function Call: WRITE
  • Prompt: !?5,^(J3,0)
  • Line Location: IA+2
Function Call: WRITE
  • Prompt: !!,"Emotional Dyscontrol"
  • Line Location: ED+1
Function Call: WRITE
  • Prompt: !?5,^(J3,0)
  • Line Location: ED+2
Function Call: WRITE
  • Prompt: !!,"Self-Destructive Potential"
  • Line Location: SDP+1
Function Call: WRITE
  • Prompt: !?5,^(J3,0)
  • Line Location: SDP+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SCR+6
Function Call: WRITE
  • Prompt: J2," "
  • Line Location: CDX+1
Function Call: WRITE
  • Prompt: $P($P(^YTT(601,201,"S",J4,0),U,2)," ")," "
  • Line Location: CDX2+0
Function Call: WRITE
  • Prompt: $P($P(^YTT(601,201,"S",J4,0),U,2)," ")," "
  • Line Location: CDXM+1
Function Call: WRITE
  • Prompt: $P($P(^YTT(601,201,"S",J4,0),U,2)," ")," "
  • Line Location: CDXF+1
Function Call: WRITE
  • Prompt: !!?(72-$L(X)\2),X
  • Line Location: TOP+1
Info |  Source |  Entry Points |  Interaction Calls