Routine: BTIUP13

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Interaction Calls
Global Variables Directly Accessed
Label References
Local Variables

Information

BTIUP13 ; IHS/CIA/MGH - ENV CHECK FOR PATCH 1013;24-Mar-2015 15:19;DU

Source Information

Source file <BTIUP13.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
VA Fileman	3	^DIC UPDATE^DIE ^DIR
Text Integration Utility	1	$$READ^TIUU

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP; beginning of pret install code
LOOKUP(FILE,NAME,TYPE,SCREEN,PROMPT)	; ; file = file # to perform lookup on ; [name] = for instance lookups - required if type is missing ; [type] = for inquiries to file (eg: "AEQ") - required if name is missing ; [screen] = screen for lookup/inquiries ; [prompt] = replace default prompt
PATCH(X)	;return 1 if patch X was installed, X=aaaann.nnnnnn
EXIT
ENV	;EP environment check
REM	;
POST	;EP; beginning of post install code

Name	Field # of Occurrence
^DIC	LOOKUP+10
UPDATE^DIE	POST+22, POST+30
^DIR	EXIT+1
$$READ^TIUU	POST+10

Interaction Calls

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: !!,"Installation Error: CLASS OWNER cannot be defined." Line Location: POST+2
Function Call: WRITE	Prompt: !!,"RESCINDED ADVANCE DIRECTIVE already exists." Line Location: POST+3
Function Call: WRITE	Prompt: ! Line Location: POST+5
Function Call: WRITE	Prompt: !!,"Installation Aborted due to TIMEOUT." Line Location: POST+6
Function Call: WRITE	Prompt: !!,"Installation Aborted by USER." Line Location: POST+7
Function Call: WRITE	Prompt: !!,"Installation Error: Invalid Selection",! Line Location: POST+8
Function Call: WRITE	Prompt: !,"A DOCUMENT CLASS must be entered or '^' to abort." Line Location: POST+9
Function Call: WRITE	Prompt: !!,"Creating RESCINDED ADVANCE DIRECTIVE title..." Line Location: POST+21
Function Call: WRITE	Prompt: !!,"The following error message was returned:",! Line Location: POST+24
Function Call: WRITE	Prompt: !,TIUMSG("DIERR",1,"TEXT",TIUMSG) Line Location: POST+25
Function Call: WRITE	Prompt: "DONE." Line Location: POST+26
Function Call: WRITE	Prompt: !!,"Adding "_$P(^TIU(8925.1,TIUPRNT,0),U)_" as parent..." Line Location: POST+29
Function Call: WRITE	Prompt: !!,"The following error message was returned:",! Line Location: POST+32
Function Call: WRITE	Prompt: !,TIUMSG("DIERR",1,"TEXT",TIUMSG) Line Location: POST+33
Function Call: WRITE	Prompt: "DONE.",! Line Location: POST+34
Function Call: WRITE	Prompt: !!,"The following error message was returned:",! Line Location: POST+38
Function Call: WRITE	Prompt: !,TIUMSG("DIERR",1,"TEXT",TIUMSG) Line Location: POST+39
Function Call: WRITE	Prompt: "DONE.",! Line Location: POST+40
Function Call: WRITE	Prompt: !,"* The RESCINDED ADVANCE DIRECTIVE*" Line Location: POST+41
Function Call: WRITE	Prompt: !,"* title must be activated before use. *" Line Location: POST+42
Function Call: WRITE	Prompt: ! Line Location: EXIT+1
Routine Call	DIE Line Location: POST+22 POST+30
Routine Call	DIC Line Location: LOOKUP+10
Routine Call	DIR Line Location: EXIT+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	PATCH+4, PATCH+5, PATCH+7, PATCH+8
^TIU(8925.1 - [#8925.1]	POST+29, REM+3*

Name	Line Occurrences
$$LOOKUP	POST+2, POST+3, POST+5, POST+17, REM+2
$$PATCH	ENV+5, ENV+8, ENV+11
EXIT	POST+2, POST+3, POST+11, POST+23, POST+31, POST+37

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIC	LOOKUP+7~*
DIC("A"	LOOKUP+9*
DIC("S"	LOOKUP+7*
DIC(0	LOOKUP+8*
DIR	EXIT+1~
DIR(0	EXIT+1*
DTOUT	POST+1~, POST+6
DUOUT	POST+1~, POST+7
FILE	LOOKUP~, LOOKUP+7
I	PATCH+3~, PATCH+4*, PATCH+5, PATCH+7, PATCH+8
IN	ENV+1~
INSTDA	ENV+1~
J	PATCH+3~, PATCH+5*, PATCH+7, PATCH+8
NAME	LOOKUP~, LOOKUP+7
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
PROMPT	LOOKUP~, LOOKUP+9
SCREEN	LOOKUP~, LOOKUP+7
STAT	ENV+1~
TIU	POST+1~
TIU(	POST+12, POST+13, POST+14, POST+15, POST+16, POST+17, POST+18, POST+19, POST+20, POST+27 , POST+28, POST+36
TIUFPRIV	POST+1~*
TIUIEN	POST+1~
TIUIEN(	POST+35*
TIUIEN(1	POST+27, POST+35, POST+36
TIUMSG	POST+1~, POST+23, POST+25, POST+31, POST+33, POST+37, POST+39*
TIUMSG("DIERR"	POST+25, POST+33, POST+39
TIUPRNT	POST+1~, POST+4, POST+5, POST+8, POST+10, POST+11, POST+27, POST+28, POST+29
TIUTMP	POST+1~, REM+1~, REM+2*, REM+3
TYPE	LOOKUP~, LOOKUP+8
U	POST+29, REM+3
X	PATCH~, PATCH+2, PATCH+4, PATCH+5, PATCH+7, PATCH+8, PATCH+9, EXIT+1~, LOOKUP+7~
>> XPDABORT	ENV+6, ENV+9, ENV+12, POST+2, POST+4, POST+6, POST+7, POST+23, POST+31, POST+37*
>> XPDDIQ("XPZ1"	ENV+2*
>> XPDDIQ("XPZ2"	ENV+2*
Y	EXIT+1~, LOOKUP+7~, LOOKUP+11

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIUP13

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: