Routine: XPDCPU

Package	Total	Call Graph
Kernel	4	$$STOP^%ZTLOAD $$NOW^XLFDT RTN^XPDIJ $$RTNUP^XPDUTL
VA Fileman	4	^DIC DT^DICRW FILE^DIE ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
UPDT	;update $H into VOLUME SET multiple, field 4
EN(XPDA,XPDVDA)	;XPDA=ien of INSTALL file, XPDVDA=VOLUME SET ien
MOVE	;move routines to other CPU
EN1	;ask for Install
EN2
CHCK()	;check if the component is installed, return 1 if installed, 0 to abort
INSTALL	;install routines
FILE(XPDF)	;set NOW into the VOLUME SET multiple, XPDF=field number

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Run INSTALL^XPDCPU on the other CPU to install the Routines.",! Line Location: MOVE+13
Function Call: WRITE	Prompt: !!,"Done",!! Line Location: INSTALL+11
Routine Call	DIC Line Location: EN1+4
Routine Call	DIE Line Location: FILE+3
Routine Call	DIR Line Location: MOVE+5 INSTALL+5

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("LOAD"	MOVE+12
^%ZOSF("SAVE"	INSTALL+10
^%ZOSF("VOL"	XPDCPU+6
^XPD(9.7 - [#9.7]	XPDCPU+6, MOVE+8, EN+1, EN+4, EN+6, EN2+2, EN2+4, EN2+5, EN2+11, UPDT+1*
^XTMP("XPDI"	EN2+2, EN2+6, EN2+9, EN2+16
^XTMP("XPDR"	MOVE+6!, MOVE+7*, MOVE+13, INSTALL+7

Name	Field # of Occurrence
^(	EN+4, EN2+16

Name	Field # of Occurrence
%	INSTALL+8~, EN+2~, EN+4*, EN+6
%N	MOVE+10~
DIC	XPDCPU+3~, MOVE+1~, INSTALL+1~, EN1+3*, EN1+4!
DIC("S"	XPDCPU+4, MOVE+2, INSTALL+2*
DIC(0	EN1+3*
DIE	INSTALL+8~, INSTALL+9*
DIF	MOVE+10~, MOVE+11*
DIR	MOVE+1~, INSTALL+1~
DIR("?"	MOVE+4, INSTALL+4
DIR("A"	MOVE+4, INSTALL+4
DIR("B"	MOVE+4, INSTALL+4
DIR(0	MOVE+4, INSTALL+4
DIRUT	MOVE+1~, MOVE+5, INSTALL+1~, INSTALL+5
DT	MOVE+7
DUZ	EN1+2
DUZ(0	EN1+2
IO	EN+1, EN2+4, EN2+5, EN2+8, EN2+11, EN2+13, CHCK+4
U	MOVE+7, EN+6, EN1+2, EN2+5, EN2+11, CHCK+4
X	XPDCPU+3~, XPDCPU+6, XPDCPU+7, MOVE+1~, MOVE+11, INSTALL+1~, INSTALL+9, EN2~, EN2+4, EN2+5 , EN2+9, EN2+11, EN2+16*
XCM	INSTALL+8~
XCN	INSTALL+8~, INSTALL+9*
XCNP	MOVE+10~, MOVE+11*
XCS	INSTALL+8~
XPD	EN2~, EN2+14*, EN2+16, CHCK+2, CHCK+3, FILE+1~
XPD(	FILE+2*
XPDA	XPDCPU+3~, XPDCPU+5, XPDCPU+6, XPDCPU+7, MOVE+1~, MOVE+3, MOVE+6, MOVE+8, MOVE+13, INSTALL+1~ , INSTALL+3, INSTALL+7, EN~, EN+1, EN+4, EN+5~, EN+6, EN1+1, EN1+5*, EN2+2 , EN2+4, EN2+5, EN2+6, EN2+9, EN2+11, EN2+12, EN2+16, FILE+2, UPDT+1
>> XPDABORT	EN+4
XPDBLD	EN2~, EN2+6*
XPDC	CHCK+1~, CHCK+2, CHCK+3, CHCK+4
XPDF	FILE~, FILE+2
XPDI	EN2~, EN2+15, EN2+16
XPDJ	MOVE+1~, MOVE+7, MOVE+8, MOVE+9, MOVE+11, INSTALL+1~, INSTALL+6, INSTALL+7, INSTALL+9
XPDNM	EN+2~, EN+6*
XPDVDA	EN~, EN+1, EN2+4, FILE+2, UPDT+1
Y	MOVE+1~, MOVE+5, INSTALL+1~, INSTALL+5, EN+2~, EN+3, EN+4, EN+5~, EN1+1~, EN1+4 , EN1+5, CHCK+1~, CHCK+3, CHCK+4, CHCK+5
ZTCPU	EN2~
ZTDESC	EN2~
ZTDTH	EN2~
ZTIO	EN2~
>> ZTMQUE	CHCK+4
>> ZTREQ	EN+3*
ZTRTN	EN2~
ZTUCI	EN2~