Routine: XMRPCTS0

Information

XMRPCTS0 ;(KC-VAMC)/XXX-Send TWIX's to PCTS Host [XMTR] ;03/21/2002 07:49

Name	Comments	DBIA/ICR reference
WALK
MREQ
REM
MDTA	;
MAK2
JD()	; Returns today's Julian date
DSP(XMTRAN)	;
STAT	;Update the Mailman Status
ERR
DT()
EXIT
RQ	;Force this domain to play its script, it plays regardless...
QQ	;

Name	Line Occurrences
Function Call: WRITE	Prompt: "MREQ",!,XMZ,!,"PCTS",!,"AMS",!,"TAB",!,XMET,XMCR Line Location: WALK+3
Function Call: READ	Variable: X Timeout: 5 Line Location: MREQ+0
Function Call: READ	Variable: X Timeout: 3 Line Location: MREQ+1
Function Call: READ	Variable: X Timeout: 3 Line Location: REM+0
Function Call: WRITE	Prompt: "MDTA",!,XMZ,!,XMMN,!,XMSH Line Location: MDTA+3
Function Call: WRITE	Prompt: Z,! Line Location: MDTA+5
Function Call: WRITE	Prompt: $C(25),XMLPC,XMET,XMCR Line Location: MDTA+8
Function Call: READ	Variable: X Timeout: 5 Line Location: MAK2+0
Function Call: READ	Variable: X Timeout: 3 Line Location: MAK2+1
Function Call: READ	Variable: X Timeout: 3 Line Location: MAK2+2
Function Call: WRITE	Prompt: "MEND",! Line Location: EXIT+1