Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ICDHLPD

Package: DRG Grouper

Routine: ICDHLPD


Information

ICDHLPD ;ALB/GRR/EG - HELP DISPLAY DIAGNOSIS IDENTIFIERS ; 9/22/04 9:41am

Source Information

Source file <ICDHLPD.m>

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
DRG Grouper 2 ^ICD0  ^ICD9  

Entry Points

Name Comments DBIA/ICR reference
MAJ ;display major or procedure identifier
EN ;routine revised 12/94
DXCODE ;DIAGNOSIS CODES
DNCODE ; NUMERIC/OTHER ID CODES

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: ?(J#3*27)
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: ICDID(I)
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !,"1=Bowel",?20,"2=Chest",?50,"3=Lymphoma/Leukemia"
  • Line Location: MAJ+1
Function Call: WRITE
  • Prompt: !,"4=Joint",?20,"5=Pancreas/Liver",?50,"6=Pelvic"
  • Line Location: MAJ+2
Function Call: WRITE
  • Prompt: !,"7=Shoulder/Elbow",?20,"8=Thumb/Joint",?50,"9=Head/Neck"
  • Line Location: MAJ+3
Function Call: WRITE
  • Prompt: !,"A=Cardio",?20,"M=Musculoskeletal",?50,"B=Spine"
  • Line Location: MAJ+4
Function Call: WRITE
  • Prompt: MV
  • Line Location: DNCODE+7
Function Call: WRITE
  • Prompt: MAJ
  • Line Location: DNCODE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
I EN+1~, EN+2*, EN+4*, EN+7, EN+9*, EN+10
ICDID EN+1~, EN+2*, EN+3, EN+8!, EN+9*, EN+11
ICDID( EN+3*, EN+4, EN+7
ID EN+1~
J EN+1~, EN+4*, EN+5, EN+6

Marked Items

Name Field # of Occurrence
$T(DNCODE+I EN+9
$T(DXCODE+I EN+2
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Local Variables |  Marked Items |  All