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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AUM81A

Package: Table Maintenance

Routine: AUM81A


Information

AUM81A ;IHS/ASDST/DMJ,SDR,GTH - ICD 9 E CODES FOR FY 2008 ; [ 09/21/2004 10:27 AM ]

Source Information

Source file <AUM81A.m>

Entry Points

Name Comments DBIA/ICR reference
PRNT ;;
ICD9NEW ;;ICD 9 DIAGNOSIS, NEW CODES: CODE NUMBER(#.01)^DIAGNOSIS(#3)^DESCRIPTION(#10)^USE WITH SEX(#9.5)^MDC(#5)^DRG(#60-65)

Interaction Calls

Name Line Occurrences
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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
P2 PRNT+3~, PRNT+4*
P3 PRNT+3~, PRNT+4*
U PRNT+1*, PRNT+4
X PRNT+3~, PRNT+4*
Y PRNT+3~, PRNT+4*

Marked Items

Name Field # of Occurrence
$T(ICD9NEW+X PRNT+4
Info |  Source |  Entry Points |  Interaction Calls |  Local Variables |  Marked Items |  All