| 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) |