LRTSTOUT ;DALOI/STAFF - JAM TESTS OFF ACCESSIONS ;July 29, 2019@10:00
Source file <LRTSTOUT.m>
Package | Total | Call Graph |
---|---|---|
Lab Service | 11 | NEW^LR7OB1 COM^LRNUM DC^LROR6 SHOW^LROS EN^LRPARAM END^LRTSTJAM V^LRU XREF^LRVER3A SETRL^LRVERA ^LRWU4 PT^LRX |
VA FileMan | 5 | (,$$FIND1)^DIC (FILE,UPDATE)^DIE (CLEAN,LOCK)^DILF $$GET1^DIQ ^DIR |
Automated Lab Instruments | 3 | EN^LA7ADL UNWIND^LA7ADL1 (MIAP,SET)^LA7VMSG |
Kernel | 1 | ($$FMTE,$$NOW)^XLFDT |
Registration | 1 | KVA^VADPT |
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 | ;
|
|
FIX | ;
|
|
FX1 | ;
|
|
CHG | ;
|
|
SHOWTST | ;
|
|
DEMO | ||
SET | ;
|
|
OR(LRORDTST,LRTSTS,ORIFN) | ;evaluate overall status of order
|
|
ROL | ;
|
|
LRACC | ;
|
|
LREND | ;
|
|
UNLOCK | ;
|
|
EXIT | ;
|
|
END | ;
|
|
FX2 | ;
|
|
FX3 | ;
|
|
UPD63(LRDFN,LRSS,LRIDT,LRTNM,LRCCOM) | ; Update file #63 with comment reflecting dispostion.
|
|
CLNPENDG | ; Remove pending and other info from Lab test when set to not performed
|
|
ORUT | ; Update ORUT node in file #63 with this disposition
|
|
LEDICHK | ; Add test to LROTA array if it is a LEDI accesison - added with ccr_6164n
|
|
LEDISET(LROTA) | ; added with ccr_6164n
|
|
LEDI(LRAA,LRAD,LRAN,LRDFN,LRSS,LRIDT,LRODT,LRORDTST,LA7VDB) | ; Put accession in queue to send message back to collecting site.
|
|
CHK63(LR60,LRDFN,LRSS,LRIDT) | ; Check if tests being NP already have resuls in file #63.
; Call with LR60 = ien of entry in file #60 ; LRDFN = ien of entry in file #63 ; LRSS = file #63 subscript ; LRIDT = file #63 inverse date/time of specimen |
Name | Field # of Occurrence |
---|---|
^DIC | CHG+5 |
$$FIND1^DIC | ORUT+13, ORUT+17 |
FILE^DIE | UPD63+11, ORUT+26 |
UPDATE^DIE | UPD63+16 |
CLEAN^DILF | UPD63+18, ORUT+27 |
LOCK^DILF | FIX+6, FIX+15 |
$$GET1^DIQ | ORUT+11, ORUT+15, LEDI+11 |
^DIR | FIX+25, SHOWTST+9, FX2+15, FX3+7, FX3+22 |
EN^LA7ADL | SET+88 |
UNWIND^LA7ADL1 | LEDISET+20, CHK63+14 |
MIAP^LA7VMSG | LEDI+15 |
SET^LA7VMSG | LEDI+12 |
NEW^LR7OB1 | SET+50, SET+53 |
COM^LRNUM | FX3+14 |
DC^LROR6 | FX2+2 |
SHOW^LROS | FIX+22 |
EN^LRPARAM | EN+2 |
END^LRTSTJAM | END+4 |
V^LRU | END+4 |
XREF^LRVER3A | SET+77 |
SETRL^LRVERA | SET+83 |
^LRWU4 | LRACC+2 |
PT^LRX | FIX+12 |
KVA^VADPT | END+4 |
$$FMTE^XLFDT | SHOWTST+8, SET+30, UPD63+6 |
$$NOW^XLFDT | FIX+2, SET+1, UPD63+4 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^LAM - [#64] | GET1^DIQ |
^LAB(64.061 - [#64.061] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | CHG+5, CHG+30, SHOWTST+6, CLNPENDG+2, ORUT+4, ORUT+7, LEDISET+23, LEDI+10, CHK63+17 |
^LR - [#63] | FIX+11, FIX+18, SET+75, UNLOCK+1, CLNPENDG+4!, CLNPENDG+5!, ORUT+12, ORUT+16, CHK63+19, CHK63+20 , CHK63+21, CHK63+22 |
^LRO(68 - [#68] | FIX+5, FIX+9, FIX+14, CHG+33, SHOWTST+5, SHOWTST+6, SHOWTST+11, SET+8, SET+10, SET+12 , SET+37, SET+71, SET+72, SET+73, SET+77, SET+87, SET+88, OR+25, OR+26, OR+32 , OR+33, ROL+1, ROL+2*, LRACC+3, LRACC+4, UNLOCK+2, ORUT+6, LEDICHK+16, LEDICHK+18, LEDICHK+20 , LEDI+10 |
^LRO(69 - [#69] | FIX+20, CHG+11, SET+2, SET+10, SET+15, SET+17, SET+19, SET+21, SET+25, SET+29* , SET+30*, SET+31*, SET+33, SET+37*, SET+38*, SET+59*, SET+61, SET+62*, SET+64*, SET+65* , OR+11, OR+12 |
^TMP("LR" | SET+51!, OR+7!, OR+43* |
Name | Line Occurrences |
---|---|
$$CHK63 | CHG+19 |
$$OR | SET+46 |
CHG | EN+10 |
CLNPENDG | CHG+33 |
DEMO | SHOWTST+3, SHOWTST+9 |
END | EN+6, CHG+9, CHG+11 |
EXIT | EN+12 |
FIX | EN+8 |
FX2 | CHG+26 |
FX3 | FX2+3, FX2+20 |
LEDI | LEDISET+26 |
LEDICHK | CHG+34 |
LEDISET | CHG+37 |
LRACC | FIX+3 |
ORUT | SET+82 |
ROL | SET+72, SET+73 |
SET | CHG+33 |
SHOWTST | FX1+1 |
UNLOCK | EN+9, EN+11, FIX+18, CHG+7, CHG+9, CHG+11 |
UPD63 | SET+76 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DA(1 | LRACC+4* |
>> DA(2 | LRACC+4* |
>> DFN | FIX+11* |
DI | END+2! |
DIC | CHG+1~, CHG+4* |
DIC("A" | CHG+3*, CHG+5* |
DIC("S" | CHG+4* |
DIC(0 | CHG+4* |
DIERR | ORUT+1~ |
DIR | FIX+24!, SHOWTST+1~, END+2!, FX2+5~, FX3+1~, FX3+20! |
DIR("?" | FX2+7*, FX2+8*, FX2+9*, FX2+10* |
DIR("A" | FX2+6*, FX3+3*, FX3+21* |
DIR("B" | FX3+4*, FX3+21* |
DIR(0 | FIX+25*, SHOWTST+2*, FX2+6*, FX3+5*, FX3+21* |
DIROUT | SHOWTST+1~, FX2+5~, FX3+1~ |
DIRUT | FIX+26, SHOWTST+1~, SHOWTST+9, FX2+5~, FX3+1~, FX3+23 |
DT | SET+31, SET+38, SET+77 |
DTOUT | SHOWTST+1~, FX2+5~, FX2+16, FX3+1~, FX3+8 |
DUOUT | SHOWTST+1~, FX2+5~, FX2+16, FX3+1~, FX3+8 |
DUZ | SET+59, SET+62, SET+64, SET+65, SET+71, ROL+2, UPD63+6, ORUT+25 |
DUZ(2 | SET+83 |
FDA | UPD63+2~ |
FDA(1 | UPD63+10*, UPD63+12!, UPD63+15*, UPD63+16, UPD63+17! |
I | CHG+1~, CHG+15*, CHG+16*, CHG+18, CHG+19 |
II | SET+4~, SET+49, SET+50, SET+53, SET+67! |
II( | SET+22* |
IOF | EN+4, CHG+12 |
LA7TREE | LEDISET+19~, CHK63+12~ |
LA7TREE( | LEDISET+22, CHK63+16 |
LA7VDB | LEDISET+14~, LEDISET+16*, LEDISET+26, LEDI~, LEDI+12 |
LA7VDB( | LEDISET+25* |
>> LR1AA | SET+37 |
>> LR1AD | SET+37 |
>> LR1AN | SET+37 |
LR60 | ORUT+1~, ORUT+3*, ORUT+4, ORUT+6, CHK63~, CHK63+14 |
LR60P | ORUT+1~, ORUT+6*, ORUT+7 |
LR64 | ORUT+1~, ORUT+3*, ORUT+4*, ORUT+8, ORUT+11, LEDI+9~, LEDI+10*, LEDI+11 |
LR64(0 | ORUT+11*, ORUT+12 |
LR64P | ORUT+1~, ORUT+3*, ORUT+7*, ORUT+8, ORUT+14, ORUT+15 |
LR64P(0 | ORUT+15*, ORUT+16 |
LR7DONE | SET+4~, SET+21*, SET+45*, SET+53, SET+56, SET+64 |
LRAA | FIX+5, FIX+9, FIX+14, FIX+21~, CHG+4, CHG+33, SHOWTST+5, SHOWTST+6, SHOWTST+11, SET+7 , SET+8, SET+10, SET+12, SET+33, SET+71, SET+72, SET+73, SET+77, SET+87, SET+88 , ROL+1, ROL+2, LRACC+3, LRACC+4, UNLOCK+2, ORUT+6, LEDICHK+16, LEDICHK+18, LEDICHK+20, LEDICHK+22 , LEDI~, LEDI+10, LEDI+15 |
LRACC | FIX+1~, FIX+3* |
LRACN | FIX+9*, FIX+21~, CHG+12, DEMO+1, EXIT+1!, END+2! |
LRACN0 | END+2! |
LRAD | FIX+5, FIX+9, FIX+14, FIX+21~, CHG+4, CHG+33, SHOWTST+5, SHOWTST+6, SHOWTST+11, SET+7 , SET+8, SET+10, SET+12, SET+33, SET+71, SET+72, SET+73, SET+77, SET+87, SET+88 , LRACC+4, UNLOCK+2, ORUT+6, LEDICHK+16, LEDICHK+18, LEDICHK+20, LEDICHK+22, LEDI~, LEDI+10, LEDI+15 |
LRAGE | END+2! |
LRAN | FIX+4, FIX+5, FIX+9, FIX+14, CHG+4, CHG+33, SHOWTST+5, SHOWTST+6, SHOWTST+11, SET+7 , SET+8, SET+10, SET+12, SET+33, SET+71, SET+72, SET+73, SET+77, SET+87, SET+88 , ROL+1, ROL+2, LRACC+1!, LRACC+3, LRACC+5*, UNLOCK+2, ORUT+6, LEDICHK+16, LEDICHK+18, LEDICHK+20 , LEDICHK+22, LEDI~, LEDI+10, LEDI+15 |
LRCCOM | CHG+10*, SET+29, SET+75, SET+76, FX2+20, FX3+18*, FX3+19, FX3+24*, FX3+25*, UPD63~ , UPD63+14 |
LRCCOM0 | END+1! |
LRCCOM1 | END+1!, FX2+1* |
LRCCOMO | UPD63+2~, UPD63+6*, UPD63+10, UPD63+14 |
LRCCOMX | END+1!, FX3+18*, FX3+25* |
LRCOM | END+2!, FX2+1* |
LRCOMM | CHG+1~ |
>> LRCOMX( | SET+24, SET+32*, SET+35, SET+39* |
LRCTST | CHG+1~, END+2! |
LRCTST( | CHG+5*, CHG+16, CHG+18, CHG+29 |
LRCTST(0 | CHG+6 |
>> LRDBUG | SET+5 |
LRDFN | FIX+10*, FIX+11, FIX+18, CHG+19, SET+75, SET+76, SET+83, ROL+1, UNLOCK+1, UPD63~ , UPD63+10, UPD63+15, CLNPENDG+4, CLNPENDG+5, ORUT+12, ORUT+16, ORUT+22, LEDICHK+22, LEDI~, LEDI+12 , LEDI+15, CHK63~, CHK63+19, CHK63+20, CHK63+21, CHK63+22 |
LRDIE | UPD63+2~, ORUT+1~ |
LRDIE(1 | UPD63+12!, UPD63+17! |
LRDISPO | ORUT+1~, ORUT+3*, ORUT+13*, ORUT+17*, ORUT+18, ORUT+23 |
LRDOC | END+2! |
>> LRDPF | FIX+11*, SET+44, FX2+2 |
LREND | EN+1~, EN+2, EN+3*, EN+5, EN+7*, EN+9, FIX+2*, FIX+4*, CHG+10*, CHG+26 , CHG+35, CHG+39*, LRACC+2*, LREND+1*, EXIT+1!, FX2+1*, FX2+2*, FX2+16*, FX2+20, FX3+2* , FX3+8*, FX3+11, FX3+23* |
LREXMPT | LRACC+2*! |
LRFDA | ORUT+1~ |
LRFDA(63 | ORUT+23*, ORUT+24*, ORUT+25* |
LRFLAG | CHK63+12~, CHK63+15*, CHK63+22*, CHK63+23*, CHK63+24*, CHK63+26 |
LRFN | UPD63+2~, UPD63+8*, UPD63+10, UPD63+15, ORUT+1~, ORUT+20*, ORUT+21, ORUT+23, ORUT+24, ORUT+25 |
LRI | SHOWTST+1~, SHOWTST+4*, SHOWTST+5*, SHOWTST+6, SET+4~, SET+14*, SET+15*, SET+17, SET+19, SET+21 , SET+24, SET+25, SET+29, SET+30, SET+31, SET+32, SET+33, SET+35, SET+37, SET+38 , SET+39, SET+59, SET+61, SET+62, SET+64, SET+65, END+1! |
LRIC | SHOWTST+1~, SHOWTST+6*, SHOWTST+8 |
LRIDT | FIX+14*, FIX+18, CHG+19, SET+75, SET+76, SET+81, SET+83, UNLOCK+1, UPD63~, UPD63+10 , UPD63+15, CLNPENDG+4, CLNPENDG+5, ORUT+12, ORUT+16, ORUT+22, LEDICHK+22, LEDI~, LEDI+12, LEDI+15 , CHK63~, CHK63+19, CHK63+20, CHK63+21, CHK63+22 |
LRIEN | ORUT+1~, ORUT+3*, ORUT+11*, ORUT+12*, ORUT+13, ORUT+14, ORUT+16*, ORUT+17, ORUT+22*, ORUT+23 , ORUT+24, ORUT+25 |
LRIFN | CLNPENDG+1~, CLNPENDG+2*, CLNPENDG+3, CLNPENDG+4, CLNPENDG+5 |
LRL | END+1!, FX3+1~, FX3+2*, FX3+5, FX3+14 |
>> LRLABKY | EN+3, CHG+35, SET+30, FX2+3, FX3+3, FX3+12, FX3+19, FX3+24, UPD63+6 |
LRLABRV | EXIT+1! |
LRLL | END+2! |
>> LRLLOC | SET+2* |
>> LRMERG | SET+30, SET+33, SET+44, SET+71, ROL+2, UPD63+6 |
LRMERGSO | SET+4~, SET+40*, SET+64 |
LRMSTATI | SET+40*, SET+53, END+1! |
LRN | SHOWTST+1~, SHOWTST+4*, SHOWTST+7*, SHOWTST+9* |
LRNATURE | FIX+1~, SET+29, SET+50, SET+53, END+1!, FX2+2 |
LRNOECHO | EXIT+1!, FX2+12!, UPD63+2~, UPD63+5* |
LRNOP | EN+7*, EN+10, FIX+2*, FIX+3, FIX+5*, FIX+7*, FIX+16*, FIX+18*, FIX+26*, CHG+20* , CHG+24, LRACC+5*, END+1! |
LRNOW | FIX+2*, SET+1*, SET+30, SET+71, ROL+2, EXIT+1!, END+2!, UPD63+4*, UPD63+6, ORUT+24 |
LROD0 | END+3! |
LROD1 | END+3! |
LROD3 | END+3! |
LRODT | FIX+10*, FIX+20, CHG+9, CHG+11, SHOWTST+11*, SET+2, SET+10, SET+15, SET+17, SET+19 , SET+21, SET+24, SET+25, SET+29, SET+30, SET+31, SET+32, SET+33, SET+35, SET+37 , SET+38, SET+39, SET+50, SET+53, SET+59, SET+61, SET+62, SET+64, SET+65, OR+11 , OR+12, LEDICHK+22, LEDI~, LEDI+12, LEDI+15 |
LROOS | END+3! |
LRORDTST | CHG+33*, SET+7, SET+12*, SET+17, SET+19, SET+44, SET+46, OR~, OR+34, END+1! , LEDICHK+14~, LEDICHK+20*, LEDICHK+21*, LEDICHK+22, LEDICHK+23, LEDICHK+24, LEDISET+6~, LEDISET+12*, LEDISET+13*, LEDISET+15 , LEDISET+18, LEDISET+26, LEDI~, LEDI+10, LEDI+15 |
LRORSTAT | SET+4~, SET+21*, SET+46*, SET+48, SET+50, SET+58 |
LRORU3 | LEDI+9~, LEDI+10*, LEDI+12 |
LROS | END+3! |
LROSD | END+3! |
LROT | END+3! |
LROTA | CHG+1~, CHG+37, LEDISET~, LEDISET+8 |
LROTA( | LEDICHK+22*, LEDICHK+24*, LEDISET+11, LEDISET+13, LEDISET+15, LEDISET+18 |
LROWDT | SET+72*, SET+73*, ROL+1, ROL+2, END+1! |
LRPRAC | END+1! |
LRROD | END+3! |
LRSAV | FX3+13~*, FX3+14 |
LRSB | LEDISET+19~, LEDISET+23*, LEDISET+24, LEDISET+25, CHK63+12~, CHK63+17*, CHK63+18, CHK63+19, CHK63+20, CHK63+21 |
LRSCN | END+1!, FX2+13*, FX2+17*, FX3+13, FX3+14* |
LRSCNX | EXIT+1! |
>> LRSN | FIX+10*, FIX+20, CHG+9, CHG+11, SHOWTST+11*, SET+2, SET+10, SET+15, SET+17, SET+19 , SET+21, SET+24, SET+25, SET+29, SET+30, SET+31, SET+32, SET+33, SET+35, SET+37 , SET+38, SET+39, SET+50, SET+53, SET+59, SET+61, SET+62, SET+64, SET+65, OR+11 , OR+12 |
>> LRSOF | SET+34 |
LRSS | FIX+18, CHG+19, SET+75, SET+76, SET+81, SET+83, LRACC+4*, LRACC+5, UNLOCK+1, UPD63~ , UPD63+8, UPD63+9, CLNPENDG+3, CLNPENDG+4, CLNPENDG+5, ORUT+12, ORUT+16, ORUT+20, LEDICHK+22, LEDI~ , LEDI+8, LEDI+12, LEDI+15, CHK63~, CHK63+19, CHK63+20, CHK63+21, CHK63+22 |
LRSTATUS | SET+4~, SET+22*, SET+50, SET+53 |
LRTNM | CHG+30*, CHG+35, SET+76, UPD63~, UPD63+6 |
LRTPN | LEDI+9~, LEDI+11*, LEDI+12 |
LRTPNN | LEDI+9~, LEDI+11*, LEDI+12 |
LRTSTS | CHG+28*, CHG+29*, CHG+30, CHG+33, SET+12, SET+17, SET+19, SET+22, SET+44, SET+46 , SET+61, SET+71, OR~, OR+17, OR+35, ROL+1, ROL+2, END+1!, CLNPENDG+2, ORUT+3 , LEDICHK+20, LEDICHK+21, LEDICHK+23, LEDICHK+24, LEDISET+14~, LEDISET+17*, LEDISET+18*, LEDISET+20 |
LRTT | END+3! |
LRUID | FIX+9*, CHG+12, DEMO+1, END+1!, LEDICHK+14~, LEDICHK+18*, LEDICHK+19, LEDICHK+22, LEDICHK+24, LEDISET+6~ , LEDISET+10*, LEDISET+11*, LEDISET+13, LEDISET+15, LEDISET+18 |
LRX | FIX+9*, FIX+10, CHG+17~, CHG+19*, CHG+20, CHG+21, CHG+22, CHG+23, LEDISET+6~, LEDISET+14~ , LEDISET+15*, LEDISET+25, LEDISET+26, CHK63+12~, CHK63+15*, CHK63+16*, CHK63+17 |
LRX68TST | OR+30~, OR+31*, OR+32*, OR+33, OR+35 |
LRXAA | OR+18~, OR+19*, OR+22, OR+25, OR+26, OR+32, OR+33 |
LRXAD | OR+18~, OR+19*, OR+25, OR+26, OR+32, OR+33 |
LRXAN | OR+18~, OR+19*, OR+25, OR+26, OR+32, OR+33 |
LRXPEND | OR+2~, OR+9*, OR+11, OR+26*, OR+32, OR+36*, OR+42 |
LRXRESULT | OR+2~, OR+9*, OR+38*, OR+42 |
LRXSN | OR+2~, OR+9*, OR+11*, OR+12 |
LRXSTATUS | OR+2~, OR+9*, OR+42*, OR+43, OR+44 |
LRXSTR | OR+2~, OR+12*, OR+14, OR+17, OR+19, OR+25, OR+26, OR+33*, OR+34, OR+36 , OR+38 |
LRXX | EN+4~, CHG+1~, END+2!, FX3+4, FX3+14* |
LRY | SHOWTST+1~, SHOWTST+5, SHOWTST+9*, FX3+1~, FX3+9*, FX3+14, FX3+17*, FX3+18, UPD63+2~, UPD63+14* , UPD63+15, LEDISET+19~, LEDISET+21*, LEDISET+22*, LEDISET+23 |
OCXTRACE | SET+4~, SET+5* |
ORIFN | SET+4~, SET+21*, SET+46, SET+49, SET+53, SET+69!, OR~, OR+14, OR+43 |
ORSTS | SET+4~, SET+69! |
>> PNM | FIX+13, DEMO |
Q9 | END+2!, FX3+14* |
>> SSN | FIX+13, DEMO |
U | FIX+5, FIX+9, FIX+10, FIX+11, FIX+14, CHG+5, CHG+30, CHG+33, SHOWTST+6, SHOWTST+7 , SHOWTST+8, SHOWTST+11, SET+2, SET+12, SET+21, SET+25, SET+29, SET+59, SET+62, SET+64 , SET+71, SET+72, OR+14, OR+19, OR+26, OR+34, OR+36, OR+38, ROL+2, LRACC+4 , CLNPENDG+2, CLNPENDG+4, CLNPENDG+5, LEDICHK+20, LEDICHK+22, LEDISET+23, LEDISET+25, LEDISET+26, LEDI+12 |
X | SHOWTST+1~, SHOWTST+11*, SET+4~, SET+25*, SET+29*, SET+30, SET+31, SET+36*, SET+37, SET+38 , FX2+5~, FX2+18!, FX3+14*, FX3+15, FX3+16*, FX3+17 |
X(1 | SET+25*, SET+29*, SET+31, SET+36*, SET+38 |
X4 | END+3! |
Y | CHG+5, FX2+5~, FX2+17, FX2+18!, FX3+9, FX3+24 |