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 |