Routine: PXRRFDSD

Information

PXRRFDSD ;ISL/PKR - Go through the encounters attaching a diagnosis and then sort based on the diagnosis. ;06/08/98

Source file <PXRRFDSD.m>

Name	Comments	DBIA/ICR reference
SORT	;
FAC
PRV
PCLASS
LOC
ENC
DIAG
DIAG2
DIAG3	;
DIAG4
SETPR	;Rearrange the information for printing.
NEXTSTO
NEXTIC
STDC
NEXTDC
NXTIC10
NEXTIC10	;
STDC10
NEXTDC10	;
EXIT	;