Make row 1 use red foreground color. 
if rownum eq 1 then do;
  call send(rcdvecid, '_setColor', 'RED');
end;