data supply;                     
       infile tv;
       input brand $ 1-8 model $ 9-14
             color $ 15-20 stock 21-23
             ordered 24-26 sold 27-29;
    run;
    proc print data=supply;
    run;