PSBMLU ;BIRMINGHAM/EFC - BCMA MEDICATION LOG FUNCTIONS ;6/25/10 6:44am
Source file <PSBMLU.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 |
---|---|---|
EN | ;
|
|
AUDIT(IEN,TXT,PSBTRN) | ; Append and Audit
|
|
ERROR(PSB1,PSB2,DFN,PSB3,PSB4,PSB5,PSB6,PSB7) | ;
; PSB1 = order # ; PSB2 = orderable item ; PSB3 = message to be sent ; PSB4 = schedule ; PSB5 = action date/time ; PSB6 = med log ien # ; PSB7 = user identification ; Send Error Msg about problems |
|
MSFMSG(PSB1,PSB2,PSB3,PSB4,PSB5,PSB6,PSB7,PSB8,XFLG) | ;
; PSB1 = Patient IEN ; PSB2 = Ward Location/Room ; PSB3 = Reason ; PSB4 = Type of Scan Issue ; PSB5 = Event date/time ; PSB6 = User's Comment ; PSB7 = User identification ; PSB8 = Order Number ; XFLG = -1 IF UNSUCCESSFU |
|
CLEANMSF |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PSB(53.79 - [#53.79] | AUDIT+5, AUDIT+6, AUDIT+8, AUDIT+10, AUDIT+12, AUDIT+13, AUDIT+15, AUDIT+16* |
Name | Field # of Occurrence |
---|---|
^(0 | AUDIT+13* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | AUDIT+2 |
DFN | ERROR~, ERROR+18, MSFMSG+23*, MSFMSG+29 |
DUZ | AUDIT+16, MSFMSG+17 |
FL | MSFMSG+47~*, MSFMSG+50 |
IEN | AUDIT~, AUDIT+5, AUDIT+6, AUDIT+8, AUDIT+10, AUDIT+12, AUDIT+13, AUDIT+15, AUDIT+16 |
PSB1 | ERROR~, ERROR+14, ERROR+27!, MSFMSG~, MSFMSG+23 |
PSB2 | ERROR~, ERROR+15, ERROR+27!, MSFMSG~, MSFMSG+13*, MSFMSG+26, MSFMSG+52 |
PSB3 | ERROR~, ERROR+19, ERROR+27!, MSFMSG~, MSFMSG+43 |
PSB4 | ERROR~, ERROR+20, ERROR+27!, MSFMSG~, MSFMSG+27, MSFMSG+28, MSFMSG+52 |
PSB5 | ERROR~, ERROR+21, MSFMSG~, MSFMSG+22 |
PSB6 | ERROR~, ERROR+22, ERROR+24, MSFMSG~, MSFMSG+32, MSFMSG+44*, MSFMSG+45 |
PSB7 | ERROR~, ERROR+23, MSFMSG~, MSFMSG+21 |
PSB8 | MSFMSG~, MSFMSG+25, MSFMSG+29 |
>> PSBAD1 | AUDIT+14*, AUDIT+15*, AUDIT+16 |
PSBADMER | ERROR+9, ERROR+11, ERROR+24, ERROR+25! |
>> PSBDOSE | MSFMSG+39 |
PSBDPT | MSFMSG+23~*, MSFMSG+24 |
PSBDROP | MSFMSG+14!, CLEANMSF! |
PSBDROP( | MSFMSG+60 |
PSBDROP(0 | MSFMSG+17*, MSFMSG+59 |
>> PSBMEDNM | MSFMSG+37, MSFMSG+38, MSFMSG+40 |
>> PSBMEDOI | MSFMSG+38 |
PSBMG | ERROR+9!*, ERROR+10, ERROR+24, ERROR+27!, MSFMSG+11*, MSFMSG+12, MSFMSG+17, MSFMSG+52, MSFMSG+59, MSFMSG+60 , CLEANMSF! |
PSBMSG | ERROR+27!, MSFMSG+56! |
PSBMSG( | MSFMSG+35*, MSFMSG+36*, MSFMSG+38*, MSFMSG+39*, MSFMSG+41*, MSFMSG+42*, MSFMSG+43*, MSFMSG+48*, MSFMSG+50*, MSFMSG+51* |
PSBMSG(1 | ERROR+11*, MSFMSG+19* |
PSBMSG(10 | ERROR+21* |
PSBMSG(11 | ERROR+22* |
PSBMSG(12 | ERROR+23* |
PSBMSG(2 | ERROR+12*, MSFMSG+20* |
PSBMSG(3 | ERROR+13*, MSFMSG+21* |
PSBMSG(4 | ERROR+14*, MSFMSG+22* |
PSBMSG(5 | ERROR+15*, MSFMSG+24* |
PSBMSG(6 | ERROR+17*, MSFMSG+25* |
PSBMSG(7 | ERROR+18*, MSFMSG+26* |
PSBMSG(8 | ERROR+19*, MSFMSG+27* |
PSBMSG(9 | ERROR+20* |
>> PSBOITX | MSFMSG+36, MSFMSG+42 |
>> PSBSFUID | MSFMSG+30, MSFMSG+32*, MSFMSG+33*, MSFMSG+34*, MSFMSG+35, MSFMSG+37, MSFMSG+40 |
PSBTRN | AUDIT~, AUDIT+3, AUDIT+7, AUDIT+9, AUDIT+11 |
PSBX1 | MSFMSG+11*, MSFMSG+35*, MSFMSG+36*, MSFMSG+38*, MSFMSG+39*, MSFMSG+41*, MSFMSG+42*, MSFMSG+43*, MSFMSG+47, MSFMSG+48 , MSFMSG+50*, MSFMSG+51, MSFMSG+56! |
PSBX2 | MSFMSG+45*, MSFMSG+48, MSFMSG+49, MSFMSG+50*, MSFMSG+51, MSFMSG+56! |
PSBX3 | MSFMSG+49*, MSFMSG+50*, MSFMSG+56! |
>> RDAT | AUDIT+2*, AUDIT+6*, AUDIT+8*, AUDIT+10*, AUDIT+12*, AUDIT+16 |
TXT | AUDIT~, AUDIT+16 |
U | AUDIT+6, AUDIT+8, AUDIT+10, AUDIT+12, AUDIT+16 |
VA | ERROR+16~ |
VA("BID" | MSFMSG+23 |
VA("PID" | ERROR+17 |
VADM | ERROR+16~ |
VADM(1 | ERROR+17, MSFMSG+23 |
>> X | MSFMSG+17*, MSFMSG+59*, MSFMSG+60* |
XA | AUDIT+4~, AUDIT+5*, AUDIT+6 |
XFLG | MSFMSG~ |
XFLG(0 | MSFMSG+12* |
XMSUB | ERROR+24*, ERROR+27!, MSFMSG+52*, MSFMSG+56! |
XMTEXT | ERROR+24*, ERROR+27!, MSFMSG+52*, MSFMSG+56! |
XMY | ERROR+27!, MSFMSG+17!, MSFMSG+56!, MSFMSG+59, MSFMSG+60, CLEANMSF! |
XMY( | MSFMSG+17*, MSFMSG+59*, MSFMSG+60* |
XMY("G." | ERROR+24*, MSFMSG+52* |
>> XX | MSFMSG+60* |