Routine: ICDEXLK3

Information

ICDEXLK3 ;SLC/KER - ICD Extractor - Lookup, Search ;07/15/2015

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	Line Occurrences
Function Call: WRITE	Prompt: !,NN,"=",@NN Line Location: SS+3
Function Call: WRITE	Prompt: !,NN,"=",@NN Line Location: SS+6
Function Call: WRITE	Prompt: Condition for execution: '$D(@NN) ! Q:'$D(@NN) Line Location: SH+3
Function Call: WRITE	Prompt: !,NN,"=",@NN Line Location: SH+3
Function Call: WRITE	Prompt: ! Line Location: SH+4