LA7ADL1 ;DALOI/JMC - Automatic Download of Test Orders (Cont'd) ;Aug 14, 2008
Source file <LA7ADL1.m>
Package | Total | Call Graph |
---|---|---|
Automated Lab Instruments | 1 | ERROR^LA7UID |
Kernel | 1 | ($$FMTE,$$HTFM)^XLFDT |
VA FileMan | 1 | $$GET1^DIQ |
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 |
---|---|---|
BUILD | ; Build test listing for all instruments designated for auto download.
|
|
BLDINST(LA7INST,LA7WL) | ; Build list of instrument tests
; Call with LA7INST = ien of entry in file #62.4 ; LA7WL = ien of entry in file #62.8 (optional) ; will default to list associated with #62.4 entry. |
|
BLDTST | ; Build list of test that can be downloaded.
|
|
CHKRTN() | ; Check if download routine defined and valid
|
|
UNWIND(LA760,LA7URG,LA7PARNT) | ; Unwind profile - set tests into array LA7TREE with urgency.
|
|
SETSTOP(FLAG,USER) | ; Set "STOP" node in ^LA("ADL") global..
; Required parameters ; FLAG - Values passed can be: ; 0 = Auto download background task running. ; 1 = Start/Restart background task. ; 2 = Shutdown auto download background task, don't restart. ; 3 = Shutdown, don't start auto download task and don't collect accessions for downloading. ; USER - DUZ of user. |
|
SHOWST() | ; Show status
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("TEST" | CHKRTN+13 |
^LA("ADL" | SETSTOP+15*, SHOWST+4 |
^LAB(60 - [#60] | BLDTST+16, UNWIND+13, UNWIND+16, UNWIND+27, UNWIND+35, UNWIND+38 |
^LAB(62.4 - [#62.4] | BUILD+11, BLDINST+7, BLDINST+11, BLDINST+22, BLDTST+4, BLDTST+8, BLDTST+9 |
^LRO(68.2 - [#68.2] | BLDINST+19 |
^TMP("LA7" | BLDTST+15*, BLDTST+16* |
^TMP("LA7-INST" | BUILD+4!, BLDINST+5!, BLDINST+19*, BLDINST+25, BLDINST+27!, BLDTST+12* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
FLAG | SETSTOP~, SETSTOP+10, SETSTOP+15 |
I | UNWIND+29~, UNWIND+32*, UNWIND+35*, UNWIND+38 |
II | UNWIND+36~, UNWIND+38*, UNWIND+40, UNWIND+41 |
LA760 | UNWIND~, UNWIND+13, UNWIND+16, UNWIND+19, UNWIND+24, UNWIND+27, UNWIND+35, UNWIND+38, UNWIND+40 |
>> LA7ADL | BUILD+8* |
LA7AUTO | BUILD+5! |
LA7AUTO( | BLDINST+7*, BLDINST+9!, BLDINST+11*, BLDINST+16, BLDINST+26!, CHKRTN+7, CHKRTN+12, CHKRTN+13, CHKRTN+18, CHKRTN+25 , CHKRTN+27! |
LA7ERR | CHKRTN+2~, CHKRTN+4*, CHKRTN+8*, CHKRTN+14*, CHKRTN+18, CHKRTN+20*, CHKRTN+24, CHKRTN+29 |
LA7I | BUILD+2~, BLDINST+21*, BLDINST+22*, BLDTST+4, BLDTST+8, BLDTST+9, BLDTST+12, BLDTST+15, BLDTST+16 |
LA7INST | BUILD+2~, BUILD+10*, BUILD+11*, BLDINST~, BLDINST+5, BLDINST+7, BLDINST+9, BLDINST+11, BLDINST+16, BLDINST+19 , BLDINST+22, BLDINST+25, BLDINST+26, BLDINST+27, BLDTST+4, BLDTST+8, BLDTST+9, BLDTST+12, BLDTST+15, BLDTST+16 , CHKRTN+7, CHKRTN+12, CHKRTN+13, CHKRTN+18, CHKRTN+25, CHKRTN+27 |
LA7PARNT | UNWIND~, UNWIND+27, UNWIND+41 |
>> LA7PCNT | UNWIND+7, UNWIND+20*, UNWIND+27*, UNWIND+32* |
>> LA7TREE( | UNWIND+19, UNWIND+24*, UNWIND+27* |
LA7URG | UNWIND~, UNWIND+10*, UNWIND+22*, UNWIND+24, UNWIND+27, UNWIND+41 |
LA7WL | BUILD+2~, BLDINST~, BLDINST+16*, BLDINST+19 |
USER | SETSTOP~, SETSTOP+12*, SETSTOP+15 |
X | BLDTST+2~, BLDTST+8*, BLDTST+12, BLDTST+15, BLDTST+16, CHKRTN+2~, CHKRTN+13*, SHOWST+2~, SHOWST+4*, SHOWST+5 , SHOWST+7, SHOWST+8, SHOWST+9, SHOWST+10 |
XQA | CHKRTN+2~ |
XQAMSG | CHKRTN+2~, CHKRTN+4*, CHKRTN+9*, CHKRTN+15*, CHKRTN+21*, CHKRTN+25* |
Y | BLDTST+2~, BLDTST+9*, BLDTST+12, SHOWST+2~, SHOWST+5*, SHOWST+8*, SHOWST+9*, SHOWST+10*, SHOWST+12 |
Name | Field # of Occurrence |
---|---|
$T(@$PIECE^2;4(10) | CHKRTN+19 |