libname save 'sasdata';
data temp;
    infile 'data.diabetes';
    input id laser trt_eye age_dx adult  z1 z2 z3 z4 z5 z6;

data save.diabetes;
    set temp;
    drop z1 z2 z3 z4 z5 z6;

    time=z3; status=z2; treat=1; risk=z1; output;
    time=z6; status=z5; treat=0; risk=z4; output;