It is not entirely clear to me how you want the report to appear (as far as groupings go).

However, the problem is more with your SQL Statement. I don't think I could explain it properly so just try this statement to see the difference in the report.

VB Code:
  1. strQuery = "SHAPE {SELECT [B]Distinct[/B] AreaField FROM ns_Report_Data} " & _
  2.         "APPEND ( ( Shape{SELECT AreaField, [B]ObjectId[/B]   FROM NS_Report_Data} " & _
  3.         "           Append({Select Radius, POPULATION_CY, POPULATION_PY, StoreNo, Address, State, City, RAC_WHITE, RAC_BLACK, RAC_ASIAN, " & _
  4.         "                     RAC_HISP, HOUSEHOLD_CY, POP_AGE_MED_CY, OWNED, EMPLOYED, VEH_AVG, INCOME, " & _
  5.         "                     POP_GRP_QTR_CY, [B]ObjectId[/B] FROM ns_Report_Data} As Details " & _
  6.         "                  Relate [B]ObjectId To ObjectId[/B])) As PageBreak " & _
  7.         "Relate AreaField To AreaField)"