Routine: ATX51P16

Information

ATX51P16 ; IHS/CMI/LAB - PCC Suite v5.1 patch 16 environment check ; 02 Nov 2015 2:41 PM

Source file <ATX51P16.m>

Name	Comments	DBIA/ICR reference
PRE	;
SORRY(X)	;
POST	;
INSTALLD(ATXSTAL)	;EP - Determine if patch ATXSTAL was installed, where ; ATXSTAL is the name of the INSTALL. E.g "AG6.011".
IMES	;

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Routine Call	DIE Line Location: POST+8
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12
Routine Call	DIC Line Location: INSTALLD+6

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls
^ATXAX - [#9002226]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	POST+2, POST+3, POST+4, POST+5

Name	Field # of Occurrence
>> ATXDA	POST+1, POST+2, POST+3, POST+4, POST+5, POST+8
ATXSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
ATXY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> D	INSTALLD+5*
DA	POST+8*!
DIC	INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11*
DIC(0	INSTALLD+5*
DIE	POST+8*!
DIFQ	SORRY+1!
DR	POST+8*!
>> F	POST+5*, POST+6
IOM	IMES+1, SORRY+4
U	POST+4, POST+5
X	ATX51P16+7, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11, SORRY~, SORRY+2, SORRY+3
>> XPDDIQ(	ATX51P16+7*
>> XPDDIQ("XPZ1"	ATX51P16+6*
>> XPDDIQ("XPZ2"	ATX51P16+6*
>> XPDENV	ATX51P16+6
>> XPDQUIT	SORRY+2, SORRY+3
Y	INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1