©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
BLRRLMUM ; IHS/MSC/MKK - Reference Lab Meaningful Use Microbiology utilities ; 22-Oct-2013 09:22 ; MKK
Source file <BLRRLMUM.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | ($$FIND1,FIND)^DIC UPDATE^DIE $$GET1^DIQ |
| IHS Changes To Lab | 2 | TOP^BLRQUE $$SHL7SEGS^BLRRLMUU |
| Kernel | 2 | ($$DT,$$HL7TFM,$$HTE,$$HTFM)^XLFDT $$TRIM^XLFSTR |
| IHS VA Utilities | 1 | ^XBFMK |
| Lab Service | 1 | ^LRWU4 |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Changes To Lab | 1 | BLRMIAUT |
| Lab Service | 1 | LRMIEDZ2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MAKE14 | ; EP - Make node 14, IFF drug not already there
|
|
| LABIHSMS(LRAA,LRAD,LRAN) | ; EP - After LAMIAUT0 Verification, move IHS Subnodes to proper nodes in Lab Data file
|
|
| LABSTOR(LRDFN,LRSS,LRIDT) | ; Store incoming HL7 data into the Lab Data file
|
|
| MAKEANTI | ; EP - Create new ANTIMICROBIAL SUSCEPTIBILITY nodes
|
|
| PID | ; EP - Don't process anything in the PID Segment
|
|
| CHKITOUT | ; EP - Determine if data exists in ^LAH
|
|
| TESTANTI | ; EP
|
|
| SPM | ; EP
|
|
| OBX | ; EP
|
|
| MSH | ; EP - Don't process anything in the MSH Segment
|
|
| UPDLTXNL | ; EP - Update IHS Lab Transaction Log file
|
|
| OBR | ; EP
|
|
| ORC | ; EP
|
|
| MAKEOIHS | ; EP - Stuff "other" fields with IHS Data
|
| Name | Field # of Occurrence |
|---|---|
| TOP^BLRQUE | UPDLTXNL+8 |
| $$SHL7SEGS^BLRRLMUU | LABSTOR+10, MAKEOIHS+6 |
| $$FIND1^DIC | OBX+9, OBX+18, OBX+37, UPDLTXNL+1 |
| FIND^DIC | OBX+77 |
| UPDATE^DIE | OBX+13, OBX+44, OBX+60, OBX+85, MAKE14+12, UPDLTXNL+6 |
| $$GET1^DIQ | OBX+12, OBX+47, CHKITOUT+5, CHKITOUT+15, MAKEANTI+24, MAKEOIHS+2, MAKEOIHS+3, TESTANTI+7 |
| ^LRWU4 | TESTANTI+3 |
| ^XBFMK | OBX+39 |
| $$DT^XLFDT | MAKE14+18, UPDLTXNL+12 |
| $$HL7TFM^XLFDT | OBX+51 |
| $$HTE^XLFDT | LABSTOR+5, CHKITOUT+3 |
| $$HTFM^XLFDT | MAKE14+18, UPDLTXNL+12 |
| $$TRIM^XLFSTR | OBX+25, OBX+72 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | FIND1^DIC |
| ^LAB(60 - [#60] | FIND1^DIC, GET1^DIQ |
| ^LAB(61.2 - [#61.2] | FIND1^DIC |
| ^LAB(62.06 - [#62.06] | GET1^DIQ |
| ^LAB(62.4 - [#62.4] | GET1^DIQ |
| ^LRO(68 - [#68] | GET1^DIQ |
| 68.02 | GET1^DIQ |
| ^HL(779.004 - [#779.004] | FIND^DIC |
| ^BLRTXLOG - [#9009022] | FIND1^DIC |
| ^BLRSITE - [#9009029] | GET1^DIQ |
| ^BLRUCUM - [#90475.3] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(62.06 - [#62.06] | MAKEANTI+23 |
| ^LAB(62.4 - [#62.4] | CHKITOUT+10 |
| ^LAH( | CHKITOUT+21, CHKITOUT+26 |
| ^LAHM(62.49 - [#62.49] | OBX+3 |
| ^LR - [#63] | LABSTOR+7, LABSTOR+13*, OBX+19*, OBX+28*, CHKITOUT+18, MAKEANTI+2, MAKEANTI+3, MAKEANTI+5, MAKEANTI+7, MAKEANTI+8 , MAKEANTI+9, MAKEANTI+11, MAKEANTI+27*, MAKEANTI+28*, MAKEANTI+29*, MAKEANTI+30*, MAKEANTI+31*, MAKEANTI+32*, MAKE14+4, MAKE14+5 |
| ^LRO(68 - [#68] | LABIHSMS+3, TESTANTI+6 |
| ^TMP("BLRRLMUU" | LABSTOR+17, LABSTOR+19 |
| ^XTMP("BLRRLMUM" | CHKITOUT+6*, CHKITOUT+11*, CHKITOUT+16*, CHKITOUT+19*, CHKITOUT+22*, CHKITOUT+28*, CHKITOUT+29*, MAKE14+18*, MAKE14+19*, MAKE14+20* , UPDLTXNL+12*, UPDLTXNL+13*, UPDLTXNL+14* |
| Name | Line Occurrences |
|---|---|
| @( | LABSTOR+19 |
| CHKITOUT | LABSTOR+3 |
| LABSTOR | LABIHSMS+5 |
| MAKE14 | MAKEANTI+26 |
| MAKEANTI | LABIHSMS+6, TESTANTI+9 |
| MAKEOIHS | LABIHSMS+7 |
| UPDLTXNL | MAKEOIHS+8 |
| Name | Field # of Occurrence |
|---|---|
| ^(3 | LABIHSMS+3, TESTANTI+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> ADDRESS | OBX+64*, OBX+65, OBX+66, OBX+67 |
| >> ADDRL1 | OBX+65* |
| >> ADDRL2 | OBX+65* |
| ANSDTT | OBX+1~ |
| >> ANTI( | MAKEANTI+8*, MAKEANTI+9*, MAKEANTI+13, MAKEANTI+14 |
| >> ANTI1 | MAKEANTI+6*, MAKEANTI+7*, MAKEANTI+8, MAKEANTI+9, MAKEANTI+12*, MAKEANTI+13*, MAKEANTI+14 |
| >> ANTISTR | MAKEANTI+14*, MAKEANTI+15, MAKEANTI+16, MAKEANTI+17, MAKEANTI+18, MAKEANTI+20, MAKEANTI+21, MAKEANTI+22 |
| AUTOINSP | CHKITOUT+1~, CHKITOUT+10*, CHKITOUT+11, CHKITOUT+13, CHKITOUT+15 |
| >> BLRLOGDA | UPDLTXNL+1*, UPDLTXNL+2, UPDLTXNL+5, UPDLTXNL+8 |
| >> CITY | OBX+66* |
| >> COUNTRY | OBX+67*, OBX+76, OBX+77 |
| >> COUNTY | OBX+67*, OBX+80, OBX+83 |
| DATANAME | OBX+1~ |
| >> DILOCKTM | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> DISYS | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> DRUGDATE | MAKEANTI+21*, MAKEANTI+31, MAKE14+10 |
| >> DRUGNAME | MAKEANTI+24*, MAKE14+5, MAKE14+8 |
| >> DRUGNIEN | MAKEANTI+23*, MAKEANTI+24 |
| >> DRUGNODE | MAKEANTI+15*, MAKEANTI+23, MAKEANTI+27, MAKEANTI+28, MAKEANTI+29, MAKEANTI+30, MAKEANTI+31, MAKEANTI+32 |
| >> DRUGREFL | MAKEANTI+22*, MAKEANTI+32, MAKE14+11 |
| >> DRUGRES | MAKEANTI+16*, MAKEANTI+28, MAKE14+9 |
| DRUGS | MAKE14+1~, MAKE14+3*, MAKE14+4*, MAKE14+5 |
| >> DRUGSTAT | MAKEANTI+20*, MAKEANTI+30 |
| >> DRUGSUSP | MAKEANTI+18*, MAKEANTI+19*, MAKEANTI+27 |
| >> DRUGUNIT | MAKEANTI+17*, MAKEANTI+29 |
| DT | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| DTIME | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| DUZ | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| DUZ(2 | CHKITOUT+5 |
| ERRS | MAKE14+1~, MAKE14+14, MAKE14+20, UPDLTXNL+4!, UPDLTXNL+8, UPDLTXNL+14 |
| F60IEN | OBX+1~, OBX+9*, OBX+10, OBX+12 |
| FDA | OBX+11!, OBX+40!, OBX+53!, OBX+82!, MAKE14+1~, MAKE14+19, UPDLTXNL+4!, UPDLTXNL+13 |
| FDA( | OBX+12*, OBX+42*, OBX+55*, OBX+56*, OBX+57*, OBX+58*, OBX+83*, OBX+84*, MAKE14+8*, MAKE14+9* , MAKE14+10*, MAKE14+11* |
| FDA(9009022 | UPDLTXNL+5* |
| >> FLAG | OBX+49*, OBX+57 |
| FOUNDIT | MAKE14+1~, MAKE14+3*, MAKE14+4, MAKE14+5*, MAKE14+6 |
| >> HNOW | MAKE14+17*, MAKE14+19, MAKE14+20, UPDLTXNL+11*, UPDLTXNL+13, UPDLTXNL+14 |
| >> HOSPITAL | OBX+63* |
| >> ICOUNTRY | OBX+75*, OBX+78*, OBX+80, OBX+84 |
| IEN | MAKE14+1~ |
| IENARRAY | MAKE14+1~ |
| IENS | OBX+40!, OBX+53!, OBX+54*, OBX+55, OBX+56, OBX+57, OBX+58, OBX+83, OBX+84, MAKEOIHS+1* , MAKEOIHS+2, MAKEOIHS+3 |
| IENS(1 | OBX+41* |
| IO | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> IOBS | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| IOF | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| IOM | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| ION | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> IOS | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| IOSL | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| IOST | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> IOT | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> IOXY | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| LA7INST | CHKITOUT+1~, CHKITOUT+5*, CHKITOUT+6, CHKITOUT+8, CHKITOUT+10 |
| LRAA | CHKITOUT+1~, LABIHSMS~, LABIHSMS+1, LABIHSMS+3, MAKEOIHS+1, TESTANTI+6, TESTANTI+7 |
| LRAD | CHKITOUT+1~, LABIHSMS~, LABIHSMS+1, LABIHSMS+3, MAKEOIHS+1, TESTANTI+6 |
| LRAN | CHKITOUT+1~, LABIHSMS~, LABIHSMS+1, LABIHSMS+3, MAKEOIHS+1, TESTANTI+6 |
| LRAS | CHKITOUT+1~, MAKEOIHS+2*, UPDLTXNL+1 |
| LRDFN | LABSTOR~, LABSTOR+1, LABSTOR+7, LABSTOR+13, OBX+12, OBX+19, OBX+28, OBX+42, OBX+54, CHKITOUT+18 , LABIHSMS+3*, LABIHSMS+5, MAKEANTI+2, MAKEANTI+3, MAKEANTI+5, MAKEANTI+7, MAKEANTI+8, MAKEANTI+9, MAKEANTI+11, MAKEANTI+27 , MAKEANTI+28, MAKEANTI+29, MAKEANTI+30, MAKEANTI+31, MAKEANTI+32, MAKE14+4, MAKE14+5, MAKE14+8, MAKE14+9, MAKE14+10 , MAKE14+11, TESTANTI+1, TESTANTI+6* |
| LRIDT | LABSTOR~, LABSTOR+1, LABSTOR+7, LABSTOR+13, OBX+12, OBX+19, OBX+28, OBX+42, OBX+54, CHKITOUT+18 , LABIHSMS+3*, LABIHSMS+5, MAKEANTI+2, MAKEANTI+3, MAKEANTI+5, MAKEANTI+7, MAKEANTI+8, MAKEANTI+9, MAKEANTI+11, MAKEANTI+27 , MAKEANTI+28, MAKEANTI+29, MAKEANTI+30, MAKEANTI+31, MAKEANTI+32, MAKE14+4, MAKE14+5, MAKE14+8, MAKE14+9, MAKE14+10 , MAKE14+11, TESTANTI+1, TESTANTI+6* |
| LRIFN | CHKITOUT+1~, CHKITOUT+21*, CHKITOUT+22, CHKITOUT+24, CHKITOUT+26, CHKITOUT+28 |
| LRLL | CHKITOUT+1~, CHKITOUT+15*, CHKITOUT+16, CHKITOUT+21, CHKITOUT+26 |
| LRSS | LABSTOR~, LABSTOR+1, LABSTOR+7, LABSTOR+13, OBX+19, OBX+28, CHKITOUT+18, LABIHSMS+3*, LABIHSMS+5, MAKEANTI+2 , MAKEANTI+3, MAKEANTI+5, MAKEANTI+7, MAKEANTI+8, MAKEANTI+9, MAKEANTI+11, MAKEANTI+27, MAKEANTI+28, MAKEANTI+29, MAKEANTI+30 , MAKEANTI+31, MAKEANTI+32, MAKE14+4, MAKE14+5, TESTANTI+1, TESTANTI+7* |
| LRUID | LABSTOR+7*, LABSTOR+8, LABSTOR+10, LABSTOR+17, LABSTOR+19, CHKITOUT+1~, CHKITOUT+18*, CHKITOUT+19, CHKITOUT+21, CHKITOUT+29 , MAKEOIHS+3*, MAKEOIHS+4, MAKEOIHS+6 |
| >> MDID | OBX+71* |
| >> MDNAME | OBX+72* |
| NOWDTIME | LABSTOR+5*, CHKITOUT+1~, CHKITOUT+3*, CHKITOUT+6, CHKITOUT+11, CHKITOUT+16, CHKITOUT+19, CHKITOUT+22, CHKITOUT+28, CHKITOUT+29 |
| ORGANISM | OBX+1~, OBX+31*, OBX+32, OBX+35, OBX+37, MAKEANTI+11* |
| >> ORGIEN | MAKEANTI+1*, MAKEANTI+2*, MAKEANTI+3, MAKEANTI+5, MAKEANTI+7, MAKEANTI+8, MAKEANTI+9, MAKEANTI+11, MAKEANTI+27, MAKEANTI+28 , MAKEANTI+29, MAKEANTI+30, MAKEANTI+31, MAKEANTI+32 |
| ORGPTR | OBX+1~, OBX+37*, OBX+38, OBX+42 |
| >> ORGSEQ | OBX+33*, OBX+35, OBX+41 |
| >> ORGSTR | MAKEANTI+5* |
| >> ORIGTEXT | OBX+7*, OBX+9 |
| >> ORSNOMED | OBX+32* |
| >> PERFHMDS | OBX+70*, OBX+71, OBX+72 |
| >> PIEN | LABSTOR+10*, LABSTOR+11, LABSTOR+13, LABSTOR+17, LABSTOR+19, OBX+3, OBX+28, MAKEOIHS+6* |
| REFLAB | OBX+1~, OBX+18*, OBX+19 |
| >> RELDATE | OBX+51*, OBX+55 |
| RLPTR | OBX+1~, OBX+16*, OBX+17, OBX+18 |
| >> SEG | LABSTOR+16*, LABSTOR+17*, LABSTOR+19 |
| >> SEGIEN | LABSTOR+18*, LABSTOR+19*, OBX+3 |
| >> SIGNNPI | OBX+23* |
| >> SIGNPHY | OBX+24*, OBX+25* |
| >> SIGNSTR | OBX+22*, OBX+23, OBX+24 |
| >> STATE | OBX+66* |
| STATUS | OBX+1~, OBX+50*, OBX+56 |
| STR | OBX+1~, OBX+3*, OBX+5, OBX+6, OBX+7, OBX+16, OBX+22, OBX+31, OBX+33, OBX+46 , OBX+49, OBX+50, OBX+51, OBX+63, OBX+64, OBX+70 |
| >> TARGET("DILIST" | OBX+78 |
| TESTNAME | OBX+1~, OBX+6* |
| TSTLOINC | OBX+1~, OBX+5* |
| U | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> UNITS | OBX+46*, OBX+47*, OBX+58 |
| >> XPARSYS | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> XQXFLG | LABSTOR+1, LABIHSMS+1, TESTANTI+1 |
| >> ZIPCODE | OBX+66* |