Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: IBCBB3

Package: Integrated Billing

Routine: IBCBB3


Information

IBCBB3 ;ALB/TMP - CONTINUATION OF EDIT CHECKS ROUTINE (MEDICARE) ;06/23/98

Source Information

Source file <IBCBB3.m>

Entry Points

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 ;
Info |  Source |  Entry Points