ICDEXLK3 ;SLC/KER - ICD Extractor - Lookup, Search ;07/15/2015
Source file <ICDEXLK3.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
LK(TXT,ROOT,CDT,SYS,VER,OUT) | ; Lookup - Versioned
|
|
CD(TXT,ROOT,CDT,SYS,VER,OUT) | ; Lookup Code - Versioned
|
|
LK2() | ; Lookup - Part 2
|
|
CODE | ; Lookup by Code (Requires TXT and ROOT)
|
|
TOK(X) | ; Parse Text into Tokens
|
|
TOKEN(X,ROOT,SYS,ARY) | ; Parse Text into Tokens
|
|
SS | ; Show Select/Find Global Arrays
|
|
WORD(X,ROOT,SYS) | ; Word is contained in a Set
|
|
LS(ROOT,IEN,VDT) | ; Last Status
|
|
LD(ROOT,IEN,VDT,VER) | ; Last Description
|
|
ISCODE(X,ROOT) | ; Check if Text is a Code
|
|
UNQ(X,ROOT) | ; Check if Text is a Unique Code
|
|
ISORD(X) | ; Check if in $ORDER
|
|
CDT(X,Y) | ; ICD-10 Code Set Date
|
|
SYS(ROOT,CDT) | ; System from File and Date
|
|
SH | ; Show TMP
|
|
TM(X,Y) | ; Trim Y
|
Name | Field # of Occurrence |
---|---|
$$DTBR^ICDEX | LK2+7 |
$$FILE^ICDEX | LK2+3 |
$$ROOT^ICDEX | LK2+2, WORD+38, WORD+40 |
$$SYS^ICDEX | LK2+5, WORD+38 |
$$LS^ICDEXLK3 | CODE+27 |
TXT^ICDEXLK4 | LK2+32 |
$$EXM^ICDEXLK5 | LK2+19 |
FND^ICDEXLK5 | LK2+13, LK2+21, CODE+13, CODE+24 |
IEN^ICDEXLK5 | LK2+12 |
SEL^ICDEXLK5 | LK2+14, LK2+27, CODE+25 |
PAR^ICDTOKN | TOK+1 |
TOKEN^ICDTOKN | TOKEN+1 |
$$DT^XLFDT | CDT+1 |
$$UP^XLFSTR | CODE+15, LD+7, ISCODE+11 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ICDS - [#80.4] | LK2+7, WORD+41, WORD+44, WORD+46, WORD+50, ISCODE+5, ISCODE+13, SYS+5 |
^ICDS("F" | SYS+4 |
^TMP( | LK2+4!, LK2+11, LK2+16, LK2+23, LK2+24, LK2+25!, LK2+26*, LK2+27, LK2+30, LK2+33 , CODE+4, CODE+14, CODE+15, SH+1 |
^TMP("ICD9" | LK2+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARY | TOKEN~, TOKEN+1 |
CDT | LK~, CD~, LK2+4*, LK2+6, LK2+7*, LK2+12, LK2+13, LK2+19, LK2+21, CODE+3* , CODE+10, CODE+13, CODE+21, CODE+24, CODE+27, LS+1~, LS+2*, LS+3, LD+1~, LD+2* , LD+3, CDT+1~*, SYS~, SYS+3 |
>> CNT | CODE+12*, CODE+23* |
CTL | SYS+1~, SYS+3*, SYS+6 |
>> DIC(0 | LK2+22, LK2+27, CODE+1, CODE+8, CODE+12, CODE+19, CODE+23 |
EFF | LS+1~, LS+3*, LS+4, LS+6*, LS+7, LD+1~, LD+3*, LD+4, LD+5*, LD+6 |
ENT | LK2+23~*, LK2+24, LK2+25 |
EROOT | CODE+3~, CODE+6*, CODE+7, CODE+9, CODE+17*, CODE+18, CODE+20 |
FDT | SYS+1~, SYS+5*, SYS+6* |
FI | WORD+40~* |
FILE | LK2+1~, LK2+3*, SYS+1~, SYS+2*, SYS+4 |
HIS | LS+1~, LS+4*, LS+5 |
ICDBYCD | CD+1~* |
ICDCDT | LK2+12~* |
ICDI | LK2+19~, LK2+20*, LK2+21 |
IEN | LK2+1~, LK2+21~*, LK2+23~, LK2+24*, LK2+25, LK2+26, CODE+8*, CODE+9*, CODE+10, CODE+13 , CODE+19*, CODE+20*, CODE+21, CODE+24, CODE+27, LS~, LS+1*, LS+2, LS+3, LS+4 , LS+5, LD~, LD+1*, LD+2, LD+3, LD+5, LD+6, LD+7, UNQ+24~, UNQ+27* , UNQ+28, UNQ+29*, UNQ+35, UNQ+36, UNQ+38, SYS+1~, SYS+4*, SYS+5, SYS+6 |
IEN1 | LK2+12~ |
IEN2 | LK2+12~ |
IENS | UNQ+24~ |
IENS( | UNQ+33*, UNQ+34 |
INP1 | LK2+1~, LK2+9*, LK2+11 |
INP2 | LK2+1~, LK2+9*, LK2+11 |
KEY | LK2+1~, CODE+3~, CODE+4*, CODE+5, CODE+8, CODE+12, CODE+15*, CODE+16, CODE+19, CODE+23 , ISCODE+1~, ISCODE+2*, ISCODE+3, ISCODE+9, ISCODE+10, ISCODE+11*, ISCODE+12, ISCODE+17, ISCODE+18, UNQ+24~ , UNQ+25*, UNQ+26, UNQ+29, UNQ+31, UNQ+33, ISORD+1, ISORD+2 |
LAS | ISCODE+1~, UNQ+24~ |
LDI | LD+1~, LD+6*, LD+7 |
LDS | LD+1~, LD+7*, LD+8 |
LOR | LK2+1~, LK2+13, LK2+19~*, LK2+21, LK2+27 |
NC | SS+1~*, SS+2, SS+4*, SS+5, SH+1~, SH+2*, SH+3 |
NDT | SYS+1~*, SYS+6 |
NIEN | UNQ+24~, UNQ+30*, UNQ+32*, UNQ+33, UNQ+34* |
NN | SS+1~*, SS+2*, SS+3, SS+4*, SS+5*, SS+6, SH+1~, SH+2*, SH+3* |
NUM | LK2+1~ |
NXT | LK2+1~, UNQ+24~, UNQ+27*, UNQ+28, UNQ+30*, UNQ+34*, UNQ+36, UNQ+38 |
OK | LK2+1~ |
ORD | LK2+1~, CODE+3~, CODE+5*, CODE+7*, CODE+8, CODE+9, CODE+12, CODE+16*, CODE+18*, CODE+19 , CODE+20, CODE+23, ISCODE+1~, ISCODE+6~*, ISCODE+7, ISCODE+14~*, ISCODE+15, UNQ+24~, UNQ+29~*, UNQ+31* , UNQ+32, UNQ+33, ISORD+1, ISORD+2 |
ORG | ISCODE+1~, ISCODE+3*, ISCODE+6, ISCODE+12*, ISCODE+14, UNQ+24~, UNQ+26*, UNQ+29 |
OUT | LK~, CD~, LK2+8*, LK2+13, LK2+21, CODE+13, CODE+24, ISCODE+1~, ISCODE+4*, ISCODE+5 , ISCODE+9*, ISCODE+10*, ISCODE+13, ISCODE+17*, ISCODE+18*, ISCODE+19, UNQ+24~, UNQ+27*, UNQ+28, UNQ+35* , UNQ+36*, UNQ+37*, UNQ+38*, UNQ+39 |
PARS | LK2+1~, TOK+1! |
PR | LK2+1~ |
PRV | CODE+3~, CODE+4*, CODE+15* |
RES | ISCODE+6~, ISCODE+7*, ISCODE+8*, ISCODE+9, ISCODE+10, ISCODE+14~, ISCODE+15*, ISCODE+16*, ISCODE+17, ISCODE+18 |
ROOT | LK~, CD~, LK2+2*, LK2+3, LK2+4, LK2+6, LK2+13, LK2+14, LK2+19, LK2+21 , LK2+27, LK2+29, CODE+1, CODE+2, CODE+6, CODE+10, CODE+13, CODE+17, CODE+21, CODE+24 , CODE+25, CODE+27, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+39, WORD+47, WORD+48, WORD+49 , WORD+51, LS~, LS+1*, LS+2, LS+3, LS+4, LS+5, LD~, LD+1*, LD+2 , LD+3, LD+5, LD+6, LD+7, ISCODE~, ISCODE+7, ISCODE+15, UNQ~, UNQ+28, UNQ+29 , UNQ+31, UNQ+32, SYS~, SYS+2 |
SEQ | LK2+1~ |
SI | ISCODE+1~, ISCODE+4*, ISCODE+5*, ISCODE+7, ISCODE+9, ISCODE+10, ISCODE+13*, ISCODE+15, ISCODE+17, ISCODE+18 , UNQ+24~, UNQ+27*, UNQ+28*, UNQ+29, UNQ+31, UNQ+32, UNQ+37* |
STA | CODE+10~*, CODE+11, CODE+21~*, CODE+22, CODE+27*, CODE+28, LS+1~, LS+5*, LS+6*, LS+7 |
SUB | LK2+1~, LK2+4*, LK2+11, LK2+16, LK2+23, LK2+24, LK2+25, LK2+26, LK2+27, LK2+30 , LK2+33, CODE+4, CODE+14, CODE+15, SH+1~*, SH+2 |
SYS | LK~, CD~, LK2+5*, LK2+6*, LK2+7, LK2+13, LK2+19, LK2+21, CODE+6, CODE+13 , CODE+17, CODE+24, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+41, WORD+42~*, WORD+43, WORD+44 , WORD+45, WORD+46, WORD+47~*, WORD+48, WORD+50, WORD+51, ISCODE+1~, UNQ+24~, CDT+1~*, SYS+1~* , SYS+6*, SYS+7 |
TDT | LK2+1~ |
TKN | WORD+38~*, WORD+43, WORD+45, WORD+48, WORD+51 |
TRT | WORD+40~*, WORD+42, WORD+43, WORD+45 |
TXT | LK~, CD~, CD+1*, LK2+2*, LK2+9, LK2+18, LK2+19, LK2+23~, LK2+24*, LK2+26 , LK2+29, CODE+1, CODE+2, CODE+4, CODE+15 |
VCC | LK2+1~ |
VCD | LK2+1~ |
VDS | LK2+1~ |
VDT | LS~, LS+1*, LS+2, LD~, LD+1*, LD+2 |
VER | LK~, CD~, LK2+5*, LK2+6, LK2+7, LK2+13, LK2+19, LK2+21, CODE+10, CODE+11 , CODE+13, CODE+21, CODE+22, CODE+24, CODE+27, CODE+28, LD~, LD+4, LD+5 |
VII | LK2+1~ |
VNM | LK2+1~ |
VSD | LK2+1~ |
VST | LK2+1~ |
X | LK2+19!*, TOK~, TOK+1, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+39, WORD+43*, WORD+45* , WORD+46, WORD+48*, WORD+51*, WORD+52, LS+7*, LS+8, LD+8*, LD+9, ISCODE~, ISCODE+2 , ISCODE+11, UNQ~, UNQ+24, UNQ+25, UNQ+39*, UNQ+40, ISORD~, CDT~, CDT+1, CDT+2 , TM~, TM+2*, TM+3*, TM+4 |
Y | LK2+1~, LK2+13, LK2+19!, CDT~, CDT+1, TM~, TM+1*, TM+2, TM+3 |
Y( | LK2+20, LK2+21 |