LRSRVR9 ;BPFO/DTG - LAB NTRT DATA SERVER CONT'D MISSING VUID EXTRACT ;02/10/2016
Source file <LRSRVR9.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Lab Service | 2 | LR NDS MLTF EXTRACT LRSRVR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Called by option [LR NTRT MLTF EXTRACT]
; Entry point for the option - user must capture output |
|
SERVER | ; Server entry Point
|
|
BUILD | ; Build extract
|
|
TEST | ; Pull out test info
|
|
TESTGOOD | ;
|
|
SPEC | ; Check each specimen for this test
|
|
SPECLOOP | ; Check to see if specimen has been linked to LOINC
|
|
NOSPEC | ; for test without specimens
|
|
NOSPEC1 | ; Process site notes
|
|
WRT | ; Set ^TMP( with extracted data
|
|
SETDATA | ; Set data into report structure
|
|
SYNNOTE | ; Build site's test synonym's for first record
|
|
MICRO(LR64) | ;
|
|
GET664 | ; get file 66.4 info
|
Name | Field # of Occurrence |
---|---|
WAIT^DICD | EN+6 |
$$GET1^DIQ | BUILD+24, BUILD+26, BUILD+30, SPEC+12, SPECLOOP+9, SPECLOOP+10, SPECLOOP+11, SPECLOOP+13, SPECLOOP+14, SPECLOOP+16 , SPECLOOP+17, SPECLOOP+18, SPECLOOP+24, SPECLOOP+25, NOSPEC+8, NOSPEC+12, NOSPEC+14, WRT+11, WRT+14, WRT+18 , WRT+66, MICRO+16, MICRO+22 |
GETS^DIQ | MICRO+3, MICRO+4, GET664+3 |
^DIR | EN+4 |
$$TSTTYP^LRSRVR9A | NOSPEC+14, WRT+18 |
$$UUEN^LRSRVR9A | BUILD+39 |
CLEAN^LRSRVR9A | EN+14, SERVER+6 |
ENCODE^LRSRVR9A | SETDATA+3 |
HDR^LRSRVR9A | BUILD+13 |
MAILSEND^LRSRVR9A | SERVER+5 |
SITENOTE^LRSRVR9A | SPEC+3 |
SUFFIX^LRSRVR9A | SPEC+12 |
UNWIND^LRSRVR9A | TESTGOOD+7 |
$$SITE^VASITE | BUILD+7, GET664+1 |
$$HTE^XLFDT | SERVER+4 |
$$TRIM^XLFSTR | TEST+4, TESTGOOD+2, SPECLOOP+6 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^LAB(60 - [#60] | GET1^DIQ |
60.01 | GET1^DIQ |
^LAB(62.06 - [#62.06] | GET1^DIQ |
^LAM - [#64] | GET1^DIQ, GETS^DIQ |
^LAB(64.061 - [#64.061] | GET1^DIQ |
^LAB(64.21 - [#64.21] | GET1^DIQ |
^LRMLTF - [#66.3] | GET1^DIQ |
^LAB(66.4 - [#66.4] | GETS^DIQ |
^LAB(95.3 - [#95.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | TEST+5, TEST+10, TEST+11, TESTGOOD+5, TESTGOOD+6, TESTGOOD+11, TESTGOOD+12, TESTGOOD+16, TESTGOOD+18, TESTGOOD+24 , SPEC+6, SPEC+7, SPEC+8, WRT+21, WRT+25, SYNNOTE+4 |
^LAB(61 - [#61] | SPEC+9 |
^LAB(62.06 - [#62.06] | BUILD+23 |
^LAB(66.4 - [#66.4] | GET664+2 |
^LAB(95.3 - [#95.3] | MICRO+13 |
^LAM - [#64] | SPECLOOP+20, SPECLOOP+22, SPECLOOP+23 |
^TMP($J | EN+13, BUILD+10!, BUILD+38, BUILD+39*, BUILD+40*, BUILD+41*, BUILD+43*, BUILD+44*, BUILD+45*, BUILD+46* , BUILD+47*, BUILD+48*, TESTGOOD+10, TESTGOOD+21, NOSPEC+2*, WRT+5*, SETDATA+1, SETDATA+2* |
Name | Line Occurrences |
---|---|
$$MICRO | BUILD+25 |
BUILD | EN+10, SERVER+3 |
GET664 | BUILD+4 |
NOSPEC | SPEC+13 |
NOSPEC1 | NOSPEC+35 |
SETDATA | BUILD+33, NOSPEC+35, NOSPEC+36, NOSPEC+40, NOSPEC1+3, WRT+30, WRT+34, WRT+40, WRT+42, WRT+50 , WRT+53, WRT+57, WRT+61, WRT+64, WRT+78 |
SPEC | TESTGOOD+19, TESTGOOD+25 |
SPECLOOP | SPEC+14 |
SYNNOTE | SPEC+4 |
TEST | BUILD+19 |
TESTGOOD | TEST+12 |
WRT | SPECLOOP+26 |
Name | Field # of Occurrence |
---|---|
^( | EN+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
A | BUILD+2~, TEST+11*, TEST+12 |
AA | NOSPEC+1~, NOSPEC+33*, NOSPEC+34*, NOSPEC+35, NOSPEC+44!, NOSPEC1+2 |
AAA | SPECLOOP+2~, SPECLOOP+8*, SPECLOOP+9, SPECLOOP+11, SPECLOOP+15*, SPECLOOP+16, SPECLOOP+17, SPECLOOP+18 |
AR | BUILD+2~, GET664+4! |
AR("66.4" | GET664+4 |
BB | NOSPEC+1~, NOSPEC+34*, NOSPEC+36, NOSPEC+44! |
CC | NOSPEC1+1~, NOSPEC1+2*, NOSPEC1+5! |
DD | NOSPEC1+1~, NOSPEC1+2*, NOSPEC1+3, NOSPEC1+5! |
DIR | EN+2~ |
DIR("A" | EN+3* |
DIR("B" | EN+3* |
DIR(0 | EN+3* |
DIRUT | EN+2~, EN+5 |
ERR | TEST+2! |
I | SERVER+1~, BUILD+1~, BUILD+12* |
II | NOSPEC+1~, NOSPEC+5*, NOSPEC+44! |
III | NOSPEC+1~, NOSPEC+19*, NOSPEC+21, NOSPEC+27*, NOSPEC+44! |
LA7TREE | BUILD+2~, TEST+1~ |
LA7TREE( | TESTGOOD+9 |
LOINCDTB | MICRO+1~ |
LOINCDTB(64 | MICRO+5, MICRO+8, MICRO+9, MICRO+12, MICRO+13, MICRO+20, MICRO+21 |
LR60 | TEST+1~, TESTGOOD+8*, TESTGOOD+9*, TESTGOOD+10, TESTGOOD+11 |
LR60IEN | BUILD+3~, TEST+3*, TEST+5, TEST+10, TEST+11, TESTGOOD+1, TESTGOOD+5, TESTGOOD+6, TESTGOOD+7, TESTGOOD+11* , TESTGOOD+12, TESTGOOD+16, TESTGOOD+18, TESTGOOD+21, TESTGOOD+24, SPEC+6, SPEC+7, SPEC+8, SPECLOOP+8, SPECLOOP+15 , NOSPEC+2, NOSPEC+8, NOSPEC+9, NOSPEC+12, NOSPEC+14, WRT+5, WRT+7, WRT+14, WRT+18, WRT+21 , WRT+25, SYNNOTE+4 |
LR60NM | BUILD+3~, TEST+3*, TEST+4*, TESTGOOD+1, TESTGOOD+11*, NOSPEC+10, WRT+8 |
LR6206 | BUILD+1~, BUILD+22*, BUILD+23*, BUILD+24, BUILD+26, BUILD+31, MICRO+16 |
LR64 | BUILD+1~, BUILD+24*, BUILD+25, BUILD+30, BUILD+31, SPECLOOP+2~, SPECLOOP+6*, SPECLOOP+12, SPECLOOP+13, SPECLOOP+14 , SPECLOOP+20, SPECLOOP+22, SPECLOOP+23, WRT+66, WRT+83, MICRO~, MICRO+3, MICRO+4 |
LR6421 | SPECLOOP+2~, SPECLOOP+7*, SPECLOOP+14*, WRT+11, MICRO+1~, MICRO+21*, MICRO+22 |
LRBATTY | TEST+1~, TESTGOOD+1*, TESTGOOD+2*, WRT+8 |
LRBATTYN | TEST+1~, TESTGOOD+1*, WRT+8 |
LRCDEF | BUILD+3~, SPEC+2* |
LRCNT | EN+2~, SERVER+1~, BUILD+1~, BUILD+11*, BUILD+33*, BUILD+43, NOSPEC+42*, WRT+80* |
LRCNT( | BUILD+12* |
LRCNT(0 | BUILD+44, NOSPEC+42*, WRT+80* |
LRCNT(1 | BUILD+45, WRT+81* |
LRCNT(2 | BUILD+47, WRT+83* |
LRCNT(3 | BUILD+33*, BUILD+48 |
LRCNT(4 | BUILD+46, WRT+82* |
LRCREATE | BUILD+3~, SPECLOOP+16* |
LRCRLF | BUILD+1~, BUILD+11*, BUILD+32, NOSPEC+39, WRT+77 |
LREN | WRT+1~ |
LREND | EN+2~, SERVER+1~ |
LREXPY | BUILD+3~, SPECLOOP+17* |
LRINACT | BUILD+3~, SPECLOOP+18* |
LRINDX | SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+4*, SPECLOOP+5, WRT+7 |
LRJ | NOSPEC+18*, NOSPEC+19*, NOSPEC+20, NOSPEC+26*, NOSPEC+27*, WRT+1~, WRT+31*, WRT+32*, WRT+33, WRT+41* , WRT+42* |
LRL | EN+12*, EN+13*, SERVER+1~ |
LRLEN | BUILD+1~ |
LRLNC | BUILD+3~, SPEC+2*, SPECLOOP+7*, SPECLOOP+24*, WRT+8, WRT+82 |
LRLNC80 | BUILD+3~, SPEC+2* |
LRLNCN | BUILD+3~, SPEC+2* |
LRLNCX | BUILD+3~, SPEC+2* |
LRLNTA | SPECLOOP+2~, SPECLOOP+6*, SPECLOOP+20, SPECLOOP+23*, SPECLOOP+25 |
LRMISP | BUILD+2~, BUILD+6*, BUILD+27, SPEC+13, WRT+74 |
LRMSUBJ | SERVER+1~, SERVER+4*, SERVER+5 |
LRNODE | BUILD+3~, BUILD+38*, BUILD+39*, BUILD+40, BUILD+41, SETDATA+1*, SETDATA+2* |
LRNOS | NOSPEC+1~, NOSPEC+3*, NOSPEC+4, NOSPEC+5, NOSPEC+6, NOSPEC+7, NOSPEC+9, NOSPEC+10, NOSPEC+12, NOSPEC+14 , NOSPEC+21, NOSPEC+27, NOSPEC+31, NOSPEC+33, NOSPEC+34, NOSPEC+43, NOSPEC+44!, NOSPEC1+2 |
LRNT | BUILD+2~, GET664+2*, GET664+3, GET664+4 |
LRNTI | BUILD+2~, GET664+4* |
LRNTI( | BUILD+8 |
LROUT | TEST+2!, SPEC+1! |
LRPNTB | MICRO+1~, MICRO+5*, MICRO+8, MICRO+9, MICRO+12, MICRO+13, MICRO+20, MICRO+21 |
LRQUIT | BUILD+1~, WRT+1~ |
LRR64 | BUILD+3~, TESTGOOD+18*, TESTGOOD+24*, SPEC+11, SPEC+12 |
LRRNLT | SPECLOOP+2~, SPECLOOP+7*, SPECLOOP+13*, WRT+8 |
LRROOT | BUILD+1~, BUILD+16*, BUILD+17*, BUILD+18, TEST+3 |
LRSCREATE | SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+7*, WRT+71 |
LRSPEC | TEST+2!, SPEC+1!, SPEC+2*, SPECLOOP+6*, SPECLOOP+9, SPECLOOP+11, SPECLOOP+16, SPECLOOP+17, SPECLOOP+18, SPECLOOP+20 , SPECLOOP+21, SPECLOOP+22, SPECLOOP+23, WRT+21, WRT+25 |
LRSPEC( | SPEC+11*, SPECLOOP+4, SPECLOOP+5 |
LRSPEC60 | BUILD+3~, SPEC+5*, SPEC+6*, SPEC+7, SPEC+8, SPEC+9, SPEC+11 |
LRSPECCT | BUILD+3~, SPEC+5*, SPEC+6*, SPEC+13 |
LRSPECN | BUILD+3~, SPEC+2*, SPEC+10*, SPEC+11, SPECLOOP+6*, WRT+8 |
LRSPECTA | BUILD+3~, SPEC+10*, SPEC+11 |
LRSS | BUILD+1~, BUILD+22*, NOSPEC+1~, NOSPEC+8*, NOSPEC+14, WRT+1~, WRT+14*, WRT+15, WRT+17, WRT+18 , MICRO+19 |
LRST | EN+2~, SERVER+4, BUILD+7*, BUILD+9*, BUILD+31, TESTGOOD+1, NOSPEC+9, WRT+7 |
LRSTN | EN+2~, SERVER+4, BUILD+7* |
LRSTNOTE | BUILD+1~, NOSPEC+16, NOSPEC+22*, WRT+29, WRT+35* |
LRSTR | BUILD+1~, BUILD+11*, BUILD+31*, BUILD+32*, BUILD+39, NOSPEC+33*, NOSPEC+36*, NOSPEC+38*, NOSPEC+39*, NOSPEC1+3* , NOSPEC1+4*, WRT+7*, WRT+8*, WRT+11*, WRT+15*, WRT+17*, WRT+18*, WRT+23*, WRT+26*, WRT+34* , WRT+36*, WRT+42*, WRT+46*, WRT+50*, WRT+51*, WRT+53*, WRT+54*, WRT+57*, WRT+58*, WRT+61* , WRT+62*, WRT+66*, WRT+67*, WRT+69*, WRT+71*, WRT+74*, WRT+77*, SETDATA+2*, SETDATA+3 |
LRSTSYN | NOSPEC+25, NOSPEC+28*, WRT+39, WRT+43*, SYNNOTE+2!, SYNNOTE+3*, SYNNOTE+4*, SYNNOTE+6* |
LRSTSYN("B" | SYNNOTE+5! |
LRSTSYN(0 | SYNNOTE+5! |
LRSTUB | BUILD+1~, BUILD+27*, BUILD+28*, BUILD+29*, BUILD+30*, BUILD+31, MICRO+1~, MICRO+2*, MICRO+5, MICRO+8* , MICRO+9*, MICRO+12*, MICRO+13*, MICRO+16*, MICRO+19*, MICRO+22*, MICRO+24 |
LRSUB | EN+2~, EN+9*, EN+15! |
LRSUBMIT | SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+7*, SPECLOOP+11*, WRT+69 |
LRSUBSCRIPT | BUILD+2~, BUILD+8* |
LRTA | SPECLOOP+2~, SPECLOOP+7*, SPECLOOP+25*, WRT+8 |
LRTSTTYP | TEST+1~, TEST+5*, TEST+8, TESTGOOD+12*, TESTGOOD+14, NOSPEC+31, WRT+46 |
LRTXT | EN+2~, EN+9*, SERVER+1~, SERVER+2*, BUILD+32, BUILD+37, NOSPEC+39, WRT+77, SETDATA+2, SETDATA+3 |
LRTYPER | BUILD+2~, TEST+10*, TEST+12, TEST+13, TEST+14 |
LRUNIT | BUILD+3~, SPEC+2*, SPEC+8*, SPEC+11, SPECLOOP+6*, WRT+8 |
LRVAL | EN+2~, BUILD+1~, BUILD+7* |
LRVLOINC | BUILD+2~, SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+7*, SPECLOOP+10*, WRT+52, WRT+53 |
LRVUID | SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+7*, SPECLOOP+9*, SPECLOOP+10, WRT+49, WRT+50, WRT+81 |
LRVUIDAN | SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+7*, SPECLOOP+10*, WRT+59, WRT+61 |
LRVUIDN | SPECLOOP+2~, SPECLOOP+3*, SPECLOOP+7*, SPECLOOP+10*, WRT+55, WRT+57 |
LRX | SERVER+1~, BUILD+25*, BUILD+26*, BUILD+28, BUILD+29, SPECLOOP+2~, SPECLOOP+19*, SPECLOOP+20*, SPECLOOP+21, SPECLOOP+23* , SPECLOOP+24 |
LRY | SERVER+1~ |
LSITE | BUILD+2~, GET664+1*, GET664+2 |
U | TESTGOOD+18, TESTGOOD+24, SPEC+8, SPEC+11, SPECLOOP+6, GET664+1 |
X | EN+2~, SPEC+9*, SPEC+10, SPECLOOP+2~, SPECLOOP+5*, SPECLOOP+6, SPECLOOP+22*, SPECLOOP+23, NOSPEC+14*, NOSPEC+20* , NOSPEC+21, WRT+1~, WRT+18*, WRT+21*, WRT+22, WRT+25*, WRT+26, WRT+33*, WRT+34 |
Y | EN+2~, SPEC+2*, WRT+1~, WRT+22*, WRT+23 |