FILENAME VIFSE 'D:\Second Day Exams\FOODS\DAT\VIFSE.DAT' LRECL=40;
**** LRECL includes 2 positions for CRLF, assuming use of PC SAS ;

    DATA WORK;
      INFILE VIFSE MISSOVER;

      LENGTH
        SEQN      7
        DRRMN     3
        DRRFN     3
        DRRCN     3
        DRRIN     3
        DRRFCODE $7
        DRRICODE $7
        DRRINGID  5
        DRRCOMM   3
        DRRVIDC  $3
      ;

      FORMAT
        DRRMN    Z2.
        DRRFN    Z2.
        DRRCN    Z2.
        DRRIN    Z2.
        DRRINGID Z5.
        DRRCOMM  Z5.
      ;

     INPUT
        SEQN     1-5
        DRRMN    6-7
        DRRFN    8-9
        DRRCN    10-11
        DRRIN    12-13
        DRRFCODE 14-20
        DRRICODE 21-27
        DRRINGID 28-31
        DRRCOMM  32-35
        DRRVIDC  36-38
     ;

      LABEL
        SEQN     = "Respondent identification number"
        DRRMN    = "Meal Number"
        DRRFN    = "Food Number"
        DRRCN    = "Component Number"
        DRRIN    = "Ingredient Number"
        DRRFCODE = "Parent. USDA Food Code"
        DRRICODE = "USDA Ingredient Food Code"
        DRRINGID = "Ingredient ID. Table look-up description"
        DRRCOMM  = "Brand Id/Commercial Code"
        DRRVIDC  = "Variable ingredient Default Code"
      ;