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  | All
Print Page as PDF
Routine: YTQPRT

Package: Mental Health

Routine: YTQPRT


Information

YTQPRT ;ASF/ALB MHA3 PRINT TEST; 2/24/10 1:27pm

Source Information

Source file <YTQPRT.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 ^DIC  ($$GET1,EN)^DIQ  ^DIR  
Kernel 2 ^%ZIS  ^%ZISC  
Mental Health 1 SCALEG^YTQAPI3  

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 YTQ DETAILED DEFINITION  YTQ FORM PRINT  

Entry Points

Name Comments DBIA/ICR reference
FORM ;print for clinicians
FA
QOUT ;pull text and intros
PRTTEST ;print for developers
EN1 ;
GETTEXT ;pull text and intros
SCALES ;scales
SKIP ;skip questions
RULESKIP ;rules that skip questions
REPORT ;display report setup
IENCK(NN) ;check ien< 100,000
WAIT ;

External References

Name Field # of Occurrence
^%ZIS FORM+7, EN1+2
^%ZISC FA+17, EN1+33
^DIC FORM+4, PRTTEST+2
$$GET1^DIQ FA+1, FA+9
EN^DIQ EN1+5, RULESKIP+4, REPORT+4
^DIR WAIT+3
SCALEG^YTQAPI3 SCALES+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?7,YSCODE
  • Line Location: FA+0
Function Call: WRITE
  • Prompt: !,$$GET1^DIQ(601.71,YSCODEN_",","PRINT TITLE")
  • Line Location: FA+1
Function Call: WRITE
  • Prompt: !,"_____ ",$S(YSIDENT=0:YSI-1_".",YSIDENT="N":"",1:YSI_".")," ",YSCTEXT
  • Line Location: FA+15
Function Call: WRITE
  • Prompt: !!
  • Line Location: QOUT+1
Function Call: WRITE
  • Prompt: !,^YTT(601.73,YSINTRO,1,N1,0)
  • Line Location: QOUT+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: N1>1
  • Line Location: QOUT+4
Function Call: WRITE
  • Prompt: ^YTT(601.72,YSQN,1,N1,0)
  • Line Location: QOUT+4
Function Call: WRITE
  • Prompt: @IOF,!?10,"*** ",YSCODE," ***",!
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !,"Choicetype: ",YSCTYPE
  • Line Location: EN1+16
Function Call: WRITE
  • Prompt: " identifier: "
  • Line Location: EN1+17
Function Call: WRITE
  • Prompt: $P($G(^YTT(601.89,YSIDENT,0)),U,2)
  • Line Location: EN1+17
Function Call: WRITE
  • Prompt: !,"# "_YSCHOICE_" Leg: "_YSLEG_" "_YSCTEXT
  • Line Location: EN1+23
Function Call: WRITE
  • Prompt: !!,"<<",YSEQ,">> Question#"_YSQN," Display Q: ",YSQDISP," I: ",YSIDISP," C: ",YSCDISP
  • Line Location: GETTEXT+1
Function Call: WRITE
  • Prompt: !,^YTT(601.73,YSINTRO,1,N1,0)
  • Line Location: GETTEXT+3
Function Call: WRITE
  • Prompt: !,^YTT(601.72,YSQN,1,N1,0)
  • Line Location: GETTEXT+4
Function Call: WRITE
  • Prompt: !!!?5,"*** Scales ***",!
  • Line Location: SCALES+1
Function Call: WRITE
  • Prompt: !,"scale group: ",+$P(G,"=",2)," ",$P(G,U,3)
  • Line Location: SCALES+6
Function Call: WRITE
  • Prompt: !,YSSCIEN,?10,YSSCALE
  • Line Location: SCALES+8
Function Call: WRITE
  • Prompt: !?5,"# Question target ADD"
  • Line Location: SCALES+10
Function Call: WRITE
  • Prompt: !?5,+G,?12,$P(G,U,3)," ",$P(G,U,4)," ",$P(G,U,5)
  • Line Location: SCALES+11
Function Call: WRITE
  • Prompt: !!!?5,"*** Skips ***",!
  • Line Location: SKIP+1
Function Call: WRITE
  • Prompt: !,"SkipID: "+$P(G,U)_" RuleId: "_$P(G,U,3)_" QuestionID: "_$P(G,U,4)
  • Line Location: SKIP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: RULESKIP+3
Function Call: WRITE
  • Prompt: !!,"REPORT: not defined",!!
  • Line Location: REPORT+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: REPORT+3
Function Call: WRITE
  • Prompt: !,"###### not national ######## ",^YTT(601.751,J,0)
  • Line Location: IENCK+3
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WAIT+4
Routine Call
  • %ZIS
  • Line Location:
    • FORM+7
    • EN1+2
Routine Call
  • DIC
  • Line Location:
    • FORM+4
    • PRTTEST+2
Routine Call
  • DIR
  • Line Location:
    • WAIT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.71 - [#601.71] Classic Fileman Calls,  GET1^DIQ
^YTT(601.74 - [#601.74] GET1^DIQ
^YTT(601.82 - [#601.82] Classic Fileman Calls
^YTT(601.93 - [#601.93] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J FA+16!, EN1+32!, SCALES+3, SCALES+5, SCALES+12!, SKIP+6*, RULESKIP+1
^YTT(601.71 - [#601.71] EN1+3
^YTT(601.72 - [#601.72] FA+6, QOUT+2, QOUT+4, EN1+12, GETTEXT+2, GETTEXT+4
^YTT(601.73 - [#601.73] QOUT+3, GETTEXT+3
^YTT(601.75 - [#601.75] FA+14, EN1+21, EN1+22
^YTT(601.751 - [#601.751] FA+12, FA+13, EN1+19, EN1+20
^YTT(601.76 - [#601.76] FA+4, FA+6, EN1+10, EN1+12
^YTT(601.79 - [#601.79] SKIP+2, SKIP+4
^YTT(601.89 - [#601.89] FA+11, EN1+17
^YTT(601.91 - [#601.91] SCALES+9, SCALES+11
^YTT(601.93 - [#601.93] REPORT+1

Label References

Name Line Occurrences
GETTEXT EN1+14
IENCK EN1+18
QOUT FA+8
REPORT EN1+31
RULESKIP EN1+29
SCALES EN1+25
SKIP EN1+27
WAIT FA+5, EN1+7, EN1+11, SCALES+4, SKIP+3, RULESKIP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS EN1+2*
DA FORM+2~, PRTTEST+4~, EN1+5*, RULESKIP+4*, REPORT+4*
DIC FORM+4!*, PRTTEST+2!*, EN1+5*, RULESKIP+4*, REPORT+4*
DIC(0 FORM+4*, PRTTEST+2*
DIR WAIT+3!
DIR(0 WAIT+3*
DIRUT WAIT+2~, WAIT+3
DTOUT WAIT+2~
DUOUT WAIT+2~
G FORM+2~, PRTTEST+4~, SCALES+5*, SCALES+6, SCALES+7, SCALES+11*, SKIP+4*, SKIP+5, SKIP+6
>> I0 WAIT+1*
IOF FA, EN1+4, WAIT+4
IOP EN1+2!
IOSL FA+5, EN1+7, EN1+11, SCALES+4, SKIP+3, RULESKIP+2, WAIT+1
IOST WAIT+3
J FORM+2~, PRTTEST+4~, SCALES+11*
N FORM+2~, PRTTEST+4~, SCALES+3*, SCALES+5, SKIP+2*, SKIP+4, RULESKIP+1*, RULESKIP+4
N1 FORM+2~, QOUT+3*, QOUT+4*, PRTTEST+4~, GETTEXT+3*, GETTEXT+4*
NN IENCK~
>> POP FORM+7, EN1+2
U FORM+5, FA+6, FA+7, FA+10, FA+11, QOUT+2, EN1+3, EN1+12, EN1+13, EN1+15
, EN1+17, EN1+22, GETTEXT+2, SCALES+6, SCALES+7, SCALES+11, SKIP+5, SKIP+6
Y FORM+2~, FORM+4, FORM+5, PRTTEST+2, EN1+3
YS1 FORM+2~, PRTTEST+4~, SCALES+2
YS1("CODE" SCALES+2*
YSCDISP FORM+2~, FA+7*, PRTTEST+4~, EN1+13*, GETTEXT+1
YSCHOICE FORM+1~, FA+13*, FA+14, PRTTEST+3~, EN1+20*, EN1+21, EN1+22, EN1+23
YSCHT FORM+1~, PRTTEST+3~
YSCHTSEQ FORM+2~, FA+12*, FA+13, PRTTEST+4~, EN1+19*, EN1+20
YSCODE FORM+1~, FORM+5*, FA, PRTTEST+3~, EN1+3*, EN1+4, SCALES+2
YSCODEN FORM+1~, FORM+5*, FA+1, FA+4, PRTTEST+3~, EN1+3*, EN1+5, EN1+10, SKIP+2, REPORT+1
, IENCK+1
YSCTEXT FORM+2~, FA+14*, FA+15, PRTTEST+4~, EN1+21*, EN1+23
YSCTYPE FORM+1~, FA+10*, FA+11, FA+12, FA+13, PRTTEST+3~, EN1+15*, EN1+16, EN1+17, EN1+18
, EN1+19, EN1+20
YSDISP FORM+2~, PRTTEST+4~
YSEQ FORM+2~, FA+4*, PRTTEST+4~, EN1+10*, GETTEXT+1
YSERR FORM+1~, PRTTEST+3~
YSG FORM+1~, FA+6*, FA+7, PRTTEST+3~, EN1+12*, EN1+13
YSI FORM+2~, FA+12*, FA+15, PRTTEST+4~
YSIDENT FORM+2~, FA+11*, FA+15, PRTTEST+4~, EN1+17*
YSIDISP FORM+2~, FA+7*, PRTTEST+4~, EN1+13*, GETTEXT+1
YSIEN FORM+1~, FA+4*, FA+6, PRTTEST+3~, EN1+10*, EN1+12
YSINTRO FORM+2~, QOUT+2*, QOUT+3, PRTTEST+4~, GETTEXT+2*, GETTEXT+3
YSLEG FORM+1~, PRTTEST+3~, EN1+22*, EN1+23
YSLFT FORM+1~, FA+2*, FA+4, PRTTEST+4~, EN1+6*, EN1+8, EN1+10, EN1+24, EN1+26, EN1+28
, EN1+30, SCALES+3, SKIP+2, RULESKIP+1, WAIT+3*
YSLIMIT FORM+1~, PRTTEST+3~
YSNN FORM+1~, PRTTEST+3~
YSNUMB FORM+1~, FA+2*, FA+4*, QOUT+4, PRTTEST+3~, EN1+6*, EN1+10*
YSOPER FORM+1~, PRTTEST+3~
YSQDISP FORM+2~, FA+7*, PRTTEST+4~, EN1+13*, GETTEXT+1
YSQG2 FORM+1~, FA+6*, FA+10, PRTTEST+3~, EN1+12*, EN1+15
YSQN FORM+1~, FA+6*, QOUT+2, QOUT+4, PRTTEST+3~, EN1+12*, GETTEXT+1, GETTEXT+2, GETTEXT+4
YSR FORM+2~, FA+4*, PRTTEST+4~, EN1+10*
YSRPT PRTTEST+4~, REPORT+1*, REPORT+2, REPORT+4
YSRTYPE FORM+2~, FA+6*, FA+9, PRTTEST+4~
YSSCALE FORM+2~, PRTTEST+4~, SCALES+7*, SCALES+8
YSSCIEN FORM+2~, PRTTEST+4~, SCALES+7*, SCALES+8, SCALES+9, SCALES+11
YSZ FORM+2~, PRTTEST+4~, SCALES+2
YTTLKUP FORM+3~*, PRTTEST+1~*, EN1+1~*
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  | All