Routine: LEX10PLS

Information

LEX10PLS ;ISL/KER - ICD-10 Procedure Lookup Selection ;05/23/2017

Name	Comments	DBIA/ICR reference
SEL(X)	; Select from List
ONE(X)	; One Entry Found
MUL(X)	; Multiple Entries Found
MULQ	; Multiple Entries - Quit
MULS(X)	; Multiple Entries - Select
MULSH	; Multiple Entries - Selection Help
MULSP(X)	; Multiple Entries - Pre-Process
MULSEH	; Extended Help
CUR(X)	; Current Array
CL	; Clear
BUILD	; Build Selection Array
CD(X)	; Character/Description
SH(X)	; Shorten Text
ATTR	; Screen Attributes
KATTR	; Kill Screen Attributes
TEST	; Test Array Building
FND(X)	; Found
GETO(X)	; Get One
CONT(X)	; Ask to Continue
CONTH	; Ask to Continue Help

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: MUL+4
Function Call: WRITE	Prompt: !,?1,$G(LEX(+LEXI)) Line Location: MUL+7
Function Call: WRITE	Prompt: ! Line Location: MUL+8
Function Call: WRITE	Prompt: !,$G(LEXHLP) Line Location: MULSH+1
Function Call: WRITE	Prompt: ! Condition for execution: LEXC=1 Line Location: MULSEH+6
Function Call: WRITE	Prompt: !," ",LEXT Line Location: MULSEH+6
Function Call: WRITE	Prompt: !!," Definition:",?15,$G(LEXT(1)) Line Location: MULSEH+9
Function Call: WRITE	Prompt: !,?15,$G(LEXT(I)) Line Location: MULSEH+10
Function Call: WRITE	Prompt: !!," Explanation:",?15,$G(LEXT(1)) Line Location: MULSEH+13
Function Call: WRITE	Prompt: !,?15,$G(LEXT(I)) Line Location: MULSEH+14
Function Call: WRITE	Prompt: ?15,$G(LEXT(1)) Line Location: MULSEH+19
Function Call: WRITE	Prompt: !,?15,$G(LEXT(LEXI)) Line Location: MULSEH+20
Function Call: WRITE	Prompt: ! Line Location: MULSEH+21
Function Call: WRITE	Prompt: ! Line Location: MULSEH+23
Function Call: WRITE	Prompt: !,?1,$G(LEX(+LEXI)) Line Location: MULSEH+26
Function Call: WRITE	Prompt: ! Line Location: CONT+3
Function Call: WRITE	Prompt: !," Press Enter to continue" Line Location: CONTH+1