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