DATA INVENT;
LENGTH STNAME $ 30;
INFILE  'invent.txt';
INPUT STATE $ 1-2 STCODE 4-5 CNI 6-9 STNAME $ 11-40
LAT 42-46 LON 48-54 ELEV 57-60 MOTMAX 62-63
YRTMAX 65-68 MOTMIN 70-71 YRTMIN 73-76
MOPRCP 78-79 YRPRCP 81-84 MOSNOW 86-87
YRSNOW 89-92 MOSNWD 94-95 YRSNWD 97-100;
put _infile_;
RUN;