©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
LRSRVR2A ;VA/DALIO/FHS - LAB DATA SERVER CONT'D RELMA EXTRACT ;JUL 06, 2010 3:14 PM
Source file <LRSRVR2A.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | ^%ZISC ($$FMTE,$$FMTHL7,$$NOW)^XLFDT $$REPEAT^XLFSTR |
| VA Fileman | 2 | $$GET1^DID $$GET1^DIQ |
| Lab Service | 1 | CLEAN^LRSRVR |
| Package | Total | Caller Graph |
|---|---|---|
| Lab Service | 4 | LRSRVR2 LRSRVR3 LRSRVR6 LRSRVR7 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SITENOTE | ; Build site's test notes for first record
|
|
| SUFFIX | ; If Result NLT does not have a suffix, i.e. it has .0000 then check for suffixed NLT codes which can also be used
|
|
| SYNNOTE | ; Build site's test synonym's for first record
|
|
| CLEAN | ;
|
|
| UUBEGFN(LRFILENM) | ; Construct uuencode "begin" coding
; Call with LRFILENM = name of uuencoded file attachment ; ; Returns LRX = string with "begin..."_file name |
|
| HDR | ; Set the header information
|
| FileNo | Call Tags |
|---|---|
| ^LAM - [#64] | GET1^DIQ |
| ^LAB(95.3 - [#95.3] | GET1^DID |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(60 - [#60] | SITENOTE+5, SITENOTE+6, SITENOTE+7, SYNNOTE+4 |
| ^LAB(95.3 - [#95.3] | HDR+4 |
| ^LAM - [#64] | SUFFIX+6 |
| ^TMP($J | CLEAN+1!, HDR+1*, HDR+2*, HDR+3*, HDR+4*, HDR+5*, HDR+6*, HDR+7*, HDR+9*, HDR+13* , HDR+16*, HDR+17*, HDR+20*, HDR+21* |
| Name | Line Occurrences |
|---|---|
| $$UUBEGFN | HDR+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ERR | CLEAN+2! |
| >> I | HDR+6* |
| LA7PCNT | CLEAN+2! |
| LOINCDTA | CLEAN+3! |
| LR60IEN | CLEAN+2!, SITENOTE+5, SITENOTE+6, SITENOTE+7, SYNNOTE+4 |
| LR60NM | CLEAN+2! |
| LR64 | SUFFIX+1~, SUFFIX+5*, SUFFIX+6 |
| LR6421 | CLEAN+2! |
| LR64IEN | CLEAN+2! |
| LRACTION | CLEAN+3! |
| LRCC | CLEAN+3! |
| LRCCNX | CLEAN+3! |
| LRCDEF | CLEAN+3! |
| LREND | CLEAN+3! |
| LRFILENM | HDR+19*, HDR+20, HDR+21, UUBEGFN~, UUBEGFN+6 |
| LRI | SITENOTE+2~, SITENOTE+4*, SITENOTE+5*, SITENOTE+6, SITENOTE+7, SITENOTE+8, SITENOTE+9 |
| LRL | CLEAN+4! |
| LRLNC | CLEAN+4! |
| LRLNC80 | CLEAN+4! |
| LRLNCN | CLEAN+4! |
| LRLNCX | CLEAN+4! |
| LRNODE | CLEAN+4! |
| LROUT | CLEAN+4! |
| LROUT1 | CLEAN+4! |
| LRR64 | CLEAN+4!, SUFFIX+2 |
| LRRNLT | CLEAN+3!, SUFFIX+1~, SUFFIX+2*, SUFFIX+3, SUFFIX+4 |
| LRROOT | SUFFIX+1~, SUFFIX+3*, SUFFIX+4*, SUFFIX+5 |
| LRSPEC | CLEAN+5! |
| LRSPEC( | SUFFIX+6* |
| LRSPEC60 | CLEAN+5!, SUFFIX+6 |
| LRSPECN | CLEAN+5!, SUFFIX+6 |
| LRSPECTA | CLEAN+5!, SUFFIX+6 |
| LRST | CLEAN+5! |
| LRSTN | CLEAN+5!, HDR+1, HDR+19 |
| LRSTNDT | SITENOTE+2~, SITENOTE+6*, SITENOTE+8 |
| LRSTNOTE | SITENOTE+3!, SITENOTE+4*, SITENOTE+10* |
| LRSTNOTE( | SITENOTE+7*, SITENOTE+8*, SITENOTE+9! |
| LRSTR | CLEAN+5! |
| LRSTSYN | CLEAN+5!, SYNNOTE+2!, SYNNOTE+3*, SYNNOTE+4*, SYNNOTE+6* |
| LRSTSYN("B" | SYNNOTE+5! |
| LRSTSYN(0 | SYNNOTE+5! |
| >> LRSUB | HDR+2, HDR+19 |
| LRTA | CLEAN+6! |
| >> LRTXT | HDR+18 |
| LRUNIT | CLEAN+6!, SUFFIX+6 |
| LRX | CLEAN+6!, SUFFIX+1~, UUBEGFN+5~, UUBEGFN+6*, UUBEGFN+7 |
| LRY | CLEAN+6!, SUFFIX+1~ |
| U | SUFFIX+6 |
| X | CLEAN+6!, HDR+8*, HDR+9, HDR+12*, HDR+13, HDR+16 |
| Y | CLEAN+6! |