Routine: AUM41A

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: CRIS^SICKLE-CELL Line Location: ICD9NEW+12
Function Call: WRITE	Prompt: CRISIS^SICKLE-CELL/HB-C Line Location: ICD9NEW+14
Function Call: WRITE	Prompt: ACUTE Line Location: ICD9NEW+27
Function Call: WRITE	Prompt: BLEEDING^ULCER Line Location: ICD9NEW+35
Function Call: WRITE	Prompt: URIN^HYPERTROPHY Line Location: ICD9NEW+38
Function Call: WRITE	Prompt: OBSTRUCT^NODULAR Line Location: ICD9NEW+40
Function Call: WRITE	Prompt: OR Line Location: ICD9NEW+47
Function Call: WRITE	Prompt: ANTEPA^PERIPARTUM Line Location: ICD9NEW+47
Function Call: WRITE	Prompt: POSTPARTUM^PERIPARTUM Line Location: ICD9NEW+48
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