FILE |
2.3215 |
NAME |
ALSTUP |
SHORT DESCRIPTION |
TRIGGER THE DATE/TIME OF LAST CHANGE WHEN ANY PERTINENT FIELDS CHANGE |
TYPE |
MUMPS |
EXECUTION |
RECORD |
ACTIVITY |
IR |
USE |
ACTION |
ROOT TYPE |
INDEX FILE |
ROOT FILE |
2.3215 |
SET LOGIC |
N DATA,DGENDA S DATA(.05)=$$NOW^XLFDT,DGENDA=DA,DGENDA(1)=DA(1) I $$UPD^DGENDBS(2.3215,.DGENDA,.DATA) |
SET CONDITION CODE |
S X=$S($G(X2(1))'=""&($G(X1(1))'=$G(X2(1))):1,$G(X1(2))'=$G(X2(2)):1,$G(X1(3))'=$G(X2(3)):1,1:0) |
CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 2.3215
- FIELD: .01
- COLLATION: forwards
-
- ORDER NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 2.3215
- FIELD: .02
- COLLATION: forwards
-
- ORDER NUMBER: 3
- TYPE OF VALUE: FIELD
- FILE: 2.3215
- FIELD: .03
- COLLATION: forwards
|
KILL LOGIC |
N DATA,DGENDA S DATA(.05)=$$NOW^XLFDT,DGENDA=DA,DGENDA(1)=DA(1) I $$UPD^DGENDBS(2.3215,.DGENDA,.DATA) |