LRLNCMD ;DALOI/CA/FHS-MAP LAB TESTS TO DEFAULT LOINC CODES ;1-MAY-1999
Source file <LRLNCMD.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 |
---|---|---|
Lab Service | 3 | LR LOINC MAP DEFAULT LR LOINC UNMAP/DELETE DEFAULT LRLNC0 |
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ;entry point from option LR LOINC MAPPING
|
|
DEFAULT | ;ENTRY POINT FROM LRLNC0
|
|
CORRECT | ||
EXIT | ||
TEST | ||
LOINC | ;Lookup possible LOINC matches in LAB LOINC file #95.3
|
|
CODE | ;ask which code to map
|
|
LINK | ;Link the code with file 64
|
|
LR64 | ;
|
|
CHECK | ;Check to see if already mapped to a LOINC code
|
|
MAP | ;DIE call to add DEFAULT LOINC CODE
|
|
MAP2 | ;HERE SHOW WHAT WAS MAPPED
|
|
SHOWPRE | ;DISPLAY LOINC CODE ALREADY MAPPED TO NLT
|
|
DELETE | ;DELETE/UNMAP DEFAULT LOINC CODE
|
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 |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^LAM - [#64] | Classic Fileman Calls |
^LAB(95.3 - [#95.3] | FIND^DIC |
Name | Line Occurrences |
---|---|
CHECK | CORRECT+15, DELETE+3 |
EXIT | START+3, DEFAULT+7, DEFAULT+10, DEFAULT+13, DEFAULT+15, DEFAULT+18, CORRECT+6, CORRECT+9, CORRECT+11, CORRECT+14 , CORRECT+17, CORRECT+20, DELETE+2, DELETE+5 |
LINK | CORRECT+12 |
LOINC | DEFAULT+11, CORRECT+8 |
MAP | CORRECT+18 |
SHOWPRE | CHECK+2 |
START | START+4, DEFAULT+7, DEFAULT+10, DEFAULT+13, DEFAULT+15, DEFAULT+18, CORRECT+6, CORRECT+9, CORRECT+11, CORRECT+14 , CORRECT+17, CORRECT+21 |
TEST | START+2, DELETE+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | EXIT+1!, LR64+1!, CHECK+5*, CHECK+8!, MAP+6*, MAP2+6* |
DD | EXIT+2! |
DIC | EXIT+1!, LR64+1!, LR64+3*, MAP2+5!, MAP2+6* |
DIC(0 | LR64+3* |
DIE | EXIT+1!, CHECK+6*, CHECK+8!, MAP+6* |
DINUM | EXIT+1! |
DIR | DEFAULT+5!, CORRECT+4!, EXIT+1!, CODE+14!, SHOWPRE+8! |
DIR("?" | DEFAULT+3*, CORRECT+3*, SHOWPRE+6*, SHOWPRE+7* |
DIR("A" | DEFAULT+2*, CORRECT+1*, CODE+13*, SHOWPRE+5* |
DIR("B" | DEFAULT+4*, CORRECT+2*, SHOWPRE+5* |
DIR(0 | DEFAULT+2*, CORRECT+1*, CODE+7*, CODE+12*, SHOWPRE+5* |
DIRUT | DEFAULT+6, DEFAULT+7, CORRECT+5, CORRECT+6, EXIT+1!, CODE+8, CODE+10!, CODE+15, CHECK+3 |
DLAYGO | EXIT+2! |
DO | EXIT+2! |
DR | EXIT+1!, CHECK+6*, MAP+6*, MAP2+5! |
DTOUT | EXIT+1!, LR64+5! |
DUOUT | CODE+8, CODE+10!, LR64+5! |
I | EXIT+1!, CODE+4*, CODE+5*, CODE+6, CODE+9, CODE+12 |
IOST | CODE+6 |
LRCODE | DEFAULT+11, CORRECT+19!, EXIT+1!, CODE+16*, MAP+3, MAP+4, MAP+6 |
LRDATA | EXIT+1!, MAP+1*, MAP+2*, MAP+6 |
LRDEL | SHOWPRE+5, SHOWPRE+6, SHOWPRE+7, DELETE+1*, DELETE+4! |
>> LRDFONLY | START+1, MAP+1, MAP+6 |
LRELEC | EXIT+1! |
LREND | START+2*, START+3, DEFAULT+9!, DEFAULT+10, DEFAULT+12!, DEFAULT+14!, DEFAULT+15, DEFAULT+17!, DEFAULT+18, CORRECT+5! , CORRECT+6, CORRECT+10!, CORRECT+11, CORRECT+13!, CORRECT+14, CORRECT+16!, CORRECT+17, EXIT+1!, CODE+5, CODE+6 , CODE+8*, CODE+12, CODE+14!, CODE+15*, LR64+5*, CHECK+3*, DELETE+1*, DELETE+2 |
LRIEN | EXIT+1!, MAP+1, MAP+2, MAP+6 |
LRLNC | EXIT+1! |
LRLNC0 | EXIT+1! |
>> LRLNC1 | DEFAULT+6, DEFAULT+9, DEFAULT+12, DEFAULT+14, DEFAULT+17, CORRECT+5, CORRECT+10, CORRECT+13, CORRECT+16, CORRECT+19 |
LRLNCNAM | EXIT+2! |
LRLOINC | EXIT+1! |
LRLOINC("DILIST" | CODE+1, CODE+5, CODE+9, CODE+12, CODE+16 |
LRNLT | START+4, EXIT, EXIT+1!, LINK+1*, LR64+3, LR64+6*, CHECK+1, CHECK+5, MAP+5, MAP+6 , MAP+8, MAP2+1, MAP2+3, MAP2+4, MAP2+6, SHOWPRE+1 |
LRNO | DEFAULT+12, DEFAULT+13, DEFAULT+16, CORRECT+7, CORRECT+8, CORRECT+9, EXIT+2!, CODE+3* |
LRNUM | EXIT+2! |
LROLDCD | EXIT+2!, SHOWPRE+1*, SHOWPRE+3 |
LRSPEC | EXIT+1! |
LRSPECL | EXIT+1! |
LRSPECN | EXIT+1! |
LRTEST | EXIT+1!, LOINC+1 |
LRTIME | EXIT+1!, MAP+3*, MAP+6 |
LRUNITS | EXIT+1!, MAP+4*, MAP+6 |
S | EXIT+1!, MAP2+7* |
U | CODE+12, LINK+1, CHECK+1, MAP+1, MAP+2, MAP+3, MAP+4, MAP2+3, MAP2+4, SHOWPRE+1 , SHOWPRE+3 |
X | EXIT+2!, LR64+3* |
Y | DEFAULT+8, CORRECT+7, CORRECT+8, EXIT+1!, CODE+16, LR64+5, LR64+6, CHECK+3 |