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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBECECQ1

Package: Integrated Billing

Routine: IBECECQ1


Information

IBECECQ1 ;BSL/DVA-BILLING - SEND/RECEIVE QRY & DSR HL7 messages FOR PATIENT ACCUMULATOR INTERFACE ; 10/11/23 7:41am

Source Information

Source file <IBECECQ1.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Integrated Billing 5 ($$DFN,$$ICN,$$TFL)^IBARXMU  DSROUT^IBECECQ2  (NEWREC,UPDATE)^IBECECU1  EN^IBECECU2  ($$GETIEN,$$VRSNCHK,CCINPT,ERR1,ERR2,INPT,UDCL)^IBECECX1  
Health Level Seven 3 ($$ADDSEG,$$NEWMSG,SET)^HLOAPI  $$SENDONE^HLOAPI1  ($$GET,$$NEXTSEG,$$STARTMSG)^HLOPRS  
VA FileMan 3 FIND^DIC  (,FILE)^DIE  $$GET1^DIQ  
Kernel 1 ($$FMADD,$$FMTHL7,$$HL7TFM,$$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 5 IBAMTD  IBAUTL3  IBECEA32  IBECEA33  IBECECX1  
Health Level Seven 1 MESSAGE TYPE ACTIONS  

Entry Points

Name Comments DBIA/ICR reference
ADM ;Called from IB MEANS TEST BILLING protocol
MTEQRY(DFN,IBADMIT) ;Query for Billing Clock Maintenance option
CCBILL(DFN,IBADMIT) ;OUTGOING QRY Called from CC Inpatient Bill
EN(DFN) ;OUTGOING QRY ENTRY POINT
; IBQIEN - Query Request Message IEN (#778) that initiated this response CALLED FROM CLADD^IBAUTL3
MSH ; Build MSH Segment
QRD ;Build QRD segment
QRF ;Build QRF segment
SENDQRY ;
QRYIN ; receives incoming HL7 QRY^R02 and returns a DSR
QRDQI ; INCOMING QRD SEGMENT
QRFQI ; INCOMING QRF SEGMENT
DSRIN ;MAIN ENTRY POINT - incoming DSR message
MSA1 ;PULL 351 REFERENCE NUMBER
QRDDI
DSPDI

External References

Name Field # of Occurrence
FIND^DIC CCBILL+33
^DIE MTEQRY+12, DSRIN+15, DSPDI+16
FILE^DIE DSRIN+12
$$GET1^DIQ CCBILL+39, QRD+9, DSRIN+19, DSPDI+12, DSPDI+50, DSPDI+51, DSPDI+52, DSPDI+53
$$ADDSEG^HLOAPI QRD+15, QRF+5
$$NEWMSG^HLOAPI MSH+8
SET^HLOAPI QRD+1, QRD+3, QRD+4, QRD+5, QRD+6, QRD+8, QRD+10, QRD+11, QRD+12, QRD+13
, QRD+14, QRF+1, QRF+2, QRF+3, QRF+4
$$SENDONE^HLOAPI1 SENDQRY+5
$$GET^HLOPRS CCBILL+27, CCBILL+28, CCBILL+29, CCBILL+30, CCBILL+32, QRDQI+1, QRDQI+2, QRDQI+3, QRDQI+4, QRDQI+5
, QRDQI+6, QRFQI+1, MSA1+2, QRDDI+2, QRDDI+3, QRDDI+5, QRDDI+7, QRDDI+9, DSPDI+3, DSPDI+17
, DSPDI+18, DSPDI+19, DSPDI+21, DSPDI+22, DSPDI+23, DSPDI+24, DSPDI+25, DSPDI+26, DSPDI+27, DSPDI+28
, DSPDI+34, DSPDI+35, DSPDI+37, DSPDI+38, DSPDI+39, DSPDI+40, DSPDI+41, DSPDI+44, DSPDI+45, DSPDI+46
, DSPDI+47
$$NEXTSEG^HLOPRS CCBILL+23, QRYIN+8, DSRIN+5
$$STARTMSG^HLOPRS CCBILL+20, CCBILL+22, QRYIN+2, DSRIN+4
$$DFN^IBARXMU QRDDI+4
$$ICN^IBARXMU MTEQRY+4, CCBILL+12, EN+12
$$TFL^IBARXMU CCBILL+14, EN+14
DSROUT^IBECECQ2 QRYIN+12
NEWREC^IBECECU1 DSPDI+57
UPDATE^IBECECU1 DSPDI+56
EN^IBECECU2 DSPDI+58, DSPDI+59
$$GETIEN^IBECECX1 MTEQRY+2, CCBILL+11, CCBILL+35, EN+11
$$VRSNCHK^IBECECX1 DSRIN+10
CCINPT^IBECECX1 CCBILL+10
ERR1^IBECECX1 DSPDI+15
ERR2^IBECECX1 DSRIN+20, DSPDI+14
INPT^IBECECX1 EN+10
UDCL^IBECECX1 DSPDI+48
$$FMADD^XLFDT MTEQRY+6, CCBILL+19, DSPDI+60, DSPDI+63
$$FMTHL7^XLFDT MTEQRY+7, MTEQRY+8, QRD+2, DSPDI+61, DSPDI+63, DSPDI+64
$$HL7TFM^XLFDT QRFQI+2, QRDDI+6, QRDDI+8, DSPDI+20, DSPDI+31, DSPDI+36
$$NOW^XLFDT CCBILL+19, QRD+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: CCBILL+20
Routine Call
  • DIC
  • Line Location:
    • CCBILL+33
Routine Call
  • DIE
  • Line Location:
    • MTEQRY+12
    • DSRIN+15
    • DSPDI+16
Routine Call
  • DIE
  • Line Location:
    • DSRIN+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^IBE(351 - [#351] Classic Fileman Calls,  GET1^DIQ
^DIC(4 - [#4] FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(351 - [#351] DSRIN+14, DSRIN+16, DSPDI+62
^TMP("DSR" MSH+1!

Label References

Name Line Occurrences
DSPDI DSRIN+8
EN ADM+2
MSA1 CCBILL+24, DSRIN+6
MSH MTEQRY+13, CCBILL+16, EN+16, DSPDI+66
QRD MTEQRY+13, CCBILL+16, EN+16, DSPDI+66
QRDDI CCBILL+25, DSRIN+7
QRDQI QRYIN+9
QRF MTEQRY+13, CCBILL+16, EN+16, DSPDI+66
QRFQI QRYIN+10
SENDQRY MTEQRY+13, CCBILL+16, EN+16, DSPDI+66

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %P1 QRD+2*, QRD+3
>> DA MTEQRY+12*, DSRIN+15*, DSPDI+16*
DFN ADM+2, MTEQRY~, MTEQRY+2, MTEQRY+4, CCBILL~, CCBILL+10, CCBILL+11, CCBILL+12, CCBILL+14, CCBILL+17~
, CCBILL+35, EN~, EN+10, EN+11, EN+12, EN+14, QRD+9, DSRIN+2~, QRDDI+4*, DSPDI+58
, DSPDI+59, DSPDI+62
>> DGPMA ADM+1
>> DIE MTEQRY+12*, DSRIN+15*, DSPDI+16*
>> DILOCKTM DSRIN+14
>> DR MTEQRY+12*, DSRIN+15*, DSPDI+16*
DT DSPDI+64
>> ERR QRYIN+2*
ERROR CCBILL+2~, EN+2~, MSH+8, QRD+15, QRF+5, SENDQRY+5, DSPDI+65!
FIELD CCBILL+2~, EN+2~, QRD+1*, QRD+3*, QRD+4*, QRD+5*, QRD+6*, QRD+8*, QRD+10*, QRD+11*
, QRD+12*, QRD+13*, QRD+14*, QRF+1*, QRF+2*, QRF+3*, QRF+4*
HDR CCBILL+17~, CCBILL+20, CCBILL+22, DSRIN+2~, DSRIN+4
>> HLERR QRYIN+4*
>> HLMSGIEN CCBILL+20*, CCBILL+22, QRYIN+2, QRYIN+3, DSRIN+4
IB3513 DSRIN+2~
IB351IEN MTEQRY+1~, MTEQRY+2*, MTEQRY+3*, MTEQRY+12, CCBILL+3~, CCBILL+11*, CCBILL+35*, CCBILL+39, EN+11*, EN+17!
, QRD+6, QRDQI+4*, DSRIN+10, DSRIN+19, QRDDI+9*, DSPDI+12, DSPDI+16, DSPDI+49, DSPDI+50, DSPDI+51
, DSPDI+52, DSPDI+53, DSPDI+54, DSPDI+56, DSPDI+58, DSPDI+59
>> IB778 MSA1+2*
IB901 DSPDI+1~
IB9011 DSPDI+1~, DSPDI+37*
IB902 DSPDI+1~
IB9021 DSPDI+1~, DSPDI+38*
IB903 DSPDI+1~
IB9031 DSPDI+1~, DSPDI+39*
IB904 DSPDI+1~
IB9041 DSPDI+1~, DSPDI+40*
IBACBCLK CCBILL+2~, EN+2~
IBACTC DSPDI+1~
IBADM CCBILL+2~, EN+2~
IBADM1 CCBILL+3~, CCBILL+11, CCBILL+35, EN+3~, EN+11
IBADMIT MTEQRY~, MTEQRY+2, MTEQRY+6, MTEQRY+8*, MTEQRY+9, CCBILL~, CCBILL+10, EN+2~, QRD+13, QRF+3
, QRDDI+5*, QRDDI+6*, DSPDI+60*, DSPDI+62, DSPDI+63*, DSPDI+67*
IBADTSV DSPDI+2~, DSPDI+60*, DSPDI+67
IBAGG DSRIN+2~, DSRIN+3*
IBC0 CCBILL+3~, EN+3~
IBCBDT DSPDI+2~, DSPDI+50*, DSPDI+56
IBCKNUM DSPDI+1~, DSPDI+45*
>> IBCLDA DSRIN+18, MSA1+1*, DSPDI+10
IBCLDAY1 DSPDI+1~, DSPDI+41*
IBCLDT CCBILL+3~, EN+3~, DSPDI+1~
IBCLDT1 DSPDI+1~, DSPDI+35*, DSPDI+36*
>> IBCLKCHG MTEQRY+12
IBCLNDT QRYIN+13!
>> IBCLSTDT MTEQRY+12
IBCNDT DSPDI+2~
IBCNT CCBILL+28*, CCBILL+33, DSPDI+2~, DSPDI+17*, DSPDI+49, DSPDI+56, DSPDI+57, DSPDI+58, DSPDI+59, DSPDI+61
IBCRTST DSPDI+2~, DSPDI+52*
IBCSTCMT MTEQRY+1~, MTEQRY+12*
>> IBCURIEN MTEQRY+2, MTEQRY+3
IBDA DSPDI+2~
IBDA1 DSPDI+2~, DSPDI+54*, DSPDI+56
IBDAYS DSPDI+2~, DSPDI+53*
IBDISC CCBILL+2~, EN+2~
IBDISCH MTEQRY+1~, MTEQRY+6*, MTEQRY+7*, MTEQRY+10, CCBILL+2~, CCBILL+17~, EN+2~, QRD+14, QRF+4, DSRIN+2~
, QRDDI+7*, QRDDI+8*, DSPDI+61, DSPDI+63*, DSPDI+64*
IBECADM QRYIN+1~, QRYIN+12, QRFQI+1*, QRFQI+2*
>> IBECARY( CCBILL+34*
IBECDA CCBILL+39*, DSRIN+2~, DSRIN+10*, DSRIN+11, DSRIN+12, DSRIN+14, DSRIN+15, DSRIN+16
IBECERR CCBILL+17~, CCBILL+38*, CCBILL+39*, DSRIN+2~, DSRIN+9*, DSRIN+10*, DSRIN+11, DSRIN+13
IBECNIEN CCBILL+17~, CCBILL+39, DSRIN+2~, DSRIN+10, DSPDI+59
IBECVSRN DSRIN+2~, DSRIN+11*, DSRIN+12
IBEDIPI QRYIN+1~, QRDQI+6*
IBERR MTEQRY+5*, MTEQRY+11*, CCBILL+2~, CCBILL+13*, CCBILL+15*, CCBILL+21*, EN+2~, EN+13*, EN+15*, DSRIN+3*
IBERRMSG CCBILL+21*, CCBILL+27*, CCBILL+37, CCBILL+39, CCBILL+40*, DSRIN+2~, DSRIN+10, DSRIN+17*, DSRIN+20, DSPDI+3*
, DSPDI+5*, DSPDI+6*, DSPDI+7*, DSPDI+8*, DSPDI+9, DSPDI+13, DSPDI+14, DSPDI+15*
IBERROR MTEQRY+5*, CCBILL+2~, CCBILL+13*, EN+2~, EN+13*
IBFDA DSRIN+2~
IBFDA(351 DSRIN+12*
>> IBFLAG1 CCBILL+14*, CCBILL+19*, CCBILL+20, CCBILL+37*, CCBILL+41*
IBFVRSN1 CCBILL+31*, DSPDI+2~, DSPDI+29*, DSPDI+30*, DSPDI+58, DSPDI+59
>> IBHDR QRYIN+2
>> IBHDR("MESSAG E TYPE" , QRYIN+5
>> IBI901 DSPDI+21*
>> IBI902 DSPDI+22*
>> IBI903 DSPDI+23*
>> IBI904 DSPDI+24*
IBICKDT DSPDI+1~, DSPDI+32*
IBICLDAY DSPDI+1~, DSPDI+25*
IBICLDT DSPDI+1~, DSPDI+19*, DSPDI+20*, DSPDI+48, DSPDI+55, DSPDI+56
IBICLDTS CCBILL+17~, DSRIN+2~, DSRIN+19*, DSPDI+12*
IBICLNDT DSPDI+2~, DSPDI+26*, DSPDI+31*, DSPDI+32, DSPDI+60, DSPDI+61, DSPDI+63
IBICN MTEQRY+1~, MTEQRY+4*, MTEQRY+5, CCBILL+3~, CCBILL+12*, CCBILL+13, EN+3~, EN+12*, EN+13, QRD+12
, QRDDI+3*, QRDDI+4
IBICNUM DSPDI+1~, DSPDI+46*
IBID CCBILL+17~, DSRIN+2~, DSRIN+18*, DSPDI+10*
IBIEN CCBILL+3~, EN+3~, QRYIN+3*, QRYIN+12
>> IBINST CCBILL+34*
IBISETID DSPDI+2~, DSPDI+18*
IBISITE DSPDI+2~, DSPDI+47*
>> IBISTAT DSPDI+44*
IBISTN CCBILL+29*, CCBILL+31, DSPDI+2~, DSPDI+27*, DSPDI+29
IBIVRSN CCBILL+30*, CCBILL+31, DSPDI+2~, DSPDI+28*, DSPDI+29
IBLIST CCBILL+2~
IBLIST("DILIST" CCBILL+34
IBMES CCBILL+3~, CCBILL+20*
IBMSG CCBILL+17~, CCBILL+20, CCBILL+22, CCBILL+23, QRYIN+2, QRYIN+8, DSRIN+2~, DSRIN+4, DSRIN+5
IBMSG("ACK BY IEN" , CCBILL+20
IBMSG("HDR" MSA1+1
IBOADMIN CCBILL+3~, EN+3~, DSPDI+2~
IBOADMIT MTEQRY+9*, CCBILL+3~, EN+3~, DSPDI+63*
IBODISCH MTEQRY+1~, MTEQRY+10*, CCBILL+3~, EN+3~, DSPDI+2~, DSPDI+64*
>> IBOVERLAP CCBILL+27*
IBQIEN CCBILL+3~, EN+3~
IBQRY DSPDI+2~, DSPDI+62*
IBQRYDT QRYIN+1~, QRDQI+5*, QRDDI+2*
IBQRYS DSPDI+2~, DSPDI+51*
IBSADMIT QRYIN+1~, QRDQI+2*
IBSDISCH QRYIN+1~, QRDQI+3*
IBSEGT CCBILL+3~, CCBILL+23*, CCBILL+24, CCBILL+25, CCBILL+26, QRYIN+8*, QRYIN+9, QRYIN+10, DSRIN+5*, DSRIN+6
, DSRIN+7, DSRIN+8
IBSETID DSPDI+1~
IBSETID1 DSPDI+1~, DSPDI+34*
IBSTAT CCBILL+3~, EN+3~, QRYIN+2*, QRYIN+4
IBSTATION CCBILL+3~, CCBILL+32*, CCBILL+33, EN+3~
IBTFL CCBILL+3~, CCBILL+14*, EN+14*
IBTRYTIL CCBILL+3~, CCBILL+19*
IBVARRY CCBILL+17~, DSRIN+2~
IBVARRY( DSPDI+58*, DSPDI+59*
IBVARRY("" DSRIN+11
ICN QRYIN+1~, QRYIN+11, QRYIN+12, QRDQI+1*
>> IENS DSRIN+12*
MSG CCBILL+2~, EN+2~, MSH+6*, MSH+8, QRD+15, QRF+5, SENDQRY+5
MSG("IEN" CCBILL+20
NAME CCBILL+2~, EN+2~, QRD+9*, QRD+10, QRD+11
PARMS CCBILL+2~, EN+2~, MSH+1~, MSH+8, SENDQRY+5
PARMS("COUNTRY" MSH+2*
PARMS("EVENT" MSH+4*
PARMS("MESSAG E STRUCTURE" , MSH+7*, E TYPE" , MSH+3*
PARMS("SENDIN G APPLICATION" , SENDQRY+1*
PARMS("VERSION" MSH+5*
QRYNUM CCBILL+2~, EN+2~
SEG CCBILL+2~, CCBILL+17~, CCBILL+23, CCBILL+27, CCBILL+28, CCBILL+29, CCBILL+30, CCBILL+32, EN+2~, QRD+1
, QRD+3, QRD+4, QRD+5, QRD+6, QRD+8, QRD+10, QRD+11, QRD+12, QRD+13, QRD+14
, QRD+15, QRF+1, QRF+2, QRF+3, QRF+4, QRF+5, QRYIN+8, QRDQI+1, QRDQI+2, QRDQI+3
, QRDQI+4, QRDQI+5, QRDQI+6, QRFQI+1, DSRIN+2~, DSRIN+5, MSA1+2, QRDDI+2, QRDDI+3, QRDDI+5
, QRDDI+7, QRDDI+9, DSPDI+3, DSPDI+17, DSPDI+18, DSPDI+19, DSPDI+21, DSPDI+22, DSPDI+23, DSPDI+24
, DSPDI+25, DSPDI+26, DSPDI+27, DSPDI+28, DSPDI+34, DSPDI+35, DSPDI+37, DSPDI+38, DSPDI+39, DSPDI+40
, DSPDI+41, DSPDI+44, DSPDI+45, DSPDI+46, DSPDI+47, DSPDI+65!
SEG("SEGMENT TYPE" , CCBILL+23, QRYIN+8, DSRIN+5
U DSPDI+62
VALUE CCBILL+2~, EN+2~, QRD+1*, QRD+3*, QRD+4*, QRD+5*, QRD+6*, QRD+8*, QRD+10*, QRD+11*
, QRD+12*, QRD+13*, QRD+14*, QRF+1*, QRF+2*, QRF+3*, QRF+4*
WHOTO CCBILL+2~, EN+2~, SENDQRY+5
WHOTO("MIDDLE WARE LINK NAME" , SENDQRY+4*
WHOTO("RECEIV ING APPLICATION" , SENDQRY+2*
WHOTO("STATIO N NUMBER" , SENDQRY+3*
X CCBILL+2~, EN+2~, MSH+8*, QRD+15*, QRF+5*
XXX CCBILL+2~, CCBILL+17~, CCBILL+22*, EN+2~, SENDQRY+5*, DSRIN+2~, DSRIN+4*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All