LEXTRAN ;ISL/KER - Lexicon code and text wrapper API's ;12/19/2014
Source file <LEXTRAN.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 |
---|---|---|
Automated Lab Instruments | 3 | LA7VHLU6 LA7VIN4 LA7VOBX4 |
Lab Service | 3 | LRSCT LRSRVR6 LRXREF |
Virtual Patient Record | 2 | VPRSDA VPRSDAG |
Lexicon Utility | 1 | LEXU5 |
Problem List | 1 | GMPLUTL2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CODE(CODE,SRC,CDT,LEXRAY,IENS,ID,INC) | ; Get the Concept for a Code and Source
|
|
GETINFO | ; Get Information for a Code
|
|
TEXT(TEXT,CDT,SUB,SRC,LEXRAY) | ; Get the Concept for a text and source
; ; Input ; ; TEXT The search string (required) ; CDT Effective date (optional, default is TODAY) ; SUB Subset or 'hierarchy' (optional) ; SRC Code System source abbreviation ; LEXRAY Output array (optional, defaults to 'LEX') ; ; Output ; ; LEX or passed array name - an array containing information ; about the code ; LEX(0) - a five piece string: ; 1. code ; 2. hierarchy ; 3. version ; 4. legacy code ; 5. code status ; ; LEX("F") fully specified name ^ internal entry number ; LEX("P") preferred term ^ internal entry number ; LEX("S",n) synonyms (n is the nth synonym) ^ internal entry number ; ; otherwise ; "-1^error text" ; ; example of LEX array: ; LEX(0)="67922002^Substance^20050701^T-C2500^1" ; LEX("F")="Serum (Substance)" ; LEX("P")="Serum" ; |
|
VERSION(SRC,CODE,VDT) | ; Get the Code Version Number
|
|
TXT4CS(TEXT,SRC,LEXRAY,SUB) | ; Is text valid for an SCT code
|
|
CSYSIEN(MNEM) | ; Return code system IEN for mnemonic
|
|
CSYSMNEM(SIEN) | ; Return code system mnemonic for IEN
|
|
INTDAT(X) | ; Convert date from external format to VA internal format
|
Name | Field # of Occurrence |
---|---|
^%DT | INTDAT+2 |
$$GET1^DIQ | GETINFO+4 |
INFO^LEXA | TEXT+47 |
EN^LEXA1 | TEXT+46 |
CONFIG^LEXSET | TEXT+45 |
$$STATCHK^LEXSRC2 | CODE+87, TEXT+53, VERSION+23 |
$$GETSYN^LEXTRAN1 | GETINFO+3 |
$$CSYS^LEXU | CODE+68, CODE+76, TEXT+36, VERSION+21, CSYSIEN+2, CSYSMNEM+1 |
VDT^LEXU | CODE+70 |
$$DT^XLFDT | CODE+73, TEXT+40, VERSION+18 |
$$UP^XLFSTR | TXT4CS+35, TXT4CS+38, TXT4CS+39 |
FileNo | Call Tags |
---|---|
^LEX(757.02 - [#757.02] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LEX(757.01 - [#757.01] | TXT4CS+35, TXT4CS+38, TXT4CS+39, TXT4CS+45, TXT4CS+60 |
^LEX(757.011 - [#757.011] | TXT4CS+60 |
^LEX(757.02 - [#757.02] | CODE+82, CODE+83, TXT4CS+47, TXT4CS+48, TXT4CS+49, TXT4CS+60, TXT4CS+61 |
^LEX(757.03 - [#757.03] | CODE+77, TEXT+37, VERSION+22, VERSION+25, VERSION+26, VERSION+27, CSYSMNEM+2, CSYSMNEM+3 |
^LEXT(757.2 - [#757.2] | TXT4CS+32, TXT4CS+55 |
^TMP("LEXSCH" | CODE+69, CODE+86!, TEXT+44! |
Name | Field # of Occurrence |
---|---|
^(0 | CODE+69 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | INTDAT+1~ |
CDT | CODE~, CODE+64, TEXT~, TEXT+34 |
CIEN | TXT4CS+26~, TXT4CS+47*, TXT4CS+48, TXT4CS+49, TXT4CS+60, TXT4CS+61 |
CODE | CODE~, CODE+64, VERSION~, VERSION+15, TXT4CS+26~, TXT4CS+49*, TXT4CS+53, TXT4CS+59, TXT4CS+61 |
CODEC | TXT4CS+26~, TXT4CS+59*, TXT4CS+61 |
DIC | TEXT+33~ |
EXIEN | TXT4CS+26~, TXT4CS+37*, TXT4CS+38*, TXT4CS+39, TXT4CS+41*, TXT4CS+44*, TXT4CS+45 |
EXP | TXT4CS+26~ |
EXP( | TXT4CS+39*, TXT4CS+44 |
EXPTYP | TXT4CS+26~, TXT4CS+60*, TXT4CS+61 |
FINDS | TXT4CS+26~, TXT4CS+43*, TXT4CS+58*, TXT4CS+64 |
FOUND | TXT4CS+26~, TXT4CS+43*, TXT4CS+57*, TXT4CS+64 |
HIER | TXT4CS+26~, TXT4CS+50*, TXT4CS+54*, TXT4CS+56 |
HIERNAM | TXT4CS+26~, TXT4CS+50*, TXT4CS+55*, TXT4CS+56 |
I | GETINFO+1~ |
ID | CODE~, CODE+66 |
IENS | CODE~, CODE+66 |
INC | CODE~, CODE+66 |
LAR | TXT4CS+26~, TXT4CS+52!, TXT4CS+53* |
LAR(0 | TXT4CS+54 |
LEX | CODE+85!, CODE+91!, CODE+94!, GETINFO+3*, TEXT+33!, TEXT+44!, TEXT+56!, TXT4CS+62*, TXT4CS+63! |
LEX("F" | GETINFO+5, GETINFO+9 |
LEX("SEL" | GETINFO+10!, TEXT+48, TEXT+49, TEXT+50, TEXT+51 |
LEX(0 | GETINFO+7*, GETINFO+8* |
LEXASAB | CODE+75~, CODE+79*, CODE+83 |
LEXCIEN | CODE+75~, CODE+80*, CODE+81, CODE+82*, CODE+83, GETINFO+4, TEXT+43~, TEXT+52*, TEXT+54* |
LEXCODE | CODE+63~, CODE+64*, CODE+65, CODE+82, CODE+84, CODE+87, CODE+88, CODE+95, GETINFO+3, GETINFO+6 , GETINFO+7, TEXT+43~, TEXT+47*, TEXT+49*, TEXT+50, TEXT+51*, TEXT+52, TEXT+53, VERSION+15~*, VERSION+23 |
LEXDID | CODE+63~, CODE+66*, GETINFO+3 |
LEXDT | TEXT+33~, TEXT+41*, TEXT+46 |
LEXFSN | GETINFO+1~ |
LEXHIER | GETINFO+1~, GETINFO+5*, GETINFO+7, GETINFO+9* |
LEXID | TEXT+33~, TEXT+48*, TEXT+49 |
LEXIEN | CSYSIEN+1~, CSYSIEN+2* |
LEXIENS | CODE+63~, CODE+66*, GETINFO+3 |
LEXINC | CODE+63~, CODE+66*, GETINFO+3 |
LEXLGY | GETINFO+1~, GETINFO+4*, GETINFO+8 |
LEXNOM | TEXT+33~, TEXT+36*, TEXT+37*, TEXT+47, TEXT+48 |
LEXPIEN | CODE+75~, CODE+89*, CODE+92*, TEXT+43~, TEXT+47*, TEXT+57 |
LEXRAY | CODE~, CODE+74!, CODE+91, CODE+94, TEXT~, TEXT+42!, TEXT+56, TXT4CS~, TXT4CS+30!, TXT4CS+63 |
LEXSCNM | CODE+75~, CODE+78*, CODE+84, CODE+88 |
LEXSEP | GETINFO+1~ |
LEXSIEN | CODE+75~, CODE+76*, CODE+77 |
LEXSRC | CODE+63~, CODE+64*, CODE+67*, CODE+68, CODE+76, CODE+87, GETINFO+2*, GETINFO+3, GETINFO+6, TEXT+33~ , TEXT+34*, TEXT+36*, TEXT+37, TEXT+41, TEXT+45, TEXT+53, TEXT+54*, VERSION+15~*, VERSION+19*, VERSION+21 , VERSION+23, TXT4CS+25~*, TXT4CS+28, TXT4CS+29, TXT4CS+33*, TXT4CS+48 |
LEXST | CODE+75~, CODE+77*, CODE+78, CODE+79 |
LEXSTAT | CODE+75~, CODE+85!, CODE+87*, CODE+88, GETINFO+8, TEXT+43~, TEXT+47*, TEXT+53*, TEXT+54, VERSION+20~ , VERSION+23*, VERSION+24 |
LEXSTAT(1 | CODE+89, CODE+92 |
LEXSTAT(2 | TEXT+54 |
LEXSUB | TEXT+33~, TEXT+34*, TEXT+41*, TEXT+45, TXT4CS+25~*, TXT4CS+31*, TXT4CS+32, TXT4CS+51, TXT4CS+55, TXT4CS+56 |
LEXTD | TEXT+33~ |
LEXTEXT | TEXT+33~, TEXT+34*, TEXT+35, TEXT+44, TXT4CS+25~*, TXT4CS+27, TXT4CS+35, TXT4CS+38, TXT4CS+39 |
LEXVDT | CODE+63~, CODE+64*, CODE+69*, CODE+70, CODE+71*, CODE+72, CODE+73*, CODE+87, CODE+88, GETINFO+3 , GETINFO+6, TEXT+33~, TEXT+34*, TEXT+38*, TEXT+39, TEXT+40*, TEXT+41, TEXT+45, TEXT+46*, TEXT+53 , VERSION+15~*, VERSION+16*, VERSION+17, VERSION+18*, VERSION+23, VERSION+25 |
LEXVER | GETINFO+1~, GETINFO+6*, GETINFO+7 |
LEXW | TXT4CS+26~, TXT4CS+42!, TXT4CS+62 |
LEXW( | TXT4CS+59, TXT4CS+61* |
MCIEN | TXT4CS+26~, TXT4CS+45*, TXT4CS+47 |
MNEM | CSYSIEN~, CSYSIEN+1, CSYSIEN+2 |
N | GETINFO+1~ |
SIEN | VERSION+20~, VERSION+21*, VERSION+22, VERSION+25, VERSION+26, VERSION+27, CSYSMNEM~, CSYSMNEM+1*, CSYSMNEM+2, CSYSMNEM+3 |
SRC | CODE~, CODE+64, TEXT~, TEXT+34, VERSION~, VERSION+15, TXT4CS~, TXT4CS+25 |
SUB | TEXT~, TEXT+34, TXT4CS~, TXT4CS+25 |
TEXT | TEXT~, TEXT+34, TXT4CS~, TXT4CS+25 |
U | CODE+78, CODE+79, CODE+89, CODE+92, GETINFO+7, GETINFO+8, TEXT+54, TXT4CS+45, TXT4CS+48, TXT4CS+49 , TXT4CS+54, TXT4CS+55, TXT4CS+60 |
VALCODE | CODE+75~, CODE+80*, CODE+81, CODE+83*, CODE+84 |
VDAT | VERSION+20~, VERSION+25*, VERSION+26 |
VDT | VERSION~, VERSION+15 |
VIEN | VERSION+20~, VERSION+26*, VERSION+27 |
X | TEXT+43~, TEXT+44*, INTDAT~ |
Y | TEXT+43~, TEXT+46, TEXT+47, INTDAT+1~, INTDAT+3 |