IBRFN4 ;ALB/TMK - Supported functions for AR/IB DATA EXTRACT ;15-FEB-2005
Source file <IBRFN4.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| IBAREXT(IBIFN,IBD) | ; Returns data for claim IBIFN for IB/AR Extract
 ; Data returned (pieces): ; 1-MEDICARE Status (0=not MRA secondary, 1=MRA secondary) ; 2-Last MRA requested date "S";7 (7 - INTERNAL) ; 3-Last Electronic extract date "TX";2 (21 - INTERNAL) ; 4-Printed via EDI "TX";7 (26 - EXTERNAL) ; 5-Force Claim to Print "TX";8 (27 - EXTERNAL) ; 6-Claim MRA Status "TX";5 (24 - EXTERNAL) ; 7-MRA recorded date "TX";3 (22 - INTERNAL) ; 8-Bill cancelled date "S";17 (17 - INTERNAL) ; 9-form type 0;19 (.19 - EXTERNAL) ; 10-Current Payer $$CURR^IBCEF2(IBIFN) returns IEN;NAME (file 36) ; 11-DRG 0;8==> file 45 (9 - EXTERNAL) ; 12-ECME # "M1";8 (460 - EXTERNAL) ; 13-NON-VA Facility ; 14-#Days Site Not Responsible for MRA ($$DAYS(IBIFN)) ; 15-National VA id number for Ins Verification (365.12;.02 - INTERNAL) ; 16-Payer name (file 365.12;.01) ; 17-Offset Amount (202-INTERNAL)  | 
 
  | 
| IBACT(IBIFN,IBARRY) | ; Returns IB actions for bill ien IBIFN
 | 
 
  | 
| PREREG(IBBDT,IBEDT) | ;Returns Pre-registration data
 | 
 
  | 
| BUFFER(IBBDT,IBEDT) | ;Returns Buffer data
 | 
 
  | 
| DAYS(IBIFN) | ; Returns # days site not responsible for MRA
 | 
|
| DAYSQ | ||
| REJ(IBIFN) | ; Returns 1 if any rejects found for MRA secondary claim or for
 ; any preceding claims it was cancelled/cloned from  | 
|
| REJQ | 
| FileNo | Call Tags | 
|---|---|
| ^IB - [#350] | GET1^DIQ | 
| ^IBA(355.3 - [#355.3] | GET1^DIQ | 
| ^DIC(36 - [#36] | GET1^DIQ | 
| ^DGCR(399 - [#399] | GET1^DIQ | 
| ^DGPT - [#45] | GET1^DIQ |