Here's the SQL:
SELECT DISTINCTROW APWorklistTable.CASE, APWorklistTable.PATIENT, UCase(Left(Left([PATIENT],InStr([PATIENT],',')-1),10)) AS LASTNAME, APWorklistTable.SPECIMEN, APWorklistTable.BLOCK, Max(APWorklistTable.BLOCK_NUM) AS [Max Of BLOCK_NUM], IIf([BLOCK]="A",[CASE],"") AS SHOWCASE...