Routine: XMP2

Information

XMP2 ;(WASH ISC)/GM/CAP-PackMan Print/Install/Summarize/Compare ;04/17/2002 11:07

Source file <XMP2.m>

Package	Total	Call Graph
MailMan	4	(ENH,ENTR,ENTT)^XMP2A ^XMP3 DEV^XMPH CHECK^XMPSEC
Kernel	1	XMP2^XPDDP
VA Fileman	1	^DIR

Package	Total	Caller Graph
MailMan	7	XMJMOI XMP2A XMPCOM XMPH XMPINS XMPPRT XMPSUM

Name	Comments	DBIA/ICR reference
HEL	;;Help Frames
GLO	;;Global
DIE	;;Input Templates
S1
BEG
DIB	;;Sort Templates
K2	;print summary of KIDS Distribution
K1	;print KIDS Distribution routines
XI
FUN	;;Functions
DIP	;;Print Templates
PP	;PRETTY PRINT
G2
G1
RTN	;;Routine Documentation
DTA	;;FileMan Data
1
0
PKG	;;Package File
BUL	;;Bulletins
XC
TXT	;;Text
NT
ROU	;;Routine
P2
P1
ENI
Q
S
XR
XS
XP
XT
DDD	;;Data Dictionary
OPT	;;Options
MM
SP
LIST	;LIST MESSAGE
KEY	;;Security keys
SC
GLB	;;Global
SAVE
COMP
KID	;;KIDS Distribution

Name	Line Occurrences
Function Call: WRITE	Prompt: !,X Line Location: LIST+1
Function Call: WRITE	Prompt: !,$P(X," ",1)_" " Line Location: P1+1
Function Call: WRITE	Prompt: !,$P(X," ",1)," ",?8 Line Location: P1+2
Function Call: WRITE	Prompt: @IOF Line Location: P2+0
Function Call: WRITE	Prompt: "=" Line Location: P2+1
Function Call: WRITE	Prompt: X Line Location: P2+2
Function Call: WRITE	Prompt: $E(X,1,J),!,?10 Line Location: P2+4
Function Call: WRITE	Prompt: $C(7),!,"YOU CAN NOT PRINT a message while you are creating it." Line Location: 1+0
Function Call: WRITE	Prompt: $C(7),"Unknown identifier '",A,"'" Line Location: S1+2
Function Call: WRITE	Prompt: @IOF Condition for execution: XCF=1 Line Location: S1+3
Function Call: WRITE	Prompt: !,"Line ",XCN,?10,"Message #"_XMZ,?29 Line Location: S1+3
Function Call: WRITE	Prompt: $P(",Unloading,Comparing,Verifying",",",XCF) Condition for execution: XCF Line Location: S1+3
Function Call: WRITE	Prompt: " ",$P(A,";;",2)," ",$E(X,5,999) Line Location: S1+3
Function Call: WRITE	Prompt: !,"Not implemented yet" Line Location: S1+5
Function Call: WRITE	Prompt: !,"Routine ",$TR($P(X1,",",2),"""") Line Location: K1+2
Function Call: WRITE	Prompt: !,"Node '",X1,"' not on disk." Line Location: COMP+5
Function Call: WRITE	Prompt: !,"Node: ",X1,!,"Disk: ",Y Line Location: COMP+8
Function Call: WRITE	Prompt: !,"Message: ",$E(X,2-$G(XMP2(0)),99) Line Location: COMP+9
Function Call: WRITE	Prompt: !,?12+J,"^" Line Location: COMP+11
Routine Call	DIR Line Location: P2

Name	Line Occurrences (* Changed, ! Killed)
^TMP("XMS"	BEG, BEG+1
^TMP($J	K2+1!
^XMB(3.9 - [#3.9]	S, NT, K1+1, K1+3, K2+2, K2+4

Name	Field # of Occurrence
>> %	S1+6, BEG, BEG+1
>> %0	BEG, BEG+1
>> %1	PP+2
A	S1+2!, S1+3, S1+4, S1+5, S1+7!
>> B	COMP+6*, COMP+7
>> DIE	MM*
>> DIF	MM*
DIR	P2!
DIR(0	P2*
DIRUT	P2!
>> DTOUT	P2
>> DUOUT	P2
>> I	PP+2, S+1
IOF	P2, S1+3
IOM	P2+2, P2+3
IOSL	P2
IOST	P2
>> J	P2+3, P2+4, COMP+10, COMP+11
M	LIST+1, K2+1!, K2+2, K2+3, K2+4*
>> ROU	BEG*, BEG+1
>> T	S1+2*, SAVE
U	ENI, ENI+1, S1+1
>> X	LIST+1, PP+2, P1, P1+1, P1+2, P2+2, P2+3, P2+4, ENI, S+1 , S1, S1+1, S1+2, S1+3, S1+6, NT, G1, G2, K1+1, K1+2 , K1+3, K2+2, K2+3, K2+4, SAVE, SAVE+2, BEG, COMP, COMP+1, COMP+6 , COMP+9, COMP+10*
>> X1	K1+2, K1+3, K2+3, K2+4, K2+5, SAVE, SAVE+2, COMP+1, COMP+5, COMP+6 , COMP+8
>> XCF	1+1, 0, XC, XS, S1+3, S1+4
>> XCN	LIST+1, PP+1, PP+2, S, S+1, S1+3, NT, G1, G2, K1+1* , K1+2, K1+3, K1+4, K2+2, K2+4*
XMA0	Q!
XMB0	Q!
XMINIT	ENI+1, Q!, S1+6*
XMINTEG	ENI+2, Q!, S1+6*
>> XMLOAD	1
XMOUT	PP+1!, PP+2, P2, S+1!, S1+1, K1+3, K1+5, K2+6
>> XMP	P2
XMP2	P1+1, XT, XP, XR, XI, ENI, Q!, XC, XS, SC! , S, S1+1, S1+6
XMP2(0	P2+1!, G2*, SAVE+2, COMP+6, COMP+9
XMPASS	Q!
XMPKIDS	Q!
>> XMR	ENI+1, S*, S1+1
>> XMZ	S, S1+3, NT, K1+1, K1+3, K2+2, K2+4
>> Y	COMP+6*, COMP+7, COMP+8, COMP+10
>> ZTQUEUED	P2