Routine: YS208PST

Package	Total	Call Graph
Kernel	3	$$FMADD^XLFDT $$REPLACE^XLFSTR (BMES,MES)^XPDUTL
VA FileMan	3	UPDATE^DIE ^DIK CLEAN^DILF
Mental Health	2	INSTALLQ^YTXCHG FMADD^YTXCHGU
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
NEWCAT(CATNM)	; add new category
SETCAT(TEST,CATNM)	; add CATegory to TEST if not already there
DELCAT(TEST,CATNM)	; remove category from test if it is there
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

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

Name	Line Occurrences
SETCAT	POST+2
UPDURL	POST+3

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

Name	Field # of Occurrence
$T(ENTRIES+I	XCHGLST+5