Routine: LEXMTLU

Information

LEXMTLU ;ISL/KER - Setup Appl/User Defaults for Look-up ;04/21/2014

Source file <LEXMTLU.m>

Name	Comments	DBIA/ICR reference
TERMHLP	; Look-up help PCH 11
DD	; Display Defaults in ^TMP("LEXSCH",$J)
EN	; X not set
TERM(X)	; Get expression
XTLK	;

Name	Line Occurrences
Function Call: WRITE	Prompt: " ",X Line Location: TERM+5
Function Call: WRITE	Prompt: !," Best results occur using one to three full or partial words without" Line Location: TERMHLP+3
Function Call: WRITE	Prompt: !," a suffix (i.e., ""DIABETES"",""DIAB MELL"",""DIAB MELL INSUL"") or" Line Location: TERMHLP+4
Function Call: WRITE	Prompt: !," a classification code (ICD, CPT, HCPCS, etc)" Line Location: TERMHLP+5
Function Call: WRITE	Prompt: !,LEXNODE,"=",@LEXNODE Line Location: DD+5
Routine Call	DIR Line Location: TERM+3

Name	Line Occurrences
$$TERM	EN+1, XTLK+2
XTLK	EN+2

Name	Field # of Occurrence
DIC	XTLK+4!, TERM+4*, TERM+5
DIR	TERM+1~, TERM+8!
DIR("?"	TERM+2*, TERMHLP+1
DIR("??"	TERM+3*
DIR("A"	TERM+1*
DIR(0	TERM+3*
DIROUT	TERM+8!
DIRUT	TERM+8!
>> DTOUT	TERM+7
>> DUOUT	TERM+8*
DUZ	TERM+5
LEXAP	XTLK+4!
LEXLL	XTLK+4!
LEXNODE	DD+1~, DD+2, DD+3, DD+4, DD+5
LEXOK	DD+2~, DD+3, DD+4*
LEXQ	XTLK+1~*
LEXSHOW	XTLK+4!
LEXSUB	XTLK+4!
LEXUN	XTLK+4!
U	EN+2, XTLK+2, TERM+4, TERM+8
X	EN+1, EN+2, XTLK+2, XTLK+3, XTLK+5, TERM~, TERM+4, TERM+5, TERM+6, TERM+7* , TERM+8, TERMHLP+1~*, TERMHLP+2
XTLKHLP	XTLK+5!
XTLKKSCH	XTLK+5!
XTLKSAY	XTLK+5!
XTLKWD2	XTLK+5!
XTLKX	XTLK+3*, XTLK+5!
Y	XTLK+5, TERM+1~, TERM+3~