| FILE |
776.4 |
| NAME |
AJ |
| DESCRIPTION |
This index triggers the computation of the earliest purge date for this
event record and sets it into the AJ index. The format of the index is:
^HLEV(776.4,"AJ",<eariest date/time that the record may be purged>,<IEN>)=""
|
| SHORT DESCRIPTION |
Sets the purge date and time |
| TYPE |
MUMPS |
| EXECUTION |
RECORD |
| ACTIVITY |
IR |
| USE |
ACTION |
| ROOT TYPE |
INDEX FILE |
| ROOT FILE |
776.4 |
| SET LOGIC |
D SETPURGE^HLEMDD($G(DA),$G(X2(1)),$G(X2(2))) |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 776.4
- FIELD: .01
- COLLATION: forwards
-
- ORDER NUMBER: 2
- SUBSCRIPT NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 776.4
- FIELD: .02
- COLLATION: forwards
|
| KILL LOGIC |
D DELPURGE^HLEMDD($G(DA),$G(X1(1)),$G(X1(2))) |
| KILL ENTIRE INDEX CODE |
K ^HLEV(776.4,"AJ") |
