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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: YTSFAST

Package: Mental Health

Routine: YTSFAST


Information

YTSFAST ;SLC/KCM - Score FAST ; 01/08/2016

Source Information

Source file <YTSFAST.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Mental Health 1 (DESGNTR,LDSCORES)^YTSCORE  
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 ^YTT(601.71  

Entry Points

Name Comments DBIA/ICR reference
DLLSTR(YSDATA,YS,YSTRNG) ; compute scores or report text based on YSTRNG
; input
; YSDATA(2)=adminId^patientDFN^instrumentName^dateGiven^isComplete
; YSDATA(2+n)=questionId^sequence^choiceId
; YS("AD")=adminId
; YSTRNG=1 for score, 2 for report
; output if YSTRNG=1: ^TMP($J,"YSCOR",n)=scaleId=score
; output if YSTRNG=2: append special "answers" to YSDATA
OLDFAST() ;
; expects YSDATA from DLLSTR
SCORESV ; calculate the score
; expects YSDATA from DLLSTR (YSDATA from LOADANSW^YTSCORE,SCALEG^YTQAPI3)
REPORT(YSDATA) ; build the scoring display for the report
; expects ^TMP($J,"YSCOR",...) and ^TMP($J,"YSG") from DLLSTR
; .YSDATA from DLLSTR
QSTNS ; FAST questions -- ;;oldQuestionID^newChoiceID^QuestionText

External References

Name Field # of Occurrence
$$GET1^DIQ OLDFAST+9, REPORT+7
DESGNTR^YTSCORE OLDFAST+8
LDSCORES^YTSCORE DLLSTR+12

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J SCORESV+10!, SCORESV+11, SCORESV+12*, SCORESV+13*, SCORESV+16*, SCORESV+17, SCORESV+18, SCORESV+19, SCORESV+21*
^YTT(601.75 - [#601.75] SCORESV+6

Label References

Name Line Occurrences
$$OLDFAST SCORESV+7
REPORT DLLSTR+13
SCORESV DLLSTR+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANSID REPORT+9~, REPORT+16*, REPORT+19
ANSWER REPORT+9~, REPORT+17*, REPORT+18*, REPORT+19
CID SCORESV+3~, SCORESV+4*, SCORESV+6, REPORT+3~, REPORT+5*, REPORT+6, REPORT+7
DATA OLDFAST+2~, OLDFAST+5*, OLDFAST+6, OLDFAST+7
DES OLDFAST+2~, OLDFAST+8, OLDFAST+10, OLDFAST+11, OLDFAST+12, OLDFAST+13, OLDFAST+14, OLDFAST+15
I SCORESV+3~, SCORESV+17*, SCORESV+18, SCORESV+19, REPORT+3~, REPORT+4*, REPORT+5
J SCORESV+3~, SCORESV+17*, SCORESV+20*, SCORESV+21
LEG OLDFAST+2~, OLDFAST+9*, OLDFAST+10, OLDFAST+11, OLDFAST+12, OLDFAST+13, OLDFAST+14, OLDFAST+15
N DLLSTR+11~
NODE OLDFAST+2~, OLDFAST+4*, OLDFAST+5, REPORT+9~, REPORT+12*, REPORT+19*
OLDFAST REPORT+9~, REPORT+10*, REPORT+11, REPORT+17, REPORT+18
OLDQSTN REPORT+9~, REPORT+15*, REPORT+17
QCID REPORT+9~, REPORT+15*, REPORT+18
QID REPORT+3~, REPORT+5*, REPORT+7
QLST REPORT+3~
QLST( REPORT+7*, REPORT+17
QNUM REPORT+9~, REPORT+13*, REPORT+16
QSTN SCORESV+3~, SCORESV+4*, SCORESV+5
QTXT REPORT+9~, REPORT+15*, REPORT+19
SCLID SCORESV+15~, SCORESV+18*, SCORESV+21
SCLNM SCORESV+15~, SCORESV+19*, SCORESV+21
SCORES DLLSTR+11~
STAGE OLDFAST+3*, OLDFAST+10*, OLDFAST+11*, OLDFAST+12*, OLDFAST+13*, OLDFAST+14*, OLDFAST+15*, OLDFAST+16, SCORESV+3~, SCORESV+6*
SCORESV+7*, SCORESV+21
THISCID REPORT+9~, REPORT+11*, REPORT+18
U OLDFAST+6, OLDFAST+7, SCORESV+4, SCORESV+6, SCORESV+19, REPORT+5, REPORT+10, REPORT+11, REPORT+15
X REPORT+9~, REPORT+14*, REPORT+15
YS DLLSTR~, DLLSTR+12
YSCDA OLDFAST+2~, OLDFAST+7*, OLDFAST+9
YSDATA DLLSTR~, DLLSTR+12, DLLSTR+13, REPORT~
YSDATA( OLDFAST+4, OLDFAST+5, REPORT+4, REPORT+5, REPORT+19*
YSDATA("" REPORT+12
YSDATA(3 SCORESV+4, REPORT+10, REPORT+11
YSQN OLDFAST+2~, OLDFAST+6*, OLDFAST+8
YSTRNG DLLSTR~, DLLSTR+9, DLLSTR+10

Marked Items

Name Field # of Occurrence
$T(QSTNS+QNUM REPORT+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All