Rick,
According to your blog written before
https://blogs.sas.com/content/iml/2017/05/01/split-data-groups-mean-variance.html
Another method is:

data Units;
input Cholesterol @@;
cards;
0.4 1.0 1.2 1.7 2.6 2.7
;
run;

proc sql;select sum(Cholesterol) as sum from Units;quit;

%let NumGroups =2;
data Treatments;
do Trt = 1 to &NumGroups;
output;
end;
run;

%let Var = Cholesterol;
proc optex data=Treatments seed=97531 coding=orthcan;
class Trt;
model Trt;
blocks design=Units;
model &Var;
output out=Groups;
run;

proc means data=Groups sum mean std;
class Trt;
var &Var;
run;

proc sort data=Groups;by trt &Var;run;
proc print data=Groups noobs;run;