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: ICDEXLK3

Package: DRG Grouper

Routine: ICDEXLK3


Information

ICDEXLK3 ;SLC/KER - ICD Extractor - Lookup, Search ;04/21/2014

Source Information

Source file <ICDEXLK3.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
DRG Grouper 5 ($$DTBR,$$FILE,$$ROOT,$$SYS)^ICDEX  $$LS^ICDEXLK3  TXT^ICDEXLK4  ($$EXM,FND,SEL)^ICDEXLK5  (PAR,TOKEN)^ICDTOKN  
Kernel 2 $$DT^XLFDT  $$UP^XLFSTR  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
DRG Grouper 5 ICDEX  ICDEXLK  ICDEXLK3  ICDEXLK4  ICDEXLK5  

Entry Points

Name Comments DBIA/ICR reference
LK(TXT,ROOT,CDT,SYS,VER,OUT) ; Lookup - Versioned
CD(TXT,ROOT,CDT,SYS,VER,OUT) ; Lookup Code - Versioned
SS ; Show Select/Find Global Arrays
TOK(X) ; Parse Text into Tokens
ISORD(X) ; Check if in $ORDER
SH ; Show TMP
TOKEN(X,ROOT,SYS,ARY) ; Parse Text into Tokens
ISCODE(X,ROOT) ; Check if Text is a Code
WORD(X,ROOT,SYS) ; Word is contained in a Set
CODE ; Lookup by Code (Requires TXT and ROOT)
UNQ(X,ROOT) ; Check if Text is a Unique Code
LK2() ; Lookup - Part 2
TM(X,Y) ; Trim Y
LD(ROOT,IEN,VDT,VER) ; Last Description
CDT(X,Y) ; ICD-10 Code Set Date
LS(ROOT,IEN,VDT) ; Last Status
SYS(ROOT,CDT) ; System from File and Date

External References

Name Field # of Occurrence
$$DTBR^ICDEX LK2+7
$$FILE^ICDEX LK2+3
$$ROOT^ICDEX LK2+2, WORD+38, WORD+40
$$SYS^ICDEX LK2+5, WORD+38
$$LS^ICDEXLK3 CODE+27
TXT^ICDEXLK4 LK2+26
$$EXM^ICDEXLK5 LK2+13
FND^ICDEXLK5 LK2+15, CODE+13, CODE+24
SEL^ICDEXLK5 LK2+21, CODE+25
PAR^ICDTOKN TOK+1
TOKEN^ICDTOKN TOKEN+1
$$DT^XLFDT CDT+1
$$UP^XLFSTR CODE+15, LD+7, ISCODE+11

Interaction Calls

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICDS - [#80.4] LK2+7, WORD+41, WORD+44, WORD+46, WORD+50, ISCODE+5, ISCODE+13, SYS+5
^ICDS("F" SYS+4
^TMP( LK2+4!, LK2+10, LK2+17, LK2+18, LK2+19!, LK2+20*, LK2+21, LK2+24, LK2+27, CODE+4
, CODE+14, CODE+15, SH+1

Label References

Name Line Occurrences
$$CDT LK2+4, CODE+3, LS+1, LD+1
$$ISCODE LK2+23, CODE+2
$$ISORD CODE+7, CODE+18
$$LK2 LK+69, CD+2
$$LS CODE+10, CODE+21
$$SYS LK2+6
$$TM CD+1, LK2+2
CODE LK2+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARY TOKEN~, TOKEN+1
CDT LK~, CD~, LK2+4*, LK2+6, LK2+7*, LK2+13, LK2+15, CODE+3*, CODE+10, CODE+13
, CODE+21, CODE+24, CODE+27, LS+1~, LS+2*, LS+3, LD+1~, LD+2*, LD+3, CDT+1~*
, SYS~, SYS+3
>> CNT CODE+12*, CODE+23*
CTL SYS+1~, SYS+3*, SYS+6
>> DIC(0 LK2+16, LK2+21, CODE+1, CODE+8, CODE+12, CODE+19, CODE+23
EFF LS+1~, LS+3*, LS+4, LS+6*, LS+7, LD+1~, LD+3*, LD+4, LD+5*, LD+6
ENT LK2+17~*, LK2+18, LK2+19
EROOT CODE+3~, CODE+6*, CODE+7, CODE+9, CODE+17*, CODE+18, CODE+20
FDT SYS+1~, SYS+5*, SYS+6*
FI WORD+40~*
FILE LK2+1~, LK2+3*, SYS+1~, SYS+2*, SYS+4
HIS LS+1~, LS+4*, LS+5
ICDBYCD CD+1~*
ICDI LK2+13~, LK2+14*, LK2+15
IEN LK2+1~, LK2+15~*, LK2+17~, LK2+18*, LK2+19, LK2+20, CODE+8*, CODE+9*, CODE+10, CODE+13
, CODE+19*, CODE+20*, CODE+21, CODE+24, CODE+27, LS~, LS+1*, LS+2, LS+3, LS+4
, LS+5, LD~, LD+1*, LD+2, LD+3, LD+5, LD+6, LD+7, UNQ+24~, UNQ+27*
, UNQ+28, UNQ+29*, UNQ+35, UNQ+36, UNQ+38, SYS+1~, SYS+4*, SYS+5, SYS+6
IENS UNQ+24~
IENS( UNQ+33*, UNQ+34
INP1 LK2+1~, LK2+9*
INP2 LK2+1~, LK2+9*
KEY LK2+1~, CODE+3~, CODE+4*, CODE+5, CODE+8, CODE+12, CODE+15*, CODE+16, CODE+19, CODE+23
, ISCODE+1~, ISCODE+2*, ISCODE+3, ISCODE+9, ISCODE+10, ISCODE+11*, ISCODE+12, ISCODE+17, ISCODE+18, UNQ+24~
, UNQ+25*, UNQ+26, UNQ+29, UNQ+31, UNQ+33, ISORD+1, ISORD+2
LAS ISCODE+1~, UNQ+24~
LDI LD+1~, LD+6*, LD+7
LDS LD+1~, LD+7*, LD+8
LOR LK2+1~, LK2+13~*, LK2+15, LK2+21
NC SS+1~*, SS+2, SS+4*, SS+5, SH+1~, SH+2*, SH+3
NDT SYS+1~*, SYS+6
NIEN UNQ+24~, UNQ+30*, UNQ+32*, UNQ+33, UNQ+34*
NN SS+1~*, SS+2*, SS+3, SS+4*, SS+5*, SS+6, SH+1~, SH+2*, SH+3*
NUM LK2+1~
NXT LK2+1~, UNQ+24~, UNQ+27*, UNQ+28, UNQ+30*, UNQ+34*, UNQ+36, UNQ+38
OK LK2+1~
ORD LK2+1~, CODE+3~, CODE+5*, CODE+7*, CODE+8, CODE+9, CODE+12, CODE+16*, CODE+18*, CODE+19
, CODE+20, CODE+23, ISCODE+1~, ISCODE+6~*, ISCODE+7, ISCODE+14~*, ISCODE+15, UNQ+24~, UNQ+29~*, UNQ+31*
, UNQ+32, UNQ+33, ISORD+1, ISORD+2
ORG ISCODE+1~, ISCODE+3*, ISCODE+6, ISCODE+12*, ISCODE+14, UNQ+24~, UNQ+26*, UNQ+29
OUT LK~, CD~, LK2+8*, LK2+15, CODE+13, CODE+24, ISCODE+1~, ISCODE+4*, ISCODE+5, ISCODE+9*
, ISCODE+10*, ISCODE+13, ISCODE+17*, ISCODE+18*, ISCODE+19, UNQ+24~, UNQ+27*, UNQ+28, UNQ+35*, UNQ+36*
, UNQ+37*, UNQ+38*, UNQ+39
PARS LK2+1~, TOK+1!
PR LK2+1~
PRV CODE+3~, CODE+4*, CODE+15*
RES ISCODE+6~, ISCODE+7*, ISCODE+8*, ISCODE+9, ISCODE+10, ISCODE+14~, ISCODE+15*, ISCODE+16*, ISCODE+17, ISCODE+18
ROOT LK~, CD~, LK2+2*, LK2+3, LK2+4, LK2+6, LK2+13, LK2+15, LK2+21, LK2+23
, CODE+1, CODE+2, CODE+6, CODE+10, CODE+13, CODE+17, CODE+21, CODE+24, CODE+25, CODE+27
, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+39, WORD+47, WORD+48, WORD+49, WORD+51, LS~
, LS+1*, LS+2, LS+3, LS+4, LS+5, LD~, LD+1*, LD+2, LD+3, LD+5
, LD+6, LD+7, ISCODE~, ISCODE+7, ISCODE+15, UNQ~, UNQ+28, UNQ+29, UNQ+31, UNQ+32
, SYS~, SYS+2
SEQ LK2+1~
SI ISCODE+1~, ISCODE+4*, ISCODE+5*, ISCODE+7, ISCODE+9, ISCODE+10, ISCODE+13*, ISCODE+15, ISCODE+17, ISCODE+18
, UNQ+24~, UNQ+27*, UNQ+28*, UNQ+29, UNQ+31, UNQ+32, UNQ+37*
STA CODE+10~*, CODE+11, CODE+21~*, CODE+22, CODE+27*, CODE+28, LS+1~, LS+5*, LS+6*, LS+7
SUB LK2+1~, LK2+4*, LK2+10, LK2+17, LK2+18, LK2+19, LK2+20, LK2+21, LK2+24, LK2+27
, CODE+4, CODE+14, CODE+15, SH+1~*, SH+2
SYS LK~, CD~, LK2+5*, LK2+6*, LK2+7, LK2+13, LK2+15, CODE+6, CODE+13, CODE+17
, CODE+24, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+41, WORD+42~*, WORD+43, WORD+44, WORD+45
, WORD+46, WORD+47~*, WORD+48, WORD+50, WORD+51, ISCODE+1~, UNQ+24~, CDT+1~*, SYS+1~*, SYS+6*
, SYS+7
TDT LK2+1~
TKN WORD+38~*, WORD+43, WORD+45, WORD+48, WORD+51
TRT WORD+40~*, WORD+42, WORD+43, WORD+45
TXT LK~, CD~, CD+1*, LK2+2*, LK2+9, LK2+12, LK2+13, LK2+17~, LK2+18*, LK2+20
, LK2+23, CODE+1, CODE+2, CODE+4, CODE+15
VCC LK2+1~
VCD LK2+1~
VDS LK2+1~
VDT LS~, LS+1*, LS+2, LD~, LD+1*, LD+2
VER LK~, CD~, LK2+5*, LK2+6, LK2+7, LK2+13, LK2+15, CODE+10, CODE+11, CODE+13
, CODE+21, CODE+22, CODE+24, CODE+27, CODE+28, LD~, LD+4, LD+5
VII LK2+1~
VNM LK2+1~
VSD LK2+1~
VST LK2+1~
X LK2+13!*, TOK~, TOK+1, TOKEN~, TOKEN+1, WORD~, WORD+38*, WORD+39, WORD+43*, WORD+45*
, WORD+46, WORD+48*, WORD+51*, WORD+52, LS+7*, LS+8, LD+8*, LD+9, ISCODE~, ISCODE+2
, ISCODE+11, UNQ~, UNQ+24, UNQ+25, UNQ+39*, UNQ+40, ISORD~, CDT~, CDT+1, CDT+2
, TM~, TM+2*, TM+3*, TM+4
Y LK2+1~, LK2+13!, CDT~, CDT+1, TM~, TM+1*, TM+2, TM+3
Y( LK2+14, LK2+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All