FILE |
704.005 |
NAME |
LSTMSG |
SHORT DESCRIPTION |
Keeps track of absolute last message sent. |
TYPE |
REGULAR |
EXECUTION |
RECORD |
ACTIVITY |
IR |
USE |
LOOKUP & SORTING |
ROOT TYPE |
INDEX FILE |
ROOT FILE |
704.005 |
SET LOGIC |
S ^MDC(704.005,"LSTMSG",$E(X(1),1,99),$E(X(2),1,14),$E(X(3),1,30),DA)="" |
SET CONDITION CODE |
S X=(X2(3)'="A08") |
CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 704.005
- FIELD: .01
- MAXIMUM LENGTH: 99
- COLLATION: forwards
-
- ORDER NUMBER: 2
- SUBSCRIPT NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 704.005
- FIELD: .02
- MAXIMUM LENGTH: 14
- COLLATION: backwards
-
- ORDER NUMBER: 3
- SUBSCRIPT NUMBER: 3
- TYPE OF VALUE: FIELD
- FILE: 704.005
- FIELD: .07
- MAXIMUM LENGTH: 30
- COLLATION: forwards
|
KILL LOGIC |
K ^MDC(704.005,"LSTMSG",$E(X(1),1,99),$E(X(2),1,14),$E(X(3),1,30),DA) |
KILL ENTIRE INDEX CODE |
K ^MDC(704.005,"LSTMSG") |