IBCE837ACC4 ;EDE/JWS - ACC consume X12 claim data ;
Source file <IBCE837ACC4.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| D | ; file dental service lines
|
|
| PS | ; perform procedure swap when Medicare Primary
|
|
| FINAL(IBIFN,IBX12) | ; final exception checking
|
|
| GETMOD(MOD) | ;
|
|
| PAT | ;set patient name values
|
|
| USER(IBX12) | ; determine which user group gets the claim initially
|
|
| CHKDUP(IBX12,IBPATIEN,IBDOS,IBFT) | ;JWS;EBILL-4022;check for VistA claim / CC Encounter duplicates
|
|
| CHKDUP2 | ; build array of procedures to check
|
|
| SCRUB(IBIFN) | ; execute DSS scrubber
|
|
| WL(IBX12,IBWL) | ;EBILL-4921;IB*2.0*770v19;update failure reason code multiple with worklist to display on / for conditional RUR vs FRT
; IBWL = worklist designation |
|
| EXTRACT | ;loop thru all encounters and setup for extract to SQL for powerBI reporting
|
|
| REPROCESS | ;reprocess all open encounters that do not have a k# already
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | FIND1^DIC, GET1^DIQ |
| ^IBE(353.1 - [#353.1] | FIND1^DIC |
| ^IBA(364.9 - [#364.9] | Classic Fileman Calls, GET1^DIQ |
| ^IBA(364.91 - [#364.91] | GET1^DIQ |
| 399.042 | GET1^DIQ |
| ^DGCR(399.1 - [#399.1] | FIND1^DIC |
| ^ICPT - [#81] | FIND1^DIC |
