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

Package: Mental Health

Routine: YS250PST


Information

YS250PST ;BAL/KTL - Patch 250 Post-init ;June 25, 2024@13:55:37

Source Information

Source file <YS250PST.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 3 $$FMADD^XLFDT  $$REPLACE^XLFSTR  (BMES,MES)^XPDUTL  
Mental Health 3 ($$INCLUDE,INSTALLQ)^YTXCHG  FMSAVE^YTXCHGI  FMUPD^YTXCHGU  
VA FileMan 3 UPDATE^DIE  CLEAN^DILF  ($$GET1,GETS)^DIQ  
Text Integration Utility 1 $$DDEFIEN^TIUFLF7  
Toolkit 1 (EN,ENVAL)^XPAR  

Entry Points

Name Comments DBIA/ICR reference
EDTDATE ; date used to update 601.71:18
PRE ; nothing necessary
POST ; post-init
SETCAT(TEST,CATNM) ; add category to TEST if not already there
REACTTST(NAME) ; Change OPERATIONAL to YES
UPDURL ; Update GUI TOOLS URL for MHA Web
FIXINST ; Fix instrument note titles for sites that do not have
; MENTAL HEALTH DIAGNOSTIC STUDY NOTE and MENTAL HEALTH CONSULT NOTE
SCREEN ; line to put in DATA SCREEN of KIDS build
; $$INCLUDE^YTXCHG(Y,"TAG","RTN") calls TAG^RTN to get an array of
; instrument exchange entries to include in the build. It sets Y
; to true if the entry should be included.
XCHGLST(ARRAY) ; return array of instrument exchange entries
; ARRAY(cnt,1)=instrument exchange entry name
; ARRAY(cnt,2)=instrument exchange entry creation date
ENTRIES ; New MHA instruments ^ Exchange Entry Date

External References

Name Field # of Occurrence
UPDATE^DIE SETCAT+8
CLEAN^DILF SETCAT+10
$$GET1^DIQ FIXINST+10, FIXINST+12
GETS^DIQ FIXINST+15
$$DDEFIEN^TIUFLF7 FIXINST+3, FIXINST+4, FIXINST+6, FIXINST+7
$$FMADD^XLFDT UPDURL+7
$$REPLACE^XLFSTR UPDURL+16
EN^XPAR UPDURL+19
ENVAL^XPAR UPDURL+6
BMES^XPDUTL UPDURL+18
MES^XPDUTL SETCAT+9
$$INCLUDE^YTXCHG SCREEN+5
INSTALLQ^YTXCHG POST+1
FMSAVE^YTXCHGI FIXINST+21
FMUPD^YTXCHGU REACTTST+6, REACTTST+11

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.71 - [#601.71] GET1^DIQ,  GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("DIERR" SETCAT+9
^TMP($J UPDURL+3!, UPDURL+4, UPDURL+8, UPDURL+11, UPDURL+12, UPDURL+13, UPDURL+20!
^XTMP("YS250-TOOLS" UPDURL+7*, UPDURL+8*
^YTT(601 - [#601] REACTTST+8
^YTT(601.71 - [#601.71] SETCAT+2, SETCAT+4, REACTTST+2, FIXINST+9
^YTT(601.97 - [#601.97] SETCAT+3

Label References

Name Line Occurrences
FIXINST POST+9
REACTTST POST+7
SETCAT POST+2, POST+3, POST+4, POST+5, POST+6
UPDURL POST+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALTCSLT FIXINST+2~, FIXINST+7*, FIXINST+8, FIXINST+18
ALTNOTE FIXINST+2~, FIXINST+6*, FIXINST+8, FIXINST+17
ARRAY FIXINST+2~, FIXINST+14!, XCHGLST~
ARRAY( FIXINST+17, FIXINST+18, XCHGLST+6*, XCHGLST+7*
CAT SETCAT+1~, SETCAT+3*, SETCAT+4
CATNM SETCAT~, SETCAT+3, SETCAT+7, SETCAT+9
CMD UPDURL+2~, UPDURL+15*, UPDURL+16*, UPDURL+17, UPDURL+18
CSLT FIXINST+2~, FIXINST+4*, FIXINST+5
DIERR SETCAT+6~, SETCAT+9
DT UPDURL+7
ENT UPDURL+2~, UPDURL+11*, UPDURL+12, UPDURL+13, UPDURL+18, UPDURL+19
ERR UPDURL+2~, UPDURL+6, UPDURL+19
I XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
IEN REACTTST+1~, REACTTST+2*, REACTTST+3, REACTTST+6, REACTTST+7!, REACTTST+8*, REACTTST+9, REACTTST+11
INST UPDURL+2~, UPDURL+12*, UPDURL+13, UPDURL+19
LIST UPDURL+2~, UPDURL+4*, UPDURL+6
NAME REACTTST~, REACTTST+2, REACTTST+8
NEWVAL UPDURL+2~, UPDURL+17*, UPDURL+19
NOTE FIXINST+2~, FIXINST+3*, FIXINST+5
PARM UPDURL+2~, UPDURL+5*, UPDURL+6, UPDURL+19
REC REACTTST+1~, REACTTST+6, REACTTST+7!, REACTTST+11, FIXINST+2~, FIXINST+16!, FIXINST+19, FIXINST+20, FIXINST+21
REC(10 REACTTST+4*
REC(18 REACTTST+5*
REC(28 FIXINST+19*
REC(29 FIXINST+17*
REC(30 FIXINST+18*
REC(32 REACTTST+10*
SPEC UPDURL+2~, UPDURL+16
SPEC("/home/?" UPDURL+9*
SPEC("/home/p249/?" UPDURL+10*
SPEC("/home?" UPDURL+9*
TEST SETCAT~, SETCAT+2*, SETCAT+4, SETCAT+7
TITL UPDURL+2~, UPDURL+15*, UPDURL+17
U UPDURL+7, XCHGLST+6, XCHGLST+7
VAL UPDURL+2~, UPDURL+13*, UPDURL+14, UPDURL+15
X XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
>> Y SCREEN+5
YSIEN FIXINST+2~, FIXINST+9*, FIXINST+10, FIXINST+12, FIXINST+15, FIXINST+17, FIXINST+18, FIXINST+21
YSOPER FIXINST+2~, FIXINST+10*, FIXINST+11
YSPRIV FIXINST+2~, FIXINST+12*, FIXINST+13
YTFDA SETCAT+6~
YTFDA( SETCAT+7*
YTIEN SETCAT+6~

Marked Items

Name Field # of Occurrence
$T(EDTDATE+1 REACTTST+5
$T(ENTRIES+I XCHGLST+5
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All