Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: LEX10DU

Package: Lexicon Utility

Routine: LEX10DU


Information

LEX10DU ;ISL/KER - ICD-10 Diagnosis Utilities ;04/21/2014

Source Information

Source file <LEX10DU.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Lexicon Utility 2 GETSYN^LEXTRAN1  $$IMPDATE^LEXU  
DRG Grouper 1 ($$ICDDX,$$LD,$$LDH,$$SD,$$SDH)^ICDEX  
Kernel 1 ($$DT,$$FMTE)^XLFDT  
VA FileMan 1 ^DIM  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Lexicon Utility 5 LEX10CS  LEX10DBC  LEX10DBR  LEX10DBT  LEXU  

Entry Points

Name Comments DBIA/ICR reference
LN(X,EFF) ; Long Name
CODES(X) ; Number of Codes in a Category
ISCAT(CODE) ; Is Code a Category
PAR(X) ; Parent Category
PT ; Entry point where DA is defined and X is unknown
ARY ; Build Local Array
INC(X) ; Category includes Cat/Codes
SCR(X,Y) ; Screen
REDUCE(X) ; Reduce List
CAT(CODE) ; Get Category for Code
CATS(X) ; Number of Categories in a Category
MSG(X) ; Message for Unversioned Search
PTX ; Entry point to parse string (X must exist)
DXARY ; Build Output Array from Search Results
TM(X,Y) ; Trim Character Y - Default " "
SH ; Show TMP
SN(X,EFF) ; Short Name

External References

Name Field # of Occurrence
^DIM SCR+2
$$ICDDX^ICDEX DXARY+44
$$LD^ICDEX DXARY+51
$$LDH^ICDEX DXARY+53
$$SD^ICDEX DXARY+45
$$SDH^ICDEX DXARY+47
GETSYN^LEXTRAN1 DXARY+79
$$IMPDATE^LEXU SN+2, LN+2
$$DT^XLFDT MSG+1, SN+2, LN+2
$$FMTE^XLFDT MSG+9, MSG+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"3",!
  • Line Location: SH+2
Function Call: WRITE
  • Prompt: !,LEXNN,"=",@LEXNN
  • Line Location: SH+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LEX(757.01 - [#757.01] ARY+8, SCR+1, PT+1
^LEX(757.02 - [#757.02] ARY+7, CODES+11, MSG+4, MSG+5, MSG+6, MSG+7
^LEX(757.033 - [#757.033] DXARY+11, DXARY+12, DXARY+14, ISCAT+28, CATS+11, PAR+4, CAT+20, CAT+21, CAT+23, SN+4
, SN+5, SN+6, LN+4, LN+5, LN+6
^TMP("DIAGSRCH" DXARY+3!, DXARY+6*, DXARY+7*, DXARY+17*, DXARY+18*, DXARY+19, DXARY+23, DXARY+24, DXARY+92!
^TMP("LEXDX" REDUCE+7, REDUCE+12!, REDUCE+13, REDUCE+21*, REDUCE+25, REDUCE+26, REDUCE+28, REDUCE+29!, ARY+2, ARY+4
^TMP("LEXTKN" PTX+1!

Label References

Name Line Occurrences
$$CAT REDUCE+10
$$CATS INC+16
$$CODES INC+16
$$INC ISCAT+27
$$ISCAT REDUCE+14
$$LN DXARY+15, CAT+24
$$MSG DXARY+27
$$PAR ISCAT+27
$$SN DXARY+16, CAT+24
$$TM ARY+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CATS ISCAT+24~, ISCAT+27*, ISCAT+28
CDT SN+1~*, SN+2*, SN+3*, SN+4, LN+1~*, LN+2*, LN+3*, LN+4
CODE ISCAT~, ISCAT+24*, ISCAT+25*, ISCAT+26, ISCAT+27, ISCAT+28, CATS+10~*, CATS+11, CODES+10~*, CODES+11
, CAT~, CAT+16*
CTL CATS+10~*, CATS+11, CODES+10~*, CODES+11
DA PT+1, PTX+1~
EFF CAT+18~, CAT+20*, CAT+21*, CAT+22*, CAT+23, CAT+24, CAT+25, SN~, SN+1~, SN+4*
, SN+5, LN~, LN+1~, LN+4*, LN+5
EXIT PAR+1~*, PAR+2, PAR+5*
FRAG CAT+16~*, CAT+17, CAT+18*, CAT+19*, CAT+20, CAT+21, CAT+23, CAT+25
HIS SN+1~, SN+5*, SN+6, LN+1~, LN+5*, LN+6
IEN CAT+18~, CAT+23*, CAT+24, SN+1~*, SN+4, SN+5, SN+6, LN+1~*, LN+4, LN+5
, LN+6
IMP SN+1~, SN+2*, SN+3, LN+1~, LN+2*, LN+3
INP PAR+1~*, PAR+2, PAR+3
LEN CAT+16~, CAT+17*, CAT+18
LEX REDUCE+19~*, REDUCE+20*, REDUCE+21, ARY+15~*, ARY+16*, ARY+17
>> LEXA( ARY+12*, ARY+13*, ARY+17*, ARY+18*
>> LEXA(0 ARY+19*, ARY+20*, ARY+21*
LEXAC MSG+1~, MSG+6*, MSG+8, MSG+10
LEXACT ARY+1~*, ARY+12*, ARY+13, ARY+17*, ARY+18, ARY+19
LEXC REDUCE+1~, REDUCE+6~*, REDUCE+7*, REDUCE+8, REDUCE+10, REDUCE+12, REDUCE+25*, REDUCE+26, REDUCE+27, ARY+1~*
, ARY+2*, ARY+4, ARY+8, DXARY+1~, DXARY+5~*, DXARY+6, DXARY+7, DXARY+8, DXARY+10, DXARY+20~
, DXARY+26*, DXARY+27, DXARY+30~, DXARY+31*, DXARY+38, DXARY+44, DXARY+59, DXARY+79
LEXCAT REDUCE+9~, REDUCE+10*, REDUCE+11*, REDUCE+13, REDUCE+14, REDUCE+18, REDUCE+21, ARY+3~, ARY+6*, ARY+9
, ARY+14, ARY+18
>> LEXCDT ARY+10, MSG+2, MSG+3
LEXCE REDUCE+9~, REDUCE+10*, REDUCE+18, REDUCE+19
LEXCO DXARY+1~, DXARY+19*, DXARY+23, DXARY+24
LEXCODE MSG+1~*, MSG+4, MSG+5, MSG+6, MSG+7
>> LEXCS DXARY+2*, DXARY+8, DXARY+43, DXARY+44
LEXCT REDUCE+3*, REDUCE+4, REDUCE+6*, REDUCE+21*, REDUCE+22*, REDUCE+26*, REDUCE+27~, DXARY+1~, DXARY+3*, DXARY+58*
, DXARY+77
LEXCTL REDUCE+27~*, REDUCE+28, REDUCE+29
LEXD ARY+3~, ARY+5*, ARY+10, ARY+12, ARY+15
>> LEXDATA( DXARY+38*, DXARY+39*, DXARY+40*, DXARY+41*, DXARY+42*, DXARY+59*, DXARY+61*, DXARY+62*, DXARY+64*, DXARY+65*
, DXARY+66*, DXARY+67*, DXARY+68*, DXARY+69*, DXARY+72*, DXARY+73*, DXARY+76*, DXARY+82*, DXARY+83*, DXARY+84*
, DXARY+88, DXARY+89*, DXARY+90*
>> LEXDATA(" " DXARY+37, DXARY+59, DXARY+91
>> LEXDATA(0 DXARY+77*, DXARY+78*, DXARY+91*
LEXE DXARY+30~, DXARY+32*, DXARY+47~, DXARY+48*, DXARY+53~, DXARY+54*
LEXEFF DXARY+20~, DXARY+26*, DXARY+38, DXARY+62, DXARY+64, DXARY+68
LEXEIEN ARY+3~, ARY+7*, ARY+8, ARY+9, ARY+13, DXARY+20~, DXARY+25*, DXARY+29, DXARY+58, DXARY+67
, DXARY+68
LEXEXP ARY+3~, ARY+8*, ARY+9, ARY+13, DXARY+20~, DXARY+28*, DXARY+65
LEXF DXARY+10~
LEXFA DXARY+10~
>> LEXFI DXARY+1*
LEXFIL SCR+2~*, SCR+3
LEXI DXARY+5~, DXARY+8*, DXARY+10, DXARY+20~, DXARY+85*, DXARY+86
LEXIA MSG+1~, MSG+5*, MSG+8, MSG+9
LEXICD DXARY+20~, DXARY+44*, DXARY+45, DXARY+47, DXARY+51, DXARY+53, DXARY+70, DXARY+71, DXARY+74, DXARY+75
LEXICDT DXARY+20~, DXARY+69*, DXARY+70*, DXARY+71*, DXARY+72, DXARY+73*, DXARY+74*, DXARY+75*, DXARY+76
>> LEXINC DXARY+60, DXARY+63
LEXIS REDUCE+9~, REDUCE+14*, REDUCE+15, REDUCE+16, REDUCE+17
LEXIT REDUCE+1~, REDUCE+4*, REDUCE+5*, REDUCE+24*
LEXLD DXARY+20~, DXARY+44*, DXARY+50*, DXARY+51*, DXARY+52, DXARY+54*, DXARY+57*, DXARY+73, DXARY+74, DXARY+75
LEXLD(0 DXARY+55*, DXARY+56
LEXLDE DXARY+20~, DXARY+56*, DXARY+75
LEXLEN REDUCE+1~, REDUCE+2*, REDUCE+5, REDUCE+8, REDUCE+23*
LEXLH DXARY+53~
LEXLH( DXARY+54
LEXLH(0 DXARY+55
LEXLH(9999999 DXARY+54
LEXMAX REDUCE+1~, REDUCE+2*, REDUCE+3*, REDUCE+4
LEXMSG DXARY+22~, DXARY+27*, DXARY+30~, DXARY+42, DXARY+66
LEXN DXARY+30~, DXARY+35*, DXARY+40, DXARY+41
LEXN1 DXARY+21~, DXARY+23*, DXARY+25, DXARY+26, DXARY+31, DXARY+32, DXARY+33
LEXN2 DXARY+21~, DXARY+24*, DXARY+25, DXARY+28, DXARY+35
LEXNC ARY+3~, ARY+6*, ARY+16, DXARY+30~, DXARY+33*, DXARY+34*, DXARY+39, SH+1~*, SH+2
LEXNCD REDUCE+9~, REDUCE+16*, REDUCE+20
LEXNCT REDUCE+9~, REDUCE+15*
LEXND ARY+3~, ARY+4*, ARY+5, ARY+6, DXARY+21~, DXARY+86~*, DXARY+87, DXARY+89
LEXNN SH+1~*, SH+2*
LEXNPR REDUCE+9~, REDUCE+17*
LEXNXT REDUCE+27~, REDUCE+28*, REDUCE+29
LEXO DXARY+21~, DXARY+30~, DXARY+37*, DXARY+38, DXARY+39, DXARY+40, DXARY+41, DXARY+42, DXARY+59*, DXARY+61
, DXARY+62, DXARY+64, DXARY+65, DXARY+66, DXARY+67, DXARY+68, DXARY+69, DXARY+72, DXARY+73, DXARY+76
, DXARY+82, DXARY+83, DXARY+84, DXARY+88, DXARY+89, DXARY+90
LEXOI DXARY+1~, DXARY+3*, DXARY+4*, DXARY+5, DXARY+6, DXARY+7
LEXOK PTX+1~
LEXOKC PTX+1~
LEXOKN PTX+1~
LEXOKP PTX+1~
LEXOUT DXARY+19!
LEXOUT( DXARY+4, DXARY+5, DXARY+6, DXARY+7
LEXP1 DXARY+21~, DXARY+80*, DXARY+81, DXARY+86~, DXARY+87*, DXARY+88
LEXP2 DXARY+21~, DXARY+80*, DXARY+81, DXARY+83, DXARY+86~, DXARY+87*
LEXP3 DXARY+21~, DXARY+81*, DXARY+84
LEXPD MSG+1~, MSG+7*, MSG+10, MSG+11
LEXPF DXARY+21~, DXARY+80*, DXARY+81, DXARY+82
LEXPR DXARY+21~, DXARY+78
LEXPRE REDUCE+1~, REDUCE+2*, REDUCE+5, REDUCE+23*, REDUCE+24
LEXS DXARY+10~*, DXARY+11, DXARY+12, DXARY+14, DXARY+17, DXARY+18, DXARY+21~, DXARY+48*, DXARY+54*, DXARY+86~
, DXARY+88*, DXARY+89, DXARY+90
LEXSD DXARY+10~, DXARY+12*, DXARY+13, DXARY+14, DXARY+17, DXARY+22~, DXARY+44*, DXARY+45*, DXARY+46, DXARY+48*
, DXARY+69, DXARY+70, DXARY+71
LEXSD(0 DXARY+49*, DXARY+50
LEXSDE DXARY+22~, DXARY+50*, DXARY+71
LEXSH DXARY+47~
LEXSH( DXARY+48
LEXSH(0 DXARY+49
LEXSH(9999999 DXARY+48
LEXSI DXARY+10~, DXARY+14*, DXARY+15, DXARY+16
LEXSIEN ARY+3~, ARY+5*, ARY+7, ARY+9, ARY+11, ARY+12, ARY+14, DXARY+22~, DXARY+25*, DXARY+29
, DXARY+58, DXARY+61, DXARY+62, DXARY+64
LEXSN DXARY+10~, DXARY+15*, DXARY+16*, DXARY+18
LEXSO ARY+3~, ARY+8*, ARY+10, ARY+12, ARY+15
LEXSY DXARY+22~, DXARY+79*
LEXSY("P" DXARY+80
LEXSY("S" DXARY+85, DXARY+86
LEXT DXARY+30~, DXARY+36*, DXARY+40, DXARY+47~*, DXARY+53~*
LEXTD MSG+1~*, MSG+2*, MSG+3*, MSG+5, MSG+6, MSG+7, MSG+10
LEXTOKAA PTX+1~
LEXTOKAB PTX+1~
LEXTOKAC PTX+1~
LEXTOKI PTX+1~
LEXTOKS PTX+1~
LEXTOKS2 PTX+1~
LEXTOKW PTX+1~
LEXTOLKN PTX+1~
LEXTX REDUCE+9~, REDUCE+11*, REDUCE+18, REDUCE+19
LEXUSE REDUCE+1~, REDUCE+2*, REDUCE+12*, ARY+21
>> LEXVDT DXARY+13, DXARY+44, DXARY+45, DXARY+46, DXARY+51, DXARY+52, DXARY+79, CAT+17, MSG+3, SN+1
, LN+1
MAX CAT+16~, CAT+17*
NAM CAT+18~, CAT+24*, CAT+25
ORD CATS+10~*, CATS+11*, CODES+10~*, CODES+11*
ORG CATS+10~*, CODES+10~*
OUT CAT+16~, CAT+17*, CAT+25*, CAT+26
PAR ISCAT+24~, ISCAT+27*, ISCAT+28, PAR+1~*, PAR+2, PAR+5*, PAR+6
PSN PAR+1~, PAR+2*, PAR+3
STR PAR+3~*, PAR+4, PAR+5
TDT CAT+16~, CAT+17*, CAT+21, CAT+22
X REDUCE~, REDUCE+2, INC~, INC+16, CATS~, CATS+10, CATS+11*, CATS+12, PAR~, PAR+1
, PAR+6*, PAR+7, CODES~, CODES+10, CODES+11*, CODES+12, MSG~, MSG+1, MSG+8, MSG+9*
, MSG+10, MSG+11*, SN~, SN+1, SN+6*, SN+7, LN~, LN+1, LN+6*, LN+7
, SCR~, SCR+2, SCR+3*, SCR+4, PT+1*, TM~, TM+1*, TM+2*, TM+3*, TM+4
Y SCR~, SCR+1*, TM~, TM+1*, TM+2, TM+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All