Use procedure PROC TRANSPOSE for datasets created using proc freq.

Use treatment variable in ID and name of variable in BY and FREQ in VAR statement.

Also,

Create variable AEDECOD by copying values from AEBODSYS.

Output dataset$-$DS$1$