IBCE837ACC ;EDE/JWS - ACC consume X12 claim data ;
Source file <IBCE837ACC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST(RESULT,ARG) | ;Entry point to consume Community Care X12 Claim data
; Input: ARG |
|
| ALL | ;entry point for auth/create function
|
|
| DT(FIELD) | ;
|
|
| USERUP(IBX12) | ;
|
|
| FINISH | ;
|
|
| UP(IBIEN,IBVAL,IBFLD,NOTE) | ;
|
|
| IBREG() | ; Returns IEN (Internal Entry Number) from file #200 for
; the ACC Bill Authorizer ; AUTHORIZER,IB ACC ; Output: -1 if record not on file ; IEN if record is on file |
|
| DIV(IBDIV,IBINT) | ; obtain division
; use new Facility cross/walk table to obtain division to use |
|
| STAT(IBIEN,DATA) | ; update status
|
| RPC Name | Call Tags |
|---|---|
| IBTAS ACC CLAIM DATA | POST |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | Classic Fileman Calls |
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| ^IBA(364.9 - [#364.9] | Classic Fileman Calls, GET1^DIQ |
| ^IBA(364.91 - [#364.91] | GET1^DIQ |
| 364.94 | WP^DIE |
| ^IBA(364.991 - [#364.991] | FIND1^DIC, GET1^DIQ |
| ^DGCR(399 - [#399] | Classic Fileman Calls |
