BLRRLMUC ;IHS/MSC/MKK - Reference Lab Meaningful Use Chemistry utilities ; 25-Nov-2014 15:00 ; MKK
Source file <BLRRLMUC.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 3 | ($$FIND1,FIND)^DIC UPDATE^DIE $$GET1^DIQ |
Kernel | 2 | $$HL7TFM^XLFDT $$TRIM^XLFSTR |
IHS Changes To Lab | 1 | $$SHL7SEGS^BLRRLMUU |
Name | Comments | DBIA/ICR reference |
---|---|---|
PV1 | ; EP - Don't process anything in the PV1 Segment
|
|
BLRLA7FX | ; Fix for Lab Data MU2 Errors
|
|
LABSTOR(LRDFN,LRSS,LRIDT) | ; Store INCOMING HL7 data into the Lab Data file
|
|
PID | ; EP - Don't process anything in the PID Segment
|
|
VALID(SEGNAME) | ; EP
|
|
SPM | ; EP
|
|
OBX | ; EP
|
|
MSH | ; EP - Don't process anything in the MSH Segment
|
|
NTE | ; EP - Don't process anything in the NTE Segment
|
|
OBR | ; EP
|
|
ORC | ; EP - Don't process anything in the PID Segment
|
|
TQ1 | ; EP - Don't process anything in the TQ1 Segment
|
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | FIND1^DIC |
^LAB(60 - [#60] | FIND1^DIC, GET1^DIQ |
^HL(779.004 - [#779.004] | FIND^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAHM(62.49 - [#62.49] | OBR+3, OBX+4, SPM+3 |
^LR - [#63] | LABSTOR+3, LABSTOR+11, LABSTOR+12*, LABSTOR+16*, OBR+14, OBR+23*, OBR+31*, OBX+9*, OBX+21, OBX+26* , OBX+29*, OBX+31*, SPM+6*, BLRLA7FX+4, BLRLA7FX+6, BLRLA7FX+8, BLRLA7FX+9, BLRLA7FX+12! |
^TMP("BLRRLMUU" | LABSTOR+20, LABSTOR+22, LABSTOR+27 |
Name | Line Occurrences |
---|---|
@( | LABSTOR+27 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADDRESS | OBX+2~, OBX+37*, OBX+38, OBX+39, OBX+40 |
ADDRL1 | OBX+2~, OBX+38* |
ADDRL2 | OBX+2~, OBX+38* |
ANSDTT | OBX+1~, OBX+23*, OBX+24, OBX+25*, OBX+26 |
CHAR | VALID+1~, VALID+4*, VALID+5*, VALID+6*, VALID+7* |
CHNGDTT | OBR+1~, OBR+19*, OBR+20*, OBR+22 |
CITY | OBX+2~, OBX+39* |
CONDSPEC | SPM+1~, SPM+5*, SPM+6 |
COUNTRY | OBX+2~, OBX+40*, OBX+49, OBX+50 |
COUNTY | OBX+2~, OBX+40*, OBX+53, OBX+56 |
DATANAME | LABSTOR+10*, LABSTOR+11, LABSTOR+12, OBR+1~, OBR+11*, OBR+12, OBR+14, OBR+23, OBX+1~, OBX+18* , OBX+19, OBX+21, OBX+26, OBX+29, OBX+31 |
>> DILOCKTM | LABSTOR+1, BLRLA7FX+1 |
>> DISYS | LABSTOR+1, BLRLA7FX+1 |
DNDTT | OBR+1~, OBR+22*, OBR+23 |
DT | LABSTOR+1, BLRLA7FX+1 |
DTIME | LABSTOR+1, BLRLA7FX+1 |
DUZ | LABSTOR+1, BLRLA7FX+1 |
ERRS | OBX+2~ |
F60IEN | OBR+1~, OBR+8*, OBR+9, OBR+11, OBX+1~, OBX+14*, OBX+15*, OBX+16, OBX+18 |
FDA | OBX+2~, OBX+55! |
FDA( | OBX+56*, OBX+57* |
HOSPITAL | OBX+2~, OBX+36* |
ICOUNTRY | OBX+2~, OBX+48*, OBX+51*, OBX+53, OBX+57 |
IENS | OBX+2~, OBX+33*, OBX+56, OBX+57 |
IO | LABSTOR+1, BLRLA7FX+1 |
>> IOBS | LABSTOR+1, BLRLA7FX+1 |
IOF | LABSTOR+1, BLRLA7FX+1 |
IOM | LABSTOR+1, BLRLA7FX+1 |
ION | LABSTOR+1, BLRLA7FX+1 |
>> IOS | LABSTOR+1, BLRLA7FX+1 |
IOSL | LABSTOR+1, BLRLA7FX+1 |
IOST | LABSTOR+1, BLRLA7FX+1 |
>> IOT | LABSTOR+1, BLRLA7FX+1 |
>> IOXY | LABSTOR+1, BLRLA7FX+1 |
>> LR | BLRLA7FX+4* |
LRDFN | LABSTOR~, LABSTOR+1, LABSTOR+3, LABSTOR+11, LABSTOR+12, LABSTOR+16, OBR+14, OBR+23, OBR+31, OBX+9 , OBX+21, OBX+26, OBX+29, OBX+31, OBX+33, SPM+6, BLRLA7FX+3*, BLRLA7FX+4, BLRLA7FX+6, BLRLA7FX+8 , BLRLA7FX+9, BLRLA7FX+12 |
>> LRDL | LABSTOR+1, LABSTOR+9 |
>> LRDN | BLRLA7FX+7*, BLRLA7FX+8*, BLRLA7FX+9, BLRLA7FX+12 |
LRIDT | LABSTOR~, LABSTOR+1, LABSTOR+3, LABSTOR+11, LABSTOR+12, LABSTOR+16, OBR+14, OBR+23, OBR+31, OBX+9 , OBX+21, OBX+26, OBX+29, OBX+31, OBX+33, SPM+6, BLRLA7FX+5*, BLRLA7FX+6*, BLRLA7FX+8, BLRLA7FX+9 , BLRLA7FX+12 |
LRSS | LABSTOR~, LABSTOR+1, LABSTOR+3, LABSTOR+9, LABSTOR+11, LABSTOR+12, LABSTOR+16, OBR+14, OBR+23, OBR+31 , OBX+9, OBX+21, OBX+26, OBX+29, OBX+31, SPM+6 |
>> LRTS | LABSTOR+1, LABSTOR+10 |
>> LRUID | LABSTOR+3*, LABSTOR+4, LABSTOR+6, LABSTOR+20, LABSTOR+22, LABSTOR+27 |
MDID | OBX+2~, OBX+44* |
MDNAME | OBX+2~, OBX+45* |
NEWSEGN | VALID+1~, VALID+3*, VALID+4*, VALID+5*, VALID+6*, VALID+7*, VALID+8 |
OBRIEN | OBR+1~, OBX+1~ |
OBSDTT | OBR+1~, OBR+16*, OBR+17*, OBR+22 |
PERFHMDS | OBX+2~, OBX+43*, OBX+44, OBX+45 |
>> PIEN | LABSTOR+6*, LABSTOR+9, LABSTOR+14, LABSTOR+16, OBR+3, OBX+4, SPM+3 |
RCTOSTR | OBR+1~, OBR+25*, OBR+26, OBR+27 |
REFLAB | OBX+1~, OBX+8*, OBX+9 |
RLPTR | OBX+1~, OBX+6*, OBX+7, OBX+8 |
>> SEG | LABSTOR+19*, LABSTOR+20*, LABSTOR+22, LABSTOR+27 |
>> SEGIEN | LABSTOR+26*, LABSTOR+27*, OBR+3, OBX+4, SPM+3 |
SEGNAME | LABSTOR+21*, LABSTOR+22*, LABSTOR+27, VALID~, VALID+3 |
SPMIEN | SPM+1~ |
STATE | OBX+2~, OBX+39* |
STATUS | OBX+1~, OBX+28*, OBX+29 |
STR | OBR+1~, OBR+3*, OBR+5, OBR+6, OBR+16, OBR+19, OBR+25, OBX+1~, OBX+4*, OBX+6 , OBX+11, OBX+12, OBX+23, OBX+28, OBX+36, OBX+37, OBX+43, SPM+1~, SPM+3*, SPM+5 |
>> SUBSTR2 | OBR+27*, OBR+28, OBR+30*, OBR+31 |
>> TARGET("DILIST" | OBX+51 |
TESTNAME | OBR+1~, OBR+6*, OBR+8, OBX+1~, OBX+12*, OBX+14 |
TSTLOINC | OBR+1~, OBR+5*, OBX+1~, OBX+11*, OBX+15, OBX+31 |
U | LABSTOR+1, BLRLA7FX+1 |
>> XPARSYS | LABSTOR+1, BLRLA7FX+1 |
>> XQXFLG | LABSTOR+1, BLRLA7FX+1 |
ZIPCODE | OBX+2~, OBX+39* |
Name | Field # of Occurrence |
---|---|
$T(@(4) | LABSTOR+23 |
$T(@SEGNAME | LABSTOR+24 |