filename orditem 'c:/data/selfdoc.dat';

data orditem;                 /* sas file output                   */
  infile orditem;             /* flat file input                   */
  input @1 star $1.0 @;       /* note line hold trailing @ sign    */
  if star = '*' then delete;  /* star in clm 1 is comment in data  */
  drop star;                  /* don't include star clm in output  */
  input @1 invoice $4.0       /* note how I can re-read clm 1      */
        @5 item    $3.0
        @8 qty      2.0;
  length qty 3.0;             /* default is 8 bytes of storage!    */

proc print data=orditem;
  run;