* READ ONLY MALES...;

data pop_m;

input 
county $3. 
+1 
pop1-pop6 
/
;

datalines;
001M   1862   2015   2000   2050   2162   9943
001F   1820   1821   1954   2024   2129   9682
003M    344    342    396    392    430   2011
003F    331    322    350    364    386   1901
005M  11615  11587  11800  11475  11566  51125
005F  11234  11132  11208  11091  11458  48926
;
run;

title 'SLASH USED TO SKIP A RECORD - MALES';

proc contents data=POP_M;
run;

proc print data=POP_M;
run;

* READ ONLY FEMALES...;

data pop_f;

input 
/
county $3. 
+1 
pop1-pop6
;

datalines;
001M   1862   2015   2000   2050   2162   9943
001F   1820   1821   1954   2024   2129   9682
003M    344    342    396    392    430   2011
003F    331    322    350    364    386   1901
005M  11615  11587  11800  11475  11566  51125
005F  11234  11132  11208  11091  11458  48926
;
run;

title 'SLASH USED TO SKIP A RECORD - FEMALES';

proc contents data=POP_F;
run;

proc print data=POP_F;
run;

* READ ONLY FEMALES...USE #2;

data pop_f;

input 
#2
county $3. 
+1 
pop1-pop6
;

datalines;
001M   1862   2015   2000   2050   2162   9943
001F   1820   1821   1954   2024   2129   9682
003M    344    342    396    392    430   2011
003F    331    322    350    364    386   1901
005M  11615  11587  11800  11475  11566  51125
005F  11234  11132  11208  11091  11458  48926
;
run;

title '#2 USED TO MOVE 2ND RECORD - FEMALES';

proc contents data=POP_F;
run;

proc print data=POP_F;
run;

* READ BOTH...;

data pop_mf;

input 
county $3. 
+1 
m1-m6
/
+4
f1-f6
;

datalines;
001M   1862   2015   2000   2050   2162   9943
001F   1820   1821   1954   2024   2129   9682
003M    344    342    396    392    430   2011
003F    331    322    350    364    386   1901
005M  11615  11587  11800  11475  11566  51125
005F  11234  11132  11208  11091  11458  48926
;
run;

title 'SLASH USED TO MOVE TO A SKIP A RECORD - MALES AND FEMALES';

proc contents data=POP_MF;
run;

proc print data=POP_MF;
run;

* READ BOTH PLUS GENDER...;

data pop;

input 
county $3. 
gender $1. 
p1-p6
;

datalines;
001M   1862   2015   2000   2050   2162   9943
001F   1820   1821   1954   2024   2129   9682
003M    344    342    396    392    430   2011
003F    331    322    350    364    386   1901
005M  11615  11587  11800  11475  11566  51125
005F  11234  11132  11208  11091  11458  48926
;
run;

title 'MALES AND FEMALES WITH A VARIABLE FOR GENDER';

proc contents data=POP;
run;

proc print data=POP;
run;