LA7VMSG ;DALOI/JMC - LAB ORU (Observation Result) message builder ;08/12/13 15:12
Source file <LA7VMSG.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ORU | ; Bleed the ORU (Observation Result) message queue
; Tasked by LA7SRR, LRCAPV2, LRU |
|
ORR | ; Bleed the ORR (Order Response) message queue
; Called by LRWLST12 |
|
SET(LRUID,SITE,RUID,SITEN,ORD,LRNLT,LRIDT,LRSS,LRDFN,ORDT,LA7VDB,LA7MTYP) | ; adds entries to LA7V QUEUE file
; Called by LA7SRR, LRVER3, LRWLST12 ; variable list ; LRUID - Host Unique ID from the local ACCESSION file (#68) ; SITE - remote sites IEN in INSTITUTION file (#4) ; RUID - Remote sites Unique ID from ACCESSION file (#68) ; SITEN - Primary site number of remote site ($$SITE^VASITE) ; ORD - Free text ordered test name from WKLD CODE file (#64) ; LRNLT - National Laboratory test code from WKLD CODE file (#64) ; LRIDT - Inverse date/time (accession date/time) ; LRSS - test subscript defined in LABORATORY TEST file (#60) ; LRDFN - IEN in LAB DATA file (#63) ; ORDT - Order date ; LA7VDB - <opt><byref> Chemistry results or database section ; for MI, SP, CY, EM subscripts ; ex. glucose LA7VDB(2)=LR NODE ; LA7VDB(2,1)="C" (corrected results) ; MI: LA7VDB(File #64 Field #63)="" ; SP: LA7VDB("88515.0000")="" CY: LA7VDB("88593.0000")="" ; EM: LA7VDB("88597.0000")="" AU: LA7VDB("88533.0000")="" ; LA7MTYP (Optional) - Message Type (ORU or ORR) defaults to ORU |
|
MIAP(LRAA,LRAD,LRAN,LR60,LRDFN,LRSS,LRIDT,LRODT) | ; Makes MI/AP calls to send results to LA7V QUEUE
|
|
CHKACC | ; Check/validate parameters passed in before storing in file #62.49
|
|
ACK | ; ACKnowledgment message processor
|
|
HLSTATUS(LA7MTYP,SITE,LRSS) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^LAB(60 - [#60] | GET1^DIQ |
^LAHM(62.49 - [#62.49] | GET1^DIQ |
^LAM - [#64] | GET1^DIQ |