LA7SRR ;DALOI/JMC - Select Accessions for Resending LEDI Results ;11/20/09 14:09
Source file <LA7SRR.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Automated Lab Instruments | 3 | LA7S RESULTS RETRANSMIT LA7VMSG LA7VORU |
| Lab Service | 3 | LR7ORB3 LRVR0 LRVRMI5 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Select Accessions to resend.
|
|
| SETTMP | ; Setup TMP global with accession to resend.
|
|
| OK2SEND() | ; Check is this accession is OK to send, i.e. approved, released (preliminary/final/corrected)
; Returns OK = 1 (true) - report can be sent ; 0 (false) - report not in a status to be sent. |
|
| NPSTATUS | ; Check ORUT node for test with NP status
|
|
| EXIT | ; Housekeeping - clean up.
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | EN+59 |
| EN^DDIOL | EN+43, EN+67, SETTMP+12, SETTMP+18, SETTMP+28, SETTMP+51 |
| $$FIND1^DIC | EN+50, SETTMP+59, NPSTATUS+3 |
| $$GET1^DIQ | EN+52, SETTMP+16, SETTMP+44, SETTMP+45, SETTMP+62 |
| ^DIR | EN+9, EN+21, EN+36, EN+41 |
| $$DEFCODE^LA7VHLU5 | SETTMP+37 |
| SET^LA7VMSG | EN+55 |
| ^LRWU4 | EN+16, EN+26 |
| FileNo | Call Tags |
|---|---|
| ^LAM - [#64] | FIND1^DIC, GET1^DIQ |
| ^LAB(64.061 - [#64.061] | FIND1^DIC |
| ^LRO(68 - [#68] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^LAB(60 - [#60] | SETTMP+43 |
| ^LR - [#63] | SETTMP+32, SETTMP+33, SETTMP+36, SETTMP+57, SETTMP+58, OK2SEND+9, OK2SEND+12, OK2SEND+15, OK2SEND+18, NPSTATUS+5 |
| ^LRO(68 - [#68] | EN+18, EN+24, SETTMP+4, SETTMP+5, SETTMP+42 |
| ^TMP("LA7S-RTM" | EN+28, EN+32, EN+45, EN+47, EN+49, EN+54, SETTMP+76*, SETTMP+78*, EXIT+1! |
| Name | Field # of Occurrence |
|---|---|
| ^( | NPSTATUS+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | EXIT+4! |
| DA | EXIT+4! |
| DIC | EXIT+4! |
| DIR | EN+21!, EN+41!, EXIT+4! |
| DIR("A" | EN+8*, EN+20*, EN+33*, EN+34*, EN+38*, EN+39* |
| DIR("B" | EN+8*, EN+19*, EN+40* |
| DIR(0 | EN+7*, EN+19*, EN+35*, EN+40* |
| DIRUT | EN+10, EN+22, EXIT+4! |
| DTOUT | EN+27, EXIT+4! |
| DUOUT | EN+27, EXIT+4! |
| FIRST | EN+18*, EN+23, EXIT+4! |
| LA763 | SETTMP+2~ |
| LA764 | EN+50*, EN+51, EN+52, SETTMP+43*, SETTMP+44, SETTMP+45, SETTMP+59*, SETTMP+62, EXIT+2! |
| LA768 | SETTMP+2~ |
| LA768( | SETTMP+5*, SETTMP+6, SETTMP+9, SETTMP+11, SETTMP+17, SETTMP+27, SETTMP+50, SETTMP+75 |
| LA768(0 | SETTMP+23 |
| LA768(3 | SETTMP+23 |
| LA7CNT | EN+5*, EN+39, EN+44*, EN+48*, EN+64, SETTMP+74*, EXIT+2! |
| LA7DISPO | NPSTATUS+2~, NPSTATUS+3*, NPSTATUS+5 |
| LA7ERR | SETTMP+2~ |
| LA7I | SETTMP+2~, SETTMP+5*, SETTMP+55!, SETTMP+56*, SETTMP+57*, SETTMP+58, SETTMP+77*, SETTMP+78*, NPSTATUS+2~, NPSTATUS+4* , NPSTATUS+5* |
| LA7I(0 | SETTMP+58*, SETTMP+59, SETTMP+64 |
| LA7NLT | EN+48*, EN+49*, EN+50, EN+54, EN+55, SETTMP+34*, SETTMP+35, SETTMP+37*, SETTMP+38, SETTMP+44* , SETTMP+46, SETTMP+59*, SETTMP+61, SETTMP+63, SETTMP+64, EXIT+2! |
| LA7NLTN | EN+52*, EN+55, EXIT+2! |
| LA7QUIT | EN+5*, EN+17*, EN+22*, EN+25, EN+27*, EN+28*, EN+30, EXIT+2! |
| LA7TYPE | EN+11*, EN+15, EN+25, EXIT+2! |
| LA7UID | EN+44*, EN+45*, EN+47, EN+49, EN+54, SETTMP+6*, SETTMP+11, SETTMP+17, SETTMP+27, SETTMP+50 , SETTMP+73, SETTMP+76, SETTMP+78, EXIT+2! |
| LA7VDB | SETTMP+2~, SETTMP+45*, SETTMP+46, SETTMP+62*, SETTMP+63 |
| LA7X | EN+46!, EN+47*, EN+55, EN+61!, EN+67, SETTMP+2~, SETTMP+10~, SETTMP+11*, SETTMP+12, SETTMP+15~ , SETTMP+18, SETTMP+26~, SETTMP+27*, SETTMP+28, SETTMP+48~, SETTMP+51, OK2SEND+6~, OK2SEND+18*, EXIT+2! |
| LA7X(1 | EN+62*, SETTMP+16*, SETTMP+49* |
| LA7X(2 | EN+64*, EN+66*, SETTMP+17*, SETTMP+50* |
| LA7X(3 | EN+65* |
| LA7Y | EN+53!, EN+54*, EN+55, SETTMP+2~, SETTMP+47, SETTMP+66, SETTMP+73, EXIT+2! |
| LA7Y( | SETTMP+35*, SETTMP+38*, SETTMP+46*, SETTMP+61*, SETTMP+63*, SETTMP+64*, SETTMP+78 |
| LA7Y("88515.0000" | SETTMP+67* |
| LA7Y("88533.0000" | SETTMP+71* |
| LA7Y("88593.0000" | SETTMP+68* |
| LA7Y("88597.0000" | SETTMP+69* |
| LAST | EN+23*, EN+24, EXIT+4! |
| LR60 | SETTMP+2~, SETTMP+41*, SETTMP+42*, SETTMP+43 |
| LR61 | SETTMP+2~, SETTMP+36*, SETTMP+37 |
| LRAA | EN+18, EN+24, SETTMP+4, SETTMP+5, SETTMP+16, SETTMP+42, EXIT+3! |
| LRACC | EN+14*, EXIT+3! |
| LRAD | EN+18, EN+24, SETTMP+5, SETTMP+42, EXIT+3! |
| LRAN | EN+17, EN+18, EN+19, EN+20, EN+23*, EN+24*, EN+25, EN+28, SETTMP+5, SETTMP+42 , EXIT+3! |
| LRDFN | SETTMP+2~, SETTMP+23*, SETTMP+32, SETTMP+33, SETTMP+36, SETTMP+57, SETTMP+58, SETTMP+75, OK2SEND+9, OK2SEND+12 , OK2SEND+15, OK2SEND+18, NPSTATUS+5 |
| LREXMPT | EN+14*, EXIT+3! |
| LRIDIV | EXIT+3! |
| LRIDT | SETTMP+2~, SETTMP+23*, SETTMP+32, SETTMP+33, SETTMP+36, SETTMP+57, SETTMP+58, SETTMP+75, OK2SEND+9, OK2SEND+12 , OK2SEND+15, OK2SEND+18, NPSTATUS+5 |
| LRODT | SETTMP+2~, SETTMP+23*, SETTMP+75 |
| LRSB | SETTMP+2~, SETTMP+31*, SETTMP+32*, SETTMP+33, SETTMP+35, SETTMP+37, SETTMP+38 |
| LRSS | SETTMP+2~, SETTMP+4*, SETTMP+14, SETTMP+30, SETTMP+32, SETTMP+33, SETTMP+36, SETTMP+37, SETTMP+40, SETTMP+57 , SETTMP+58, SETTMP+60, SETTMP+66, SETTMP+67, SETTMP+68, SETTMP+69, SETTMP+71, SETTMP+75, OK2SEND+9, OK2SEND+12 , OK2SEND+15, OK2SEND+18, NPSTATUS+5, EXIT+3! |
| LRX | EXIT+3! |
| OK | OK2SEND+6~, OK2SEND+7*, OK2SEND+9*, OK2SEND+12*, OK2SEND+15*, OK2SEND+18*, OK2SEND+21, OK2SEND+22, NPSTATUS+5* |
| X | EN+18*, EN+19, SETTMP+33*, SETTMP+34, SETTMP+37, SETTMP+75*, SETTMP+76, EXIT+4! |
| Y | EN+11, EN+23, EN+42, EXIT+4! |
| ZTDESC | EN+58*, EXIT+5! |
| ZTDTH | EN+58*, EXIT+5! |
| ZTIO | EN+58*, EXIT+5! |
| ZTRTN | EN+58*, EXIT+5! |
| ZTSAVE | EXIT+5! |
| ZTSK | EN+63, EN+65, EXIT+5! |
