Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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 ; 01 Jun 2022 7:17 AM

Source Information

Source file <IBECECQ1.m>

Entry Points

Name Comments DBIA/ICR reference
ADM ;Called from IB MEANS TEST BILLING protocol
EDTCLCK(DFN,IBADMIT) ;Called from Billing CLock Maintenance option
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
MSA ;Build MSA Segment (OPTIONAL)
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
DSROUT(ICN,IBIEN,IBADMIT) ;MAIN ENTRY POINT - Outgoing DSR message
; IBIEN - Query Request Message IEN (#778) that initiated this response
; ------ Sample message ----
MSHO
MSAO
QRDO
DSPO
SENDDSR ;
ERR1(IBERRMSG) ;HANDLE ERROR RESPONSES
UDCL ;Update original billing clock so nightly querys are not sent for patients without TFL's

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Running Billing Clock Query, please wait."
  • Line Location: EDTCLCK+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: EDTCLCK+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^IBE(351 - [#351] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call