iSharkFly-Open
/
VistA-ccr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

copy of LA7QRY1.m from John M.

This commit is contained in:
george 2009-05-06 16:55:56 +00:00
parent 67db6019e3
commit 2953007f1d
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
p/LA7QRY1.m
View File

@ -1,9 +1,9 @@
LA7QRY1 ;DALOI/JMC - Lab HL7 Query Utility ;01/19/99 13:48
;;5.2;AUTOMATED LAB INSTRUMENTS;**46,61**;Sep 27, 1994
LA7QRY1 ;DALOI/JMC - Lab HL7 Query Utility ;01/19/99 13:48
;;5.2;AUTOMATED LAB INSTRUMENTS;**46,61**;Sep 27, 1994;Build 26
;
Q
;
CHKSC ; Check search NLT/LOINC codes
CHKSC ; Check search NLT/LOINC codes
;
N J
;
@ -20,7 +20,7 @@ CHKSC ; Check search NLT/LOINC codes
Q
;
;
SPEC ; Convert HL7 Specimen Codes to File #61, Topography codes
SPEC ; Convert HL7 Specimen Codes to File #61, Topography codes
; Find all topographies that use this HL7 specimen code
N J,K,L
;
@ -31,7 +31,7 @@ SPEC ; Convert HL7 Specimen Codes to File #61, Topography codes
Q
;
;
BUILDMSG ; Build HL7 message with result of query
BUILDMSG ; Build HL7 message with result of query
;
N HL,HLECH,HLFS,HLQ,LA,LA763,LA7ECH,LA7FS,LA7MSH,LA7NOMSG,LA7NTESN,LA7NVAF,LA7OBRSN,LA7OBXSN,LA7PIDSN,LA7ROOT,LA7X,X
;
@ -60,7 +60,7 @@ BUILDMSG ; Build HL7 message with result of query
Q
;
;
PID ; Build PID segment
PID ; Build PID segment
;
N LA7PID
;
@ -73,7 +73,7 @@ PID ; Build PID segment
Q
;
;
ORC ; Build ORC segment
ORC ; Build ORC segment
;
N X
;
@ -89,7 +89,7 @@ ORC ; Build ORC segment
Q
;
;
OBR ; Build OBR segment
OBR ; Build OBR segment
;
N LA764,LA7NLT
;
@ -105,7 +105,7 @@ OBR ; Build OBR segment
Q
;
;
OBX ; Build OBX segment
OBX ; Build OBX segment
;
N LA7DATA,LA7VT
;