©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
LA7VIN ;VA/DALOI/JMC - Process Incoming Lab HL7 Messages ; Jan 12, 2005
Source file <LA7VIN.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 4 | (,$$S)^%ZTLOAD $$NOW^XLFDT DUZ^XUP OPTSTAT^XUTMOPT |
| Automated Lab Instruments | 2 | XQA^LA7UXQA NXTMSG^LA7VIN1 |
| VA Fileman | 1 | $$FIND1^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QLAH(LWL) | ; Call here to queue result processing routine to run in the background.
; Call with LWL = pointer to loadlist in file #68.2 |
|
| QUE | ; Call here to queue this processing routine to run in the background.
; Required variables are: LA76248 = pointer to configuration in 62.48 |
|
| EN | ; Only one process should run at a time
|
|
| GETIN | ; Check the incoming queue for messages and then call LA7VIN1 to
; process the message. |
|
| CHECKTM | ; Check is LA7TASK NIGHTY is scheduled in TaskMan.
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | FIND1^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAH("Z" | QLAH+6, QLAH+8 |
| ^LAHM(62.48 - [#62.48] | EN+3, EN+16, EN+25, QUE+6, QUE+10, QUE+14 |
| ^LAHM(62.49 - [#62.49] | GETIN+4, GETIN+10, GETIN+13, GETIN+16 |
| ^LRO(68.2 - [#68.2] | QLAH+11 |
| ^TMP("LA7TREE" | GETIN+18! |
| Name | Line Occurrences |
|---|---|
| CHECKTM | EN+31 |
| GETIN | EN+22 |
| QLAH | GETIN+25 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CENUM | EN+34! |
| DPF | EN+34! |
| ECHOALL | EN+34! |
| ER | EN+34! |
| IDE | EN+34! |
| IDT | EN+34! |
| LA76248 | EN+3, EN+12, EN+16, EN+25, EN+33!, GETIN+4, GETIN+10, QUE+6, QUE+10, QUE+11 , QUE+14, CHECKTM+14 |
| LA76249 | EN+1~, GETIN+10*, GETIN+12, GETIN+13, GETIN+16 |
| LA7I | EN+1~, GETIN+23*, GETIN+24*, GETIN+25, GETIN+26 |
| LA7INTYP | EN+1~, EN+16*, GETIN+21 |
| LA7INTYP("LWL" | GETIN+21, GETIN+24, GETIN+26! |
| LA7J | CHECKTM+2~, CHECKTM+8*, CHECKTM+9* |
| LA7LOOP | EN+1~, EN+19*, GETIN+7* |
| LA7TSK | CHECKTM+2~, CHECKTM+3*, CHECKTM+4, CHECKTM+7 |
| LA7TSK( | CHECKTM+9 |
| LA7X | EN+1~, EN+8*, EN+9, EN+13 |
| LALCT | EN+34! |
| LANM | EN+34! |
| LAZZ | EN+34! |
| LINK | EN+34! |
| LRTEC | EN+34! |
| LWL | QLAH~, QLAH+6, QLAH+8, QLAH+11, QLAH+12 |
| MSG | EN+10~, EN+11*, EN+12, CHECKTM+2~, CHECKTM+13*, CHECKTM+14 |
| NOW | EN+34!, CHECKTM+2~, CHECKTM+8*, CHECKTM+9 |
| OK | CHECKTM+2~, CHECKTM+3*, CHECKTM+9*, CHECKTM+10 |
| RMK | EN+34! |
| T | EN+34! |
| TC | EN+34! |
| TP | EN+34! |
| TSK | EN+34! |
| WDT | EN+34! |
| ZTDESC | QUE+3~, QUE+10*, QLAH+3~, QLAH+11* |
| ZTDTH | QUE+3~, QUE+9*, QLAH+3~, QLAH+10* |
| ZTIO | QUE+3~, QUE+9*, QLAH+3~, QLAH+10* |
| >> ZTQUEUED | EN+28 |
| >> ZTREQ | EN+28* |
| ZTRTN | QUE+3~, QUE+9*, QLAH+3~, QLAH+10* |
| ZTSAVE | QUE+3~, QLAH+3~ |
| ZTSAVE("LA76248" | QUE+11* |
| ZTSAVE("LRLL" | QLAH+12* |
| ZTSK | QUE+3~, QLAH+3~ |
| >> ZTSTOP | EN+19, EN+21*, GETIN+10, GETIN+12*, GETIN+22 |