Routine: BTIUP9

Package	Total	Call Graph
IHS Electronic Health Record	1	REGMENU^BEHUTIL
VA Fileman	1	FILESEC^DDMOD

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP; beginning of pre install code
POST	;EP; beginning of post install code
ENV	;EP environment check
PATCH(X)	;return 1 if patch X was installed, X=aaaann.nnnnnn

Name	Field # of Occurrence
REGMENU^BEHUTIL	POST+10, POST+11, POST+12, POST+13, POST+14, POST+15, POST+16, POST+17, POST+18, POST+19 , POST+20, POST+21
FILESEC^DDMOD	POST+8

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You must first install "_PATCH_"." Line Location: ENV+6
Function Call: WRITE	Prompt: !,"You must first install "_PATCH_"." Line Location: ENV+9
Function Call: WRITE	Prompt: !,"You must first install "_PATCH_"." Line Location: ENV+12
Function Call: WRITE	Prompt: !!,"Checking DIVISION for all Hospital Location file (#44)" Line Location: ENV+33
Function Call: WRITE	Prompt: !,"entries <AND> INSTITUTION FILE POINTER for all Medical" Line Location: ENV+34
Function Call: WRITE	Prompt: !,"Center Division file (#40.8) entries..." Line Location: ENV+35
Function Call: WRITE	Prompt: !! Line Location: ENV+36
Function Call: WRITE	Prompt: !,"Sorry...DIVISION cannot be determined for all Hospital" Line Location: ENV+48
Function Call: WRITE	Prompt: !,"Location file (#44) entries <AND/OR> INSTITUTION FILE" Line Location: ENV+49
Function Call: WRITE	Prompt: !,"POINTER cannot be determined for all Medical Center" Line Location: ENV+50
Function Call: WRITE	Prompt: !,"Division file (#40.8) entries. Please review and correct" Line Location: ENV+51
Function Call: WRITE	Prompt: !,"both files as necessary." Line Location: ENV+52
Function Call: WRITE	Prompt: !!," ABORTING INSTALLATION " Line Location: ENV+53
Function Call: WRITE	Prompt: !," Files are OK " Line Location: ENV+55

FileNo	Call Tags
^TIU(8927 - [#8927]	FILESEC^DDMOD

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	ENV+43, ENV+44
^DIC(9.4 - [#9.4]	PATCH+4, PATCH+5, PATCH+7, PATCH+8
^SC - [#44]	ENV+38, ENV+40
^XPD(9.7 - [#9.7]	ENV+15, ENV+17, ENV+18, ENV+24, ENV+26, ENV+27

Name	Line Occurrences
$$PATCH	ENV+5, ENV+8, ENV+11

Name	Field # of Occurrence
CHKOK	ENV+32~, ENV+38, ENV+40, ENV+41, ENV+43, ENV+44*, ENV+46
I	PATCH+3~, PATCH+4*, PATCH+5, PATCH+7, PATCH+8
>> IN	ENV+14, ENV+15, ENV+17, ENV+23, ENV+24, ENV+26
INSTDA	ENV+1~, ENV+14, ENV+17, ENV+18, ENV+23, ENV+26, ENV+27
J	PATCH+3~, PATCH+5*, PATCH+7, PATCH+8
NUM	PATCH+3~, PATCH+8*, PATCH+9
PATCH	ENV+1~, ENV+4, ENV+5, ENV+6, ENV+7, ENV+8, ENV+9, ENV+10*, ENV+11, ENV+12
SECURITY	POST+1~, POST+8
SECURITY("AUDIT"	POST+7*
SECURITY("DD"	POST+3*
SECURITY("DEL"	POST+4*
SECURITY("LAYGO"	POST+6*
SECURITY("RD"	POST+2*
SECURITY("WR"	POST+5*
STAT	ENV+1~, ENV+18, ENV+19, ENV+27, ENV+28
TIUDIV	ENV+42~, ENV+43, ENV+44
TIUDVHL	ENV+39~, ENV+40*
TIUIFP	ENV+42~, ENV+44*
TIULOC	ENV+32~, ENV+38, ENV+40
U	ENV+18, ENV+27, ENV+40
X	PATCH~, PATCH+2, PATCH+4, PATCH+5*, PATCH+7, PATCH+8, PATCH+9
>> XPDABORT	ENV+6, ENV+9, ENV+12, ENV+16, ENV+20, ENV+25, ENV+29, ENV+47
>> XPDDIQ("XPZ1"	ENV+2, ENV+21, ENV+30*
>> XPDDIQ("XPZ2"	ENV+2, ENV+21, ENV+30*