data perm.update;
             infile invent;
             input Item $ 1-13 IDnum $ 15-19
                   InStock 21-22 BackOrd 24-25;
             Total=instock+backord;
          run;