IBCEOB1 ;ALB/TMP/PJH - 835 EDI EOB MSG PROCESSING ;Feb 09, 2018@10:11:43
Source file <IBCEOB1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| STORE(A,IB0,IBEOB,LEVEL) | ;
; A = the string of data to extract and try to store ; each ^ piece is a field to store ; within each ^ piece, there are 5 ';' pieces: ; 1 = piece to extract from the data string; ; 2 = field to update; ; 3 = flag for dollar amt (1=YES); ; 4 = flag for 4-slash stuff without transform (1=YES); ; 5 = flag for numeric/non-dollar amt (1=Yes, 0=No, ; Dn = the field is numeric with 'n' decimal places ; IB0 = the record being processed ; IBEOB = the ien of the EOB entry in file 361.1 ; LEVEL = the array that contains the DIE and DA values if stuffing at a ; level other than the top level |
|
| HDR(IB0,IBEGBL,IBEOB,HIPAA) | ; Store header data for EOB
; IB0 = the record being processed from the msg ; IBEOB = the ien of the EOB entry in file 361.1 |
|
| FINDLN(IB0,IBEOB,IBZDATA,PLREF,ERRCOD) | ; Find corresponding billed line for the adj
; IB0 = the record being processed ; NOTE: pieces 3,4,16 are already reformatted ; IBEOB = the ien of the EOB entry in file 361.1 ; IBZDATA = the array from the output formatter containing line ; items for the bill. This is passed in so this data only has ; to be extracted once for each bill (the first time in, it ; will be undefined) ; PLREF = Provider Line Reference ; OUTPUT = Line # in the original bill that this adjustment relates to ; ^ paid procedure code if different from original procedure OR ; paid rev code if different from original and no proc code ; ERRCOD = Contains any error condition that may have been encountered ; while conducting the field matching tests. |
|
| FINDLNX | ;
|
|
| GTPRCD(IBBNDL,OPROC,OREVCD,IBZREC) | ; Set up the Procedure Code/Revenue Code fields.
|
|
| MODMATCH(IB,MODLST,MOD837S) | ; Match modifiers
; IB = the list of modifiers iens from the bill, comma delimited ; MODLST = the 4 '^' pieces of the reported modifiers |
|
| MODQ |
| FileNo | Call Tags |
|---|---|
| ^IBM(361.1 - [#361.1] | Classic Fileman Calls |
