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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBCEOB0

Package: Integrated Billing

Routine: IBCEOB0


Information

IBCEOB0 ;ALB/TMP/PJH - 835 EDI EOB MSG PROCESSING ; 8/24/10 7:23pm

Source Information

Source file <IBCEOB0.m>

Entry Points

Name Comments DBIA/ICR reference
LINE() ;Extract Provider Line Reference from 42 record
30(IB0,IBEOB,IBOK) ; Process record type 30 for EOB
; IB0 = the record being processed
; IBEOB = the ien of the EOB entry in file 361.1
; IBOK = Returned as 1 if record filed OK, 0 if error occurred
Q30
40(IB0,IBEOB,IBOK) ; Process record type 40 for EOB
; IB0 = the record being processed
; IBEOB = the ien of the EOB entry in file 361.1
; IBOK = Returned as 1 if record filed OK, 0 if error occurred
Q40
41(IB0,IBEOB,IBOK) ; Process record type 41 for EOB
; IB0 = the record being processed
; IBEOB = the ien of the EOB entry in file 361.1
; IBOK = Returned as 1 if record filed OK, 0 if error occurred
Q41
42(IB0,IBEOB,IBOK) ; Process record type 42 for EOB
; IB0 = the record being processed
; IBEOB = the ien of the EOB entry in file 361.1
; IBOK = Returned as 1 if record filed OK, 0 if error occurred
Q42
45(IB0,IBEOB,IBOK) ; Process record type 45 for EOB
; IB0 = the record being processed
; IBEOB = the ien of the EOB entry in file 361.1
; IBOK = Returned as 1 if record filed OK, 0 if error occurred
Q45
46(IB0,IBEOB,IBOK) ; Process record type 46 for EOB
; IB0 = the record being processed
; IBEOB = the ien of the EOB entry in file 361.1
; IBOK = Returned as 1 if record filed OK, 0 if error occurred
Q46
ERRTXT(X,IBEOB) ; Set error text based on circumstances
; Input - X = Standard Error message passed in
; IB0
; Returns modified error message text
EBILL(IBEOB) ; Check If EOB was billed electronically
; Input : IBEOB = Internal entry number from file 361.1
; Returns : 1 - Billed electronically
; 0 - Not billed electronically

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBM(361.1 - [#361.1] GET1^DIQ
^IBA(364 - [#364] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call