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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ICDEXC3

Package: DRG Grouper

Routine: ICDEXC3


Information

ICDEXC3 ;SLC/KER - ICD Extractor - Code APIs (cont) ;04/21/2014

Source Information

Source file <ICDEXC3.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 ($$DT,$$FMTE)^XLFDT  $$UP^XLFSTR  
DRG Grouper 1 ($$FILE,$$ROOT)^ICDEX  
VA Fileman 1 ^DIWP  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
DRG Grouper 1 ICDEX  

Entry Points

Name Comments DBIA/ICR reference
VSTP(IEN,CDT) ; Return versioned Short Text (Proc)
VLTP(IEN,CDT) ; Versioned Description - Long Text (Proc)
CC(IEN,CDT) ; Complication/Comorbidity (C/C)
VSTD(IEN,CDT)
PAR(ARY,LEN) ; Parse Array
TRIM(X,Y) ; Trim Character
VLTD(IEN,CDT) ; Versioned Description - Long Text (Dx)
VLT(FILE,IEN,CDT) ; Versioned Long Text
SD(FILE,IEN,CDT,ARY,LEN) ; Short Description (formatted)
;
; Input:
;
; IEN Internal Entry Number (Required)
; FILE File Number (Required)
; CDT Date, Default TODAY (Optional)
; .ARY Array Passed by Reference (Optional)
; LEN Text Length (15-79, default 60) (Optional)
;
; Output:
;
; $$SD Short Description OR -1 ^ Error Message
; ARY Description in segment lengths specified
;
LD(FILE,IEN,CDT,ARY,LEN) ; Long Description (formatted)
;
; Input:
;
; IEN Internal Entry Number (Required)
; FILE File Number (Required)
; CDT Date, Default TODAY (Optional)
; .ARY Array Passed by Reference (Optional)
; LEN Text Length (15-79, default 245) (Optional)
;
; Output:
;
; $$LD Long Description OR -1 ^ Error Message
; ARY Description in lengths specified
;
VST(FILE,IEN,CDT)
IEN(CODE,ROOT,SYS) ; Return IEN based on Code, Root and Coding System

External References

Name Field # of Occurrence
^DIWP PAR+14
$$FILE^ICDEX VST+13, VLT+13, SD+15, LD+15
$$ROOT^ICDEX VST+12, VLT+12, IEN+27
$$DT^XLFDT VSTD+12, VSTP+12, VLTD+13, VLTP+13, SD+16, LD+16, CC+15
$$FMTE^XLFDT SD+19, LD+19, CC+17, CC+19, CC+21
$$UP^XLFSTR IEN+26

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICD0 - [#80.1] VSTP+11, VSTP+12, VSTP+15, VSTP+16, VSTP+17, VLTP+12, VLTP+14, VLTP+18, VLTP+19, VLTP+21
, VLTP+22, VLTP+23
^ICD0("ADS" VLTP+15, VLTP+17
^ICD0("AST" VSTP+13, VSTP+15
^ICD9 - [#80] VSTD+11, VSTD+12, VSTD+15, VSTD+16, VSTD+17, VLTD+12, VLTD+14, VLTD+18, VLTD+19, VLTD+21
, VLTD+22, VLTD+23, CC+16, CC+18, CC+20
^ICD9("ADS" VLTD+15, VLTD+17
^ICD9("AST" VSTD+13, VSTD+15
^UTILITY($J PAR+12!, PAR+15, PAR+16, PAR+17!

Label References

Name Line Occurrences
$$TRIM VSTD+15, VSTD+17, VSTD+18, VSTP+15, VSTP+17, VSTP+18, VLTD+18, VLTD+22, VLTD+23, VLTD+24
, VLTP+18, VLTP+22, VLTP+23, VLTP+24, PAR+16
$$VLTD VLT+14
$$VLTP VLT+15
$$VSTD VST+14
$$VSTP VST+15
PAR SD+23, LD+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PAR+11~
ARY SD~, SD+15!, SD+23, LD~, LD+15!, LD+23, PAR~, PAR+12, PAR+15!
ARY( PAR+14, PAR+16*
ARY(" " SD+24, LD+24
ARY(0 SD+24*, SD+25*, LD+24*, LD+25*
ARY(1 SD+23*, LD+23*
CDT VST~, VST+14, VST+15, VLT~, VLT+14, VLT+15, VSTD~, VSTD+12, VSTP~, VSTP+12
, VLTD~, VLTD+13, VLTP~, VLTP+13, SD~, SD+16*, SD+19, SD+20, LD~, LD+16*
, LD+19, LD+20, CC~, CC+15*, CC+16, CC+17, CC+19, CC+21
CEFF CC+15~, CC+16*, CC+17, CC+18
CIEN CC+15~, CC+18*, CC+19, CC+20
CODE IEN~, IEN+25
CTR PAR+11~, PAR+15*, PAR+16*
DIW PAR+11~
DIWF PAR+11~, PAR+13*
DIWI PAR+11~
DIWL PAR+11~, PAR+13*
DIWR PAR+11~
DIWT PAR+11~
DIWTC PAR+11~
DIWX PAR+11~
DN PAR+11~
EFF SD+15~, SD+18*, SD+20*, SD+21, SD+25, LD+15~, LD+18*, LD+20*, LD+21, LD+25
FILE VST~, VST+12, VLT~, VLT+12, SD~, SD+15*, SD+17, LD~, LD+15*, LD+17
HIS SD+15~, SD+18*, SD+21*, SD+22, LD+15~, LD+18*, LD+21*, LD+22
I PAR+11~
ICD0 VSTD+11~, VSTD+12*, VSTD+18, VSTP+11~, VSTP+12*, VSTP+18, VLTD+11~, VLTD+14*, VLTD+24, VLTP+11~
, VLTP+14*, VLTP+24
ICDC VSTD+11~, VSTD+12*, VSTD+13, VSTD+15, VSTP+11~, VSTP+12*, VSTP+13, VSTP+15, VLTD+11~, VLTD+14*
, VLTD+15, VLTD+17, VLTP+11~, VLTP+14*, VLTP+15, VLTP+17, IEN+24~, IEN+25*, IEN+26, IEN+38
, IEN+40, IEN+42, IEN+43, IEN+44
ICDF VST+12~, VST+13*, VST+14, VST+15, VLT+12~, VLT+13*, VLT+14, VLT+15
ICDFR IEN+24~, IEN+29~*, IEN+31, IEN+32*, IEN+33
ICDFS IEN+24~, IEN+36~*, IEN+37, IEN+38*, IEN+39
ICDI VSTD+11~*, VSTD+12, VSTD+15, VSTD+16, VSTD+17, VSTP+11~*, VSTP+12, VSTP+15, VSTP+16, VSTP+17
, VLTD+11~, VLTD+12*, VLTD+14, VLTD+17, VLTD+18, VLTD+19, VLTD+21, VLTD+22, VLTD+23, VLTP+11~
, VLTP+12*, VLTP+14, VLTP+17, VLTP+18, VLTP+19, VLTP+21, VLTP+22, VLTP+23, IEN+24~, IEN+40*
, IEN+41*, IEN+42*, IEN+43*, IEN+44*, IEN+45
ICDIX IEN+24~, IEN+30~*, IEN+31*, IEN+32
ICDR VST+12~*, VST+13, VLT+12~*, VLT+13, IEN+24~, IEN+27*, IEN+28, IEN+33*, IEN+34, IEN+37
, IEN+38, IEN+40, IEN+41, IEN+42, IEN+43, IEN+44
ICDS IEN+24~, IEN+26*, IEN+35, IEN+39*, IEN+40, IEN+41
ICDT VSTD+11~, VSTD+12*, VSTD+13, VSTP+11~, VSTP+12*, VSTP+13, VLTD+11~, VLTD+13*, VLTD+15, VLTP+11~
, VLTP+13*, VLTP+15
ICDTR IEN+24~, IEN+29~*, IEN+30, IEN+31, IEN+32
ICDTS IEN+24~, IEN+36~*, IEN+37*, IEN+38
ICDU IEN+24~, IEN+26*, IEN+32, IEN+41
IEN VST~, VST+14, VST+15, VLT~, VLT+14, VLT+15, VSTD~, VSTD+11, VSTP~, VSTP+11
, VLTD~, VLTD+12, VLTP~, VLTP+12, SD~, SD+15*, SD+20, SD+21, SD+22, SD+24*
, SD+25*, SD+26, LD~, LD+15*, LD+20, LD+21, LD+22, LD+24*, LD+25*, LD+26
, CC~, CC+16, CC+18, CC+20*, CC+21, CC+22, PAR+11~, PAR+13*, PAR+14*, PAR+15*
, PAR+16
LEN SD~, SD+16*, SD+17*, SD+23, LD~, LD+16*, LD+17*, LD+23, PAR~, PAR+12*
, PAR+13
NOD SD+15~, SD+19*, SD+21, SD+22, SD+23, LD+15~, LD+19*, LD+20, LD+21, LD+22
ROOT SD+15~, SD+17*, SD+18, SD+20, SD+21, SD+22, LD+15~, LD+17*, LD+18, LD+20
, LD+21, LD+22, IEN~, IEN+27
STD VSTD+11~, VSTD+13*, VSTD+14, VSTD+15, VSTD+16*, VSTD+17, VSTP+11~, VSTP+13*, VSTP+14, VSTP+15
, VSTP+16*, VSTP+17, VLTD+11~, VLTD+15*, VLTD+16, VLTD+17, VLTD+19*, VLTD+20, VLTD+21, VLTP+11~
, VLTP+15*, VLTP+16, VLTP+17, VLTP+19*, VLTP+20, VLTP+21
STI VSTD+11~, VSTD+15*, VSTD+17*, VSTP+11~, VSTP+15*, VSTP+17*, VLTD+11~, VLTD+17*, VLTD+18, VLTD+21*
, VLTD+22, VLTP+11~, VLTP+17*, VLTP+18, VLTP+21*, VLTP+22
SYS IEN~, IEN+26
TXT VSTD+11~, VSTD+14, VSTD+15*, VSTD+16, VSTD+17*, VSTP+11~, VSTP+14, VSTP+15*, VSTP+16, VSTP+17*
, VLTD+11~, VLTD+16, VLTD+18*, VLTD+20, VLTD+22*, VLTD+23*, VLTP+11~, VLTP+16, VLTP+18*, VLTP+20
, VLTP+22*, VLTP+23*, SD+15~, SD+18*, SD+22*, SD+23, SD+25, LD+15~, LD+18*, LD+22*
, LD+23, LD+25
U VSTD+12, VSTD+15, VSTD+17, VSTD+18, VSTP+12, VSTP+15, VSTP+17, VSTP+18, VLTD+14, VLTD+18
, VLTD+22, VLTD+24, VLTP+14, VLTP+18, VLTP+22, VLTP+24, CC+20
X PAR+11~, PAR+14*, TRIM~, TRIM+11*, TRIM+12*, TRIM+13*, TRIM+14
Y TRIM~, TRIM+11*, TRIM+12, TRIM+13
Z PAR+11~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All