Routine: HMPDLRA

Information

HMPDLRA ;SLC/MKB,ASMR/RRB,BL - Laboratory extract by accession;Aug 29, 2016 20:06:27

Source file <HMPDLRA.m>

Name	Comments	DBIA/ICR reference
EN(DFN,BEG,END,MAX,ID)	; -- find patient's lab results
CH()	; -- return a Chemistry result as: ; id^test^result^interpretation^units^low^high^localName^loinc^vuid^order ; Expects ^TMP("LRRR",$J,DFN,"CH",HMPIDT,HMPN),LRDFN
MI()	; -- return a Microbiology result as: ; id^test^result^interpretation^units ; Expects ^TMP("LRRR",$J,DFN,"MI",HMPIDT,HMPN)
AP(LAB)	; -- return a Pathology result in LAB("attribute")=value
ORDER(LABORD,TEST)	; -- return #100 order^name for Lab order# & Test
NAME(X)	; -- Return name of subscript X
AREA(ACCNUM)	; -- Return name of accession area
RPTS(DFN,BEG,END,MAX)	; -- find patient's lab reports
RPT1(DFN,ID,RPT)	; -- return report as a TIU document
TEXT(DFN,SUB,IDT,LRDFN)	; -- Get report text, return temp array name
XML(LAB)	; -- Return result as XML in @HMP@(#)
LOOP()	; -- build sub-items string from NAMES and X
ADD(X)	; -- Add a line @HMP@(n)=X