Routine: BLRPRE17

Information

BLRPRE17 ; IHS/HQW/TPF - ENVIRONMENT CHECK FOR PATCH 17; [ 06/03/2003 8:35 AM ]

Source file <BLRPRE17.m>

Package	Total	Call Graph
VA Fileman	3	^%DT DT^DICRW ^DIR
Kernel	2	HOME^%ZIS BMES^XPDUTL

Name	Comments	DBIA/ICR reference
SORRY	;
VERSION	;
ENVOK	; If this is just an environ check, end here.

Name	Field # of Occurrence
^%DT	ENVOK+14
HOME^%ZIS	BLRPRE17+12
DT^DICRW	BLRPRE17+12
^DIR	ENVOK+12
BMES^XPDUTL	BLRPRE17+14, BLRPRE17+15, BLRPRE17+16, BLRPRE17+19, BLRPRE17+23, VERSION+4, VERSION+5, VERSION+6, VERSION+13, VERSION+16 , ENVOK+1, ENVOK+13, ENVOK+15, SORRY+3, SORRY+4, SORRY+5, SORRY+6

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR 0." Line Location: BLRPRE17+8
Function Call: WRITE	Prompt: !,"DUZ(0) UNDEFINED OR NULL." Line Location: BLRPRE17+10
Function Call: WRITE	Prompt: !! Line Location: ENVOK+8
Routine Call	%ZIS Line Location: BLRPRE17+12
Routine Call	DIR Line Location: ENVOK+12

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	ENVOK+14
^DD("VERSION"	BLRPRE17+18
^DIC(9.4 - [#9.4]	BLRPRE17+22
^VA(200 - [#200]	BLRPRE17+13, ENVOK+15
^XPD("9.7"	VERSION+2, VERSION+10
^XPD(9.7 - [#9.7]	VERSION+11

Name	Line Occurrences
SORRY	BLRPRE17+8, BLRPRE17+10, BLRPRE17+14, BLRPRE17+20, BLRPRE17+24, VERSION+7, VERSION+14

Name	Field # of Occurrence
>> %	VERSION+2, VERSION+3, VERSION+10, VERSION+11
>> %DT	ENVOK+14*
DIFQ	SORRY+1!
>> DIR("A"	ENVOK+11*
>> DIR("B"	ENVOK+10*
>> DIR(0	ENVOK+9*
>> DIRUT	ENVOK+13
DUZ	BLRPRE17+8, BLRPRE17+13, ENVOK+15
DUZ(0	BLRPRE17+10
>> LINE	BLRPRE17+3*
>> LRSTATUS	VERSION+11*, VERSION+12
U	BLRPRE17+13, VERSION+11, ENVOK+15
>> X	BLRPRE17+13, BLRPRE17+14, BLRPRE17+15, BLRPRE17+18, BLRPRE17+19, BLRPRE17+20, BLRPRE17+22, BLRPRE17+23, BLRPRE17+24, ENVOK+14
>> XPDABORT	BLRPRE17+7, ENVOK+13, SORRY+2*
>> XPDDIQ("XPO1"	BLRPRE17+6*
>> XPDDIQ("XPZ1"	BLRPRE17+5, ENVOK+5
>> XPDDIQ("XPZ2"	BLRPRE17+5, ENVOK+5
>> XPDENV	ENVOK+5
>> XPDNOQUE	BLRPRE17+4*
>> Y	ENVOK+13, ENVOK+15

Name	Field # of Occurrence
$T(	BLRPRE17+16