data test;
input id:$8. product1:$8. product2:$8. product3:$8.;
cards;
id1 1 1 1
id2 0 1 1
id3 1 0 0
;
run;

option symbolgen;
%macro test_1;
data test;
set test;
%do i=1 %to 3;
if product&i.="1" then product&i.="产品&i.";
%end;
run;
%mend;
%test_1;

proc transpose data=test out=test_1(drop=_name_) prefix=product_;
var product1-product3;
by id;
run;

data test_1;set test_1;if product_1='0' then delete;run;

十分感谢你，最近看到sas有一个例子，问题已经顺利解决，这个例子是这样的，贴出来大家一起学习

十分感谢你，最近看到sas有一个例子，问题已经顺利解决，这个例子是这样的，贴出来大家一起学习
EM Help中有个例子，可以用的，根据这个例子调整下自己的数据吧
注意项目
/*
CUSTOMER:  ID role
PRODUCT:  target role
TIME:  rejected role.
In the Data Source Wizard — Data Source Attributes window, change the data source role from Raw to Transaction.
*/

libname assocs "e:\temp";
DATA assocs.test2;
     input customer time item1 item2 item3 item4;
     datalines;
     1 1 herring corned_b olives .
     1 2 ham turkey bourbon ice_cream
     2 1 baquette soda . .
     2 2 herring cracker heineken olives
     2 3 corned_b . . .
     3 1 avocado cracker artichok heineken
     3 2 ham turkey sardines .
     ;
run;
PROC TRANSPOSE
   data=assocs.test2
   out=assocs.seq2(rename=(col1=product)
   drop=_name_
   where=(product is not missing));
   var item1-item4;
   by customer time;
run;