Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Entry Points | Interaction Calls

Print Page as PDF

Routine: XMUT1A

Package: MailMan

Routine: XMUT1A

Information

XMUT1A ;(WASH ISC)/CAP-Recover msgs for a user (cont.) ;04/17/2002 11:50

Source Information

Source file <XMUT1A.m>

Entry Points

Name	Comments	DBIA/ICR reference
NOKL
GO
FX
TABLE	;;;DESCRIPTION^PROGRAM OR TAG^PROGRAM
LIST	;LIST MESSAGES FOUND
L
ZTSK	;
N
H
NQ
DEL	;DELETE LIST FROM ^TMP("XMUT1"...
D
DQ
H1
NO

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: FX+3
Function Call: WRITE	Prompt: !!,"CHOOSE FROM:",! Line Location: LIST+2
Function Call: READ	Variable: X Timeout: DTIME Line Location: L+0
Function Call: WRITE	Prompt: !!,"WHICH ONE: ",J,"//" Line Location: L+0
Function Call: WRITE	Prompt: !!,"Message removed from list - no longer in 3.9 file.",! Line Location: N+2
Function Call: WRITE	Prompt: !?2,Y,?22,$P(I,"^") Line Location: N+4
Function Call: WRITE	Prompt: @IOF,!,"CONTENTS OF MAILBOXES FOR ",XMA0,?60,"PAGE: ",XMB0,!! Line Location: H+1
Function Call: WRITE	Prompt: " DATE@TIME",?22,"SUBJECT",!! Line Location: H+2
Function Call: WRITE	Prompt: @IOF Line Location: NQ+1
Function Call: WRITE	Prompt: !!,"CHOOSE FROM:",! Line Location: DEL+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: D+0
Function Call: WRITE	Prompt: !!,"WHICH ONE ",J,"//" Line Location: D+0
Function Call: WRITE	Prompt: !," NO SUCH USER !!!",$C(7) Line Location: D+5
Function Call: WRITE	Prompt: " << DELETED !!!" Line Location: DQ+0
Function Call: WRITE	Prompt: !!,"Choose NUMBER from list. Or enter '??' for a list.",!,$C(7) Line Location: H1+0
Function Call: WRITE	Prompt: !!!,"NO MESSAGES RECOVERED FOR ANYBODY !!!" Line Location: NO+0

Info | Source | Entry Points | Interaction Calls