©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
LRSRVR ;DALOI/RLM/JMC - LAB DATA SERVER ;JUL 06, 2010 3:14 PM
Source file <LRSRVR.m>
| Package | Total | Caller Graph |
|---|---|---|
| Lab Service | 5 | LRSRVR1 LRSRVR2A LRSRVR3 LRSRVR6 LRSRVR7 |
| IHS Lab LOINC Surveillance | 1 | BLSLNCPM |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CSUM | ;Calculate checksum for routines and transmit errors to LABTEAM group
|
|
| START | ;
|
|
| SUMLST | ;Calculate checksum for routines and transmit to requestor
|
|
| EXIT | ; If all went well, report that too.
; Mail the errors and successes back to the Roll-Up group at Forum. |
|
| CLEAN | ; Cleanup and exit
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("RSUM" | CSUM+1, CSUM+7, SUMLST+12 |
| ^%ZOSF("TEST" | CSUM+6, SUMLST+9 |
| ^LAB(69.91 - [#69.91] | CSUM+3, CSUM+4, CSUM+5 |
| ^TMP($J | START+6!, START+17*, START+19*, CLEAN+1, CLEAN+18!, CSUM+1*, CSUM+6*, CSUM+7*, SUMLST+1!, SUMLST+3* , SUMLST+9*, SUMLST+12* |
| Name | Line Occurrences |
|---|---|
| CSUM | START+23 |
| EXIT | CSUM+9, SUMLST+15 |
| SUMLST | START+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CLEAN+12! |
| %DT | CLEAN+12! |
| %H | CLEAN+12! |
| D | CLEAN+12! |
| DD | CLEAN+12! |
| DIC | CLEAN+12! |
| DIERR | CLEAN+12! |
| ERROR | CLEAN+12! |
| FILL | CLEAN+12!, SUMLST+2*, SUMLST+9, SUMLST+12 |
| LINE | CLEAN+12!, SUMLST+2*, SUMLST+9*, SUMLST+12* |
| >> LINR | SUMLST+2* |
| LOINCDTA | CLEAN+12! |
| LOINCDTB | CLEAN+12! |
| LOINCTAS | CLEAN+12! |
| LRA | CLEAN+13!, CSUM+5*, CSUM+7 |
| LRAA | CLEAN+13! |
| LRACTION | START+18*, START+19, CLEAN+13! |
| LRB | CLEAN+13! |
| LRCLST | CLEAN+13!, SUMLST+2*, SUMLST+3, SUMLST+13 |
| LRDA | CLEAN+13! |
| LRERR | CLEAN+13! |
| LRFOUND | CLEAN+13! |
| LRFOUND1 | CLEAN+13! |
| LRI | CLEAN+13!, CSUM+2*, CSUM+3*, CSUM+4, CSUM+5, CSUM+6, CSUM+7 |
| LRLINE | CLEAN+13! |
| LRNDE | CLEAN+14! |
| LRNOW | EXIT+2~, EXIT+3*, EXIT+4, CLEAN+3 |
| LROUT | CLEAN+14! |
| LRPNT | CLEAN+14! |
| LRPNTA | CLEAN+14! |
| LRPNTB | CLEAN+14! |
| LRRDT | CLEAN+14! |
| LRRN | CLEAN+14! |
| LRROOT | CLEAN+14! |
| LRSITE | START+1~, START+8* |
| LRST | START+1~, START+8*, START+9*, CLEAN+14! |
| LRSTN | START+8*, START+17, START+19, EXIT+4, CLEAN+3, CLEAN+14!, CSUM+1, CSUM+8 |
| LRSUB | START+1~, START+11*, START+17, START+18, START+23, START+26, START+29, START+32, START+33, START+36 , START+41, START+44, CLEAN+14! |
| LRXMZ | START+1~, START+4*, CLEAN+10 |
| X | CLEAN+15!, CSUM+1*, CSUM+4*, CSUM+6, CSUM+7, SUMLST+8*, SUMLST+9, SUMLST+11*, SUMLST+12 |
| XMDUN | EXIT+4*, CLEAN+2*, CLEAN+15! |
| XMDUZ | EXIT+4*, CLEAN+2*, CLEAN+15! |
| XMER | CLEAN+15!, SUMLST+8 |
| XMFROM | START+17, CLEAN+15!, SUMLST+3 |
| XMREC | CLEAN+15!, SUMLST+8 |
| XMRG | CLEAN+15!, SUMLST+8 |
| XMSUB | EXIT+4*, CLEAN+3*, CLEAN+15!, CSUM+8*, SUMLST+13* |
| XMTEXT | EXIT+5*, CLEAN+4*, CLEAN+15! |
| XMY | START+48!, CLEAN+15! |
| XMY( | START+49*, CLEAN+6*, SUMLST+14* |
| XMZ | START+4, CLEAN+15! |
| XQDATE | START+17, CLEAN+15!, CSUM+8, SUMLST+3, SUMLST+13 |
| XQSND | START+49, CLEAN+6, CLEAN+16!, SUMLST+14 |
| XQSUB | START+11, CLEAN+16! |
| Y | CLEAN+16!, CSUM+1, CSUM+7, SUMLST+12 |
| ZTQUEUED | CLEAN+16!, CLEAN+19 |
| >> ZTREQ | CLEAN+19* |
| ZTSK | CLEAN+16! |
| Name | Field # of Occurrence |
|---|---|
| $T( | CSUM+1 |