©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
BOPTU ;IHS/ILC/CAP - ILC RX - Utility Subroutines;26-Jan-2006 08:58;SM
Source file <BOPTU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VITCHT(VAL) | ; EP
|
|
| VITCWT(VAL) | ; EP
|
|
| INTFACE(X) | ;EP - Return which intererface is being used
; if none there default pyxis ; 'X' is the internal site number |
|
| VITAL(DFN,TYP) | ; EP
|
|
| SITE(X) | ;EP - Return BOP Site, Room Decoding Code
|
|
| VITDT(VAL) | ; EP
|
|
| FORMU(BOPA) | ;EP - ef value = 'Y' if formulary, ='N' if else
|
| Name | Field # of Occurrence |
|---|---|
| $$FMTE^XLFDT | VITDT+1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVMSR - [#9000010.01] | VITAL+8 |
| ^AUPNVMSR("AA" | VITAL+4, VITAL+6 |
| ^AUPNVSIT - [#9000010] | VITAL+9 |
| ^AUTTMSR("B" | VITAL+2 |
| ^BOP(90355 - [#90355] | SITE+10, SITE+15*, INTFACE+4 |
| ^BOP(90355.1 - [#90355.1] | FORMU+1 |
| ^XMB("NETNAME" | SITE+11 |
| Name | Field # of Occurrence |
|---|---|
| ^( | SITE+10 |
| ^(12 | VITAL+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | INTFACE+4~* |
| B | INTFACE+4~*, INTFACE+5 |
| BOPA | FORMU~, FORMU+1 |
| >> C | SITE+10*, SITE+15 |
| DAT | VITAL+1~, VITAL+8*, VITAL+9*, VITAL+10 |
| DFN | VITAL~, VITAL+4, VITAL+6 |
| IDT | VITAL+1~, VITAL+4*, VITAL+5, VITAL+6 |
| IEN | VITAL+1~, VITAL+6*, VITAL+7, VITAL+8, VITAL+10 |
| TYP | VITAL~, VITAL+2*, VITAL+3, VITAL+4, VITAL+6 |
| U | SITE+11, SITE+12, SITE+17, VITAL+9, VITAL+10 |
| VAL | VITCHT~, VITCHT+1, VITCWT~, VITCWT+1, VITDT~, VITDT+1 |
| VIS | VITAL+1~ |
| X | SITE~, SITE+17, INTFACE~, INTFACE+4, VITAL+8*, VITAL+9, VITAL+10 |
| >> Y | SITE+10*, SITE+11*, SITE+12*, SITE+15, SITE+17 |
| >> Z | SITE+10*, SITE+15 |