LA7UID2 ;VA/DALOI/JRR - Process Download Message for an entry in 62.48 ; O3/16/2005
Source file <LA7UID2.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 3 | ($$HLDATE,$$HLNAME)^HLFNC $$MSH^HLFNC1 (EN1,INIT,KILL)^HLTRANS |
VA Fileman | 3 | FILE^DICN ^DIE $$GET1^DIQ |
Automated Lab Instruments | 1 | CREATE^LA7LOG |
IHS Changes To Lab | 1 | $$GETHRCN^BLRUTIL4 |
Kernel | 1 | $$NOW^XLFDT |
Lab Service | 1 | (DEM,KVAR)^LRX |
Name | Comments | DBIA/ICR reference |
---|---|---|
PV1 | ||
CHKDT(LA7X) | ; Check validity of date/time
; Adjust invalid times to closest valid time - correct for lab problem ; that generated invalid FileMan date/times. ; If hours>24 then set to 24 with no minutes/seconds ; If minutes greater than 59 then set to 59 ; If seconds greater than 59 then set to 59 |
|
PID | ||
BUILD | ; Build one accession into an HL7 message
|
|
MSH | ;requires LA7NDAP= IEN in 770 HL7 NON-DHCP APPLICATION file
|
|
OBR | ;
|
|
ORC | ;
|
|
Q6249 | ; create an entry in the MESSAGE QUEUE file to store this message
|
Name | Field # of Occurrence |
---|---|
$$GETHRCN^BLRUTIL4 | PID+6 |
FILE^DICN | Q6249+13 |
^DIE | BUILD+22 |
$$GET1^DIQ | ORC+5, OBR+16 |
$$HLDATE^HLFNC | PID+11, OBR+13 |
$$HLNAME^HLFNC | ORC+5, PID+8 |
$$MSH^HLFNC1 | MSH+6 |
EN1^HLTRANS | BUILD+16 |
INIT^HLTRANS | MSH+3 |
KILL^HLTRANS | MSH+1 |
CREATE^LA7LOG | MSH+5 |
DEM^LRX | PID+2 |
KVAR^LRX | BUILD+24 |
$$NOW^XLFDT | Q6249+4 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^LAB(61 - [#61] | GET1^DIQ |
^LAHM(62.49 - [#62.49] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | OBR+28 |
^LAB(62.05 - [#62.05] | OBR+46 |
^LAB(62.4 - [#62.4] | OBR+34, OBR+36, OBR+50 |
^LAHM(62.49 - [#62.49] | BUILD+19, Q6249+5, Q6249+6, Q6249+14, Q6249+17*, Q6249+21*, Q6249+22* |
^LR - [#63] | OBR+6 |
^LRO(68 - [#68] | ORC+3, OBR+8, OBR+15, OBR+17, OBR+18, OBR+48 |
^TMP("LA7" | OBR+23 |
Name | Line Occurrences |
---|---|
$$CHKDT | OBR+12 |
MSH | BUILD+6 |
OBR | BUILD+11 |
ORC | BUILD+8 |
PID | BUILD+9 |
PV1 | BUILD+10 |
Q6249 | BUILD+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | BUILD+20~, BUILD+21* |
DD | Q6249+8! |
DIC | Q6249+2~, Q6249+9* |
DIC("DR" | Q6249+11*, Q6249+12* |
DIC(0 | Q6249+9* |
DIE | BUILD+20~, BUILD+21* |
DINUM | Q6249+2~, Q6249+10* |
DLAYGO | Q6249+2~, Q6249+9* |
DO | Q6249+8! |
>> DOB | PID+11 |
DR | BUILD+20~, BUILD+21* |
DT | Q6249+22 |
>> HLECH | ORC+5, OBR+28, OBR+30, OBR+33, OBR+37, OBR+43, OBR+47 |
>> HLERR | MSH+5 |
>> HLFS | ORC+7, ORC+8, PID+14, PID+15, PV1+4, PV1+5, OBR+54, OBR+55, Q6249+16 |
>> HLMTN | BUILD+14* |
>> HLNDAP | MSH+2* |
HLSDATA | BUILD+3! |
HLSDATA( | Q6249+19, Q6249+21 |
HLSDATA(0 | MSH+6*, Q6249+15 |
HLSDATA(1 | PID+15* |
HLSDATA(2 | PV1+5* |
HLSDATA(3 | ORC+8*, OBR+55* |
>> HRCN | PID+6 |
I | CHKDT+7~, CHKDT+13*, CHKDT+14, CHKDT+15, CHKDT+16, CHKDT+17 |
IOM | OBR+1 |
>> LA7 | ORC+6*, ORC+7, PID+13*, PID+14, PV1+3*, PV1+4, OBR+8*, OBR+10, OBR+12, OBR+14 , OBR+15*, OBR+16, OBR+40*, OBR+41, OBR+42, OBR+43, OBR+45*, OBR+46*, OBR+47, OBR+48* , OBR+51, OBR+53*, OBR+54, Q6249+18*, Q6249+19*, Q6249+20, Q6249+21 |
>> LA71 | Q6249+18*, Q6249+20*, Q6249+22 |
LA760 | OBR+2~, OBR+22*, OBR+28 |
>> LA76248 | Q6249+11 |
>> LA76249 | BUILD+19, BUILD+21, Q6249+7*, Q6249+17, Q6249+21, Q6249+22 |
>> LA768 | ORC+3, OBR+8, OBR+15, OBR+17, OBR+18, OBR+48 |
>> LA76801 | ORC+3, OBR+8, OBR+15, OBR+17, OBR+18 |
>> LA76802 | ORC+3, OBR+8, OBR+15, OBR+17, OBR+18, OBR+51 |
LA76821 | OBR+41~* |
LA76822 | OBR+1, OBR+42~* |
>> LA7ACC | OBR+18* |
>> LA7ACC( | OBR+20, OBR+22, OBR+45 |
>> LA7ACC0 | ORC+4, PID+1, PV1+1 |
LA7CDT | OBR+2~, OBR+13*, OBR+29 |
LA7CMT | OBR+2~, OBR+14*, OBR+31 |
>> LA7CNT | OBR+4*, OBR+27*, OBR+55 |
>> LA7CODE | OBR+25*, OBR+28 |
LA7D0 | OBR+35*, OBR+50*, OBR+51, OBR+52! |
>> LA7DATA | OBR+26*, OBR+28 |
>> LA7DTIM | Q6249+4*, Q6249+11 |
LA7ERR | BUILD+7, MSH+4!, MSH+5* |
LA7I | OBR+2~, OBR+19*, OBR+20*, OBR+22, OBR+23, OBR+45 |
>> LA7INST | OBR+23 |
>> LA7MSH | Q6249+15*, Q6249+16*, Q6249+17 |
>> LA7NDAP | MSH+2 |
LA7OBR | OBR+3!, OBR+21!, OBR+54*, OBR+55 |
LA7OBR( | OBR+53, OBR+54 |
LA7OBR(1 | OBR+27* |
LA7OBR(12 | OBR+30* |
LA7OBR(13 | OBR+31* |
LA7OBR(15 | OBR+32*, OBR+33* |
LA7OBR(18 | OBR+37* |
LA7OBR(19 | OBR+39*, OBR+43* |
LA7OBR(2 | OBR+51* |
LA7OBR(27 | OBR+47* |
LA7OBR(4 | OBR+28* |
LA7OBR(7 | OBR+29* |
LA7ORC | ORC+1!, ORC+7*, ORC+8 |
LA7ORC( | ORC+6, ORC+7 |
LA7ORC(1 | ORC+2* |
LA7ORC(12 | ORC+4*, ORC+5* |
LA7ORC(3 | ORC+3* |
LA7PID | PID!, PID+12*, PID+14*, PID+15 |
LA7PID( | PID+13, PID+14 |
LA7PID(19 | PID+10* |
LA7PID(3 | PID+6* |
LA7PID(5 | PID+8* |
LA7PID(7 | PID+11* |
LA7PID(8 | PID+9* |
LA7PV1 | PV1!, PV1+2*, PV1+4*, PV1+5 |
LA7PV1( | PV1+3, PV1+4 |
LA7PV1(3 | PV1+1* |
LA7SPEC | OBR+2~, OBR+16*, OBR+32 |
>> LA7TMP | OBR+23*, OBR+24, OBR+25, OBR+26, OBR+28 |
>> LA7UID | OBR+17*, OBR+51, Q6249+12 |
LA7X | OBR+11~, OBR+12*, OBR+13, CHKDT~, CHKDT+9, CHKDT+19*, CHKDT+21 |
LA7Y | CHKDT+7~, CHKDT+9*, CHKDT+12, CHKDT+14, CHKDT+17* |
LA7Y( | CHKDT+14*, CHKDT+15*, CHKDT+16* |
LA7Y(1 | CHKDT+17, CHKDT+18 |
LA7Y(3 | CHKDT+18 |
LA7Y(5 | CHKDT+18 |
>> LRAUTO | OBR+34, OBR+37, Q6249+12 |
LRCADR | OBR+34*, OBR+35, OBR+36*, OBR+37, OBR+38! |
>> LRDFN | PID+1*, PID+6, OBR+6 |
LRDPF | PID+1!, OBR+33 |
>> LRFORCE | OBR+41, OBR+42 |
>> LRINFW | OBR+6*, OBR+30 |
>> LRLL | OBR+1 |
>> LRTYPE | OBR+1 |
>> PNM | PID+8 |
>> SEX | PID+9 |
>> SSN | PID+10 |
U | OBR+36, OBR+50 |
X | CHKDT+7~, CHKDT+18*, CHKDT+19, Q6249+6*, Q6249+7, Q6249+10 |
>> ZTQUEUED | OBR+1 |