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