Routine: APCL3030

Package	Total	Call Graph
Kernel	3	$$CJ^XLFSTR $$DELETE^XPDMENU ($$VERSION,MES)^XPDUTL
VA Fileman	3	(,IX)^DIC ^DIE ^DIK
Patient Care Component Reports	1	^APCLS9

Name	Comments	DBIA/ICR reference
PRE	;
IMES	;
RMMENU	;-- remove options from APCLMENU
CLINICS	;
INSTALLD(APCLSTAL)	;EP - Determine if patch APCLSTAL was installed, where ; APCLSTAL is the name of the INSTALL. E.g "AG6.011".
SORRY(X)	;
MUSS	;
POST	;
OPTIONS	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"version 2.0 of BJPC is required" Line Location: APCL3030+8
Function Call: WRITE	Prompt: !,"version 14.1 or higher of BGP is required" Line Location: APCL3030+9
Function Call: WRITE	Prompt: !,"Attempt to add ILI ON DEMAND option failed.." Line Location: POST+5
Function Call: WRITE	Prompt: !,"Attempt to remove "_I_" from the APCL M MAN QUALITY ASSURANCE menu failed..." Line Location: RMMENU+4
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Routine Call	DIE Line Location: PRE+2 POST+3 POST+19
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12
Routine Call	DIC Line Location: INSTALLD+6

Name	Line Occurrences (* Changed, ! Killed)
^APCLCNTL("B"	POST+2
^APCLILIC(1	POST+7*
^APCLILIL - [#9001003.4]	POST+9
^DIC(19 - [#19]	PRE+1

Name	Field # of Occurrence
APCLSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> APCLX	POST+9*
APCLY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> D	INSTALLD+5*
DA	PRE+1, PRE+2!, POST+2, POST+3!, POST+9, POST+19
DIC	INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11*
DIC(0	INSTALLD+5*
DIE	PRE+2!, POST+3!, POST+19*
DIFQ	SORRY+1!
>> DIK	POST+9*
DR	PRE+2!, POST+3!, POST+19*
I	RMMENU+1~, RMMENU+2*, RMMENU+3, RMMENU+4
IOM	IMES+1, SORRY+4
U	POST+7
X	APCL3030+7, POST+18, POST+19, RMMENU+1~, RMMENU+3, RMMENU+4, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11 , SORRY~, SORRY+2, SORRY+3
>> XPDDIQ(	APCL3030+7*
>> XPDDIQ("XPZ1"	APCL3030+6*
>> XPDDIQ("XPZ2"	APCL3030+6*
>> XPDENV	APCL3030+6
>> XPDQUES("POS	Q1" , POST+18
>> XPDQUIT	SORRY+2, SORRY+3
Y	INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1

Information