SAS: 2 level Combination

data abc;
input name $10.;
datalines;
Srikanth
Sarbadal
Boyina
Pal
Debajit
Ghosh
;
run;
proc sql noprint;select name into :var separated by " " from abc;
proc transpose data=abc out=result;var name;run;

data comb;
keep var1 var2;
array a(6) $ col1-col6;
set result;
do i=1 to 6;
do j=i+1 to 6;
var1=a(i);
var2=a(j);output;
end;
end;
run;