LRSRVR3 ;VA/DALOI/JMC -LAB DATA SERVER, CONT'D - LOINC SECTION ;JUL 06, 2010 3:14 PM
Source file <LRSRVR3.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| TSTTYP(LRX) | ; Determine test data type | |
| LOINCLA | ; | |
| MICRO(LR64) | ; | |
| LOINCLD | ; Build and send local delimited LOINC report | 
| Name | Field # of Occurrence | 
|---|---|
| $$GET1^DID | LOINCLD+6, TSTTYP+6, TSTTYP+10, TSTTYP+17 | 
| $$GET1^DIQ | LOINCLD+35, LOINCLA+27, LOINCLA+35, LOINCLA+36, MICRO+16, MICRO+22 | 
| GETS^DIQ | LOINCLA+2, LOINCLA+3, MICRO+3, MICRO+4 | 
| CLEAN^LRSRVR | LOINCLD+53 | 
| SETDATA^LRSRVR2 | LOINCLD+39, LOINCLA+24, LOINCLA+50 | 
| $$UUBEGFN^LRSRVR2A | LOINCLD+21 | 
| $$UUEN^LRSRVR4 | LOINCLD+47 | 
| MAILSEND^LRSRVR6 | LOINCLD+52 | 
| $$FMTE^XLFDT | LOINCLD+4 | 
| $$FMTHL7^XLFDT | LOINCLD+8 | 
| $$HTE^XLFDT | LOINCLD+51 | 
| $$NOW^XLFDT | LOINCLD+4, LOINCLD+8 | 
| $$REPEAT^XLFSTR | LOINCLD+18, LOINCLD+19 | 
| $$TRIM^XLFSTR | LOINCLA+37 | 
| FileNo | Call Tags | 
|---|---|
| ^LAB(60 - [#60] | GET1^DIQ | 
| 60.01 | GET1^DIQ | 
| ^LAB(61 - [#61] | GET1^DIQ | 
| ^LAB(62.06 - [#62.06] | GET1^DIQ | 
| ^LAM - [#64] | GETS^DIQ | 
| ^LAB(64.21 - [#64.21] | GET1^DIQ | 
| ^LAB(95.3 - [#95.3] | GET1^DID | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^LAB(60 - [#60] | LOINCLA+41 | 
| ^LAB(62.06 - [#62.06] | LOINCLD+34 | 
| ^LAB(95.3 - [#95.3] | LOINCLD+7, LOINCLA+12, LOINCLA+40, MICRO+13 | 
| ^LAM - [#64] | LOINCLD+26, LOINCLD+28 | 
| ^TMP($J | LOINCLD+3!, LOINCLD+4*, LOINCLD+5*, LOINCLD+6*, LOINCLD+7*, LOINCLD+9*, LOINCLD+10*, LOINCLD+11*, LOINCLD+13*, LOINCLD+15* , LOINCLD+16*, LOINCLD+17*, LOINCLD+18*, LOINCLD+19*, LOINCLD+20*, LOINCLD+21*, LOINCLD+28*, LOINCLD+31, LOINCLD+42*, LOINCLD+43* , LOINCLD+46, LOINCLD+47*, LOINCLD+48*, LOINCLD+49* | 
| Name | Line Occurrences | 
|---|---|
| $$MICRO | LOINCLD+36 | 
| $$TSTTYP | LOINCLA+34 | 
| LOINCLA | LOINCLD+31 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| I | LOINCLD+1~ | 
| LINR | LOINCLD+1~, LOINCLD+22* | 
| LOINCDTA | LOINCLA+1~ | 
| LOINCDTA( | LOINCLA+19, LOINCLA+20, LOINCLA+26, LOINCLA+28, LOINCLA+30, LOINCLA+31, LOINCLA+32, LOINCLA+33, LOINCLA+34, LOINCLA+38 , LOINCLA+39, LOINCLA+40, LOINCLA+48 | 
| LOINCDTB | LOINCLA+1~, MICRO+1~ | 
| LOINCDTB(64 | LOINCLA+4, LOINCLA+7, LOINCLA+8, LOINCLA+11, LOINCLA+12, LOINCLA+15, LOINCLA+47, MICRO+5, MICRO+8, MICRO+9 , MICRO+12, MICRO+13, MICRO+20, MICRO+21 | 
| LR60 | LOINCLA+1~, LOINCLA+32*, LOINCLA+35, LOINCLA+36, LOINCLA+41 | 
| LR61 | LOINCLA+1~, LOINCLA+33*, LOINCLA+36, LOINCLA+41, LOINCLA+48 | 
| LR6206 | LOINCLD+1~, LOINCLD+33*, LOINCLD+34*, LOINCLD+35, LOINCLD+37, MICRO+16 | 
| LR64 | LOINCLD+1~, LOINCLD+30*, LOINCLD+31*, LOINCLD+35*, LOINCLD+36, LOINCLD+37, LOINCLA+2, LOINCLA+3, LOINCLA+48, MICRO~ , MICRO+3, MICRO+4 | 
| LR6421 | MICRO+1~, MICRO+21*, MICRO+22 | 
| LRA | LOINCLD+1~, LOINCLD+25*, LOINCLD+26*, LOINCLD+28 | 
| LRAA | LOINCLA+1~, LOINCLA+29*, LOINCLA+30*, LOINCLA+31, LOINCLA+32, LOINCLA+33, LOINCLA+34, LOINCLA+38, LOINCLA+39, LOINCLA+40 , LOINCLA+48 | 
| LRAA1 | LOINCLA+1~, LOINCLA+18*, LOINCLA+19*, LOINCLA+20, LOINCLA+21, LOINCLA+26, LOINCLA+28, LOINCLA+30 | 
| LRB | LOINCLD+1~, LOINCLD+27*, LOINCLD+28* | 
| LRCNT | LOINCLD+1~, LOINCLD+22*, LOINCLD+40*, LOINCLD+42, LOINCLA+25*, LOINCLA+51* | 
| LRCRLF | LOINCLD+1~, LOINCLD+22*, LOINCLD+38, LOINCLA+23, LOINCLA+49 | 
| LRERR | LOINCLA+1~ | 
| LRERR("DIERR" | LOINCLA+22 | 
| >> LRFILENM | LOINCLD+8*, LOINCLD+9, LOINCLD+21 | 
| LRINDX | LOINCLD+37*, LOINCLD+38, LOINCLA+1~, LOINCLA+48*, LOINCLA+49 | 
| LRMSUBJ | LOINCLD+1~, LOINCLD+51*, LOINCLD+52 | 
| LRNODE | LOINCLD+1~, LOINCLD+46*, LOINCLD+47, LOINCLD+48, LOINCLD+49 | 
| LRPNTA | LOINCLA+1~, LOINCLA+26*, LOINCLA+27 | 
| LRPNTB | LOINCLA+1~, LOINCLA+4*, LOINCLA+7, LOINCLA+8, LOINCLA+11, LOINCLA+12, LOINCLA+15, LOINCLA+47, MICRO+1~, MICRO+5* , MICRO+8, MICRO+9, MICRO+12, MICRO+13, MICRO+20, MICRO+21 | 
| LRREC | LOINCLD+36*, LOINCLD+38, LOINCLA+1~ | 
| LRSS | LOINCLD+33*, LOINCLA+1~, LOINCLA+35*, LOINCLA+46, MICRO+19 | 
| >> LRST | LOINCLD+37, LOINCLD+51, LOINCLA+48 | 
| >> LRSTN | LOINCLD+4, LOINCLD+8, LOINCLD+43, LOINCLD+51 | 
| LRSTR | LOINCLD+1~, LOINCLD+22*, LOINCLD+38*, LOINCLD+47, LOINCLA+23*, LOINCLA+49* | 
| LRSTUB | LOINCLA+7*, LOINCLA+8*, LOINCLA+11*, LOINCLA+12*, LOINCLA+15*, LOINCLA+21*, LOINCLA+22*, LOINCLA+27*, LOINCLA+28*, LOINCLA+31* , LOINCLA+34*, LOINCLA+37*, LOINCLA+38*, LOINCLA+39*, LOINCLA+40*, LOINCLA+42*, LOINCLA+43*, LOINCLA+44*, LOINCLA+45*, LOINCLA+46* , LOINCLA+47*, LOINCLA+49, MICRO+1~, MICRO+2*, MICRO+5, MICRO+8*, MICRO+9*, MICRO+12*, MICRO+13*, MICRO+16* , MICRO+19*, MICRO+22*, MICRO+24, TSTTYP+1~, TSTTYP+7*, TSTTYP+14*, TSTTYP+18*, TSTTYP+19 | 
| >> LRSUB | LOINCLD+5, LOINCLD+8 | 
| LRTXT | LOINCLD+1~, LOINCLD+22* | 
| LRTYPE | TSTTYP+1~, TSTTYP+6*, TSTTYP+7, TSTTYP+10, TSTTYP+11, TSTTYP+16 | 
| LRX | LOINCLA+1~, LOINCLA+36*, LOINCLA+37, TSTTYP~, TSTTYP+2, TSTTYP+3*, TSTTYP+6, TSTTYP+10, TSTTYP+12*, TSTTYP+13 , TSTTYP+17 | 
| LRXREF | LOINCLD+1~, LOINCLD+24*, LOINCLD+26, LOINCLD+28 | 
| LRY | TSTTYP+1~, TSTTYP+10*, TSTTYP+11, TSTTYP+12, TSTTYP+13*, TSTTYP+14, TSTTYP+17*, TSTTYP+18 | 
| X | LOINCLD+1~, LOINCLD+12*, LOINCLD+13, LOINCLD+18, LOINCLA+41*, LOINCLA+42, LOINCLA+43, LOINCLA+44, LOINCLA+45 | 
| Y | LOINCLD+1~, LOINCLD+14*, LOINCLD+15, LOINCLD+19 |