Routine: LEXXM

Package	Total	Call Graph
DRG Grouper	3	($$CODEN,$$ICDDX,$$ICDOP,ICDD)^ICDCODE ($$CPT,CPTD)^ICPTCOD ($$MOD,MODD)^ICPTMOD
Kernel	1	$$DT^XLFDT
Lexicon Utility	1	($$SW1,$$SW2,$$SW3,$$SWAP,EW)^LEXXMM
VA Fileman	1	^DIWP

Package	Total	Caller Graph
DRG Grouper	1	ICDEXLK5
Lexicon Utility	1	LEXXMM

Entry Points

Name	Comments	DBIA/ICR reference
ICDOP1(X,V,L)	; Convert ICD Procedure to Mixed Case
ICDDX1(X,V,L)	; Convert ICD Diagnosis to Mixed Case
MOD1(X,V,L)	; Convert CPT Modifier to Mixed Case
ICPT2(X,V,L)	; Convert CPT Procedure Description to Mixed Case
CASE(X)	; Get Case for String X = String of Text
SW1(X)	; Switch Text (before setting case)
MX(X)	; Mixed Case
EW(X)	; Display Word Usage
ICDDX2(X,V,L)	; Convert ICD Diagnosis Description to Mixed Case
LO(X)	; Lower Case
ICPT1(X,V,L)	; Convert CPT Procedure to Mixed Case
FN(X)	; Footnote Removed
MIX(X)	; Mix Case any length	ICR #5781 Status: Active Usage: Controlled Subscription
LD(X)	; Leading Character
ICDOP2(X,V,L)	; Convert ICD Procedure Description to Mixed Case
UP(X)	; Upper Case
EXP(X)	; Get Case for Expression X = IEN in 757.01
TXT(X,L)	; Convert Text to Mixed Case
FMT	; Format Line Length - needs Y() and LEN
GETC(X)	; Set to Mixed/lower/UPPER case
TP(X)	; Trim Punctuation
SW3(X)	; Switch Text (after assembling string)
FULL(X)	; Convert Text to Mixed Case
USE(X)	; Used
SW2(X)	; Switch Text (after setting case)
DBL(X)	; Double Spaces
MOD2(X,V,L)	; Convert CPT Modifier Description to Mixed Case
TRIM(X)	; Trim Spaces
LEX(X,L)	; Convert Expression to Mixed Case
TM(X,Y)	; Trim Character Y - Default " "

Name	Field # of Occurrence
^DIWP	FMT+2
$$CODEN^ICDCODE	ICDDX1+2, ICDDX2+2, ICDOP1+2, ICDOP2+2
$$ICDDX^ICDCODE	ICDDX1+2, ICDDX2+2
$$ICDOP^ICDCODE	ICDOP1+2, ICDOP2+2
ICDD^ICDCODE	ICDDX2+2, ICDOP2+2
$$CPT^ICPTCOD	ICPT1+2, ICPT2+2
CPTD^ICPTCOD	ICPT2+2
$$MOD^ICPTMOD	MOD1+3, MOD2+2
MODD^ICPTMOD	MOD2+2
$$SW1^LEXXMM	SW1+1
$$SW2^LEXXMM	SW2+1
$$SW3^LEXXMM	SW3+1
$$SWAP^LEXXMM	FN+2
EW^LEXXMM	EW+1
$$DT^XLFDT	ICDDX1+1, ICDDX2+1, ICDOP1+1, ICDOP2+1, ICPT1+1, ICPT2+1, MOD1+2, MOD2+1

Name	Line Occurrences (* Changed, ! Killed)
^LEX(757.01 - [#757.01]	LEX+1, EXP+1
^UTILITY($J	FMT+2!, FMT+3, FMT+4!

Name	Line Occurrences
$$CASE	TXT+1, FULL+1, ICDDX1+2, ICDDX2+3, ICDOP1+2, ICDOP2+3, ICPT1+2, ICPT2+3, MOD1+3, MOD2+3 , EXP+1
$$DBL	CASE+32
$$EXP	LEX+2
$$FN	CASE+32
$$GETC	CASE+11, CASE+20
$$MX	GETC+5
$$SW1	CASE+2
$$SW2	GETC+4
$$SW3	CASE+28
$$TM	CASE+32, GETC+2, USE+10
$$TP	GETC+2
$$TRIM	ICDDX2+3, ICDOP2+3, ICPT2+3, MOD2+3, CASE+2, CASE+26, FMT+3, FN+1, DBL+2
$$UP	CASE+2, CASE+10, CASE+19, GETC+1, GETC+2, USE+3
$$USE	GETC+2
@(	GETC+4
FMT	TXT+1, LEX+2, ICDDX1+2, ICDDX2+4, ICDOP1+2, ICDOP2+4, ICPT1+2, ICPT2+4, MOD1+3, MOD2+4
FULL	MIX+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
C	CASE+1~, CASE+12, CASE+13, CASE+14, CASE+17, CASE+22*, CASE+23
CHR	CASE+1~, CASE+28, CASE+29, CASE+30, CASE+32
CODE	ICDDX1+1~, ICDDX2+1~, ICDDX2+2, ICDOP1+1~, ICDOP2+1~, ICDOP2+2, ICPT1+1~, ICPT1+2, ICPT2+1~, ICPT2+2 , MOD1+1~, MOD2+1~, MOD2+2*
CT	CASE+1~, CASE+6, CASE+7, CASE+8, CASE+10, CASE+11, CASE+15, CASE+16, CASE+17, CASE+19 , CASE+20, CASE+23, CASE+24*, CASE+25, CASE+26, CASE+27
CUR	USE+1~, USE+7*, USE+8, USE+9
D	FMT+1~
DIW	FMT+1~
DIWF	FMT+1~, FMT+2*
DIWI	FMT+1~
DIWL	FMT+1~, FMT+2*
DIWR	FMT+1~
DIWT	FMT+1~
DIWTC	FMT+1~
DIWX	FMT+1~
DN	FMT+1~
FIR	FN+1~*
I	LEX+1~, ICDDX2+1~, ICDDX2+3, ICDOP2+1~, ICDOP2+3, ICPT2+1~, ICPT2+3, MOD2+1~, MOD2+3, CASE+1~ , CASE+4, CASE+5, CASE+12, CASE+15, CASE+21, CASE+30, FMT+1~
ICDDX	ICDDX1+1~, ICDDX1+2*
ICDOP	ICDOP1+1~, ICDOP1+2*
ICPT	ICPT1+1~, ICPT1+2*
IEN	LEX+1~, ICDDX1+1~, ICDDX1+2, ICDDX2+1~, ICDDX2+2, ICDOP1+1~, ICDOP1+2, ICDOP2+1~, ICDOP2+2, ICPT1+1~ , ICPT1+2, ICPT2+1~, ICPT2+2, MOD1+1~, MOD1+3, MOD2+1~, MOD2+2, EXP+1~*
IN	EXP+1~*
J	FMT+1~, FMT+2, FMT+3
L	TXT~, TXT+1, LEX~, LEX+1, ICDDX1~, ICDDX1+1, ICDDX2~, ICDDX2+1, ICDOP1~, ICDOP1+1 , ICDOP2~, ICDOP2+1, ICPT1~, ICPT1+1, ICPT2~, ICPT2+1, MOD1~, MOD1+1, MOD2~, MOD2+1 , CASE+1~, CASE+2, CASE+4, FMT+1~, FN+1~
LAS	FN+1~*
LEN	TXT+1~!, FULL+1~, LEX+1~!, ICDDX1+1~!, ICDDX2+1~!, ICDOP1+1~!, ICDOP2+1~!, ICPT1+1~!, ICPT2+1~!, MOD1+1~* , MOD1+2!, MOD2+1~*!, FMT+1, FMT+2
LEXCHR	CASE+1~, CASE+8, CASE+17
LEXCTL	CASE+1~, CASE+8, CASE+17
LEXIN	CASE+1~, CASE+2, CASE+8, CASE+17*
LEXLEN	GETC+1~*
LEXNXT	CASE+1~, CASE+11, GETC+2
LEXORG	CASE+1~, CASE+10*
LEXPRE	CASE+1~, CASE+10, CASE+19
LEXRTN	GETC+1~, GETC+3, GETC+4
LEXTAG	GETC+1~, GETC+3, GETC+4
LEXUSE	CASE+1~, GETC+2*
LOW	TXT+1~!, FULL+1~!, LEX+1~!, ICDDX1+1~!, ICDDX2+1~!, ICDDX2+3!, ICDOP1+1~!, ICDOP2+1~!, ICDOP2+3!, ICPT1+1~! , ICPT2+1~!, ICPT2+3!, MOD1+1~!, MOD2+1~!, MOD2+3!
MOD	MOD1+1~, MOD1+3*
ND	ICDDX2+1~, ICDOP2+1~, ICPT2+1~, MOD2+1~
ND(	ICDDX2+3, ICDOP2+3, ICPT2+3, MOD2+3
NUM	FN+1~, FN+2*
NWD	CASE+10~, CASE+11, CASE+19~, CASE+20
OIN	CASE+1~, CASE+2*
ORG	FN+1~*
OUT	FN+1~, FN+2, FN+3
PAR	EXP+1!, CASE+1!, CASE+28!
PAR(	CASE+6, CASE+7, CASE+8, CASE+10, CASE+11, CASE+15, CASE+16, CASE+17, CASE+19, CASE+20 , CASE+23, CASE+24, CASE+25, CASE+26, CASE+27!, USE+1, USE+2, USE+3, USE+6
PAR(" "	CASE+6, CASE+15
PAR("T"	CASE+2*, CASE+8, CASE+17
PAR("TRL"	CASE+4*, CASE+28
PAR(0	CASE+2, CASE+6, CASE+15*
PH	CASE+1~, CASE+7, CASE+16
REM	CASE+1~, CASE+15~, CASE+21, CASE+22
REP	FN+1~, FN+2*
SEG	USE+1~*, USE+2, USE+3, USE+6
STO	CASE+1~, CASE+6, CASE+9, CASE+10, CASE+15~, CASE+18, CASE+19
STR	CASE+1~, CASE+2, CASE+3, CASE+4, CASE+5, CASE+6, CASE+12, CASE+15, CASE+21, CASE+22* , CASE+25~, CASE+26, CASE+27, USE+1~, USE+4, USE+5, USE+6, USE+8, USE+9, USE+10
TR	CASE+25~*, CASE+26
TRL	CASE+1~, CASE+3*, CASE+4
TRM	FN+1~*
TXT	EXP+1~, CASE+1~, CASE+24, CASE+27, CASE+28, CASE+30~*, CASE+31
UIN	CASE+1~, CASE+2*, CASE+29, GETC+2
V	ICDDX1~, ICDDX1+1, ICDDX2~, ICDDX2+1, ICDOP1~, ICDOP1+1, ICDOP2~, ICDOP2+1, ICPT1~, ICPT1+1 , ICPT2~, ICPT2+1, MOD1~, MOD1+1, MOD2~, MOD2+1
VDT	LEX+1~, ICDDX1+1~, ICDDX1+2, ICDDX2+1~, ICDDX2+2, ICDOP1+1~, ICDOP1+2, ICDOP2+1~, ICDOP2+2, ICPT1+1~* , ICPT1+2, ICPT2+1~, ICPT2+2, MOD1+1~, MOD1+2, MOD1+3, MOD2+1~, MOD2+2
W	CASE+1~, CASE+9, CASE+10, CASE+11, CASE+18, CASE+19, CASE+20, CASE+25*
WC	USE+2~*, USE+3
WD	CASE+1~, CASE+10, CASE+11, CASE+19, CASE+20, USE+3~*, USE+4, USE+5, USE+7
WTH	FN+1~, FN+2*
X	MIX~, MIX+1, MIX+2, TXT~, TXT+1, FULL~, FULL+1, LEX~, LEX+1, LEX+2 , ICDDX1~, ICDDX1+1, ICDDX1+2, ICDDX2~, ICDDX2+1, ICDOP1~, ICDOP1+1, ICDOP1+2, ICDOP2~, ICDOP2+1 , ICPT1~, ICPT1+1, ICPT1+2, ICPT2~, ICPT2+1, MOD1~, MOD1+1, MOD1+3, MOD2~, MOD2+1 , EXP~, EXP+1, EXP+2, CASE~, CASE+2, CASE+28, CASE+29, CASE+30, CASE+31, CASE+32* , CASE+33, GETC~, GETC+1, GETC+3, GETC+4, GETC+5, GETC+6, SW1~, SW1+1, SW2~ , SW2+1, SW3~, SW3+1, EW~, EW+1, USE~, USE+10, USE+11, USE+13, FMT+1~ , FMT+2, FN~, FN+1, FN+3, FN+4, LO~, LO+1, UP~, UP+1, MX~ , MX+1, LD~, LD+1, TRIM~, TRIM+1, TRIM+2, TRIM+3, TP~, TP+1, TP+2 , TP+3, TM~, TM+1, TM+2, TM+3, DBL~, DBL+1, DBL+2, DBL+3
Y	MIX+1~, TXT+1!, FULL+1!, LEX+1!, ICDDX1+1!, ICDDX2+1!, ICDDX2+3!, ICDOP1+1!, ICDOP2+1!, ICDOP2+3! , ICPT1+1!, ICPT2+1!, ICPT2+3!, MOD1+1!, MOD2+1!, MOD2+3!, GETC+1~, GETC+4, FMT+3!, TM~ , TM+1*, TM+2
Y(	ICDDX2+3, ICDOP2+3, ICPT2+3, MOD2+3, FMT+2, FMT+3*
Y(0	FMT+1
Y(1	TXT+1, LEX+2, ICDDX1+2, ICDOP1+2, ICPT1+2, MOD1+3
Z	FMT+1~

Customize PDF page

Package: Lexicon Utility

Routine: LEXXM

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: