How to get the desired output

[Aayushi_17]

PE	VS	LB	MH	GH
0	1	0	1	0
0	0	1	1	0
0	0	0	0	1
1	1	1	1	1
0	0	0	0	0
0	0	0	0	0

output I want is

VS:MH

LB:MH

GH

PE:VS:LB:MH:GH

values which has 1 to concatenate them.

Thanks in advance 

[PeterClemmensen · Accepted solution]

One way

data have;
input PE VS LB MH GH;
datalines;
0 1 0 1 0 
0 0 1 1 0 
0 0 0 0 1 
1 1 1 1 1 
0 0 0 0 0 
0 0 0 0 0 
;

data want(keep=v);
    length v $ 200;
    array _{*} PE VS LB MH GH;
    set have;
    v='';
    do i=1 to dim(_);
        if _[i]=1 then v=catx(':', v, vname(_[i]));
    end;
    retain v;
run;

Result:

VS:MH
LB:MH
GH
PE:VS:LB:MH:GH