Proc report Line under row

 proc report data=example ls=132 ps=52 split='~' headline headskip center missing nowindows style(column)={asis=on};
      column col1 col2 ord ord2;
      define col1        / display "" style={cellwidth=75% paddingright=1cm just=left asis=on};
      define col2        / display "" style={cellwidth=20% paddingright=1cm just=center asis=on};
      define ord        / order order=data noprint;
      define ord2       /order order= data noprint;

      compute after ord;
        line '';
      endcomp;

      compute ord2;
        if ord2=1 then do;
        call define(_row_,'STYLE','STYLE=[borderbottomwidth=0.5pt borderbottomcolor=black]');
        end;
      endcomp;


 run;