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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ICD1824A

Package: DRG Grouper

Routine: ICD1824A


Information

ICD1824A ;;ALB/EG/JAT - FY 2007 UPDATE; 6/19/05 4:08pm ; 6/24/05 3:29pm

Source Information

Source file <ICD1824A.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 FILE^DICN  (,UPDATE)^DIE  
DRG Grouper 1 (DRGTITLE,INACTDRG,UPDTDRG)^ICD1824B  
Kernel 1 (BMES,MES)^XPDUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
DRG Grouper 1 ICD1824P  

Entry Points

Name Comments DBIA/ICR reference
REV ;
ADD ;New DRGs
ADDDRG ; add new DRGs
PRO ;-update operation/procedure codes
; from Table 6B in Fed Reg - assumes new codes already added by Lexicon

External References

Name Field # of Occurrence
FILE^DICN ADDDRG+12, ADDDRG+19, ADDDRG+28, ADDDRG+37
^DIE PRO+16
UPDATE^DIE ADDDRG+44, ADDDRG+48, PRO+24, PRO+29, PRO+39
DRGTITLE^ICD1824B ADDDRG+58
INACTDRG^ICD1824B ADDDRG+56
UPDTDRG^ICD1824B ADDDRG+54
BMES^XPDUTL ADDDRG+2, PRO+2
MES^XPDUTL ADDDRG+51

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: CC
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: CC
  • Line Location: ADD+8
Function Call: WRITE
  • Prompt: MAJOR
  • Line Location: ADD+8
Function Call: WRITE
  • Prompt: CC
  • Line Location: ADD+9
Function Call: WRITE
  • Prompt: MAJOR
  • Line Location: ADD+9
Function Call: WRITE
  • Prompt: CC
  • Line Location: ADD+10
Function Call: WRITE
  • Prompt: MAJOR
  • Line Location: ADD+10
Function Call: WRITE
  • Prompt: CC
  • Line Location: ADD+11
Function Call: WRITE
  • Prompt: MAJOR
  • Line Location: ADD+11
Function Call: WRITE
  • Prompt: MV96+
  • Line Location: ADD+16
Function Call: WRITE
  • Prompt: OR
  • Line Location: ADD+19
Function Call: WRITE
  • Prompt: OR
  • Line Location: ADD+20
Routine Call
  • DIE
  • Line Location:
    • ADDDRG+44
    • ADDDRG+48
    • PRO+24
    • PRO+29
    • PRO+39
Routine Call
  • DIE
  • Line Location:
    • PRO+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD0 - [#80.1] Classic Fileman Calls
^ICD - [#80.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICD - [#80.2] ADDDRG+11
^ICD0 - [#80.1] PRO+9, PRO+18
^ICD0("BA" PRO+6, PRO+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA ADDDRG+1~, ADDDRG+13!, ADDDRG+21!, ADDDRG+30!, ADDDRG+39!, PRO+3~, PRO+10*
DA(1 ADDDRG+15*, ADDDRG+16, ADDDRG+22*, ADDDRG+23, ADDDRG+31*, ADDDRG+32
DATA PRO+3~, PRO+20*, PRO+25*, PRO+28, PRO+32, PRO+33, PRO+34, PRO+35, PRO+36, PRO+37
, PRO+38
DIC ADDDRG+1~, ADDDRG+5*, ADDDRG+13!, ADDDRG+16*, ADDDRG+21!, ADDDRG+23*, ADDDRG+30!, ADDDRG+32*, ADDDRG+39!
DIC("DR" ADDDRG+8*, ADDDRG+26*, ADDDRG+35*
DIC(0 ADDDRG+5*, ADDDRG+17*, ADDDRG+24*, ADDDRG+33*
DIE PRO+3~, PRO+10*
DINUM ADDDRG+1~
DO ADDDRG+12!, ADDDRG+19!, ADDDRG+28!, ADDDRG+37!
DR PRO+3~, PRO+14*
DRGX ADDDRG+1~, ADDDRG+50*, ADDDRG+51
DRGY ADDDRG+1~, ADDDRG+50*, ADDDRG+51
ENTRY PRO+3~, PRO+6*, PRO+7, PRO+9*, PRO+10, PRO+18, PRO+22, PRO+26, PRO+30
FDA ADDDRG+40~, PRO+3~
FDA(1820 ADDDRG+42*, ADDDRG+43*, ADDDRG+44!, ADDDRG+45*, ADDDRG+46*, ADDDRG+47*, PRO+22*, PRO+23*, PRO+24!, PRO+26*
, PRO+27*, PRO+28*, PRO+29!, PRO+30*, PRO+31*, PRO+32*, PRO+33*, PRO+34*, PRO+35*, PRO+36*
, PRO+37*, PRO+38*, PRO+39!
ICDDRG ADDDRG+1~, ADDDRG+4*, ADDDRG+6, ADDDRG+7, ADDDRG+9, ADDDRG+11, ADDDRG+15, ADDDRG+18, ADDDRG+22, ADDDRG+31
, ADDDRG+41, ADDDRG+47, ADDDRG+50
ICDIEN ADDDRG+1~, ADDDRG+41*, ADDDRG+42, ADDDRG+45
ICDPROC PRO+3~, PRO+4*, PRO+5, PRO+6, PRO+9, PRO+12, PRO+13
IDENT PRO+3~, PRO+12*, PRO+15
LINE ADDDRG+1~, ADDDRG+4*, PRO+3~, PRO+4*
MDC ADDDRG+1~, ADDDRG+6*
MDC24 PRO+3~, PRO+13*, PRO+15
ROUTINE ADDDRG+1~, ADDDRG+34*
SUBLINE PRO+3~, PRO+20*, PRO+21
SURG ADDDRG+1~, ADDDRG+7*, ADDDRG+25*
U ADDDRG+6, ADDDRG+7, ADDDRG+9, ADDDRG+11, ADDDRG+15, ADDDRG+18, ADDDRG+22, ADDDRG+31, ADDDRG+41, ADDDRG+47
, ADDDRG+50, PRO+6, PRO+9, PRO+12, PRO+13, PRO+28, PRO+32, PRO+33, PRO+34, PRO+35
, PRO+36, PRO+37, PRO+38
X ADDDRG+1~, ADDDRG+4*, ADDDRG+9*, ADDDRG+18*, ADDDRG+27*, ADDDRG+36*, PRO+3~, PRO+4*, PRO+20*
Y ADDDRG+1~

Marked Items

Name Field # of Occurrence
$T(ADD+LINE ADDDRG+4
$T(REV+LINE PRO+4
$T(REV+LINE+SUBLINE PRO+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All