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: YS119PS0

Package: Mental Health

Routine: YS119PS0


Information

YS119PS0 ;SLC/KCM - Patch 119 post-init - utilities; 9/15/2015

Source Information

Source file <YS119PS0.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 5 FIELD^DID  (FILE,WP)^DIE  ^DIK  CLEAN^DILF  GETS^DIQ  
Mental Health 3 ($$FINDCHC,$$FINDQD,$$FINDRPT,$$FINDSCL,$$FINDSGRP,$$FINDTEST,UPDANY,UPDDT,UPDRPT,UPDWP)^YS119PS0  (AUDIT,BAI,MMPI2RF,MOCA,PCPTSD,PHQ9,WAISR)^YS119PS1  EN1^YS119PS2  
Kernel 1 (BMES,MES)^XPDUTL  

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: 4

Package Total Caller Graph
Mental Health 4 YS119PS0  YS119PS1  YS119PS3  YS119PST  

Entry Points

Name Comments DBIA/ICR reference
FIXTESTS ; Fixes for existing tests
FINDTEST(NAME) ; return test id given name
FINDSGRP(IEN,SEQ) ; return scalegroup id given test id and group sequence
FINDSCL(IEN,SEQ) ; return scale id given scalegroup id and scale sequence
FINDRPT(IEN) ; return a report id given a test id
FINDCTNT(TIEN,DESIG) ; return content id given test id and designator
FINDQD(TIEN,DESIG) ; return question id given test id and designator
FINDCHC(TIEN,DESIG,SEQ) ; return choice id
; given test id, designator, and choice sequence
DELANY(FILEN,IEN) ; remove any MH record
UPDANY(FILEN,IEN,CHGS) ; update any MH record
UPDRPT(IEN,TAG,RTN) ; Update MH REPORT entry with text in @TAG
UPDWP(FILEN,IEN,WP) ; update word processing field in MH
UPDDT(TSTIEN) ; Update LAST EDIT DATE so GUI pull over new changes
FIXHIPPO ; fix MOCA ALT1 mis-spelling of hippopotamus
HIPPORPT ;
SHOWC(TSTIEN) ; show content entries
SHOWK(TSTIEN) ; show scale key entries
PRTCAP(FILEN,IEN) ; Captioned output for a record

External References

Name Field # of Occurrence
FIELD^DID PRTCAP+6
FILE^DIE UPDANY+4
WP^DIE UPDRPT+3, UPDWP+2
^DIK DELANY+4
CLEAN^DILF UPDANY+6, UPDRPT+5, UPDWP+4
GETS^DIQ PRTCAP+3
BMES^XPDUTL UPDANY+5, UPDWP+3
MES^XPDUTL UPDRPT+4
$$FINDCHC^YS119PS0 FIXHIPPO+8
$$FINDQD^YS119PS0 FIXHIPPO+3
$$FINDRPT^YS119PS0 FIXHIPPO+15
$$FINDSCL^YS119PS0 FIXHIPPO+4
$$FINDSGRP^YS119PS0 FIXHIPPO+4
$$FINDTEST^YS119PS0 FIXHIPPO+2
UPDANY^YS119PS0 UPDDT+2, FIXHIPPO+10, FIXHIPPO+14
UPDDT^YS119PS0 FIXHIPPO+17
UPDRPT^YS119PS0 FIXHIPPO+16
UPDWP^YS119PS0 FIXHIPPO+6
AUDIT^YS119PS1 FIXTESTS+2
BAI^YS119PS1 FIXTESTS+3
MMPI2RF^YS119PS1 FIXTESTS+4
MOCA^YS119PS1 FIXTESTS+5
PCPTSD^YS119PS1 FIXTESTS+6
PHQ9^YS119PS1 FIXTESTS+7
WAISR^YS119PS1 FIXTESTS+8
EN1^YS119PS2 FIXTESTS+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,">>>>>>>>>> Scale Group Seq#",SGSEQ," Name: ",$P(^YTT(601.86,SGIEN,0),U,3)
  • Line Location: SHOWK+4
Function Call: WRITE
  • Prompt: !,"---------- Scale Seq#",SCSEQ," Name: ",$P(^YTT(601.87,SCIEN,0),U,3)
  • Line Location: SHOWK+7
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRTCAP+4
Function Call: WRITE
  • Prompt: ?INDENT,!
  • Line Location: PRTCAP+7
Function Call: WRITE
  • Prompt: ?TABTO,FLDS("LABEL"),": ",VALS(FILEN,IEN_",",FIELD,"E")
  • Line Location: PRTCAP+8
Routine Call
  • DIE
  • Line Location:
    • UPDANY+4
Routine Call
  • DIE
  • Line Location:
    • UPDRPT+3
    • UPDWP+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.93 - [#601.93] WP^DIE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("DIERR" UPDANY+5, UPDRPT+4, UPDWP+3
^YTT(601.71 - [#601.71] FINDTEST+1
^YTT(601.72 - [#601.72] FINDCHC+5
^YTT(601.751 - [#601.751] FINDCHC+6
^YTT(601.76 - [#601.76] FINDCTNT+3, FINDCTNT+4, FINDQD+3, SHOWC+2
^YTT(601.86 - [#601.86] FINDSGRP+1, FINDSGRP+2, SHOWK+2, SHOWK+3, SHOWK+4
^YTT(601.87 - [#601.87] FINDSCL+1, FINDSCL+2, SHOWK+5, SHOWK+6, SHOWK+7
^YTT(601.91 - [#601.91] FIXHIPPO+11, FIXHIPPO+12, SHOWK+8
^YTT(601.93 - [#601.93] FINDRPT+1

Label References

Name Line Occurrences
$$FINDCTNT FINDQD+2
$$FINDQD FINDCHC+4
FIXHIPPO FIXTESTS+1
PRTCAP SHOWC+2, SHOWK+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHGS UPDANY~, UPDANY+3, UPDANY+7!, UPDDT+2, FIXHIPPO+1~, FIXHIPPO+6, FIXHIPPO+7!, FIXHIPPO+10, FIXHIPPO+14
CHGS(1 FIXHIPPO+5*
CHGS(18 UPDDT+1*
CHGS(3 FIXHIPPO+9*, FIXHIPPO+13*
CHIEN FIXHIPPO+1~, FIXHIPPO+8*, FIXHIPPO+10
CIEN FINDCTNT+1~, FINDCTNT+3*, FINDCTNT+4, FINDCTNT+5, FINDQD+1~, FINDQD+2*, FINDQD+3, FINDCHC+2~, FINDCHC+3*, FINDCHC+6*
, FINDCHC+7, SHOWC+1~, SHOWC+2*
COLWIDTH PRTCAP+1~, PRTCAP+2*, PRTCAP+7, PRTCAP+9
CTYPIEN FINDCHC+2~, FINDCHC+5*, FINDCHC+6
DA DELANY+2~, DELANY+3*
DESIG FINDCTNT~, FINDCTNT+4, FINDQD~, FINDQD+2, FINDCHC~, FINDCHC+4
DFLTIOM PRTCAP+1~, PRTCAP+2*, PRTCAP+7
DIERR UPDANY+2~, UPDANY+5, UPDRPT+1~, UPDRPT+4, UPDWP+1~, UPDWP+3
DIK DELANY+2~, DELANY+3*
DONE FINDCTNT+1~, FINDCTNT+2*, FINDCTNT+3, FINDCTNT+4*
FDA UPDANY+2~
FDA( UPDANY+3*
FIELD PRTCAP+1~, PRTCAP+5*, PRTCAP+6, PRTCAP+8
FILEN DELANY~, DELANY+1, DELANY+3, UPDANY~, UPDANY+1, UPDANY+3, UPDWP~, UPDWP+2, PRTCAP~, PRTCAP+3
, PRTCAP+5, PRTCAP+6, PRTCAP+8
FLDS PRTCAP+1~
FLDS("LABEL" PRTCAP+8
I UPDRPT+1~, UPDRPT+2*
IEN FINDSGRP~, FINDSGRP+1, FINDSGRP+2, FINDSCL~, FINDSCL+1, FINDSCL+2, FINDRPT~, FINDRPT+1, DELANY~, DELANY+3
, UPDANY~, UPDANY+3, UPDRPT~, UPDRPT+3, UPDWP~, UPDWP+2, PRTCAP~, PRTCAP+3, PRTCAP+5, PRTCAP+8
INDENT PRTCAP+1~, PRTCAP+2*, PRTCAP+7
IOM PRTCAP+7
KEY FIXHIPPO+1~, FIXHIPPO+11*, FIXHIPPO+12, FIXHIPPO+14, SHOWK+1~, SHOWK+8*
NAME FINDTEST~, FINDTEST+1
QIEN FINDCHC+2~, FINDCHC+4*, FINDCHC+5
QUIEN FIXHIPPO+1~, FIXHIPPO+3*, FIXHIPPO+6, FIXHIPPO+12
RPTIEN FIXHIPPO+1~, FIXHIPPO+15*, FIXHIPPO+16
RTN UPDRPT~
SCALE FIXHIPPO+1~, FIXHIPPO+4*, FIXHIPPO+11
SCIEN SHOWK+1~, SHOWK+6*, SHOWK+7, SHOWK+8
SCSEQ SHOWK+1~, SHOWK+5*, SHOWK+6, SHOWK+7
SEQ FINDSGRP~, FINDSGRP+1, FINDSGRP+2, FINDSCL~, FINDSCL+1, FINDSCL+2, FINDCHC~, FINDCHC+6
SGIEN SHOWK+1~, SHOWK+3*, SHOWK+4, SHOWK+5, SHOWK+6
SGSEQ SHOWK+1~, SHOWK+2*, SHOWK+3, SHOWK+4
TABTO PRTCAP+1~, PRTCAP+2*, PRTCAP+7*, PRTCAP+8, PRTCAP+9*
TAG UPDRPT~
TIEN FINDCTNT~, FINDCTNT+3, FINDQD~, FINDQD+2, FINDCHC~, FINDCHC+4
TSTIEN UPDDT~, UPDDT+2, FIXHIPPO+1~, FIXHIPPO+2*, FIXHIPPO+3, FIXHIPPO+4, FIXHIPPO+8, FIXHIPPO+15, FIXHIPPO+17, SHOWC~
, SHOWC+2, SHOWK~, SHOWK+2, SHOWK+3
U FINDCTNT+4, FINDQD+3, FINDCHC+5, FIXHIPPO+12, SHOWK+4, SHOWK+7
VALS PRTCAP+1~
VALS( PRTCAP+5, PRTCAP+8
WP UPDRPT+1~, UPDWP~
WP( UPDRPT+2*
X UPDRPT+1~, UPDRPT+2*
X0 FINDCTNT+1~

Marked Items

Name Field # of Occurrence
$T(@(9) UPDRPT+2
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