TITLE 'SAS SAMPLE - COUNTRY ANSWER';
     LIBNAME CLASS 'd:\temp';
     DATA CLASS.COUNTRY;
        infile 'd:\temp\country.dat';
        array MSG pop area gnp milexped pedexped;
        INPUT DEC 1 ID 2-4 NAME $CHAR26. SSCODE 31-33
              CONTIN $ 34-35 DODEV 36 POPULATE 37-43
              AREA 44-49 GNP 50-56 MILEXP 57-64 .1
              EDUCEXP 65-71 .1;
              PCGNP = (GNP * 1000) / POPULATE;  /* PER CAPITA GNP */
        LABEL NAME     = "COUNTRY'S NAME"
              CONTIN   = 'CONTINENTAL'
              DODEV    = 'DEGREE OF DEVELOPMENT'
              GNP      = 'GNP IN MILLIONS OF DOLLARS'
              MILEXP = 'MILITARY EXPENDITURE IN MILLIONS OF $'
              EDUCEXP = 'EDUCATION EXPENDITURE IN MIL. $';
          DO OVER MSG;
          IF MSG = 9999999 OR MSG = 999999.9 OR MSG=9999999.9 OR
             MSG = 99999.9 THEN MSG = .;
          END;
proc print;
run;