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

Package: Mental Health

Routine: YS199PST


Information

YS199PST ;BAL/KTL - Patch 199 Post-init ; 01/27/2022

Source Information

Source file <YS199PST.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Kernel 3 $$FMADD^XLFDT  $$REPLACE^XLFSTR  (BMES,MES)^XPDUTL  
Mental Health 2 ($$INCLUDE,INSTALLQ)^YTXCHG  FMUPD^YTXCHGU  
VA FileMan 2 UPDATE^DIE  CLEAN^DILF  
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
UPDTST(NAME) ; Update Date Edited
CATS4CAT ; Add categories for new CAT's
SETCAT(TEST,CATNM) ; add category to TEST if not already there
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
UPDURL ; Update GUI TOOLS URL for MHA Web
ENTRIES ; New MHA instruments^Exchange Entry Date

External References

Name Field # of Occurrence
UPDATE^DIE SETCAT+8
CLEAN^DILF SETCAT+10
$$FMADD^XLFDT UPDURL+6
$$REPLACE^XLFSTR UPDURL+14
EN^XPAR UPDURL+17
ENVAL^XPAR UPDURL+5
BMES^XPDUTL UPDURL+16
MES^XPDUTL SETCAT+9
$$INCLUDE^YTXCHG SCREEN+5
INSTALLQ^YTXCHG POST+1
FMUPD^YTXCHGU UPDTST+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("DIERR" SETCAT+9
^TMP($J UPDURL+2!, UPDURL+3, UPDURL+7, UPDURL+9, UPDURL+10, UPDURL+11, UPDURL+18!
^XTMP("YS199-TOOLS" UPDURL+6*, UPDURL+7*
^YTT(601.71 - [#601.71] UPDTST+2, SETCAT+2, SETCAT+4
^YTT(601.97 - [#601.97] SETCAT+3

Label References

Name Line Occurrences
CATS4CAT POST+11
SETCAT CATS4CAT+1, CATS4CAT+2, CATS4CAT+3, CATS4CAT+4
UPDTST POST+2, POST+3, POST+4, POST+5, POST+6, POST+7, POST+8, POST+9, POST+10
UPDURL POST+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARRAY XCHGLST~
ARRAY( XCHGLST+6*, XCHGLST+7*
CAT SETCAT+1~, SETCAT+3*, SETCAT+4
CATNM SETCAT~, SETCAT+3, SETCAT+7, SETCAT+9
CMD UPDURL+1~, UPDURL+13*, UPDURL+14*, UPDURL+15, UPDURL+16
DIERR SETCAT+6~, SETCAT+9
DT UPDURL+6
ENT UPDURL+1~, UPDURL+9*, UPDURL+10, UPDURL+11, UPDURL+16, UPDURL+17
ERR UPDURL+1~, UPDURL+5, UPDURL+17
I XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
IEN UPDTST+1~, UPDTST+2*, UPDTST+4
INST UPDURL+1~, UPDURL+10*, UPDURL+11, UPDURL+17
LIST UPDURL+1~, UPDURL+3*, UPDURL+5
NAME UPDTST~, UPDTST+2
NEWVAL UPDURL+1~, UPDURL+15*, UPDURL+17
PARM UPDURL+1~, UPDURL+4*, UPDURL+5, UPDURL+17
REC UPDTST+1~, UPDTST+4
REC(18 UPDTST+3*
SPEC UPDURL+1~, UPDURL+14
SPEC("/home/?" UPDURL+8*
SPEC("/home?" UPDURL+8*
TEST SETCAT~, SETCAT+2*, SETCAT+4, SETCAT+7
TITL UPDURL+1~, UPDURL+13*, UPDURL+15
U XCHGLST+6, XCHGLST+7, UPDURL+6
VAL UPDURL+1~, UPDURL+11*, UPDURL+12, UPDURL+13
X XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7
>> Y SCREEN+5
YTFDA SETCAT+6~
YTFDA( SETCAT+7*
YTIEN SETCAT+6~

Marked Items

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