FILE |
661.7 |
NAME |
XSHIDS |
SHORT DESCRIPTION |
xref for STATION, HCPCS, Item, DATE&TIME STAMP and SEQUENCE |
TYPE |
REGULAR |
EXECUTION |
RECORD |
ACTIVITY |
IR |
USE |
LOOKUP & SORTING |
ROOT TYPE |
INDEX FILE |
ROOT FILE |
661.7 |
SET LOGIC |
S ^RMPR(661.7,"XSHIDS",X(1),X(2),$E(X(3),1,30),X(4),X(5),DA)="" |
CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 661.7
- FIELD: 4
- COLLATION: forwards
-
- ORDER NUMBER: 2
- SUBSCRIPT NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 661.7
- FIELD: .01
- COLLATION: forwards
-
- ORDER NUMBER: 3
- SUBSCRIPT NUMBER: 3
- TYPE OF VALUE: FIELD
- FILE: 661.7
- FIELD: 3
- MAXIMUM LENGTH: 30
- COLLATION: forwards
-
- ORDER NUMBER: 4
- SUBSCRIPT NUMBER: 4
- TYPE OF VALUE: FIELD
- FILE: 661.7
- FIELD: 1
- COLLATION: forwards
-
- ORDER NUMBER: 5
- SUBSCRIPT NUMBER: 5
- TYPE OF VALUE: FIELD
- FILE: 661.7
- FIELD: 2
- COLLATION: forwards
|
KILL LOGIC |
K ^RMPR(661.7,"XSHIDS",X(1),X(2),$E(X(3),1,30),X(4),X(5),DA) |
KILL ENTIRE INDEX CODE |
K ^RMPR(661.7,"XSHIDS") |