PSOHLDS ;BIR/PWC-HL7 V.2.4 AUTOMATED DISPENSE INTERFACE ;03/01/96 09:45
Source file <PSOHLDS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INIT | ;initialize variables and build outgoing message
|
|
| LOGMSG | ;build status of message in log file (#52.51)
|
|
| LOGBLD | ;audit log file #52.51
|
|
| UFILE | ||
| EXIT | ||
| ERRMSG | ||
| ACK | ;process MSA received from the dispense machine (client)
|
|
| EXT | ;
|
|
| ACK1 | ;
|
|
| ACK2 | ||
| ALERT | ;send alert to key holders
|
|
| UDFILE | ;updates from vendor
|
|
| FACK1 | ;
|
|
| FACK2 | ;
|
|
| GETDEV | ;get devices associated with dispensing printer
|
|
| CHKCAT | ;checks the ADD category to determine if and where the prescription should be routed.
|
|
| STRAGE | ;set HL7 entries in ^TMP global to be sent to the storage device.
|
|
| MORSTG | ;if more than one storage device is defined, add the others to the ^TMP global
|
|
| ADDCHK(DEV) | ;check ADD in file #52.53 and return status and the zero node
; 1 - valid or 0 - invalid |
|
| ALLADD | ;get all active ADDs in #52.53
; OPNAM(dns)=dns name |
|
| ACLOG | ;activity log (HL7 message transmitted to the interface)
|
|
| RTE() | ;get RX route
|
| HL7 Protocol Name | Call Tags |
|---|---|
| PSO EXT SERVER | ACK |
| PSO DISP CLIENT | ACK |
| FileNo | Call Tags |
|---|---|
| ^PS(52.51 - [#52.51] | Classic Fileman Calls, GET1^DIQ |
| ^PS(59 - [#59] | GET1^DIQ |
