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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: YS246PST

Package: Mental Health

Routine: YS246PST


Information

YS246PST ;ISP/LMT - Patch 246 Post-Install ;Dec 02, 2025@12:54:58

Source Information

Source file <YS246PST.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 4 ($$FMADD,$$NOW)^XLFDT  $$REPLACE^XLFSTR  (BMES,MES)^XPDUTL  $$NODEV^XUTMDEVQ  
Mental Health 4 CHKSPEC^YTWJSONE  ($$INCLUDE,INSTALLQ)^YTXCHG  FMSAVE^YTXCHGI  (FMUPD,LOG)^YTXCHGU  
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
UPDOP(NAME) ; Update OPERATIONAL to CLINICAL REMINDER
DEACTTST(NAME) ; Change OPERATIONAL to DROPPED
DDNOTE(NAME) ; Add default note for this instrument
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.
QUERSTRT ;Task job to update restart days to 7 for all instruments except 0-day restart
UPDRSTRT ; Update MH TESTS AND SURVEYS restart days to 7
UPDURL ; Update GUI TOOLS URL for MHA Web
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
$$DDEFIEN^TIUFLF7 DDNOTE+5, DDNOTE+6, DDNOTE+7, DDNOTE+8
$$FMADD^XLFDT UPDURL+6
$$NOW^XLFDT UPDRSTRT+27
$$REPLACE^XLFSTR UPDURL+15
EN^XPAR UPDURL+18
ENVAL^XPAR UPDURL+5
BMES^XPDUTL QUERSTRT+2, UPDURL+17
MES^XPDUTL QUERSTRT+5, QUERSTRT+6
$$NODEV^XUTMDEVQ QUERSTRT+4
CHKSPEC^YTWJSONE UPDRSTRT+24
$$INCLUDE^YTXCHG SCREEN+5
INSTALLQ^YTXCHG POST+2
FMSAVE^YTXCHGI DDNOTE+15
FMUPD^YTXCHGU UPDOP+6, DEACTTST+6, DEACTTST+11, UPDRSTRT+11, UPDRSTRT+29
LOG^YTXCHGU DDNOTE+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J UPDURL+2!, UPDURL+3, UPDURL+7, UPDURL+10, UPDURL+11, UPDURL+12, UPDURL+19!
^XTMP("YS246-TOOLS" UPDURL+6*, UPDURL+7*
^YTT(601 - [#601] DEACTTST+8
^YTT(601.71 - [#601.71] UPDOP+2, DEACTTST+2, DDNOTE+2, DDNOTE+3, UPDRSTRT+4, UPDRSTRT+5, UPDRSTRT+7, UPDRSTRT+8*
^YTT(601.712 - [#601.712] UPDRSTRT+15, UPDRSTRT+17, UPDRSTRT+18, UPDRSTRT+23*, UPDRSTRT+24

Label References

Name Line Occurrences
DDNOTE POST+4, POST+5, POST+6, POST+7, POST+8
DEACTTST POST+10, POST+11, POST+12
QUERSTRT POST+13
UPDOP POST+9
UPDURL POST+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALTCSLT DDNOTE+1~, DDNOTE+8*, DDNOTE+9
ALTNOTE DDNOTE+1~, DDNOTE+7*, DDNOTE+10
ARRAY XCHGLST~
ARRAY( XCHGLST+6*, XCHGLST+7*
CMD UPDURL+1~, UPDURL+14*, UPDURL+15*, UPDURL+16, UPDURL+17
CRCCALC UPDRSTRT+14~, UPDRSTRT+24, UPDRSTRT+28
CSLT DDNOTE+1~, DDNOTE+6*, DDNOTE+9*, DDNOTE+11, DDNOTE+13
DT UPDURL+6
DUN UPDRSTRT+13~, UPDRSTRT+16*, UPDRSTRT+17, UPDRSTRT+21*, UPDRSTRT+25*, UPDRSTRT+30*
ENT UPDURL+1~, UPDURL+10*, UPDURL+11, UPDURL+12, UPDURL+17, UPDURL+18
ERR UPDURL+1~, UPDURL+5, UPDURL+18
ERRS UPDRSTRT+14~, UPDRSTRT+16!, UPDRSTRT+24, UPDRSTRT+25
I XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
IEN UPDOP+1~, UPDOP+2*, UPDOP+3, UPDOP+6, DEACTTST+1~, DEACTTST+2*, DEACTTST+3, DEACTTST+6, DEACTTST+7!, DEACTTST+8*
, DEACTTST+9, DEACTTST+11, DDNOTE+1~, DDNOTE+2*, DDNOTE+3, DDNOTE+15, UPDRSTRT+1~, UPDRSTRT+4*, UPDRSTRT+5, UPDRSTRT+7
, UPDRSTRT+8, UPDRSTRT+11, UPDRSTRT+15*, UPDRSTRT+17, UPDRSTRT+18, UPDRSTRT+23, UPDRSTRT+24, UPDRSTRT+29
INST UPDURL+1~, UPDURL+11*, UPDURL+12, UPDURL+18
LC UPDRSTRT+13~, UPDRSTRT+17*, UPDRSTRT+18, UPDRSTRT+23
LIST UPDURL+1~, UPDURL+3*, UPDURL+5
NAME UPDOP~, UPDOP+2, DEACTTST~, DEACTTST+2, DEACTTST+8, DDNOTE~, DDNOTE+2
NEWVAL UPDURL+1~, UPDURL+16*, UPDURL+18
NOTE DDNOTE+1~, DDNOTE+5*, DDNOTE+10*, DDNOTE+11, DDNOTE+12
NUM UPDRSTRT+13~, UPDRSTRT+20*, UPDRSTRT+21
NWRSTRT UPDRSTRT+2~, UPDRSTRT+3*, UPDRSTRT+7*, UPDRSTRT+8
PARM UPDURL+1~, UPDURL+4*, UPDURL+5, UPDURL+18
REC UPDOP+1~, UPDOP+6, DEACTTST+1~, DEACTTST+6, DEACTTST+7!, DEACTTST+11, DDNOTE+1~, DDNOTE+15, UPDRSTRT+1~, UPDRSTRT+9!
, UPDRSTRT+11, UPDRSTRT+14~, UPDRSTRT+26!, UPDRSTRT+29
REC( UPDRSTRT+27*, UPDRSTRT+28*
REC(10 UPDOP+4*, DEACTTST+4*
REC(18 UPDOP+5*, DEACTTST+5*, UPDRSTRT+10*
REC(28 DDNOTE+14*
REC(29 DDNOTE+12*
REC(30 DDNOTE+13*
REC(32 DEACTTST+10*
RST1 UPDRSTRT+13~, UPDRSTRT+20*, UPDRSTRT+22*, UPDRSTRT+23
RSTRT UPDRSTRT+1~, UPDRSTRT+5*, UPDRSTRT+6
SPEC UPDURL+1~, UPDURL+15
SPEC("/home/?" UPDURL+8*
SPEC("/home/patch269/?" UPDURL+9*
SPEC("/home?" UPDURL+8*
STR UPDRSTRT+13~, UPDRSTRT+18*, UPDRSTRT+19, UPDRSTRT+20
TITL UPDURL+1~, UPDURL+14*, UPDURL+16
U DDNOTE+3, UPDRSTRT+5, UPDRSTRT+7, UPDRSTRT+8, UPDURL+6, XCHGLST+6, XCHGLST+7
VAL UPDURL+1~, UPDURL+12*, UPDURL+13, UPDURL+14
X XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
>> Y SCREEN+5
YSTASK QUERSTRT+1~, QUERSTRT+4*, QUERSTRT+5, QUERSTRT+6
YSZOTH QUERSTRT+1~, QUERSTRT+4
YSZOTH("ZTDTH" QUERSTRT+3*
>> ZTREQ UPDRSTRT+31*

Marked Items

Name Field # of Occurrence
$T(EDTDATE+1 UPDOP+5, DEACTTST+5, UPDRSTRT+10
$T(ENTRIES+I XCHGLST+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All