LA7VMSG ;DALOI/JMC - LAB ORU (Observation Result) message builder ;08/12/13 15:12
Source file <LA7VMSG.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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 | Field # of Occurrence |
|---|---|
| FILE^DIE | SET+67 |
| UPDATE^DIE | SET+77 |
| CLEAN^DILF | SET+68, SET+78 |
| $$GET1^DIQ | MIAP+15, MIAP+16, MIAP+18, MIAP+20, MIAP+29, MIAP+32, MIAP+33, MIAP+34, MIAP+35, MIAP+36 , MIAP+37 |
| CREATE^LA7LOG | SET+81, CHKACC+17, CHKACC+20, CHKACC+23, CHKACC+26, CHKACC+29, CHKACC+32 |
| $$OK2SEND^LA7SRR | SET+81 |
| ACK^LA7VHL | ACK+2 |
| $$INIT6249^LA7VHLU | SET+43 |
| $$RETFACID^LA7VHLU2 | SET+30 |
| SET^LA7VMSG | MIAP+45 |
| START^LA7VMSG1 | ORU+5 |
| $$CJ^XLFSTR | MIAP+42 |
| $$GET^XPAR | HLSTATUS+17, HLSTATUS+18 |
| $$PATCH^XPDUTL | HLSTATUS+12 |
| $$WHAT^XUAF4 | HLSTATUS+17, HLSTATUS+18 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^LAB(60 - [#60] | GET1^DIQ |
| ^LAHM(62.49 - [#62.49] | GET1^DIQ |
| ^LAM - [#64] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAHM(62.48 - [#62.48] | SET+32, SET+35 |
| ^LAHM(62.49 - [#62.49] | SET+84, MIAP+27, MIAP+28 |
| ^LR - [#63] | CHKACC+14 |
| ^LRO(68 - [#68] | MIAP+23, CHKACC+5, CHKACC+7, CHKACC+10, CHKACC+12, CHKACC+17 |
| Name | Line Occurrences |
|---|---|
| $$HLSTATUS | SET+39 |
| CHKACC | SET+49 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| FDA | SET+22~ |
| FDA(1 | SET+52*, SET+53*, SET+54*, SET+55*, SET+56*, SET+57*, SET+58*, SET+59*, SET+60*, SET+61* , SET+62*, SET+63*, SET+64*, SET+65* |
| FDA(2 | SET+74*, SET+75* |
| FDAIEN | SET+73~ |
| FDAIEN(1 | SET+76* |
| I | CHKACC+2~, CHKACC+10*, CHKACC+11, CHKACC+12*, CHKACC+14* |
| IOM | MIAP+42 |
| LA76248 | SET+22~, SET+30*, SET+32*, SET+34, SET+35, SET+53, MIAP+13~, MIAP+27*, MIAP+28 |
| LA76249 | SET+22~, SET+43*, SET+44, SET+52, SET+53, SET+54, SET+55, SET+56, SET+57, SET+58 , SET+59, SET+60, SET+61, SET+62, SET+63, SET+64, SET+65, SET+74, SET+75, SET+76 , SET+84, MIAP+13~, MIAP+28*, MIAP+29, MIAP+32, MIAP+33, MIAP+34, MIAP+35, MIAP+36, MIAP+37 |
| LA763 | CHKACC+2~ |
| LA763( | CHKACC+14* |
| LA763("ORU" | CHKACC+29, CHKACC+32 |
| LA764 | MIAP+13~, MIAP+15*, MIAP+16, MIAP+18, MIAP+20 |
| LA768 | CHKACC+2~ |
| LA768( | CHKACC+12*, CHKACC+26, CHKACC+32 |
| LA768(0 | CHKACC+20 |
| LA768(3 | CHKACC+23 |
| LA7AA | CHKACC+2~, CHKACC+10*, CHKACC+11*, CHKACC+12, CHKACC+17 |
| LA7AD | CHKACC+2~, CHKACC+10*, CHKACC+11*, CHKACC+12 |
| LA7AN | CHKACC+2~, CHKACC+10*, CHKACC+11*, CHKACC+12 |
| LA7DT | SET+22~ |
| LA7ERR | SET+22~, SET+24*, SET+54, CHKACC+17*, CHKACC+20*, CHKACC+23*, CHKACC+26*, CHKACC+29*, CHKACC+32* |
| LA7FACID | SET+22~, SET+30*, SET+31 |
| LA7MTYP | ORU+3~, ORU+4*, ORR+3~, ORR+4*, SET~, SET+25*, SET+27, SET+56, HLSTATUS~, HLSTATUS+17 , HLSTATUS+18 |
| LA7NLT | MIAP+13~, MIAP+16*, MIAP+17, MIAP+34, MIAP+45 |
| LA7NLTN | MIAP+13~, MIAP+18*, MIAP+45 |
| LA7ONQUE | MIAP+13~, MIAP+26*, MIAP+39*, MIAP+41 |
| LA7PAR | HLSTATUS+14~, HLSTATUS+16*, HLSTATUS+17*, HLSTATUS+18*, HLSTATUS+20, HLSTATUS+21, HLSTATUS+22, HLSTATUS+23, HLSTATUS+24, HLSTATUS+25 , HLSTATUS+26 |
| LA7RSITE | SET+22~, SET+31*, SET+32, SET+55 |
| LA7SS | MIAP+13~ |
| LA7VDB | SET~, MIAP+13~, MIAP+20*, MIAP+21 |
| LA7VDB( | SET+72, SET+75 |
| LA7Y | SET+22~, SET+71*, SET+72*, SET+74, SET+75, MIAP+13~, MIAP+45 |
| LA7Y( | MIAP+21* |
| LAHLSTAT | SET+22~, SET+39*, SET+40 |
| LR60 | MIAP~, MIAP+15 |
| LRAA | MIAP~, MIAP+23 |
| LRAD | MIAP~, MIAP+23 |
| LRAN | MIAP~, MIAP+23 |
| LRDFN | SET~, SET+64, MIAP~, MIAP+37, MIAP+45, CHKACC+14, CHKACC+20 |
| LRIDT | SET~, SET+62, MIAP~, MIAP+35, MIAP+45, CHKACC+14, CHKACC+23 |
| LRNLT | SET~, SET+61 |
| LRODT | MIAP~, MIAP+45 |
| LRORU3 | MIAP+13~, MIAP+23*, MIAP+32, MIAP+33, MIAP+45 |
| LRSS | SET~, SET+39, SET+63, MIAP~, MIAP+36, MIAP+45, CHKACC+14, CHKACC+17, HLSTATUS~, HLSTATUS+21 , HLSTATUS+22, HLSTATUS+23, HLSTATUS+24, HLSTATUS+25, HLSTATUS+26 |
| LRUID | SET~, SET+57, CHKACC+4, CHKACC+5, CHKACC+6*, CHKACC+7*, CHKACC+8, CHKACC+10, CHKACC+11 |
| ORD | SET~, SET+60 |
| ORDT | SET~, SET+65 |
| PORD | SET+22~ |
| PORT | SET+22~ |
| RSITE | SET+22~ |
| RUID | SET~, SET+55, SET+59, CHKACC+4, CHKACC+6, CHKACC+26, CHKACC+29 |
| SITE | SET~, SET+39, HLSTATUS~, HLSTATUS+17, HLSTATUS+18 |
| SITEN | SET~, SET+30, SET+58 |
| U | MIAP+32, MIAP+33, MIAP+45 |