©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
LRHYBLD ;VA/DALOI/HOAK - PRINT ORDER LABELS FOR HOWDY ; 13-Aug-2013 09:16 ; MKK
Source file <LRHYBLD.m>
| Package | Total | Call Graph |
|---|---|---|
| Lab Service | 2 | ^LRHYBL1 ($$Y2K,PT)^LRX |
| Kernel | 1 | ^%ZTLOAD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BC | ;
|
|
| BACK | ;
; after task come back here |
|
| INIT | ;
|
|
| ENT | ;
; Howdy routine for printing order labels ; Make sure printer is ID'd sufficiently |
|
| TST | ;
|
|
| ID |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZIS(1 - [#3.5] | ID+1 |
| ^%ZIS(2 - [#3.2] | BC+1, BC+2 |
| ^%ZOSF("TEST" | BACK+11 |
| ^LAB(60 - [#60] | INIT+11 |
| ^LAB(62 - [#62] | INIT+10 |
| ^LAB(69.9 - [#69.9] | BACK+6, BACK+11 |
| ^LRHY(69.86 - [#69.86] | BACK+8 |
| ^LRO(69 - [#69] | INIT+2, INIT+9 |
| Name | Line Occurrences |
|---|---|
| @( | INIT+17 |
| INIT | TST+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("BAR0" | BC+1 |
| ^("BAR1" | BC+2 |
| ^(3 | BACK+6, BACK+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| IO | BC+3 |
| IOST(0 | BC+1, BC+2 |
| >> LR3DTN | INIT+1, INIT+2, INIT+9 |
| >> LR3SN | INIT+2, INIT+9 |
| >> LRACC | INIT+6* |
| >> LRAN | INIT+3* |
| LRBAR | BC+3!, TST+3! |
| >> LRBAR0 | BC+1* |
| >> LRBAR1 | BC+2* |
| >> LRCE | INIT+8* |
| >> LRDAT | INIT+1* |
| >> LRDEV | ID+1 |
| LRDPF | INIT+1! |
| >> LRHYSITE | BACK+8 |
| >> LRINFW | INIT+7* |
| LRLABEL | BACK+6*, BACK+8*, BACK+11*, TST+3!, INIT+17 |
| LRLABLIO | ID, ID+1*, ID+2*, ID+3*, ID+7, BC+3*, TST+3! |
| >> LRLABSTP | ID+2 |
| >> LRLLOC | INIT+16* |
| >> LRORD | INIT+2*, INIT+3, INIT+4, INIT+6, INIT+8 |
| >> LRPREF | INIT+5* |
| >> LRTNM | INIT+11*, INIT+14, INIT+15 |
| >> LRTOP | INIT+15* |
| >> LRTS( | INIT+15* |
| >> LRTST | TST+1*, INIT+11, INIT+15 |
| >> LRTSTS | TST+1 |
| >> LRTUBE | INIT+9*, INIT+10*, INIT+15 |
| >> LRTXT | INIT+14* |
| >> LRUID | INIT+4* |
| >> LRURG | INIT+13* |
| >> LRURGA | INIT+12* |
| >> LRURGT | INIT+11*, INIT+12, INIT+13 |
| >> LRXL | INIT+5* |
| PNM | INIT+1! |
| SSN | INIT+1! |
| U | ID+1, BACK+6, BACK+11, INIT+9, INIT+10, INIT+11 |
| X | BACK+11~* |
| >> ZTDESC | ID+6* |
| >> ZTDTH | ID+6* |
| >> ZTIO | ID+7* |
| ZTQUEUED | ID+8, BACK+4, TST+3! |
| ZTREQ | ID+8*, BACK+4*, TST+3! |
| >> ZTRTN | ID+6* |
| >> ZTSAVE("LR*" | ID+7* |