Routine: XML4CRC1

Information

XML4CRC1 ;(WASH ISC)/RFJ-Block Mode Protocol ;04/17/2002 10:57

Source file <XML4CRC1.m>

Package	Total	Call Graph
MailMan	2	(KILL,PROG,REC)^XML4CRC LPC^XMLSWP0
VA Fileman	1	^DIC

Package	Total	Caller Graph
MailMan	1	XML4CRC

Name	Comments	DBIA/ICR reference
C
G2
GET
BUFLUSH	;Flush any characters out of the buffer
SRQ	;Exit from Send/Receive
NEWSTRAT	;Select new strategy, one or both machines may be slow
SEND	;Sends XMSG, returns ER=0 or 1, and XMLER=number of "soft" errors
ENQ	;Assume the ACK/NAK was garbled by noise and try to re-establish contact
SRINIT	;Initialize variables for Send/Receive
SL
RL
REC	;Receives XMRG, returns ER=0 or 1, and XMLER=number of "soft" errors
RL2
OPEN
SUM	;Calculate checksum, accounting also for the character's position
OP

Name	Line Occurrences
Function Call: WRITE	Prompt: XMLERR,$C(13) Line Location: SL+1
Function Call: READ	Timeout: XMLTIME Variable: XMLX Line Location: SL+2
Function Call: WRITE	Prompt: XMSG,$C(13) Line Location: SL+2
Function Call: WRITE	Prompt: XMLINE,U,XMSUM,$C(13) Line Location: SL+2
Function Call: READ	Timeout: XMLTIME Variable: XMLX Line Location: ENQ+2
Function Call: WRITE	Prompt: XMLENQ,$C(13) Line Location: ENQ+2
Function Call: READ	Timeout: $S($D(XMSTIME):XMSTIME,1:XMLTIME) Variable: XMRG#255 Line Location: RL+1
Function Call: WRITE	Prompt: XMLAN,$C(13) Line Location: RL+3
Function Call: READ	Timeout: XMLTIME Variable: XMLY Line Location: RL+4
Function Call: WRITE	Prompt: +XMLY,U,XMLACK,$C(13) Line Location: RL+5
Function Call: WRITE	Prompt: XMLAN,$C(13) Line Location: RL2+0
Function Call: READ	Timeout: 0 Variable: % Line Location: BUFLUSH+2
Routine Call	DIC Line Location: GET

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("EON"	C
^%ZOSF("RM"	OP+1
^%ZOSF("TRMOFF"	BUFLUSH+3
^%ZOSF("TRMON"	BUFLUSH+2
^DIC(3.4 - [#3.4]	GET+1, G2

Name	Field # of Occurrence
>> %	SEND+2, RL+1, RL+2, BUFLUSH+2, SUM+6*
>> DIC	GET*
>> DIC(0	GET*
>> ER	GET+1, SEND+1, SL+1, ENQ+1, RL, RL+3, SRINIT+7, NEWSTRAT+1
U	G2, G2+1, SL+2, SL+3, ENQ+2, REC+1, RL+4, RL+5, RL2
>> X	GET, G2+1, OP+1, SEND+2, SEND+3, RL+4, BUFLUSH+2*, SUM+6
>> XM	OPEN+1*
>> XMBFLUSH	BUFLUSH+1
>> XMCHAN	GET*, GET+1, G2
>> XMCLOSE	C+1
>> XMESC	OPEN+1*
>> XMFS	OPEN+1*
XMLACK	SL+2, ENQ+2, ENQ+3, RL+5, RL2, SRINIT+2*, SRQ+2!
>> XMLAN	REC+1, RL+3, RL2
>> XMLBMER	RL2
>> XMLBTST	SRINIT+1*
>> XMLCC	SEND+3, RL+1, SRINIT+1*
XMLENQ	ENQ+2, RL+1, SRINIT+3*, SRQ+2!
>> XMLER	SEND+1, SL, RL, SRINIT+4, NEWSTRAT+2*, SRQ+1
XMLERR	SL+1, RL+1, SRINIT+3*, SRQ+2!
>> XMLIN	RL+2
>> XMLINE	SL+2, SL+3, ENQ+2, ENQ+3, REC+1, RL+4, RL+5, RL2, SRINIT+2*
XMLMAXER	SL, ENQ+1, RL, SRINIT+5, NEWSTRAT+1, NEWSTRAT+3, SRQ+2!
XMLNAK	SL+3, ENQ+3, REC+1, RL2, SRINIT+2*, SRQ+2!
XMLTIME	SL+2, ENQ+2, RL+1, RL+4, SRINIT+6, NEWSTRAT+4, SRQ+2!
XMLX	SL+2, SL+3, ENQ+2, ENQ+3, SRQ+2!
XMLY	SL+3, ENQ+1, ENQ+3, RL+4, RL+5, SRQ+2!
XMLZ	SL+3, ENQ+1, RL+1, RL+3, RL+4, RL+5*, RL2, RL2+1, SRQ+2!
>> XMOPEN	OP
>> XMOS	SUM+1, SUM+3, SUM+4, SUM+5
>> XMOS(0	SUM+2
>> XMPROT	G2*
>> XMQUIET	OP+1
>> XMRG	RL+1*, RL+2, RL+4
>> XMRSQ	OPEN+1*
>> XMSG	SEND+1, SEND+2*, SEND+3, SL+2
>> XMSSQ	OPEN+1*
>> XMSTIME	RL+1
>> XMSUM	SL+2, RL+4, SUM+6*
>> XMTLER	NEWSTRAT+2, SRQ+1
>> Y	GET, GET+1*