HLCSQUE ;ALB/MFK/CJM HL7 UTILITY FUNCTIONS - 10/4/94 11AM ;02/17/2011
Source file <HLCSQUE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENQUEUE(IEN,HLDIR) | ;Assign a message for queue entry
; INPUT: IEN - Internal Entry Number for file 870 - HL7 QUEUE ; HLDIR - Direction of queue (IN/OUT) ; OUTPUT: BEG - Location in the queue to stuff the message ; -1 - Error |
|
EXIT1 | ; Unlock and return results
|
|
DEQUEUE(IEN,HLDIR) | ;Release the next message from the queue
|
|
EXIT2 | ||
CLEARQUE(IEN,HLDIR) | ;Empty an entire queue
; IEN - Entry number for queue - can be name from "B" X-ref ; HLDIR - Can be "IN", "OUT", 1 or 2. ; output: 0 for success ; -1^error for error |
|
PUSH(HLDOUT0,HLDOUT1) | ;-- Place message back on queue
; INPUT - HLDOUT0 IEN of file 870 ; HLDOUT1 IEN of Out Multiple ; OUTPUT- NONE |
|
PUSHQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|