Probably this is a better choice.
data t1(rename=(col1-col3=myname1-myname3)); retain col1-col4 0; run;
proc contents;run;