| FILE |
399 |
| NAME |
AUPDID |
| DESCRIPTION |
This cross reference maintains the integrity of the rendering or attending
provider id whenever an insurance company is added, deleted or changed
on the claim. If either of these provider functions exist on the bill,
this cross reference sets the default id data based on the insurance co's
parameters.
|
| SHORT DESCRIPTION |
UPDATE PROVIDER ID WHEN DATA FIELDS CHANGE AT TOP LEVEL OF FILE |
| TYPE |
MUMPS |
| EXECUTION |
RECORD |
| ACTIVITY |
IR |
| USE |
ACTION |
| ROOT TYPE |
INDEX FILE |
| ROOT FILE |
399 |
| SET LOGIC |
D:X1(1)'=X2(1)!(X1(5)'=X2(5)) SETID^IBCEP3(DA,1) D:X1(2)'=X2(2)!(X1(4)'=X2(4)) SETID^IBCEP3(DA,2) D:X1(3)'=X2(3)!(X1(6)'=X2(6)) SETID^IBCEP3(DA,3) |
| SET CONDITION CODE |
S X=$S($O(^DGCR(399,DA,"PRV",0)):1,1:0) |
| CROSS-REFERENCE VALUES |
-
- ORDER NUMBER: 1
- TYPE OF VALUE: FIELD
- FILE: 399
- FIELD: 101
- COLLATION: forwards
-
- ORDER NUMBER: 2
- TYPE OF VALUE: FIELD
- FILE: 399
- FIELD: 102
- COLLATION: forwards
-
- ORDER NUMBER: 3
- TYPE OF VALUE: FIELD
- FILE: 399
- FIELD: 103
- COLLATION: forwards
-
- ORDER NUMBER: 4
- TYPE OF VALUE: FIELD
- FILE: 399
- FIELD: 113
- COLLATION: forwards
-
- ORDER NUMBER: 5
- TYPE OF VALUE: FIELD
- FILE: 399
- FIELD: 112
- COLLATION: forwards
-
- ORDER NUMBER: 6
- TYPE OF VALUE: FIELD
- FILE: 399
- FIELD: 114
- COLLATION: forwards
|
| KILL LOGIC |
D:X1(1)'=X2(1)!(X1(5)'=X2(5)) DELID^IBCEP3(DA,1) D:X1(2)'=X2(2)!(X1(4)'=X2(4)) DELID^IBCEP3(DA,2) D:X1(3)'=X2(3)!(X1(6)'=X2(6)) DELID^IBCEP3(DA,3) |
| KILL CONDITION CODE |
S X=$S($O(^DGCR(399,DA,"PRV",0)):1,1:0) |
