Routine: AUM81A

Information

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

Source file <AUM81A.m>

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)

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

Name	Field # of Occurrence
$T(ICD9NEW+X	PRNT+4