| FILE |
704.121 |
| NAME |
PK |
| DESCRIPTION |
This will provide a quick index of unique file entries.
|
| SHORT DESCRIPTION |
Uniqueness Index for Key 'A' of File #704.121 |
| TYPE |
REGULAR |
| EXECUTION |
FIELD |
| ACTIVITY |
IR |
| USE |
LOOKUP & SORTING |
| ROOT TYPE |
INDEX FILE |
| ROOT FILE |
704.121 |
| SET LOGIC |
S ^MDC(704.121,"PK",$E(X,1,38),DA)="" |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 704.121
- FIELD: .01
- MAXIMUM LENGTH: 38
|
| KILL LOGIC |
K ^MDC(704.121,"PK",$E(X,1,38),DA) |
| KILL ENTIRE INDEX CODE |
K ^MDC(704.121,"PK") |
