- data out;
- if 0 then set b;
- if (_n_=1) then do;
- declare hash myhash;
- myhash=_new_ hash(dataset:"b");
- rc=myhash.definekey("key");
- rc=myhash.definedata(all:"yes");
- myhash.definedone();
- end;
- set a;
- key=scan(type,1,',');
- rc=myhash.find();
- if rc=0 then types=data;
- mun=count(type,",")+1;
- do i=2 to mun;
- key=scan(type,i,',');
- rc=myhash.find();
- if rc=0 then do;
- types=trim(types)||','||data;
- end;
- end;
- keep id type types;
- run;


雷达卡
京公网安备 11010802022788号







