LA7VIN ;DALOI/JMC - Process Incoming Lab HL7 Messages ;11/18/15 12:29
Source file <LA7VIN.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 |
|---|---|---|
| EN | ; Only one process should run at a time
|
|
| GETIN | ; Check the incoming queue for messages and then call LA7VIN1 to process the message.
|
|
| CHKPROC | ; Check if any processing routine need to be tasked to process info in LAH
|
|
| QUE | ; Call here to queue this processing routine to run in the background.
; Required variables are: LA76248 = pointer to configuration in 62.48 |
|
| QLAH(LWL,ZTRTN) | ; Call here to queue result processing routine to run in the background.
; Call with LWL = pointer to load list in file #68.2 ; ZTRTN = name of processing routine to task |
|
| CHECKTM | ; Check is LA7TASK NIGHTY is scheduled in TaskMan.
|
|
| CHECKMG | ; Check if LAB MESSAGING mail group has active members.
|
|
| XTMP | ; Set/update XTMP with current run time of this processing routine
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | QUE+21, QLAH+13 |
| $$S^%ZTLOAD | EN+34, GETIN+21 |
| $$FIND1^DIC | EN+18 |
| DT^DICRW | EN+9 |
| DEL^LA7UXQA | CHECKMG+17 |
| XQA^LA7UXQA | EN+24, CHECKTM+14 |
| NXTMSG^LA7VIN1 | GETIN+24 |
| $$NOW^XLFDT | CHECKTM+8 |
| $$GOTLOCAL^XMXAPIG | CHECKMG+11, CHECKMG+20 |
| SETUP^XQALERT | CHECKMG+22, CHECKMG+28 |
| DUZ^XUP | EN+26 |
| OPTSTAT^XUTMOPT | CHECKTM+4 |
| 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+11, EN+25, EN+29, EN+39, QUE+14, QUE+19, QUE+25 |
| ^LAHM(62.49 - [#62.49] | GETIN+13, GETIN+19, GETIN+22, GETIN+25 |
| ^LRO(68.2 - [#68.2] | QLAH+11 |
| ^TMP("LA7TREE" | GETIN+29! |
| ^TMP("XMERR" | CHECKMG+10!, CHECKMG+23!, CHECKMG+29! |
| ^XTMP("LA7 PROXY" | EN+16, EN+19*, EN+20* |
| ^XTMP("LA7CHECKMG" | CHECKMG+5, CHECKMG+8* |
| ^XTMP("LA7VIN" | EN+42!, QUE+10, XTMP+2*, XTMP+3* |
| ^XUSEC("LRLIASON" | CHECKMG+27 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CENUM | EN+54! |
| >> DILOCKTM | GETIN+22, QUE+14, QLAH+6 |
| DIQUIET | EN+4~, EN+7* |
| DPF | EN+54! |
| DT | EN+19, CHECKMG+5, CHECKMG+8, XTMP+2 |
| ECHOALL | EN+54! |
| ER | EN+54! |
| IDE | EN+54! |
| IDT | EN+54! |
| LA76248 | EN+11, EN+24, EN+25, EN+29, EN+39, EN+42, EN+53!, GETIN+13, GETIN+19, QUE+10 , QUE+14, QUE+19, QUE+20, QUE+25, CHECKTM+14, XTMP+3 |
| LA76249 | EN+4~, GETIN+19*, GETIN+21, GETIN+22, GETIN+25 |
| LA7I | EN+4~, CHKPROC+5*, CHKPROC+6*, CHKPROC+7, CHKPROC+8, CHKPROC+13*, CHKPROC+14*, CHKPROC+15, CHKPROC+16 |
| LA7INTYP | EN+4~, EN+29*, CHKPROC+3, CHKPROC+11 |
| LA7INTYP("LWL" | CHKPROC+3, CHKPROC+6, CHKPROC+8!, CHKPROC+11, CHKPROC+14, CHKPROC+16! |
| LA7J | CHECKTM+2~, CHECKTM+8*, CHECKTM+9* |
| LA7LOOP | EN+4~, EN+32*, EN+36, GETIN+16* |
| LA7MSGPROCESSED | GETIN+6~, GETIN+7*, GETIN+26*, GETIN+27 |
| LA7TSK | CHECKTM+2~, CHECKTM+3*, CHECKTM+4, CHECKTM+7 |
| LA7TSK( | CHECKTM+9 |
| LA7X | EN+4~, EN+16*, EN+17, EN+18*, EN+20, EN+21, EN+26, QUE+9~, QUE+10*, QUE+11 |
| LA7Y | QUE+9~, QUE+10*, QUE+11 |
| LALCT | EN+54! |
| LANM | EN+54! |
| LAZZ | EN+54! |
| LINK | EN+54! |
| LRQUIET | EN+4~, EN+7* |
| LRTEC | EN+54! |
| LWL | QLAH~, QLAH+6, QLAH+8, QLAH+11, QLAH+12 |
| MSG | EN+22~, EN+23*, EN+24, CHECKTM+2~, CHECKTM+13*, CHECKTM+14 |
| NOW | EN+54!, CHECKTM+2~, CHECKTM+8*, CHECKTM+9 |
| OK | CHECKTM+2~, CHECKTM+3*, CHECKTM+9*, CHECKTM+10 |
| RMK | EN+54! |
| T | EN+54! |
| TC | EN+54! |
| TP | EN+54! |
| TSK | EN+54! |
| WDT | EN+54! |
| XMERR | CHECKMG+2~ |
| XQA | CHECKMG+2~, CHECKMG+27* |
| XQA("G.LMI" | CHECKMG+21* |
| XQAID | CHECKMG+2~, CHECKMG+16*, CHECKMG+17 |
| XQAMSG | CHECKMG+2~, CHECKMG+14*, CHECKMG+26* |
| ZTDESC | QUE+17~, QUE+19*, QLAH+10~, QLAH+11* |
| ZTDTH | QUE+17~, QUE+18*, QLAH+10~, QLAH+11* |
| ZTIO | QUE+17~, QUE+18*, QLAH+10~, QLAH+11* |
| >> ZTQUEUED | EN+12, EN+45 |
| >> ZTREQ | EN+12*, EN+45* |
| ZTRTN | QUE+17~, QUE+18*, QLAH~ |
| ZTSAVE | QUE+17~, QLAH+10~ |
| ZTSAVE("LA76248" | QUE+20* |
| ZTSAVE("LRLL" | QLAH+12* |
| ZTSK | QUE+17~, QLAH+10~ |
| >> ZTSTOP | EN+32, EN+34*, GETIN+19, GETIN+21*, CHKPROC+4, CHKPROC+12 |
