proc transpose with column names and values as new values

[serrld113]

I have hundreds of columns each with one value:

var1 col1 col2 col3 col4
0 'asfds' 'sdfsg' 'sdfsf' 'sdfsdg'

I want to proc transpose it so that it looks like this:

colname valueincol
col1 'asfds'
col2 'sdfsg'
col3 'sdfsf'
col4 'sdfsdg'

help?

[PeterClemmensen]

data have;
input var1 col1 $ col2 $ col3 $ col4 $;
datalines;
0 asfds sdfsg sdfsf sdfsdg
;

proc transpose data=have out=want(rename=(_name_=colname col1=valueincol) drop=var1);
   by var1;
   var col1-col4;
run;

Result:

colname  valueincol 
col1     asfds 
col2     sdfsg 
col3     sdfsf 
col4     sdfsdg