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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: YTSF36

Package: Mental Health

Routine: YTSF36


Information

YTSF36 ;ALBANY/ASF SF-36 HEALTH SURVEY ;1/12/96 10:33

Source Information

Source file <YTSF36.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Mental Health 1 DTA^YTREPT  
VA FileMan 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
SCOR ;GET RESPONSES
RV ;REVERSE SCORE 10 ITEMS
RAWER ;RAW CALCULATIONS
RAW1
RAW2
MISS ;MISSING ITEM RECODE BY MEANS
STND ;
ST ;
REPT ;
LS ;
ITMS ;ITEM OUTPUT
ITMS1
ITMS2
DONE ;
SCR ;
TEXT ;
EOR ;YTSF36

External References

Name Field # of Occurrence
^DIR SCR+7
DTA^YTREPT REPT+2, ITMS+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?(72-$L(X)\2),X,!!!?(A-9\2+L1),"S C A L E",?(L2+1),"RAW 0-100",!
  • Line Location: REPT+2
Function Call: WRITE
  • Prompt: !?L1,$P(^YTT(601,YSTEST,"S",J,0),U,2)
  • Line Location: REPT+5
Function Call: WRITE
  • Prompt: ?L2,$S(YSRS="*":" *",1:$J(YSRS,6,2))
  • Line Location: REPT+6
Function Call: WRITE
  • Prompt: ?(L2+10)," *"
  • Line Location: REPT+7
Function Call: WRITE
  • Prompt: ?(L2+10),$J($P(S,U,J),6,2)
  • Line Location: REPT+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: REPT+10
Function Call: WRITE
  • Prompt: ?7,$P(YSTXT,";;",2),!
  • Line Location: REPT+10
Function Call: WRITE
  • Prompt: ?(L2+10),$S(YSRS=1:"Much Better",YSRS=2:"Somewhat Better",YSRS=3:"About the Same",YSRS=4:"Somewhat Worse",YSRS=5:"Much Worse",1:" ")
  • Line Location: LS+1
Function Call: WRITE
  • Prompt: !!?15,"Item Responses",!
  • Line Location: ITMS+2
Function Call: WRITE
  • Prompt: !,YSX
  • Line Location: ITMS2+0
Function Call: WRITE
  • Prompt: !!?15,"<<<",YSX,">>>"
  • Line Location: ITMS2+1
Function Call: WRITE
  • Prompt: !?5,"Answer= ",$P(YSX,"^",$E(A,YSN)+1)
  • Line Location: ITMS2+2
Function Call: WRITE
  • Prompt: !,YSX
  • Line Location: ITMS2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SCR+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SCR+8
Routine Call
  • DIR
  • Line Location:
    • SCR+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YTD(601.2 - [#601.2] SCOR+1, ITMS+1
^YTT(601 - [#601] RV+1, RAW1ST+2, REPT+1, REPT+5, REPT+8, ITMS+3, ITMS1

Label References

Name Line Occurrences
ITMS1 ITMS+3
ITMS2 ITMS1
LS REPT+8
MISS RAWER+1
RAW1 RAWER+1
RAW2 RAW1+1
REPT ST+1
SCR REPT+4, ITMS1
ST ST+2
STND RAWER+2

Naked Globals

Name Field # of Occurrence
^( ITMS1
^("P" REPT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A RAW1+1*, RAW2RAW2+1, ST+1*, ST+2, REPT+1*, REPT+2, ITMS+1*, ITMS2+2, DONE+1!
SCR+1~
B MISS+1*, MISS+2, DONE+1!, SCR+1~
B1 SCR+1~
C SCR+1~
D SCR+1~
DIR SCR+7!
DIR(0 SCR+7*
DIRUT SCR+6~, SCR+7
DTOUT SCR+6~, SCR+7
DUOUT SCR+6~, SCR+7
E SCR+1~
E1 SCR+1~
F SCR+1~
F1 SCR+1~
G SCR+1~
G1 SCR+1~
H SCR+1~
I SCOR+3*, RV+1*, RAW1+1*, ITMS+3*, ITMS1*, DONE+1!, SCR+1~
>> I0 SCR+5*
IOF ITMS+1, SCR+8
IOSL SCR+5
IOST REPT+4, ITMS1
J RAWER+1*, RAW1RAW2MISS+1, MISS+2, MISS+3, MISS+4, STND+1*, ST+1, ST+2*
REPT+3*, REPT+5, REPT+8, REPT+9, ITMS1*, ITMS2+1, DONE+1!, SCR+1~
J1 SCR+1~
J2 SCR+1~
J3 SCR+1~
J4 SCR+1~
K ITMS+3*, ITMS1DONE+1!, SCR+1~
L DONE+1!, SCR+1~
L1 REPT+1*, REPT+2, REPT+5, DONE+1!, SCR+1~
L2 REPT+1*, REPT+2, REPT+6, REPT+7, REPT+9, LS+1, DONE+1!, SCR+1~
M DONE+1!, SCR+1~
N SCR+1~
N1 SCR+2~
N2 SCR+2~
N3 SCR+2~
N4 SCR+2~
P STND+1*, ST+2, DONE+1!, SCR+2~
P0 SCR+2~
P1 SCR+2~
P3 SCR+2~
R RAWER+1*, RAW2*, MISS+2*, MISS+3, MISS+4*, ST+1, REPT+3, SCR+2~
R1 SCR+2~
S RAWER+1!, STND+1*, ST+2*, REPT+9, SCR+2~
S1 SCR+2~
T SCR+2~
T1 SCR+2~
T2 SCR+2~
TT SCR+2~
U RV+1, RAW1+1, RAW2MISS+1, MISS+2, MISS+3, MISS+4, ST+1, ST+2, REPT+1
REPT+3, REPT+5, REPT+8, REPT+9
V SCR+2~
V1 SCR+2~
V2 SCR+2~
V3 SCR+2~
V4 SCR+3~
V5 SCR+3~
V6 SCR+3~
W SCR+3~
X SCOR+1*, SCOR+3, RV+3, RV+4, RV+5, RV+6, ST+2*, REPT+1*, REPT+2, DONE+1!
SCR+3~, SCR+6~
X0 SCR+3~
X1 SCR+3~
X2 SCR+3~
X3 SCR+3~
X4 SCR+3~
X7 SCR+3~
X8 SCR+3~
X9 SCR+3~
Y MISS+3*, MISS+4, DONE+1!, SCR+3~
Y1 SCR+3~
Y2 SCR+3~
>> YSDFN SCOR+1, ITMS+1
>> YSED SCOR+1, ITMS+1
>> YSET SCOR+1, ITMS+1
YSIT DONE+1!
YSKK RAW1*, RAW1+1, DONE+1!
>> YSLFT SCR+7*
YSMX RV+1*, DONE+1!
YSN RAWER+1*, RAW2+2*, MISS+3, ITMS2*, ITMS2+2, DONE+1!
>> YSNOITEM REPT+11*
>> YSOUT ITMS+1*, ITMS1
YSRS REPT+3*, REPT+6, REPT+7, LS+1, DONE+1!
>> YSTEST RV+1, RAW1ST+2, REPT+1, REPT+5, REPT+8, ITMS+3, ITMS1
YSTL DONE+1!
>> YSTOUT REPT+4, SCR+7*
YSTTL DONE+1!
YSTXT REPT+10*, DONE+1!
YSTY DONE+1!
>> YSUOUT REPT+4, ITMS+1*, ITMS1SCR+7*
YSX ITMS1*, ITMS2ITMS2+1, ITMS2+2, ITMS2+3, DONE+1!
YSX( SCOR+3*, RV+1*, RAW2RAW2+1
YSX(1 RV+3*
YSX(21 RV+4*
YSX(22 RV+5*, RV+6*
YSXN RAWER+1*, RAW2+1*, MISS+2, MISS+3, MISS+4, DONE+1!
YSZZ REPT+10*, DONE+1!
Z SCR+3~
Z1 SCR+3~
Z3 SCR+3~

Marked Items

Name Field # of Occurrence
$T(TEXT+YSZZ REPT+10
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All