©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
BPMU ; IHS/OIT/LJF - IHS CODE CALLED BY MERGE FUNCTION
Source file <BPMU.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ZIS(X,BPMRTN,BPMDESC,BPMVAR,BPMDEV) | ;EP; -- called to select device and send print
|
|
| HRCN(PAT,SITE) | ;EP; return chart number for patient at this site
|
|
| PAUSE | ;EP; -- ask user to press return - no form feed
|
|
| READ(TYPE,PROMPT,DEFAULT,HELP,SCREEN,DIRA) | ;EP; calls reader, returns response
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNPAT - [#9000001] | HRCN+3 |
| Name | Line Occurrences |
|---|---|
| @( | ZIS+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | ZIS+1!, ZIS+5* |
| %ZIS("B" | ZIS+5* |
| BPMDESC | ZIS~, ZIS+8 |
| BPMDEV | ZIS~, ZIS+3, ZIS+5 |
| BPMRTN | ZIS~, ZIS+4, ZIS+8 |
| BPMVAR | ZIS~, ZIS+9 |
| DEFAULT | READ~, READ+6 |
| DIR | READ+1~, PAUSE+1~ |
| DIR("?" | READ+7* |
| DIR("A" | READ+5*, READ+8*, PAUSE+2* |
| DIR("B" | READ+6* |
| DIR("S" | READ+4* |
| DIR(0 | READ+2*, PAUSE+2* |
| DIRA | READ~ |
| DIRA( | READ+8 |
| DIRA(1 | READ+8 |
| DIRUT | READ+1~ |
| >> DLAYGO | READ+3* |
| HELP | READ~, READ+7 |
| >> I | ZIS+9* |
| IO("Q" | ZIS+4, ZIS+8! |
| IOP | ZIS+1! |
| IOST | PAUSE+1 |
| >> J | ZIS+9* |
| PAT | HRCN~, HRCN+2, HRCN+3 |
| >> POP | ZIS+4 |
| PROMPT | READ~, READ+5 |
| SCREEN | READ~, READ+4 |
| SITE | HRCN~, HRCN+2, HRCN+3 |
| TYPE | READ~, READ+2, READ+3 |
| U | READ+3, HRCN+3 |
| X | ZIS~, ZIS+2, ZIS+5 |
| Y | READ+1~, READ+8*, READ+10 |
| >> ZTDESC | ZIS+8* |
| >> ZTDTH | ZIS+3* |
| ZTIO | ZIS+1!, ZIS+3* |
| >> ZTRTN | ZIS+8* |
| >> ZTSAVE( | ZIS+9* |
| ZTSK | ZIS+10! |