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* |