IBECECQ1 ;BSL/DVA-BILLING - SEND/RECEIVE QRY & DSR HL7 messages FOR PATIENT ACCUMULATOR INTERFACE ; 01 Jun 2022 7:17 AM
Source file <IBECECQ1.m>
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
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^IBE(351 - [#351] | GET1^DIQ |