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

Package: Integrated Billing

Routine: IBCNEHL3


Information

IBCNEHL3 ;DAOU/ALA - HL7 Process Incoming RPI Continued ;03-JUL-2002 ; Compiled June 2, 2005 14:20:19

Source Information

Source file <IBCNEHL3.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Integrated Billing 7 RP^IBCNEBF  RESP^IBCNEDEQ  BUF^IBCNEHL3  ($$CLNSTR,$$NAMECMP)^IBCNEHLU  (BUFF,SST)^IBCNEUT2  MSG^IBCNEUT5  ($$ERRN,RSTA)^IBCNEUT7  
VA FileMan 3 ($$FIND1,FIND)^DIC  (,FILE)^DIE  $$GET1^DIQ  
Kernel 1 ($$DT,$$FMADD,$$NOW)^XLFDT  

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

Package Total Caller Graph
Integrated Billing 6 IBCNBAR  IBCNEHL1  IBCNEHL3  IBCNEHL4  IBCNEHL5  IBCNEHL6  

Entry Points

Name Comments DBIA/ICR reference
ERROR(TQN,ERACT,ERCON,TRCN) ; Entry point
; Input: TQN - IEN for eIV Transmission Queue (#365.1), required
; ERACT - Error Action Code (#365.14), required
; ERCON - Error Condition Code (#365.17), required
; TRCN - Trace # from eIV Response (#365)
ERRORX ; ERROR exit pt
UPDATE(TQN,TSTS,TDAYS,ERACT,ERCON) ; Update Transmission Queue (#365.1)
; Update/Create Buffer information as necessary
; * If unsolicited error or negative Verification response do not
; update TQ entry. However, create a new Buffer entry.
; Input Variables
; ERACT,ERCON,IIVSTAT,TDAYS,TQN,TSTS
UPDATX ; UPDATE exit point
PCK ; Payer Check
; Find the associated Response IEN
BUF ; Create Buffer Record if Doesn't Exist
IIVPROC(BUFF) ; Set IIV Processed Date to current dt/tm & IIV stat (aka SYMBOL)
; Input Variables
; BUFF
PFN(IN1DATA) ; Find Payer from HL7 msg
GIN1() ;Get IN1 segment
WARN ; Create and send a response processing error warning message
UEACT ; Send warning msg if Unknown Error Action Code was received or
; encountered problem filing date
CHK1() ; check auto-update criteria for patient who is the subscriber
; called from tag AUTOUPD, uses variables defined there
CHK1X ;
CHK2(MWNRTYP) ; check auto-update criteria for patient who is not the subscriber
; called from tag AUTOUPD, uses variables defined there
CHK2X ;
UPDIREC(RIEN,IEN312) ; IB*2*595/DM update INSUR RECORD IEN in the response file (#365,.12)
; RIEN - ien in eIV Response file (365)
; IEN312 - ien in pat. insurance multiple (2.312)
LCKERR ; send locking error message

External References

Name Field # of Occurrence
$$FIND1^DIC IIVPROC+10, PFN+10
FIND^DIC PCK+16
^DIE UPDATE+77, UPDATE+80, PCK+58
FILE^DIE BUF+14, IIVPROC+11, UPDIREC+11
$$GET1^DIQ CHK2+10, CHK2+12, LCKERR+5, LCKERR+6
RP^IBCNEBF BUF+10
RESP^IBCNEDEQ PCK+52
BUF^IBCNEHL3 UEACT+27
$$CLNSTR^IBCNEHLU PFN+9
$$NAMECMP^IBCNEHLU CHK1+8, CHK2+13, CHK2+14
BUFF^IBCNEUT2 UPDATE+45, UPDATE+50, UPDATE+53, IIVPROC+13, UEACT+30
SST^IBCNEUT2 UPDATE+71, UEACT+17
MSG^IBCNEUT5 WARN+28, LCKERR+11
$$ERRN^IBCNEUT7 PFN+12
RSTA^IBCNEUT7 UEACT+17
$$DT^XLFDT UPDATE+75
$$FMADD^XLFDT UPDATE+75
$$NOW^XLFDT IIVPROC+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
2.312 GET1^DIQ
^VA(200 - [#200] FIND1^DIC
^IBCN(365 - [#365] Classic Fileman Calls,  FIND^DIC
^IBCN(365.1 - [#365.1] Classic Fileman Calls
^IBE(365.12 - [#365.12] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] CHK2+6
^IBA(355.33 - [#355.33] UPDATE+37
^IBCN(365 - [#365] UPDATE+26, PCK+34, PCK+44, PCK+57
^IBCN(365.1 - [#365.1] UPDATE+20, PCK+19, PCK+28
^TMP("IBCNEMID" PCK+15!, PCK+20, PCK+21
^TMP($J GIN1+9, GIN1+10

Label References

Name Line Occurrences
$$GIN1 PCK+26, PCK+48
BUF UPDATE+62, UPDATE+64, UPDATE+66
CHK1X CHK1+6, CHK1+7, CHK1+8
CHK2X CHK2+9, CHK2+11, CHK2+13, CHK2+14
ERRORX ERROR+10, ERROR+57
IIVPROC UPDATE+51
PFN PCK+30, PCK+49
UPDATE ERROR+59
UPDATX UPDATE+21, UPDATE+30, UPDATE+68
WARN UEACT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BUFF PCK+11~, PCK+50*, BUF+8~, BUF+11*, IIVPROC~, IIVPROC+8, IIVPROC+13
D UPDATE+14~
D0 UPDATE+14~
DA ERROR+8~, UPDATE+14~, UPDATE+76*, UPDATE+79*, PCK+11~, PCK+58*
DATA UPDIREC+4~
DATA(365 UPDIREC+10*
DFN UPDATE+14~, UPDATE+58*, PCK+11~, PCK+45*, UEACT+9~, UEACT+26*, LCKERR+5
DI UPDATE+14~
DIC UPDATE+14~
DIE ERROR+8~, UPDATE+14~, UPDATE+76*, UPDATE+79*, PCK+11~, PCK+58*
DOB CHK2+4~, CHK2+10*, CHK2+11
DQ UPDATE+14~
DR ERROR+8~, UPDATE+14~, UPDATE+76*, UPDATE+79*, PCK+11~, PCK+58*
ERACT ERROR~, ERROR+56*, ERROR+57, ERROR+59, UPDATE~, UPDATE+48, UPDATE+53, UPDATE+62, UPDATE+64, UPDATE+66
ERCON ERROR~, ERROR+59, UPDATE~, UPDATE+11*
ERDESC ERROR+8~
>> ERFLG PCK+42, PCK+47, PFN+12*, WARN+9*
ERIEN ERROR+8~
ERROR UPDIREC+4~
ERROR("DIERR" PFN+13*, PFN+14*, WARN+19, WARN+21, WARN+23, WARN+24, WARN+25
>> EVENTYP PCK+26
FTDT UPDATE+14~, UPDATE+75*
>> HCT GIN1+8
>> HL("ECH" PFN+9
>> HLFS PFN+9
IBDATA UPDATE+14~, UPDATE+37*, UPDATE+38, UPDATE+39
IBFDA BUF+8~, BUF+11, BUF+12, BUF+13
IBIEN UPDATE+14~, UPDATE+24*, UPDATE+32*, UPDATE+35, UPDATE+37, UPDATE+45, UPDATE+50, UPDATE+51, UPDATE+53, UPDATE+56
UEACT+24*, UEACT+25, UEACT+30
IBQFL UPDATE+14~, UPDATE+25*, UPDATE+30, UPDATE+56, UEACT+21
IBSTS UPDATE+14~, UPDATE+38*, UPDATE+43
IBSYM UPDATE+14~, UPDATE+39*, UPDATE+43
ID CHK2+4~, CHK2+8*, CHK2+9
>> IDATA3 CHK1+7, CHK2+11
IDATA5 CHK2+4~, CHK2+6*, CHK2+9
>> IDATA7 CHK1+6, CHK1+8, CHK2+9, CHK2+13
IDUZ IIVPROC+7~, IIVPROC+10*
IEN PCK+11~, PCK+45*
>> IEN2 CHK2+6, CHK2+7
IEN312 CHK2+6, UPDIREC~, UPDIREC+5, UPDIREC+10
IENS CHK2+4~, CHK2+7*, CHK2+10, CHK2+12, UPDIREC+4~, LCKERR+6, LCKERR+7
IERN PCK+11~, PFN+8~, PFN+12*, PFN+13, PFN+14
>> IIVSTAT UPDATE+18*, UPDATE+49, UPDATE+62, UPDATE+64, UEACT+21
IN1DATA PCK+11~, PCK+26*, PCK+27, PCK+30, PCK+48*, PCK+49, PFN~, PFN+9
INSIEN UPDATE+15~, UPDATE+60*
IPCT GIN1+7~, GIN1+8*, GIN1+9*, GIN1+10
>> IRIEN BUF+9*
>> MAP( UPDATE+49, UPDATE+62, UPDATE+64
MCT WARN+8~, WARN+9*, WARN+20*, WARN+21*, WARN+22*, WARN+23*, WARN+24*, WARN+25*, WARN+26*
MDTM PCK+11~, PCK+45*
>> MGRP WARN+28, LCKERR+11
MSG ERROR+8~, WARN+8~, LCKERR+1~
MSG( WARN+20*, WARN+21*, WARN+22*, WARN+23*, WARN+24*, WARN+25*, WARN+26*
MSG(1 WARN+10*, WARN+28, LCKERR+2*, LCKERR+11
MSG(2 WARN+11*, LCKERR+3*
MSG(3 WARN+12*, LCKERR+4*
MSG(4 WARN+13*, LCKERR+5*
MSG(5 WARN+14*, LCKERR+6*
MSG(6 WARN+15*, LCKERR+7*
MSG(7 WARN+16*, LCKERR+8*
MSG(8 WARN+17*, LCKERR+9*
MSG(9 WARN+18*, LCKERR+10*
>> MSGID PCK+16, PCK+19
MWNRTYP CHK2~, CHK2+13, CHK2+14
NAME CHK2+4~, CHK2+12*, CHK2+13, CHK2+14
PAYR PCK+11~, PCK+50*
PAYRID PFN+8~, PFN+9*, PFN+10, PFN+13
PDOB CHK2+4~, CHK2+10*, CHK2+11
PIEN PCK+11~, PCK+18*, PCK+28*, PCK+30, PCK+34, PCK+47, PCK+49*, PCK+50, PCK+57, PFN+10*
, PFN+11
PNAME CHK2+4~, CHK2+12*, CHK2+13, CHK2+14
PP PCK+11~, PCK+18*, PCK+20*, PCK+21
PRDATA PCK+12~, PCK+44*, PCK+45
PRIEN PCK+12~, PCK+21*, PCK+27, PCK+34, PCK+35, PCK+43, PCK+44
QFL PCK+11~, PCK+18*, PCK+20, PCK+28*, PCK+30*, PCK+35*, PCK+49*
>> RDATA1 CHK1+7, CHK2+10
>> RDATA13 CHK1+6, CHK1+8, CHK2+8, CHK2+12
RES CHK1+4~, CHK1+5*, CHK1+9*, CHK1X+1, CHK2+4~, CHK2+5*, CHK2+15*, CHK2X+1
RIEN UPDATE+26, PCK+18*, PCK+35*, PCK+42, PCK+53*, PCK+57, PCK+58, BUF+10, BUF+12, UEACT+13
, UPDIREC~, UPDIREC+5, UPDIREC+10
RSIEN PCK+12~, PCK+53
RSTYPE UPDATE+15~, UPDATE+26*, UPDATE+30, UPDATE+32, UPDATE+68, PCK+50*, BUF+9, BUF+13, UEACT+17, UEACT+24
SEGMT GIN1+7~, GIN1+8*, GIN1+10*, GIN1+11
SUBCNT WARN+8~, WARN+9*, WARN+21*
SYMBOL UPDATE+15~, UPDATE+49*, UPDATE+50, UPDATE+62*, UPDATE+64*, UPDATE+66*, BUF+15!, IIVPROC+13, UEACT+9~, UEACT+27*
TDAYS UPDATE~, UPDATE+74, UPDATE+75
TQDATA UPDATE+15~, UPDATE+20*, UPDATE+21, UPDATE+24, UPDATE+25, UPDATE+58, UPDATE+60, UPDATE+78, UEACT+13, UEACT+26
TQIEN PCK+13~, PCK+19*, PCK+27, PCK+28, BUF+9*
TQN ERROR~, ERROR+10, ERROR+59, UPDATE~, UPDATE+20, UPDATE+71, UPDATE+76, UPDATE+79, BUF+13, UEACT+17
>> TRACE PFN+14, WARN+16
TRCN ERROR~
TSTS UPDATE~, UPDATE+43*, UPDATE+45, UPDATE+48, UPDATE+53, UPDATE+71, UPDATE+74, UPDATE+78
U UPDATE+24, UPDATE+25, UPDATE+26, UPDATE+38, UPDATE+39, UPDATE+58, UPDATE+60, UPDATE+78, PCK+21, PCK+28
PCK+34, PCK+45, PCK+57, UEACT+26, CHK1+6, CHK1+7, CHK1+8, CHK2+8, CHK2+9, CHK2+10
, CHK2+11, CHK2+12, CHK2+13
UP BUF+8~, IIVPROC+7~
UP( BUF+13*, IIVPROC+8*
UP(365 BUF+12*
VEN WARN+8~, WARN+9*, WARN+19*, WARN+21, WARN+23, WARN+24, WARN+25
X UPDATE+15~, PCK+12~
XMY ERROR+8~, WARN+8~, WARN+28, LCKERR+1~, LCKERR+11
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