LRVER1 ;DALOI/STAFF - LAB ROUTINE DATA VERIFICATION;Sep 27, 2018@10:00:00
Source file <LRVER1.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | $$FIND1^DIC $$GET1^DIQ |
Kernel | 1 | $$HTFM^XLFDT |
Lab Service | 1 | ^LRVER2 |
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 |
---|---|---|
VER | ; from LRGVP
|
|
LD | ||
EXP | ; Get the list of tests for this ACC. from LRGVG1
; Do not process tests which have been "NP" (not performed) ; or merged to another accession |
|
EX1 | ; Expand the list of tests to edit.
|
|
EX2 | ;
|
|
ORD | ;
; LRNX is set by caller |
|
NLT(X) | ;
|
|
RNLT(X) | ;
|
|
LNC(LRNLT,LRCDEF,LRSPEC,LRLTST) | ;return the LOINC code for WKLD Code/Specimen
; orig entry point code ; (LRNLT,LRCDEF,LRSPEC) ;reture the LOINC code for WKLD Code/Specimen ; END OF CHANGE FOR LR*5.2*468 ; Call with (nlt code,method suffix,test specimen) ; TA = Time Aspect ; START OF CHANGE FOR LR*5.2*468 check for new VUID LOINC in LAB(60,test,1,specimen N6,P1 (#30) |
|
LNCM(LRNLT,LRCDEF,LRSPEC,LRLTST) | ; entry for LRLNCV
|
|
LNCO | ; skip around point for LNC
; END OF CHANGE FOR LR*5.2*484 |
|
LNCSET | ; set up string for MLTF msg
|
|
LDEF(Y) | ;Find the default LOINC code for WKLD CODE
|
|
TMPSB(LRSB) | ; Get LOINC code from ^TMP("LR",$J,"TMP",LRSB,"P")
|
|
MSG(VAL) | ;Set output message
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
60.01 | GET1^DIQ |
^LAB(61 - [#61] | GET1^DIQ |
^LAM - [#64] | FIND1^DIC, GET1^DIQ |
64.02 | GET1^DIQ |
^LAB(64.061 - [#64.061] | GET1^DIQ |
^LRMLTF - [#66.3] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | EXP+23, EX2+3, EX2+16, EX2+17, NLT+2, RNLT+3 |
^LAB(61 - [#61] | LNC+9, LNCO+13, LNCSET+9 |
^LAB(62 - [#62] | LD+2 |
^LAB(69.9 - [#69.9] | VER+2 |
^LAM - [#64] | NLT+2, RNLT+4, LNCO+21, LNCO+34 |
^LR - [#63] | LD+1 |
^LRO(68 - [#68] | VER+3, VER+5, VER+9, EXP+5, EXP+6, EXP+7, EXP+17, EX2+18 |
^LRO(69 - [#69] | VER+2, VER+4 |
^TMP("LR" | LD+3!, EX1+2*, EX1+3*, EX2+8, ORD+4*, ORD+8*, ORD+9*, ORD+13, TMPSB+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BL | LNC+7~, LNC+8*, LNC+11*, LNC+13*, LNC+14! |
C | LNC+7~, LNC+8*, LNC+14! |
ERR | LNCO+2~ |
I | EXP+3~, EXP+5*, EXP+6*, EXP+7, EXP+16, EXP+30*, EXP+31* |
IX | EXP+3~, EXP+5*, EXP+26, EXP+28! |
J | EX1+3*, EX1+5!, EX2+14, EX2+15*, EX2+16*, EX2+17, EX2+21* |
>> LRAA | VER+3, VER+5, VER+9, EXP+5, EXP+6, EXP+7, EXP+17, EX2+18 |
>> LRAD | VER+3, VER+5, VER+9, EXP+5, EXP+6, EXP+7, EXP+17, EX2+18 |
>> LRAL | EXP+19*, EXP+20 |
>> LRALERT | EXP+5*, EXP+20* |
>> LRAN | VER+3, VER+5, VER+9, EXP+5, EXP+6, EXP+7, EXP+17, EX2+18 |
LRBEY | VER+1~ |
LRBEY( | ORD+3* |
LRCDEF | RNLT+7, RNLT+9, LNC~, LNCM~, LNCO+5*, LNCO+6*, LNCO+7*, LNCO+8*, LNCO+9*, LNCO+16 , LNCO+25, LNCSET+2*, LNCSET+3*, LNCSET+4*, LNCSET+5*, LNCSET+6*, LNCSET+12, TMPSB+5, TMPSB+7, MSG+2 , MSG+5, MSG+6 |
>> LRCDT | VER+3*, VER+4*, VER+6 |
>> LRCFL | EX2+1*, EX2+3* |
>> LRCW | VER+2* |
>> LRDBUG | MSG+10 |
>> LRDFN | LD+1 |
LRDISP | EX2+13~, EX2+18*, EX2+19 |
LRDL | LD+5! |
>> LREAL | VER+3* |
>> LRIDT | VER+5*, VER+6*, LD+1 |
>> LRLLOC | VER+2* |
LRLTST | LNC~, LNC+7*, LNC+8, LNC+10, LNCM~ |
LRM | LD+3! |
LRM( | ORD+12*, ORD+13* |
>> LRMETH | LD+1* |
LRMLTF | LNC+7~, LNC+8*, LNC+10*, LNC+11, LNC+14! |
>> LRMSG | MSG+1 |
LRMSGM | LNCO+4!, LNCSET+12*, LNCSET+13*, MSG+2*, MSG+5*, MSG+6*, MSG+7*, MSG+8*, MSG+9*, MSG+10 |
>> LRMX( | ORD+14* |
LRNAME | EXP+4! |
LRNAME( | EXP+25* |
LRNLT | EXP+3~, EXP+16*, EXP+17*, EXP+18, LNC~, LNCM~, LNCO+3, LNCO+7, LNCO+14*, LNCO+16 , LNCO+28, LNCSET+4, LNCSET+10*, LNCSET+12, MSG+2, MSG+5, MSG+6, MSG+7, MSG+8 |
>> LRNTN | EXP+22* |
>> LRNX | ORD+2* |
>> LRODT | VER+2, VER+4 |
LRORD | LD+3! |
LRORD( | ORD+2* |
>> LROUTINE | VER+2*, EXP+5 |
>> LRSAMP | VER+4*, LD+2 |
LRSB | TMPSB~, TMPSB+1 |
LRSM60 | EXP+4! |
LRSM60( | EXP+26*, EXP+31* |
>> LRSN | VER+2, VER+4 |
LRSPEC | RNLT+7, LNC~, LNC+7*, LNC+8, LNC+9, LNC+10, LNCM~, LNCO+10*, LNCO+12, LNCO+13 , LNCO+19, LNCO+20, LNCO+21, LNCO+22, LNCO+32, LNCO+33, LNCO+34, LNCO+35, LNCSET+8, LNCSET+9 , TMPSB+5 |
LRSPECN | LNC+9*, LNCO+2~, LNCO+13*, LNCSET+9*, LNCSET+12, MSG+5, MSG+7 |
>> LRSS | LD*, LD+1 |
>> LRSUB | EX2+2*, EX2+6, EX2+7 |
LRTEST | EXP+4! |
LRTEST( | EXP+16*, EXP+18*, EXP+23, EXP+24*, EXP+25, EXP+26, EX1+1, EX1+2, EX1+3, ORD+3 , ORD+7, ORD+8, ORD+9 |
>> LRTS | TMPSB+5 |
LRUID | VER+9~* |
N | EXP+3~, EXP+5*, EXP+16*, EXP+18, EXP+22, EXP+23, LNCO+2~, LNCO+17*, LNCO+19, LNCO+20 , LNCO+21, LNCO+22, LNCO+24, LNCO+29*, LNCO+30, LNCO+33, LNCO+34, LNCO+35, LNCO+37 |
>> NODE | TMPSB+1*, TMPSB+2, TMPSB+5*, TMPSB+7*, TMPSB+8 |
S1 | EX1+3*, EX1+5!, EX2+14*, EX2+16, EX2+21* |
S1( | EX2+14*, EX2+16, EX2+21 |
>> S2 | EX2+7*, EX2+8, ORD+2, ORD+3, ORD+4, ORD+8, ORD+9, ORD+12, ORD+13 |
T1 | EXP+3~, EXP+23*, EXP+24, EXP+25, EXP+26, EX1+1, EX1+2, EX1+3, ORD+3, ORD+7 , ORD+8, ORD+9 |
TA | LNCO+2~, LNCO+12*, LNCO+20, LNCO+21*, LNCO+22, LNCO+33, LNCO+34*, LNCO+35, LNCSET+8*, LNCSET+11 , LNCSET+13, MSG+4, MSG+9 |
TANAME | LNCSET+11*, LNCSET+13, MSG+3~, MSG+4*, MSG+9 |
U | VER+2, VER+3, VER+4, VER+5, LD+1, LD+2, EXP+16, EXP+18, EXP+19, EXP+24 , EXP+25, EX1+2, EX2+2, EX2+3, EX2+17, ORD+3, ORD+9, ORD+11, NLT+2, RNLT+3 , RNLT+4, TMPSB+8 |
VAL | LNCO+2~, LNCO+17, LNCO+27!, LNCO+29, MSG~, MSG+5, MSG+6, MSG+7, MSG+8 |
VAL(1 | LNCO+16*, LNCO+28* |
X | EXP+3~, EXP+7*, EXP+8, EXP+9, EXP+16, EXP+17, EXP+19, EXP+29~, EXP+30*, EXP+31 , EX1+2*, EX1+3, EX2+2, EX2+3, EX2+14, EX2+17*, EX2+21*, ORD+4, ORD+8, ORD+9 , ORD+11, ORD+12, ORD+14, NLT~, NLT+2, RNLT~, RNLT+1, RNLT+3, RNLT+7, RNLT+9 , LNCO+2~*, LNCO+3, LNCO+19, LNCO+20*, LNCO+22*, LNCO+24*, LNCO+32, LNCO+33*, LNCO+35*, LNCO+37* , LNCO+38*, LNCO+39, LDEF+2*, LDEF+3*, LDEF+4 |
X(1 | EXP+30*, EXP+31 |
X1 | EXP+29~, EXP+31* |
Y | EX2+17*, EX2+18, NLT+1~, NLT+2*, NLT+3, RNLT+2~, RNLT+4*, RNLT+7*, RNLT+9*, RNLT+10 , LNCO+2~, LDEF~, LDEF+1, LDEF+2 |
Y(1 | RNLT+3*, RNLT+4 |