XMR3A ;ISC-SF/GMB-XMR3 (cont.) ;04/17/2002 11:16
Source file <XMR3A.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHEKDUP | ;
|
|
| KILLIT | ;
|
|
| LOCALXMZ(XMREMID) | ; Given a remote id, function returns XMZ if the message
; can be or was ever found locally. ; If no record of it, returns null. ; Otherwise, returns: ; Piece 1: local XMZ ; Piece 2: originated here? (0=no; 1=yes) ; Piece 3: still exists? (P=no, purged; ; R=no, purged, & replaced with something else; ; E=yes, it still exists here) |
|
| FINDXMZ(XMP1,XMP2) | ;
|
|
| TRY | ||
| LOCXMZ(XMZ) | ; Message originated here.
|
|
| REMXMZ(XMZ,XMP2,XMP1) | ; Message originated somewhere else.
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4.2 - [#4.2] | FIND1^DIC |
