options nocenter ls=132 ps=84 nonumber; libname disk './'; /* This program tests the Sabelhaus extract member files */ %macro one(q); filename memb "/home/data/ces_cbo/mfile&q"; data disk.memb&q; infile memb lrecl=272; input newid 1-7 age 8-10 relation $ 11 educatio $ 12-13 race $ 14 sex $ 15 weeksin 16-17 emplcont $ 18 incoll $ 19 nonwork $ 20 marital $ 21 empstat $ 22 emptype $ 23 hrswkd 24-26 wkswkd 27-28 occup $ 29-30 indust $ 31-32 fedtax 33-42 gvpremia 43-52 pripemia 53-62 rrpremia 63-72 statax 73-82 farminc 83-92 irakeogh 93-102 fica 103-112 businc 113-122 wage 123-132 socbens 133-142 ssi 143-152 ; members = 1; /* tables */ title "member file unweighted for period&q"; proc means n sum mean; run; %mend; *%one(891); *%one(892); *%one(893); *%one(894); *%one(901); *%one(902); *%one(903); *%one(904); *%one(911); *%one(912); *%one(913); *%one(914); *%one(921); *%one(922); *%one(923); *%one(924); *%one(931); *%one(932); *%one(933); *%one(934); *%one(941); %one(982);