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: IBCEOB00

Package: Integrated Billing

Routine: IBCEOB00


Information

IBCEOB00 ;ALB/ESG/PJH - 835 EDI EOB MSG PROCESSING CONT ;30-JUN-2003

Source Information

Source file <IBCEOB00.m>

Entry Points

Name Comments DBIA/ICR reference
RCRU(IBZDATA,IB0,IBLN) ; Revenue Code Roll-up procedure check -
; Total up outbound line items by revenue code and compare with
; incoming EOB 40 record to see if it has been rolled up
RCRU2 ; check roll-up data by rev code and unit charge
RCRUX ;
ICN(IBEOB,ICN,COBN,IBOK) ; File the 835 ICN into the Bill
ICNX ;
15(IB0,IBEGBL,IBEOB) ; Record '15'
Q15
20(IB0,IBEGBL,IBEOB) ; Record '20'
Q20
35(IB0,IBEGBL,IBEOB) ; Record '35'
Q35
37(IB0,IBEGBL,IBEOB) ; Record '37'
Q37
DET40(IB0,ARRAY,ERRCOD) ; Format important details of record 40 for error
; IB0 = data on 40 record (some pieces pre-formatted)
; ARRAY(n)=formatted line is returned if passed by ref
DET4X(RECID,IB0,ARRAY) ; Format important details of record 41-46 for error
; RECID = 41,42,45,46
; IB0 = data on RECID record
; ARRAY(n)=formatted line is returned if passed by ref
FDT(X) ; Format date in X (YYYYMMDD) to MM/DD/YYYY
Info |  Source |  Entry Points