IBCBB3 ;ALB/TMP - CONTINUATION OF EDIT CHECKS ROUTINE (MEDICARE) ;06/23/98
Source file <IBCBB3.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EDITMRA(IBQUIT,IBER,IBIFN,IBFT) | ;
 ; Requires execution of GVAR^IBCBB, IBIFN defined ; File IB ERROR (350.8) contains error codes/text  | 
|
| PARTA | ; MEDICARE specific edit checks for PART A claims (UB-04 formats)
 | 
|
| IBER(IBER,ERRNO) | ; Sets error list
 ; NOTE: add code to check error list > 20 ... If so, display message and ; quit so we don't get too many errors at once to handle ; Print all if printing list  | 
|
| NONMCR(IBPR,IBLABS) | ;  Delete all oxygen and lab, flu shot CPT entries from IBPR
 ; IBPR = array subscripted by CPT codes from bill ; IBLABS = flag returned =1 if labs found on bill  | 
|
| MCRANUM(IBIFN) | ; Determine MEDICARE A provider ID # from bedsection for
 ; bill ien IBIFN  | 
|
| MCRACK(IBIFN,X,IBFLD) | ; Check for MEDICARE A for bill IBIFN
 ; Called from CLAIM STATUS MRA field (#24) xrefs in file 399 ; X = current value of field 399;24 ; IBFLD = 1 for primary ins co, 2 for secondary, 3 for tertiary  | 
|
| GYMODCHK(Z) | ; GY modifier check procedure.  IB*2*377 - 2/4/08
 ; Z is the IBXDATA(IBI) service line EDI  | 
|
| GYMODX | ;
 |