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

Package: Integrated Billing

Routine: IBCNEHL4


Information

IBCNEHL4 ;DAOU/ALA - HL7 Process Incoming RPI Msgs (cont.) ;26-JUN-2002

Source Information

Source file <IBCNEHL4.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Integrated Billing 6 ($$DECHL7,$$NUMCHK)^IBCNEHL2  PCK^IBCNEHL3  (CODECHK,DODCK,GTICNM)^IBCNEHLU  SST^IBCNEUT2  MSG^IBCNEUT5  ($$ERRN,RSTA)^IBCNEUT7  
VA FileMan 4 $$FIND1^DIC  (,FILE,UPDATE)^DIE  $$IENS^DILF  $$GET1^DIQ  
Kernel 2 $$NOW^XLFDT  $$UP^XLFSTR  
Health Level Seven 1 ($$FMDATE,$$FMNAME)^HLFNC  
Master Patient Index VistA 1 $$GETDFN^MPIF001  

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

Package Total Caller Graph
Integrated Billing 2 IBCNEHL1  IBCNEHL2  

Entry Points

Name Comments DBIA/ICR reference
MSA ; Process the MSA seg
MSAX ;
TQCLOSE ;IB*743/CKB
ERRMSA(TRACE,MGRP) ; Msg Control Id is blank - Send Mailman error msg
PID ; Process the PID seg
PIDX ;
GT1 ; Process the GT1 Guarantor seg
GT1X ;
ZHS(EBDA,ERROR,IBSEG,RIEN) ; Process ZHS Healthcare services delivery segment
ZRF(EBDA,ERROR,IBSEG,RIEN) ; Process ZRF Reference identification segment
ZSD(EBDA,ERROR,IBSEG,RIEN) ; Process ZSD Subscriber date segment
ZII(EBDA,ERROR,IBSEG,RIEN) ; Process ZII Subscriber additional info segment
ZTY(EBDA,ERROR,IBSEG,RIEN) ; Process ZTY Benefit related entity segment
G2OCTD(EBDA,ERROR,IBSEG,RIEN) ; Process G2O.CTD Benefit related entity contact data segment
ERR(ERDA,ERROR,IBSEG,RIEN) ; Process ERR Reject reasons segment
NTE(ERDA,ERROR,IBSEG,RIEN) ; Process NTE segment
ZTP(ERROR,IBSEG,RIEN) ; Process ZTP Subscriber date (subscriber level) segment

External References

Name Field # of Occurrence
$$FIND1^DIC PID+53, GT1+31, GT1+45, ZTY+24
^DIE MSA+33
FILE^DIE MSA+42, MSA+47, PID+59, PID+66, GT1+49, GT1+54, ZTY+37
UPDATE^DIE ZHS+17, ZRF+10, ZSD+10, ZII+15, G2OCTD+14, ERR+12, NTE+6, ZTP+10
$$IENS^DILF NTE+3
$$GET1^DIQ MSA+24
$$FMDATE^HLFNC PID+22, GT1+16
$$FMNAME^HLFNC PID+21, GT1+16
$$DECHL7^IBCNEHL2 MSA+10, PID+21, GT1+14, GT1+16
$$NUMCHK^IBCNEHL2 ZHS+7, ZHS+13
PCK^IBCNEHL3 MSA+16
CODECHK^IBCNEHLU ZHS+16, ZRF+9, ZSD+9, ZII+14, ZTY+36, G2OCTD+13, ERR+11, ZTP+9
DODCK^IBCNEHLU PID+39
GTICNM^IBCNEHLU ERRMSA+5
SST^IBCNEUT2 TQCLOSE+6
MSG^IBCNEUT5 ERRMSA+15
$$ERRN^IBCNEUT7 PID+31
RSTA^IBCNEUT7 TQCLOSE+6
$$GETDFN^MPIF001 PID+26, PID+28
$$NOW^XLFDT MSA+39
$$UP^XLFSTR MSA+28, MSA+29

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^IBCN(365 - [#365] GET1^DIQ
^DIC(5 - [#5] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBCN(365 - [#365] TQCLOSE+4, PID+42, ZHS+4, ZRF+4, ZSD+4, ZII+4, G2OCTD+4, ERR+3, ZTP+3

Label References

Name Line Occurrences
ERRMSA MSA+13
GT1X GT1+19
MSAX MSA+13, MSA+19
TQCLOSE MSA+49

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACK MSA+9*
DA MSA+32*, MSA+34!, NTE+1~, NTE+2*, NTE+3
DA(1 NTE+2*
DFN MSA+23~, MSA+24*, MSA+32, PID+1~, PID+10*, PID+16*, PID+36*, PID+39, PID+42
DIE MSA+32*, MSA+34!
DOB PID+1~, PID+5*, PID+22*, PID+45, GT1+8~, GT1+9*, GT1+16*, GT1+24, GT1+36
DOD PID+1~, PID+7*, PID+22*, PID+39, PID+57
DR MSA+32*, MSA+34!
EBDA ZHS~, ZHS+2, ZHS+3, ZHS+4, ZRF~, ZRF+2, ZRF+3, ZRF+4, ZSD~, ZSD+2
, ZSD+3, ZSD+4, ZII~, ZII+2, ZII+3, ZII+4, ZTY~, ZTY+2, ZTY+3, G2OCTD~
, G2OCTD+2, G2OCTD+3, G2OCTD+4
>> ERACT MSA+10*, MSA+44
>> ERCON MSA+10*, MSA+44
ERDA ERR~, ERR+13*, NTE~, NTE+2
>> ERFLG MSA+13*, PID+4*, PID+31*
ERROR PID+59, GT1+49, ZHS~, ZRF~, ZSD~, ZII~, ZTY~, G2OCTD~, ERR~, NTE~
, ZTP~
ERROR("DIERR" PID+32*, PID+33*, PID+34*
>> ERTXT MSA+10*, MSA+27, MSA+28, MSA+29, MSA+38
>> EVENTYP MSA+22, PID+44, PID+63, GT1+19
FLD PID+1~, PID+49*, PID+50, PID+51, PID+52, PID+53, PID+54, PID+55, PID+56, GT1+27*
GT1+28, GT1+29, GT1+30, GT1+31, GT1+32, GT1+41*, GT1+42, GT1+43, GT1+44, GT1+45
GT1+46, GT1+47, GT1+48, ZTY+1~, ZTY+8*, ZTY+10, ZTY+20*, ZTY+21, ZTY+22, ZTY+23
, ZTY+24, ZTY+25, ZTY+26, ZTY+27, G2OCTD+1~, G2OCTD+6*, G2OCTD+7, G2OCTD+11*, ERR+1~, ERR+4*
, ERR+5
FLG GT1+20~
HCT ERRMSA+2~
>> HLCMP PID+50, PID+51, PID+52, PID+53, PID+54, PID+55, PID+56, GT1+28, GT1+29, GT1+30
GT1+31, GT1+32, GT1+42, GT1+43, GT1+44, GT1+45, GT1+46, GT1+47, GT1+48, ZHS+6
, ZHS+9, ZHS+12, ZHS+14, ZHS+15, ZRF+6, ZSD+6, ZSD+8, ZII+6, ZII+12, ZTY+5
, ZTY+10, ZTY+15, ZTY+21, ZTY+22, ZTY+23, ZTY+24, ZTY+25, ZTY+26, ZTY+27, ZTY+32
, ZTY+34, G2OCTD+7, G2OCTD+11, ERR+4, ERR+5, ERR+7, ERR+10, ZTP+5, ZTP+6
>> HLECH MSA+10, PID+12, PID+13, PID+14, PID+15, PID+21, GT1+13, GT1+16
>> HLREP NTE+5
>> HLSCMP PID+50, GT1+28, GT1+42, ZTY+10, ZTY+21, G2OCTD+7, ZTP+5, ZTP+6
I ERR+1~, ERR+5*
IBSEG ZHS~, ZRF~, ZSD~, ZII~, ZTY~, G2OCTD~, ERR~, NTE~, ZTP~
IBSEG(10 GT1+9, ZHS+15, ZTY+29
IBSEG(11 ZTY+32
IBSEG(12 PID+49, ZTY+34
IBSEG(13 GT1+10, ZTY+34
IBSEG(14 ZTY+18
IBSEG(2 MSA+9, GT1+21
IBSEG(3 MSA+9, GT1+12, ZHS+6, ZRF+6, ZSD+6, ZII+6, ZTY+5, G2OCTD+6, ERR+4, ZTP+5
IBSEG(30 PID+7
IBSEG(34 PID+7
IBSEG(35 PID+7
IBSEG(4 MSA+9, PID+11, GT1+9, ZHS+6, ZRF+6, ZSD+8, ZII+12, ZTY+5, NTE+4, ZTP+5
, ZTP+6
IBSEG(5 ZHS+9, ZRF+8, ZSD+6, ZII+9, ZTY+8, ZTP+8
IBSEG(6 MSA+10, PID+6, GT1+27, GT1+41, ZHS+9, ZII+10, ZTY+15, G2OCTD+11, ERR+7, ERR+10
IBSEG(7 MSA+10, ZHS+12, ZII+11, ZTY+15
IBSEG(8 PID+5, ZHS+12, ZTY+20, ERR+9
IBSEG(9 PID+5, GT1+9, ZHS+14, ZTY+29, ERR+8
>> IBTRACK( GT1+22*, GT1+23*, GT1+24*, GT1+25*, GT1+26*, GT1+28*, GT1+29*, GT1+30*, GT1+31*, GT1+32*
GT1+33*
>> IBTRACK(0 MSA+25*, MSA+26*, MSA+27*, MSA+28*, MSA+30*, MSA+35*
ICN ERRMSA+2~, ERRMSA+5, ERRMSA+11, PID+1~, PID+10*, PID+18*, PID+25, PID+26, PID+28, PID+30
PID+33, PID+36
IDLIST PID+1~, PID+11*, PID+12, PID+13
IENARR ERR+1~
IENARR(1 ERR+13
IENS NTE+1~, NTE+3*, NTE+5
IENSTR PID+1~, PID+41*, PID+42, PID+45, PID+46, PID+47, PID+50, PID+51, PID+52, PID+53
PID+54, PID+55, PID+56, PID+57, PID+58, PID+65, GT1+8~, GT1+34*, GT1+36, GT1+38
GT1+39, GT1+42, GT1+43, GT1+44, GT1+45, GT1+46, GT1+47, GT1+48, GT1+53, ZHS+1~
, ZHS+3*, ZHS+4, ZHS+7, ZHS+10, ZHS+13, ZHS+14, ZHS+15, ZRF+1~, ZRF+3*, ZRF+4
, ZRF+7, ZRF+8, ZSD+1~, ZSD+3*, ZSD+4, ZSD+7, ZSD+8, ZII+1~, ZII+3*, ZII+4
, ZII+9, ZII+10, ZII+11, ZII+12, ZII+13, ZTY+1~, ZTY+3*, ZTY+6, ZTY+10, ZTY+13
, ZTY+16, ZTY+18, ZTY+21, ZTY+22, ZTY+23, ZTY+24, ZTY+25, ZTY+26, ZTY+27, ZTY+30
, ZTY+32, ZTY+35, G2OCTD+1~, G2OCTD+3*, G2OCTD+4, G2OCTD+7, G2OCTD+9, G2OCTD+12, ERR+1~, ERR+2*
, ERR+3, ERR+6, ERR+7, ERR+8, ERR+9, ERR+10, ZTP+1~, ZTP+2*, ZTP+3, ZTP+7
, ZTP+8
IERN PID+2~, PID+31*, PID+32, PID+33, PID+34
LFAC PID+1~, PID+7*
LOC ERR+1~, ERR+4*, ERR+5*, ERR+6
LUPDT PID+1~, PID+7*, PID+22*
MGRP MSA+13, ERRMSA~, ERRMSA+15, PID+39
MSG ERRMSA+2~, NTE+1~, NTE+5*
MSG( ERRMSA+14*
MSG(1 ERRMSA+9*, ERRMSA+10*
MSG(2 ERRMSA+11*
MSG(3 ERRMSA+13*
MSGCT ERRMSA+2~, ERRMSA+8*, ERRMSA+14
MSGID MSA+8~, MSA+9*, MSA+13
MSGSTR NTE+1~, NTE+4*, NTE+5
NAME ERRMSA+2~, ERRMSA+5, ERRMSA+11, PID+1~, PID+6*, PID+21*, PID+39, PID+65, GT1+8~, GT1+9*
GT1+16*, GT1+26, GT1+53
QUAL ZHS+1~, ZHS+6*, ZHS+7, ZHS+9*, ZHS+10, ZHS+12*, ZHS+13, ZRF+1~, ZRF+6*, ZRF+7
, ZSD+1~, ZSD+6*, ZSD+7, ZII+1~, ZII+6*, ZII+8, ZII+12, ZII+13, ZTY+1~, ZTY+5*
, ZTY+6, ZTY+15*, ZTY+16, ZTY+29*, ZTY+30, ZTY+34*, ZTY+35, G2OCTD+1~, G2OCTD+11*, G2OCTD+12
, ZTP+1~, ZTP+5*, ZTP+7
RDAT0 TQCLOSE+3~, TQCLOSE+4*, TQCLOSE+5
RIEN MSA+19, MSA+24, MSA+26, MSA+37, MSA+38, MSA+39, MSA+44, TQCLOSE+4, PID+39, PID+41
PID+42, GT1+34, GT1+35, GT1+37, ZHS~, ZHS+3, ZHS+4, ZRF~, ZRF+3, ZRF+4
, ZSD~, ZSD+3, ZSD+4, ZII~, ZII+3, ZII+4, ZTY~, ZTY+3, G2OCTD~, G2OCTD+3
, G2OCTD+4, ERR~, ERR+2, ERR+3, NTE~, NTE+2, ZTP~, ZTP+2, ZTP+3
RSTYPE TQCLOSE+3~, TQCLOSE+5*, TQCLOSE+6
RSUPDT MSA+8~, PID+1~, PID+64!, GT1+8~, GT1+52!, ZHS+1~, ZHS+16, ZRF+1~, ZRF+9, ZSD+1~
, ZSD+9, ZII+1~, ZII+14, ZTY+1~, ZTY+36, G2OCTD+1~, G2OCTD+13, ERR+1~, ERR+11, NTE+1~
, NTE+6, ZTP+1~, ZTP+9
RSUPDT( ZHS+4*, ZHS+7*, ZHS+10*, ZHS+13*, ZHS+14*, ZHS+15*, ZRF+4*, ZRF+7*, ZRF+8*, ZSD+4*
, ZSD+7*, ZSD+8*, ZII+4*, ZII+9*, ZII+10*, ZII+11*, ZII+12*, ZII+13*, ZTY+6*, ZTY+10*
, ZTY+13!, ZTY+16*, ZTY+18*, ZTY+21*, ZTY+22*, ZTY+23*, ZTY+24*, ZTY+25*, ZTY+26*, ZTY+27*
, ZTY+30*, ZTY+32*, ZTY+35*, G2OCTD+4*, G2OCTD+7*, G2OCTD+9!, G2OCTD+12*, ERR+3*, ERR+6*, ERR+7*
, ERR+8*, ERR+9*, ERR+10*, NTE+5*, ZTP+3*, ZTP+7*, ZTP+8*
RSUPDT(365 MSA+37*, MSA+38*, MSA+39*, MSA+44*, PID+42*, PID+45*, PID+46*, PID+47*, PID+50*, PID+51*
PID+52*, PID+53*, PID+54*, PID+55*, PID+56*, PID+57*, PID+58*, PID+65*, GT1+35*, GT1+36*
GT1+37*, GT1+38*, GT1+39*, GT1+42*, GT1+43*, GT1+44*, GT1+45*, GT1+46*, GT1+47*, GT1+48*
GT1+53*
SETID GT1+20~, GT1+21*, GT1+22, GT1+23, GT1+24, GT1+25, GT1+26, GT1+28, GT1+29, GT1+30
GT1+31, GT1+32, GT1+33
SEX PID+1~, PID+5*, PID+45, GT1+8~, GT1+9*, GT1+25, GT1+37
SSN PID+1~, PID+10*, PID+17*, PID+39, PID+47, GT1+8~, GT1+10*, GT1+23, GT1+38
STATE PID+1~, PID+53*, GT1+20~, GT1+31*, GT1+45*
SUBC PID+2~, PID+13*, PID+14, PID+15
SUBCDATA PID+2~, PID+15*, PID+16, PID+17, PID+18
SUBCID PID+2~, PID+14*, PID+16, PID+17, PID+18
SUBCNT PID+2~, PID+12*, PID+13
>> SUBID GT1+13*, GT1+14*, GT1+22, GT1+39
SUBIDC GT1+8~, GT1+12*, GT1+13
TQN TQCLOSE+3~, TQCLOSE+5*, TQCLOSE+6
TRACE MSA+9*, MSA+13, MSA+25, MSA+37, ERRMSA~, ERRMSA+8, ERRMSA+10, ERRMSA+11, ERRMSA+12
U TQCLOSE+5, PID+42, ZII+9, ZII+10
VAL ERR+1~, ERR+5*
VALUE ZHS+1~, ZHS+6*, ZHS+7, ZHS+9*, ZHS+10, ZHS+12*, ZHS+13, ZRF+1~, ZRF+6*, ZRF+7
, ZSD+1~, ZSD+6*, ZSD+7, ZII+1~, ZTY+1~, ZTY+5*, ZTY+6, ZTY+15*, ZTY+16, ZTY+24*
, ZTY+29*, ZTY+30, ZTY+34*, ZTY+35, G2OCTD+1~, G2OCTD+11*, G2OCTD+12, ZTP+1~, ZTP+5*, ZTP+6*
, ZTP+7
VRFDT MSA+8~, MSA+39*
XDFN PID+1~, PID+26*, PID+28*, PID+30, PID+36
XMSUB ERRMSA+2~, ERRMSA+8*, ERRMSA+15
Z NTE+1~, NTE+5*, ZTP+1~, ZTP+6*
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