Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBCEOB1

Package: Integrated Billing

Routine: IBCEOB1


Information

IBCEOB1 ;ALB/TMP/PJH - 835 EDI EOB MSG PROCESSING ;Feb 09, 2018@10:11:43

Source Information

Source file <IBCEOB1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 7 ($$COBN,$$FT,$$INPAT,F)^IBCEF  $$PRCD^IBCEF1  $$DOLLAR^IBCEFG1  $$SPLIT^IBCEMU1  $$DOLLAR^IBCEOB  RCRU^IBCEOB00  $$MODLST^IBEFUNC2  
VA FileMan 1 ^DIE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Integrated Billing 3 IBCEOB  IBCEOB0  IBCEOB00  

Entry Points

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

External References

Name Field # of Occurrence
^DIE STORE+37, HDR+13
$$COBN^IBCEF HDR+11
$$FT^IBCEF FINDLN+104, FINDLN+105
$$INPAT^IBCEF FINDLN+97
F^IBCEF FINDLN+37, FINDLN+104, FINDLN+105
$$PRCD^IBCEF1 GTPRCD+6, GTPRCD+12
$$DOLLAR^IBCEFG1 FINDLN+148
$$SPLIT^IBCEMU1 FINDLN+27, FINDLN+31
$$DOLLAR^IBCEOB STORE+32, FINDLN+19
RCRU^IBCEOB00 FINDLN+97
$$MODLST^IBEFUNC2 FINDLN+152

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBM(361.1 - [#361.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] FINDLN+36, GTPRCD+3
^DGCR(399.2 - [#399.2] GTPRCD+7
^IBM(361.1 - [#361.1] HDR+11, FINDLN+18, FINDLN+27, FINDLN+29, FINDLN+30, FINDLN+32, FINDLN+43, FINDLN+99, FINDLN+110, FINDLN+129
^ICPT("B" GTPRCD+5, GTPRCD+11
^TMP( HDR+15*

Label References

Name Line Occurrences
$$MODMATCH FINDLN+85, FINDLN+93, FINDLN+152
FINDLNX FINDLN+36, FINDLN+106, FINDLN+121, FINDLN+129, FINDLN+131, FINDLN+132, FINDLN+147, FINDLN+148, FINDLN+149
GTPRCD FINDLN+49, FINDLN+65, FINDLN+76, FINDLN+116, FINDLN+123
MODQ MODMATCH+10, MODMATCH+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A STORE~, STORE+26, STORE+27
B STORE+15~, STORE+26*, STORE+27
CPT GTPRCD+1~, GTPRCD+4*, GTPRCD+5*, GTPRCD+6, GTPRCD+10*, GTPRCD+11*, GTPRCD+12
DA STORE+15~, STORE+18*, STORE+24*, STORE+26, HDR+4~, HDR+12*
DA( STORE+23*
DIE STORE+15~, STORE+18*, STORE+22*, HDR+4~, HDR+12*
DR STORE+15~, STORE+16*, STORE+34*, STORE+36*, STORE+37, HDR+4~, HDR+11*
EOBCHG FINDLN+16~, FINDLN+19*, FINDLN+79, FINDLN+84, FINDLN+92, FINDLN+99
ERRCOD FINDLN~, FINDLN+18*, FINDLN+67*, FINDLN+68*, FINDLN+70*, FINDLN+71*, FINDLN+83*, FINDLN+84*, FINDLN+85*, FINDLN+91*
, FINDLN+92*, FINDLN+93*, FINDLN+124*, FINDLN+147*, FINDLN+148*, FINDLN+149, FINDLN+152*
HIPAA HDR~, HDR+7*
IB MODMATCH~, MODMATCH+6
IB0 STORE~, STORE+28, STORE+32, HDR~, HDR+7, HDR+8, HDR+9, HDR+11, FINDLN~, FINDLN+19
, FINDLN+24, FINDLN+39, FINDLN+52, FINDLN+53, FINDLN+58, FINDLN+59, FINDLN+67, FINDLN+68, FINDLN+70, FINDLN+71
, FINDLN+83, FINDLN+85, FINDLN+91, FINDLN+93, FINDLN+97, FINDLN+106, FINDLN+117, FINDLN+124, FINDLN+140*, FINDLN+147
, FINDLN+148, FINDLN+149, FINDLN+152
IBAMIN FINDLN+16~, FINDLN+135*, FINDLN+136*, FINDLN+137, FINDLN+145, FINDLN+147
IBBNDL FINDLN+15~, FINDLN+24*, FINDLN+49, FINDLN+51, FINDLN+57, FINDLN+65, FINDLN+66, FINDLN+69, FINDLN+76, FINDLN+82
, FINDLN+90, FINDLN+116, FINDLN+117, FINDLN+123, FINDLN+124, FINDLN+152, FINDLN+153, GTPRCD~
IBDT HDR+4~, HDR+8*, HDR+11
IBDTP HDR+4~, HDR+9*, HDR+10*, HDR+11
IBEGBL HDR~, HDR+15
IBEOB STORE~, STORE+18, HDR~, HDR+11, HDR+12, FINDLN~, FINDLN+18, FINDLN+27, FINDLN+29, FINDLN+43
, FINDLN+99, FINDLN+110, FINDLN+129
IBFLD STORE+15~, STORE+27*, STORE+28, STORE+34
IBIFN FINDLN+15~, FINDLN+18*, FINDLN+29, FINDLN+36, FINDLN+37, FINDLN+97, FINDLN+104, FINDLN+105, GTPRCD+3
IBLN FINDLN+15~, FINDLN+18*, FINDLN+39*, FINDLN+86*, FINDLN+94*, FINDLN+97, FINDLN+99*, FINDLN+106*, FINDLN+153*, FINDLN+154*
FINDLNX+1
IBLN1 FINDLN+15~, FINDLN+18*, FINDLN+154
IBMOD FINDLN+16~, MODMATCH+4~
IBMOD( MODMATCH+7*, MODMATCH+18, MODMATCH+19*, MODMATCH+20!
IBMOD("" MODMATCH+10, MODMATCH+13, MODMATCH+23
IBPC STORE+15~, STORE+27*, STORE+28, STORE+32, STORE+33, STORE+34
IBXARRAY FINDLN+15~
IBXARRY FINDLN+15~
IBXERR FINDLN+16~
>> IBXSAVE("XTRA" HDR+5!
IBZDATA FINDLN~, FINDLN+37, FINDLN+97, FINDLN+103
IBZDATA( FINDLN+39, FINDLN+41, FINDLN+46, FINDLN+49, FINDLN+76, FINDLN+77, FINDLN+78, FINDLN+83, FINDLN+85, FINDLN+91
, FINDLN+93, FINDLN+106, FINDLN+108, FINDLN+113, FINDLN+116, FINDLN+132, FINDLN+134, FINDLN+136, FINDLN+137, FINDLN+141
, FINDLN+149, FINDLN+152
IBZDATA("" FINDLN+99
IBZDATA(1 FINDLN+64, FINDLN+65, FINDLN+122, FINDLN+123
IBZREC GTPRCD~, GTPRCD+4, GTPRCD+7, GTPRCD+10
IBZSAVE HDR+5!
IBZVLA FINDLN+16~, FINDLN+32*
IBZVLA( FINDLN+45, FINDLN+112, FINDLN+131
IEN FINDLN+28~*, FINDLN+29*, FINDLN+30, FINDLN+31, FINDLN+32
LEVEL STORE~, STORE+18, STORE+20
LEVEL( STORE+23
LEVEL("DIE" STORE+22
LEVEL(0 STORE+24
MATCHED FINDLN+16~, FINDLN+18*, FINDLN+41, FINDLN+54*, FINDLN+60*, FINDLN+63, FINDLN+75, FINDLN+108, FINDLN+118*, FINDLN+121
, FINDLN+127
MMOD MODMATCH+4~, MODMATCH+17*, MODMATCH+18, MODMATCH+19, MODMATCH+20
MOD837S FINDLN+16~, FINDLN+85, FINDLN+93, FINDLN+152, MODMATCH~, MODMATCH+5*, MODMATCH+8*, MODMATCH+9*
MODLST MODMATCH~, MODMATCH+10, MODMATCH+13, MODMATCH+17
MODOK MODMATCH+4~, MODMATCH+5*, MODMATCH+13*, MODMATCH+23*, MODQ
OCHG FINDLN+15~, FINDLN+77*, FINDLN+79*, FINDLN+84, FINDLN+92, FINDLN+99, FINDLN+134*, FINDLN+148
OCHG2 FINDLN+15~, FINDLN+78*, FINDLN+79
OPROC FINDLN+15~, FINDLN+49, FINDLN+52, FINDLN+53, FINDLN+58, FINDLN+59, FINDLN+65, FINDLN+67, FINDLN+68, FINDLN+70
, FINDLN+71, FINDLN+76, FINDLN+94, FINDLN+116, FINDLN+117, FINDLN+123, FINDLN+124, FINDLN+153, GTPRCD~, GTPRCD+6*
, GTPRCD+12*
OREVCD FINDLN+15~, FINDLN+49, FINDLN+52, FINDLN+58, FINDLN+65, FINDLN+67, FINDLN+70, FINDLN+76, FINDLN+94, FINDLN+99
, FINDLN+116, FINDLN+123, GTPRCD~, GTPRCD+7*
PLREF FINDLN~, FINDLN+39, FINDLN+106
Q STORE+21~, STORE+23*, MODMATCH+4~, MODMATCH+6*
U STORE+26, STORE+27, STORE+28, STORE+32, HDR+7, HDR+8, HDR+9, HDR+11, FINDLN+19, FINDLN+24
, FINDLN+27, FINDLN+30, FINDLN+36, FINDLN+39, FINDLN+43, FINDLN+52, FINDLN+53, FINDLN+58, FINDLN+59, FINDLN+67
, FINDLN+68, FINDLN+70, FINDLN+71, FINDLN+77, FINDLN+78, FINDLN+83, FINDLN+85, FINDLN+91, FINDLN+93, FINDLN+94
, FINDLN+99, FINDLN+106, FINDLN+110, FINDLN+117, FINDLN+124, FINDLN+129, FINDLN+134, FINDLN+136, FINDLN+137, FINDLN+140
, FINDLN+141, FINDLN+147, FINDLN+148, FINDLN+149, FINDLN+152, FINDLN+153, GTPRCD+3, GTPRCD+4, GTPRCD+7, GTPRCD+10
, MODMATCH+10, MODMATCH+13, MODMATCH+17
UNITS FINDLN+16~, FINDLN+137*, FINDLN+139*, FINDLN+147
UNITS2 FINDLN+16~, FINDLN+141*, FINDLN+147
UNITS3 FINDLN+16~, FINDLN+144*, FINDLN+145*, FINDLN+147
VAL STORE+29~, STORE+32*, STORE+33*, STORE+34
X STORE+15~, HDR+4~
Y STORE+15~, STORE+38, HDR+4~, HDR+14, HDR+16
Z FINDLN+16~, FINDLN+41*, FINDLN+43, FINDLN+45, FINDLN+46, FINDLN+49, FINDLN+54, FINDLN+60, FINDLN+75*, FINDLN+76
, FINDLN+77, FINDLN+78, FINDLN+83, FINDLN+85, FINDLN+86, FINDLN+91, FINDLN+93, FINDLN+94, FINDLN+108*, FINDLN+110
, FINDLN+112, FINDLN+113, FINDLN+116, FINDLN+118, FINDLN+127*, FINDLN+129, FINDLN+131, FINDLN+132, FINDLN+134, FINDLN+136
, FINDLN+137, FINDLN+141, FINDLN+149, FINDLN+152, FINDLN+153
Z0 FINDLN+16~, MODMATCH+4~, MODMATCH+6*, MODMATCH+7, MODMATCH+8, MODMATCH+9, MODMATCH+16*, MODMATCH+17
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All