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 |  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: AUM61E

Package: Table Maintenance

Routine: AUM61E


Information

AUM61E ;IHS/ASDST/DMJ,SDR,GTH - ICD 9 CODES FOR FY 2005 ; [ 08/18/2003 4:01 PM ]

Source Information

Source file <AUM61E.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Utilities 1 ($$IXDIC,DIE)^AUM61  
VA Fileman 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
DRGS ;EP
ICD9REV2 ;
ICD9PINA ;;ICD 9 PROCEDURE, INACTIVE CODES: CODE NUMBER(#.01)^DESCRIPTION(#10)^INACTIVE DATE(#102)
PRNT ;
ICD9VNEW ;;ICD 9 DIAGNOSIS, NEW V-CODES: CODE NUMBER(#.01)^DIAGNOSIS(#3)^DESCRIPTION(#10)^USE ONLY WITH SEX(#9.5)^MDC(#5)^DRG(#60-65)
DRG ;;DRG^MDC^SURGERY?^DRG TITLE

External References

Name Field # of Occurrence
$$IXDIC^AUM61 DRGS+3
DIE^AUM61 DRGS+11
^DIC DRGS+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: MAJOR
  • Line Location: DRG+2
Function Call: WRITE
  • Prompt: !," CODE",?10,"DIAGNOSIS",!?10,"DESCRIPTION",!," -----",?10,"-----------"
  • Line Location: PRNT+2
Function Call: WRITE
  • Prompt: !," ",$P(Y,U,1),?10,$S($L(P3):P3,1:P2),!?10,P2
  • Line Location: PRNT+4
Routine Call
  • DIC
  • Line Location:
    • DRGS+18

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(80.2 DRGS+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AUMDA DRGS+1~, DRGS+10*, DRGS+12
AUMI DRGS+1~, DRGS+2*
AUMLN DRGS+1~, DRGS+2*, DRGS+3, DRGS+6, DRGS+7, DRGS+8, DRGS+17
DA DRGS+1~, DRGS+5*, DRGS+10
DA(1 DRGS+12*, DRGS+16
>> DIC DRGS+16*
>> DIC("DR" DRGS+17*
>> DIC("P" DRGS+15*
>> DIC(0 DRGS+13*
DIE DRGS+1~, DRGS+9*
DR DRGS+1~, DRGS+6*, DRGS+7*, DRGS+8*
P2 PRNT+3~, PRNT+4*
P3 PRNT+3~, PRNT+4*
U DRGS+3, DRGS+6, DRGS+7, DRGS+8, DRGS+17, PRNT+1*, PRNT+4
X DRGS+14*, PRNT+3~, PRNT+4*
Y DRGS+3*, DRGS+4, DRGS+5, PRNT+3~, PRNT+4*

Marked Items

Name Field # of Occurrence
$T(DRG+AUMI DRGS+2
$T(ICD9NEW+X PRNT+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All