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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ICDEXD5

Package: DRG Grouper

Routine: ICDEXD5


Information

ICDEXD5 ;SLC/KER - ICD Extractor - DRG APIs (cont) ;04/21/2014

Source Information

Source file <ICDEXD5.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
DRG Grouper 1 ($$DRGN,$$DTBR,$$EFM,$$FY,$$MSG,PAR)^ICDEX  
Kernel 1 ($$DT,$$NOW)^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
DRG Grouper 1 ICDEX  

Entry Points

Name Comments DBIA/ICR reference
DRGC(IEN) ; DRG Code
DRGQ ; DRG Quit on Error
DRGN(CODE) ; Return the IEN of DRG
DRGW(IEN) ; DRG Weighted Work Unit (WWU)
SPIN(X) ; Paired Spinal Fusion Codes (EN1^ICDDRG8)
DRGD(CODE,OUTARR,CDT) ; returns CPT description in array
DRG(CODE,CDT)
DRGDQ ; DRG Description Quit
CARD(X) ; Implants/Insertion Cardio Device (EN1^ICDDRG5)
DRGDES(IEN,CDT,ARY,LEN) ; Returns DRG Description in Array
TM(X) ; Trim Spaces
VLTDR(IEN,CDT,ARY) ; Versioned Description - Long Text
GETDATE(IEN) ; Calculate Effective Date from the PTF
;

External References

Name Field # of Occurrence
$$DRGN^ICDEX DRG+47, DRGDES+18, DRGD+37
$$DTBR^ICDEX DRG+44, DRGDES+20, DRGD+39
$$EFM^ICDEX DRG+51
$$FY^ICDEX DRG+51
$$MSG^ICDEX DRGD+42
PAR^ICDEX DRGDES+26
$$DT^XLFDT DRGDES+20, DRGD+39, VLTDR+14
$$NOW^XLFDT GETDATE+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(45.86 - [#45.86] GETDATE+23
^DGPT - [#45] GETDATE+21, GETDATE+22, GETDATE+24, GETDATE+25, GETDATE+26
^ICD - [#80.2] DRG+48, DRG+49, DRG+52, DRG+54, DRG+60, DRG+61, DRGDES+19, DRGDES+21, DRGDES+22, DRGDES+23
, DRGDES+24, DRGD+38, VLTDR+13, VLTDR+15, VLTDR+19, VLTDR+20, VLTDR+21, VLTDR+22, VLTDR+23, VLTDR+24
, VLTDR+25, VLTDR+26, DRGC+12, DRGC+13, DRGW+12, DRGW+13
^ICD("ADS" VLTDR+16, VLTDR+18
^ICD("B" DRGN+15
^TMP("DRGD" DRGD+36!

Label References

Name Line Occurrences
$$TM DRGDES+24, DRGD+41
DRGDQ DRGDES+19, DRGD+31, DRGD+38
DRGQ DRG+45, DRG+48
VLTDR DRGD+40

Naked Globals

Name Field # of Occurrence
^( DRG+52

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR DRGD+30~, DRGD+41*, DRGD+42*
ARY DRGDES~, DRGDES+17!, DRGDES+26, VLTDR~, VLTDR+25!
ARY( DRGDES+25*, VLTDR+20*, VLTDR+24*, VLTDR+26*
ARY(" " DRGDES+25, DRGDES+27
ARY(0 DRGDES+25*, DRGDES+26, DRGDES+27*, DRGDES+28, VLTDR+17, VLTDR+20*, VLTDR+21, VLTDR+24*, VLTDR+26*
CDT DRG~, DRG+44*, DRG+46*, DRG+51, DRG+54, DRG+60, DRGDES~, DRGDES+20, DRGD~, DRGD+39*
, DRGD+40, DRGD+42, VLTDR~, VLTDR+14
COD DRGN+15~*, DRGN+16
CODE DRG~, DRG+45, DRG+47*, DRG+48, DRG+49, DRG+52, DRG+54, DRG+60, DRG+61, DRG+63
, DRGD~, DRGD+31, DRGD+37*, DRGD+43, DRGN~, DRGN+14, DRGN+15
CTV DRGD+30~, DRGD+40
CTV( DRGD+40, DRGD+41
D0 DRG+43~, DRG+49*, DRG+53, DRG+57, DRG+62, DRG+63
D1 DRG+43~, DRG+54*
DCS DRG+43~, DRG+54*, DRG+63
DCSINF DRG+43~, DRG+54*, DRG+57*, DRG+62, DRG+63
DFY DRG+43~, DRG+52*
DFYINF DRG+43~, DRG+52*, DRG+53*, DRG+62, DRG+63
DMC1 DRG+43~, DRG+60*, DRG+61*, DRG+63
DT DRG+44
END DRGD+30~, DRGD+35*
FYDT DRG+43~, DRG+51*, DRG+52
FYMD DRG+43~
I DRGD+30~, DRGD+37*, DRGD+40*, DRGD+41
ICD0 VLTDR+12~, VLTDR+15*
ICDA SPIN+1~*, SPIN+2*, SPIN+4
ICDB SPIN+1~*, SPIN+3*, SPIN+4
ICDC DRGDES+24~, DRGDES+25*, VLTDR+12~, VLTDR+15*, VLTDR+16, VLTDR+18
ICDD DRGDES+16~, DRGDES+20*, DRGDES+21, VLTDR+12~, VLTDR+19*, VLTDR+20, VLTDR+23*, VLTDR+24, VLTDR+25*, VLTDR+26
ICDE GETDATE+20~, GETDATE+22, GETDATE+23*, GETDATE+24*, GETDATE+25*, GETDATE+26*, GETDATE+27*, GETDATE+28, VLTDR+12~
ICDED DRGDES+16~, DRGDES+21*, DRGDES+22
ICDFY DRG+43~, DRG+60*, DRG+61
ICDI DRGDES+16~, DRGDES+18*, DRGDES+24, GETDATE+20~, GETDATE+21*, GETDATE+22, GETDATE+24, GETDATE+25, GETDATE+26, VLTDR+12~
, VLTDR+13*, VLTDR+15, VLTDR+18, VLTDR+19, VLTDR+20, VLTDR+21, VLTDR+22, VLTDR+23, VLTDR+24, VLTDR+25
, VLTDR+26
ICDID DRGDES+16~, DRGDES+22*, DRGDES+23, DRGDES+24
ICDIMP DRG+43~
ICDL DRGDES+16~, DRGDES+17*, DRGDES+26
ICDN DRGDES+16~, DRGDES+23*, DRGDES+24
>> ICDOP( CARD+3, CARD+7, CARD+9, CARD+11, CARD+12, SPIN+2, SPIN+3
>> ICDOP(" 00.50 " , CARD+1
>> ICDOP(" 00.52 " , CARD+1
>> ICDOP(" 00.53 " , CARD+1, CARD+10
>> ICDOP(" 37.70 " , CARD+2
>> ICDOP(" 37.71 " , CARD+2
>> ICDOP(" 37.72 " , CARD+4
>> ICDOP(" 37.73 " , CARD+2
>> ICDOP(" 37.74 " , CARD+6
>> ICDOP(" 37.76 " , CARD+8
>> ICDOP(" 37.80 " , CARD+5
>> ICDOP(" 37.83 " , CARD+5
ICDP GETDATE+20~, GETDATE+22*, GETDATE+23
ICDSTD VLTDR+12~, VLTDR+16*, VLTDR+17, VLTDR+18, VLTDR+21*, VLTDR+22
ICDSTI VLTDR+12~, VLTDR+18*, VLTDR+19, VLTDR+20, VLTDR+22*, VLTDR+23, VLTDR+24
ICDT DRGDES+16~, DRGDES+24*, DRGDES+25, GETDATE+20~*, GETDATE+21, GETDATE+27, VLTDR+12~, VLTDR+19*, VLTDR+20*, VLTDR+23*
, VLTDR+24*, VLTDR+25*, VLTDR+26*
ICDTXT VLTDR+12~
ICDVDT VLTDR+12~, VLTDR+14*, VLTDR+16
IEN DRGDES~, DRGDES+18, DRGDES+19, DRGDES+21, DRGDES+22, DRGDES+23, DRGD+30~, DRGD+37*, DRGD+38, DRGD+40
, GETDATE~, GETDATE+21, VLTDR~, VLTDR+13, DRGC~, DRGC+12*, DRGC+13, DRGW~, DRGW+12*, DRGW+13
LEN DRGDES~, DRGDES+17
N DRGDES+16~, DRGDES+19*, DRGD+30~, DRGD+31*, DRGD+37*, DRGD+38*, DRGD+40*, DRGD+41*, DRGD+42*, DRGD+43*
, DRGDQ+1
OUTARR DRGD~, DRGD+32*, DRGD+33*, DRGD+34*, DRGD+35*, DRGD+36, DRGD+41, DRGD+42
SO CARD+1~, CARD+3~*, CARD+7~*, CARD+9~*, CARD+11~*, CARD+12~*, SPIN+2*, SPIN+3*
SP SPIN+1~
STR DRG+43~, DRG+45*, DRG+48*, DRG+62*, DRG+63*, DRGQ+1
U DRG+53, DRG+57, DRG+61, DRG+62, DRG+63, GETDATE+22, GETDATE+23, GETDATE+24, GETDATE+25, GETDATE+26
X TM~, TM+1*, TM+2*, TM+3*, TM+4, CARD~, CARD+1*, CARD+2, CARD+3*, CARD+4
, CARD+5*, CARD+6, CARD+7*, CARD+8, CARD+9*, CARD+11*, CARD+12*, CARD+13, SPIN~, SPIN+1*
, SPIN+4*, SPIN+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All