Routine: AUM31A

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)

Name	Line Occurrences
Function Call: WRITE	Prompt: PULMONARY Line Location: ICD9NEW+3
Function Call: WRITE	Prompt: GI Line Location: ICD9NEW+4
Function Call: WRITE	Prompt: OTHER Line Location: ICD9NEW+5
Function Call: WRITE	Prompt: OTHER Line Location: ICD9NEW+40
Function Call: WRITE	Prompt: INFLAMMATION^Postphlebetic Line Location: ICD9NEW+43
Function Call: WRITE	Prompt: ULCER/INFLAM^Postphlebetic Line Location: ICD9NEW+44
Function Call: WRITE	Prompt: OTHER Line Location: ICD9NEW+45
Function Call: WRITE	Prompt: ULCER^Chronic Line Location: ICD9NEW+47
Function Call: WRITE	Prompt: INFLAM^Chronic Line Location: ICD9NEW+48
Function Call: WRITE	Prompt: ULCER/INFLAM^Chronic Line Location: ICD9NEW+49
Function Call: WRITE	Prompt: OTHER Line Location: ICD9NEW+50
Function Call: WRITE	Prompt: INTRAUTER Line Location: ICD9NEW+54
Function Call: WRITE	Prompt: INTRA Line Location: ICD9NEW+62
Function Call: WRITE	Prompt: ORG^Systemic Line Location: ICD9NEW+104
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