©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PSBMLU ;BIRMINGHAM/EFC - BCMA MEDICATION LOG FUNCTIONS ;6/25/10 6:44am
Source file <PSBMLU.m>
| Package | Total | Call Graph |
|---|---|---|
| MailMan | 3 | ($$DM,$$MG)^XMBGRP ^XMD $$MEMBER^XMXAPIG |
| VA Fileman | 2 | NOW^%DTC $$GET1^DIQ |
| Barcode Medication Administration | 1 | (CLEAN,PSJ1)^PSBVT |
| Registration | 1 | DEM^VADPT |
| Toolkit | 1 | $$GET^XPAR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CLEANMSF | ||
| EN | ;
|
|
| 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 |
|
| 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 |
| 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* |