FILE |
375 |
NAME |
AF |
DESCRIPTION |
S ^IBBAA(375,"AF",X1,X3,X2,DA)=""
where: X1=field #.03
X2=field #16.01
X3=field #1.44
|
SHORT DESCRIPTION |
Set critical "AF" cross-reference. |
TYPE |
REGULAR |
EXECUTION |
RECORD |
ACTIVITY |
IR |
USE |
SORTING ONLY |
ROOT TYPE |
INDEX FILE |
ROOT FILE |
375 |
SET LOGIC |
S ^IBBAA(375,"AF",X(1),X(2),$E(X(3),1,30),DA)="" |
CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 375
- FIELD: .03
- COLLATION: forwards
-
- ORDER NUMBER: 2
- SUBSCRIPT NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 375
- FIELD: 1.44
- COLLATION: forwards
-
- ORDER NUMBER: 3
- SUBSCRIPT NUMBER: 3
- TYPE OF VALUE: FIELD
- FILE: 375
- FIELD: 16.01
- MAXIMUM LENGTH: 30
- COLLATION: forwards
|
KILL LOGIC |
K ^IBBAA(375,"AF",X(1),X(2),$E(X(3),1,30),DA) |
KILL ENTIRE INDEX CODE |
K ^IBBAA(375,"AF") |