PSXRXQU ;BIR/BAB,WPB-CMOP RX QUEUE File Utility ;22 Feb 2002 3:24 PM
Source file <PSXRXQU.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PURGE | ;Purge 550.1 of any entries w/Message Status "IN TRANSITION"
|
|
| NEWMSG | ;Increment & create entry in RX QUEUE file, put pid/demog in 'T' ; return PSXMSG, PSX=3
|
|
| MSH | ; build patients MSH HL7 segment
|
|
| PID | ; build patients PID HL7 segment
|
|
| LOADMSG | ; set RXs HL7 text into PSXMSG 'T', set PSXBAT 1////1
|
|
| QMSG | ;Queue message for transmission
|
|
| ACKN | ;Flag message as Acknowledged
|
|
| PROC | ;Flag message as Processed
|
|
| STAT | ;Display status of CMOP RX QUEUE
|
|
| SUSP | ; put RXs ien int 550.1 RX multiple
|
|
| RXMSG | ; put RX ien into 550.1 RX multiple , returns PSXRXMDA DA within 'M'essage multiple
|
|
| SET | ;
|
|
| STRIP(X) | ;EP Strip control characters out and replace with " "
; $A(124) = Pipe Character '|' |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PSX(550.1 - [#550.1] | Classic Fileman Calls |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | NEWMSG+4 |
| BEG | ACKN+1! |
| DA | PURGE+1*, PURGE+2!, QMSG+1*, QMSG+2!, SET+2*, SET+3! |
| DA(1 | SET+2* |
| DD | NEWMSG+4!, SET+1! |
| >> DFN | PID+6, PID+8, PID+12 |
| DIC | NEWMSG+4*, NEWMSG+5!, SET+1!, SET+2*, SET+3! |
| DIC("DR" | NEWMSG+4*, SET+2*, SET+3! |
| DIC(0 | NEWMSG+4*, SET+2* |
| DIE | QMSG+1*, QMSG+2! |
| DIK | PURGE+1*, PURGE+2! |
| >> DLAYGO | NEWMSG+4* |
| DO | NEWMSG+4!, SET+1! |
| DR | QMSG+1*, QMSG+2! |
| DTOUT | NEWMSG+5! |
| DUOUT | NEWMSG+5! |
| I | MSH+4*, STRIP+2~, STRIP+3* |
| MSG | PURGE+1*, PURGE+2! |
| >> PSSWSITE | PID+9 |
| >> PSX | LOADMSG+1*, LOADMSG+2*, LOADMSG+4*, LOADMSG+7*, LOADMSG+8 |
| PSX1 | STAT+1~*, STAT+2*, STAT+3, STAT+4 |
| PSX2 | STAT+1~, STAT+2*, STAT+3 |
| PSXICN | PID+12*, PID+13*, PID+14*, PID+15*, PID+16! |
| PSXLANG | PID+6*, PID+7*, PID+8*, PID+9*, PID+10! |
| >> PSXMSG | NEWMSG+3*, MSH+2, PID+1, PID+4, PID+10, PID+16, PID+20, LOADMSG+2, LOADMSG+4, LOADMSG+7 , LOADMSG+8, QMSG+1, RXMSG+1, SET+2 |
| >> PSXNM | PID+1 |
| PSXORD | LOADMSG+6, QMSG+2! |
| PSXORD( | LOADMSG+7 |
| PSXORD("E" | LOADMSG+4, LOADMSG+5! |
| PSXORD("M" | LOADMSG+2, LOADMSG+3! |
| >> PSXRXMDA | SET+4* |
| PSXTS | MSH+2! |
| >> RX | SET+2 |
| >> RXF | SET+2 |
| TDT | PID+17*, PID+18, PID+19*, PID+20, PID+21! |
| TDT1 | PID+19*, PID+21! |
| TDT2 | PID+19*, PID+21! |
| TDT3 | PID+19*, PID+21! |
| VADM | PID+21!, LOADMSG+9! |
| VADM(2 | MSH+3, PID+1 |
| VAPA | PID+21!, LOADMSG+9! |
| VAPA( | MSH+4*, MSH+5* |
| VAPA(1 | PID+1 |
| VAPA(10 | PID+17 |
| VAPA(11 | PID+1 |
| VAPA(2 | PID+1 |
| VAPA(3 | PID+18, PID+20 |
| VAPA(4 | PID+1 |
| VAPA(5 | PID+1 |
| VAPA(8 | PID+3 |
| X | NEWMSG+3*, LOADMSG+2*, LOADMSG+3!, LOADMSG+4*, LOADMSG+5!, LOADMSG+7*, STAT+1~, SET+2*, SET+3!, STRIP~ , STRIP+3*, STRIP+4 |
| X1 | MSH+3*, PID+1, PID+21!, LOADMSG+9! |
| >> XX | PID+3*, PID+4 |
| >> Y | SET+3, SET+4 |
| YT | MSH+5*, PID+21! |
| Z | STRIP+2~, STRIP+3* |
