FILE |
361.1 |
NAME |
ABS |
SHORT DESCRIPTION |
Cross reference bill # and insurance company sequence. |
TYPE |
REGULAR |
EXECUTION |
RECORD |
ACTIVITY |
IR |
USE |
SORTING ONLY |
ROOT TYPE |
INDEX FILE |
ROOT FILE |
361.1 |
SET LOGIC |
S ^IBM(361.1,"ABS",X2(1),X2(2),DA)="" |
SET CONDITION CODE |
I X2(1)=""!(X2(2)="") S X=0 |
CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- SUBSCRIPT NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 361.1
- FIELD: .01
- COLLATION: forwards
-
- ORDER NUMBER: 2
- SUBSCRIPT NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 361.1
- FIELD: .15
- COLLATION: forwards
|
KILL LOGIC |
K ^IBM(361.1,"ABS",X1(1),X1(2),DA) |
KILL CONDITION CODE |
I X1(1)=""!(X1(2)="") S X=0 |
KILL ENTIRE INDEX CODE |
K ^IBM(361.1,"ABS") |