Routine: PXRMV2E

Package	Total	Call Graph
VA Fileman	3	EN^DDIOL $$GET1^DID ^DIR
Kernel	1	$$VERSION^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
ENVCHK	;Perform an environment check. Check for the existence of the globals
CHECK(FNUM,NG,TEXTG,NI,TEXTI)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Is this a Legacy system?" Line Location: ENVCHK+8
Routine Call	DIR Line Location: ENVCHK+9

Name	Line Occurrences (* Changed, ! Killed)
^PXRMINDX(	CHECK+6

Name	Line Occurrences
CHECK	ENVCHK+14, ENVCHK+20, ENVCHK+26, ENVCHK+29, ENVCHK+32, ENVCHK+35, ENVCHK+38, ENVCHK+41, ENVCHK+44, ENVCHK+47 , ENVCHK+50, ENVCHK+53

Name	Field # of Occurrence
DIR	ENVCHK+3~
DIR("B"	ENVCHK+7*
DIR(0	ENVCHK+7*
DIROUT	ENVCHK+3~
DIRUT	ENVCHK+3~
DTOUT	ENVCHK+3~
DUOUT	ENVCHK+3~
FNUM	CHECK~, CHECK+2, CHECK+3, CHECK+6
GNAME	ENVCHK+3~, CHECK+1~, CHECK+2*, CHECK+4, CHECK+5, CHECK+6
NE	ENVCHK+3~, CHECK+1~, CHECK+3*, CHECK+4, CHECK+5, CHECK+6
NG	ENVCHK+3~, ENVCHK+11, ENVCHK+14, ENVCHK+20, ENVCHK+26, ENVCHK+29, ENVCHK+32, ENVCHK+35, ENVCHK+38, ENVCHK+41 , ENVCHK+44, ENVCHK+47, ENVCHK+50, ENVCHK+53, ENVCHK+67, ENVCHK+69, ENVCHK+70, ENVCHK+71, CHECK~, CHECK+4* , CHECK+5*
NI	ENVCHK+3~, ENVCHK+11, ENVCHK+14, ENVCHK+20, ENVCHK+26, ENVCHK+29, ENVCHK+32, ENVCHK+35, ENVCHK+38, ENVCHK+41 , ENVCHK+44, ENVCHK+47, ENVCHK+50, ENVCHK+53, ENVCHK+58, CHECK~, CHECK+6
TEXTG	ENVCHK+3~, ENVCHK+14, ENVCHK+20, ENVCHK+26, ENVCHK+29, ENVCHK+32, ENVCHK+35, ENVCHK+38, ENVCHK+41, ENVCHK+44 , ENVCHK+47, ENVCHK+50, ENVCHK+53, ENVCHK+72, CHECK~
TEXTG(	ENVCHK+71, CHECK+4, CHECK+5*
TEXTG(1	ENVCHK+68*
TEXTG(2	ENVCHK+69, ENVCHK+70
TEXTI	ENVCHK+3~, ENVCHK+4, ENVCHK+14, ENVCHK+20, ENVCHK+26, ENVCHK+29, ENVCHK+32, ENVCHK+35, ENVCHK+38, ENVCHK+41 , ENVCHK+44, ENVCHK+47, ENVCHK+50, ENVCHK+53, ENVCHK+62, ENVCHK+65, CHECK~
TEXTI(	CHECK+6*
TEXTI(1	ENVCHK+4, ENVCHK+60, ENVCHK+64*
TEXTI(2	ENVCHK+61*
U	ENVCHK+7
X	ENVCHK+3~
>> XPDABORT	ENVCHK+4, ENVCHK+58, ENVCHK+59
Y	ENVCHK+3~, ENVCHK+10