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

Package: Table Maintenance

Routine: AUM81D


Information

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

Source Information

Source file <AUM81D.m>

Entry Points

Name Comments DBIA/ICR reference
PRNT ;
ICD9PNEW ;;ICD OPERATION/PROCEDURE, NEW PROCEDURE CODES: CODE NUMBER(#.01)^OPERATION/PROCEDURE(#4)^DESCRIPTION(#10)^Use with Sex(#9.5)^MDC(#80.12)-DRG(#80.12,1-6) (multiples are separated by "~"
ICD9OINA ;;ICD 9 DIAGNOSIS, OTHER INACTIVATED CODES: CODE NUMBER(#.01)^DESCRIPTION(#10)^INACTIVE DATE(#102)
ICD9DINA ;;ICD 9 DIAGNOSIS, INACTIVE CODES: CODE NUMBER(#.01)^DESCRIPTION(#10)^INACTIVE DATE(#102)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: GRAFT
  • Line Location: ICD9PNEW+26
Function Call: WRITE
  • Prompt: GRAFT^Vaginal
  • Line Location: ICD9PNEW+27
Function Call: WRITE
  • Prompt: GRAFT^Vaginal
  • Line Location: ICD9PNEW+28
Function Call: WRITE
  • Prompt: GRAFT^Other
  • Line Location: ICD9PNEW+29
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