LEXA ;ISL/KER - Look-up (Silent) ;04/21/2014
Source file <LEXA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FIL(X) | ; Validate Filter
|
|
CLN | ; Clean
|
|
CODE | ; Look-up by Code EN^LEXABC
|
|
SRC(X) | ; Source
|
|
SCH | ; Search Parameters
|
|
INFO(X,LEXVDT) | ; Get Information about a Term
; ; Input ; ; X Internal Entry Number in file 757.01 ; LEXVDT Optional date - retrieves codes active ; on a specified date ; ; Output ; ; Local Array LEX("SEL") or null ; ; LEX("SEL","EXP") Expressions Concepts/Synonyms/Variants ; LEX("SEL","SIG") Expression definition ; LEX("SEL","SRC") Classification Codes ; LEX("SEL"."STY") Semantic Class/Semantic Types ; LEX("SEL","VAS") VA Classification Sources ; |
|
SCT | ; Look-up by Shortcuts EN^LEXASC
|
|
APP | ; Application
|
|
KEYWRD | ; Look-up by word EN^LEXALK
|
|
LK | ; Look-up
|
|
HLP | ; Look-up Help ADDL^LEXAL
|
|
CAT(X,Y) | ; Source Category
|
|
LOOK(LEXX,LEXAP,LEXLL,LEXSUB,LEXCDT,LEXXSR,LEXXCT) | ; Main Lexicon Lookup
|
|
EXIT | ; Clean-up and quit
|
|
USR | ; User
|
|
IEN | ; Look-up by IEN ADDL^LEXAL PCH 4
|
|
X | ; Search for X
|
|
EXACT | ; Look-up Exact Match EN^LEXAB
|
|
DEF | ; Defaults CONFIG^LEXSET
|
|
MAN | ; Mandatory variables
|
Name | Field # of Occurrence |
---|---|
^DIM | FIL+1 |
$$GET1^DIQ | USR+1 |
$$EN^LEXAB | EXACT+1 |
$$EN^LEXABC | CODE+1 |
ADDL^LEXAL | IEN+6 |
BEG^LEXAL | IEN+7 |
EN^LEXALK | KEYWRD+1 |
SETUP^LEXAM | DEF+12 |
EN^LEXAR | LOOK+36, EXIT+10 |
QMH^LEXAR3 | HLP+2 |
SET^LEXAR4 | INFO+20 |
$$DES^LEXASC | IEN+6 |
$$EN^LEXASC | SCT+2 |
$$SO^LEXASO | IEN+6 |
$$AP^LEXDFN2 | LOOK+42 |
$$MD^LEXDFN2 | DEF+3 |
$$NS^LEXDFN2 | DEF+3 |
CONFIG^LEXSET | DEF+4 |
VDT^LEXU | LOOK+28 |
$$DT^XLFDT | INFO+19 |
$$UP^XLFSTR | LOOK+35, LOOK+39, USR+8, CAT+3, SRC+2 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LEX(757.01 - [#757.01] | IEN+5, IEN+9, CODE+4, INFO+18 |
^LEX(757.13 - [#757.13] | CAT+1, CAT+2, CAT+3, CAT+4, CAT+5, CAT+6 |
^LEX(757.14 - [#757.14] | SRC+1, SRC+2 |
^LEX(757.41 - [#757.41] | SCT+1 |
^LEXT(757.2 - [#757.2] | APP+1 |
^TMP("LEXFND" | LOOK+29!, DEF+9!, IEN+7, EXACT+2!, CLN+2! |
^TMP("LEXHIT" | LOOK+29!, DEF+9!, EXACT+3!, CLN+2! |
^TMP("LEXSCH" | LOOK+30!, LOOK+31!, LOOK+42*, LOOK+43*, LOOK+44*, LOOK+45, LOOK+46*, LOOK+48*, APP+1, USR+6* , USR+7*, USR+8*, DEF+2, DEF+4, DEF+5*, DEF+6, DEF+12, IEN+1, IEN+3, IEN+4 , IEN+6, IEN+8, SCT+1, SCT+2, CODE+1, CODE+3, CODE+4, EXACT+1, EXIT+8, EXIT+9 , EXIT+10, CLN+2!, MAN+3 |
Name | Line Occurrences |
---|---|
$$CAT | LOOK+37 |
$$FIL | DEF+7 |
$$SRC | CAT+2 |
CLN | EXIT+4 |
EXIT | LOOK+36, X+1, APP+1, USR+1, DEF+11, DEF+13, HLP+1, IEN+1, SCT+3, CODE+2 , CODE+5 |
MAN | DEF+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIC | FIL+1~ |
DIC("S" | LOOK+46, DEF+1 |
DIC(0 | LOOK+32, LOOK+33*, LOOK+34* |
DIERR | LOOK+28! |
DUZ | USR+1, USR+6 |
LEX | LOOK+28!, EXIT+5, EXIT+12*, CAT+1~*, CAT+3, SRC+1~*, SRC+2 |
LEX("ERR" | X+2*, X+3*, APP+2*, APP+3*, USR+2*, USR+3*, DEF+11, DEF+13, EXIT+4, MAN+4* , MAN+5* |
LEX("HLP" | HLP+1, EXIT+3, EXIT+13*, EXIT+15, EXIT+16*, EXIT+18*, EXIT+19*, EXIT+20* |
LEX("LIST" | IEN+1, EXIT+5 |
LEX("NAR" | IEN+8*, IEN+9*, EXIT+11* |
LEX("SEL" | INFO+18! |
LEXAP | LOOK~, LOOK+36!, LOOK+39*, LOOK+42, DEF+3 |
LEXC | EXIT+6~, EXIT+7*, EXIT+13, EXIT+16, EXIT+17*, EXIT+18, EXIT+19, EXIT+20, CAT+1~, CAT+3* , CAT+4 |
LEXCDT | LOOK~, LOOK+28* |
LEXD | INFO+19~*, INFO+20 |
LEXDICS | EXIT+1! |
>> LEXDISP | LOOK+44, DEF+5 |
LEXDSP | DEF+1~, EXIT+1! |
LEXE | IEN+2~, IEN+3*, IEN+5, IEN+6, IEN+9 |
LEXERR | MAN+1~, MAN+2*, MAN+3, MAN+5 |
LEXF | EXIT+6~, EXIT+8*, EXIT+14*, EXIT+15 |
LEXFIL | DEF+1~*, DEF+2*, DEF+6*, DEF+7*, DEF+8*, EXIT+1! |
LEXFILR | DEF+1~, EXIT+1! |
LEXFND | USR+4~, USR+5*, SCT+2*, SCT+3, CODE+1*, CODE+2, CODE+5, EXACT+1*, EXACT+2 |
LEXI | EXIT+3!, CLN+1!, CAT+1~, CAT+5*, CAT+6 |
LEXISCD | USR+4~, USR+5*, CODE+4*, CODE+5 |
LEXLKFL | EXIT+2! |
LEXLKGL | EXIT+2! |
LEXLKIX | EXIT+2! |
LEXLKSH | EXIT+2! |
LEXLL | LOOK~, LOOK+40*, LOOK+47*, LOOK+48 |
LEXNS | DEF+3~*, DEF+4 |
LEXO | CAT+1~, CAT+5*, CAT+6*, CAT+7 |
LEXOVR | EXIT+2! |
LEXQ | LOOK+35*, EXIT+1!, CLN+1! |
LEXS | CAT+1~, CAT+2*, CAT+4, CAT+6, CAT+7 |
LEXSC | LOOK+37~*, LOOK+38 |
LEXSHCT | EXIT+1! |
LEXSHOW | EXIT+1! |
LEXSS | DEF+3~*, DEF+4 |
LEXSUB | LOOK~, LOOK+41*, LOOK+45*, DEF+3, EXIT+1! |
LEXTKN | EXIT+2!, CLN+1! |
LEXTKNS | EXIT+2!, CLN+1! |
LEXU | CAT+1~, CAT+3*, CAT+4, CAT+5, SRC+1~, SRC+2* |
LEXUN | IEN+2~, IEN+4*, IEN+8, IEN+9, EXIT+2! |
LEXV | EXIT+6~, EXIT+9*, EXIT+15 |
LEXVDT | LOOK+28*, LOOK+36, DEF+4, IEN+6, SCT+2, CODE+1, EXACT+1, EXIT+10, INFO~, INFO+19 , INFO+20~* |
LEXX | LOOK~, LOOK+35*, LOOK+36, X+1, USR+7, USR+8, HLP+1, HLP+2, EXIT+5, EXIT+10 , EXIT+11 |
LEXXCT | LOOK~, LOOK+37, LOOK+38~* |
LEXXSR | LOOK~, LOOK+37, LOOK+38~* |
NC | SCH+1~*, SCH+2 |
NN | SCH+1~*, SCH+2* |
X | CAT~, CAT+1*, CAT+2*, CAT+3*, CAT+4*, CAT+7*, CAT+8, SRC~, SRC+1*, SRC+2* , FIL~, FIL+1*, FIL+2, INFO~, INFO+18*, INFO+20 |
Y | CAT~, CAT+2* |