Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ICD1810A

Package: DRG Grouper

Routine: ICD1810A


Information

ICD1810A ;ALB/MRY - ICD/DRG; 9/4/03 2:43pm

Source Information

Source file <ICD1810A.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;- Post-Install entry point
DRGEDIT ;- Edit DRG records (Description change)
; Invalid DRGs in FY 04:
; DRG4: SPINAL PROCEDURES
; DRG5: EXTRACRANIAL VASCULAR PROCEDURES
; DRG231: LOCAL EXCISION & REMOVAL OF INT FIX DEVICES EXCEPT HIP & FEMUR
; DRG400: LYMPHOMA & LEUKEMIA W MAJOR O.R. PROCEDURE
; DRG514: CARDIAC DEFIBRILLATOR IMPLANT W/CARDIAC CATH
ERRMSG(VAR,IN) ;- Display error msg if DRG not found
BEGWT01 ;- Entry point for wts & trims update for 2004
UPD01 ;- Load FY 2004 into ICD DRG file (#80.2)
FY ;- Set FY multiple with FYR stats
SETVAR ;- Set variables
DRG
MORE ;- Set zero node with FY 2004 stats
REVDRG ;- Description edits

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: MAJOR
  • Line Location: DRGEDIT+5
Function Call: WRITE
  • Prompt: ACUTE
  • Line Location: REVDRG+1
Function Call: WRITE
  • Prompt: USE
  • Line Location: REVDRG+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD - [#80.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call