/* cps_foodsecurity_hhrepwgt_dec14.sas This code is for documentation of the record layout for the ASCII replicate weight code for the DECEMBER 2014 FOOD SECURITY */ *ENTER LOCATION OF INPUT FILE; filename ipfile " dec14hhrep.dat" ; %let replist= CPS_FOODSECURITY_HHREP_DEC14.LST; filename replist "&replist"; * ADD SAS LIBRARY; libname sas '.'; data sas.repwgts_dec14; infile ipfile lrecl=1617 recfm=v; input qstnum 1-5 hhwgt0 8 -17 hhwgt1 18 -27 hhwgt2 28 -37 hhwgt3 38 -47 hhwgt4 48 -57 hhwgt5 58 -67 hhwgt6 68 -77 hhwgt7 78 -87 hhwgt8 88 -97 hhwgt9 98 -107 hhwgt10 108 -117 hhwgt11 118 -127 hhwgt12 128 -137 hhwgt13 138 -147 hhwgt14 148 -157 hhwgt15 158 -167 hhwgt16 168 -177 hhwgt17 178 -187 hhwgt18 188 -197 hhwgt19 198 -207 hhwgt20 208 -217 hhwgt21 218 -227 hhwgt22 228 -237 hhwgt23 238 -247 hhwgt24 248 -257 hhwgt25 258 -267 hhwgt26 268 -277 hhwgt27 278 -287 hhwgt28 288 -297 hhwgt29 298 -307 hhwgt30 308 -317 hhwgt31 318 -327 hhwgt32 328 -337 hhwgt33 338 -347 hhwgt34 348 -357 hhwgt35 358 -367 hhwgt36 368 -377 hhwgt37 378 -387 hhwgt38 388 -397 hhwgt39 399 -407 hhwgt40 408 -417 hhwgt41 418 -427 hhwgt42 428 -437 hhwgt43 438 -447 hhwgt44 448 -457 hhwgt45 458 -467 hhwgt46 468 -477 hhwgt47 478 -487 hhwgt48 488 -497 hhwgt49 498 -507 hhwgt50 508 -517 hhwgt51 518 -527 hhwgt52 528 -537 hhwgt53 538 -547 hhwgt54 548 -557 hhwgt55 558 -567 hhwgt56 568 -577 hhwgt57 578 -587 hhwgt58 588 -597 hhwgt59 598 -607 hhwgt60 608 -617 hhwgt61 618 -627 hhwgt62 628 -637 hhwgt63 638 -647 hhwgt64 648 -657 hhwgt65 658 -667 hhwgt66 668 -677 hhwgt67 678 -687 hhwgt68 688 -697 hhwgt69 699 -707 hhwgt70 708 -717 hhwgt71 718 -727 hhwgt72 728 -737 hhwgt73 738 -747 hhwgt74 748 -757 hhwgt75 758 -767 hhwgt76 768 -777 hhwgt77 778 -787 hhwgt78 788 -797 hhwgt79 798 -807 hhwgt80 808 -817 hhwgt81 818 -827 hhwgt82 828 -837 hhwgt83 838 -847 hhwgt84 848 -857 hhwgt85 858 -867 hhwgt86 868 -877 hhwgt87 878 -887 hhwgt88 888 -897 hhwgt89 898 -907 hhwgt90 908 -917 hhwgt91 918 -927 hhwgt92 928 -937 hhwgt93 938 -947 hhwgt94 948 -957 hhwgt95 958 -967 hhwgt96 968 -977 hhwgt97 978 -987 hhwgt98 988 -997 hhwgt99 998 -1007 hhwgt100 1008 -1017 hhwgt101 1018 -1027 hhwgt102 1028 -1037 hhwgt103 1038 -1047 hhwgt104 1048 -1057 hhwgt105 1058 -1067 hhwgt106 1068 -1077 hhwgt107 1078 -1087 hhwgt108 1088 -1097 hhwgt109 1098 -1107 hhwgt110 1108 -1117 hhwgt111 1118 -1127 hhwgt112 1128 -1137 hhwgt113 1138 -1147 hhwgt114 1148 -1157 hhwgt115 1158 -1167 hhwgt116 1168 -1177 hhwgt117 1178 -1187 hhwgt118 1188 -1197 hhwgt119 1198 -1207 hhwgt120 1208 -1217 hhwgt121 1218 -1227 hhwgt122 1228 -1237 hhwgt123 1238 -1247 hhwgt124 1248 -1257 hhwgt125 1258 -1267 hhwgt126 1268 -1277 hhwgt127 1278 -1287 hhwgt128 1288 -1297 hhwgt129 1298 -1307 hhwgt130 1308 -1317 hhwgt131 1318 -1327 hhwgt132 1328 -1337 hhwgt133 1338 -1347 hhwgt134 1348 -1357 hhwgt135 1358 -1367 hhwgt136 1368 -1377 hhwgt137 1378 -1387 hhwgt138 1388 -1397 hhwgt139 1398 -1407 hhwgt140 1408 -1417 hhwgt141 1418 -1427 hhwgt142 1428 -1437 hhwgt143 1438 -1447 hhwgt144 1448 -1457 hhwgt145 1458 -1467 hhwgt146 1468 -1477 hhwgt147 1478 -1487 hhwgt148 1488 -1497 hhwgt149 1498 -1507 hhwgt150 1508 -1517 hhwgt151 1518 -1527 hhwgt152 1528 -1537 hhwgt153 1538 -1547 hhwgt154 1548 -1557 hhwgt155 1558 -1567 hhwgt156 1568 -1577 hhwgt157 1578 -1587 hhwgt158 1588 -1597 hhwgt159 1598 -1607 hhwgt160 1608 -1617 ; array wt(0:160) hhwgt0-hhwgt160; drop i; /* ASCII repweights have 4 implied decimal places. undo by dividing by 10000. */ do i= 0 to 160; wt(i)= wt(i)/10000; end; run; /* SUM of Weights for Verification: The sum of the replicate weights, hhwgt0 - hhwgt160, is outputted in CPS_FOODSECURITY_HHREP_DEC14.LST and should appear the same as the following: CPS_FOODSECURITY_HHREP_DEC14.LST DEC 2014 Food Security: Sum of Household Replicate Weights in dec14hhrep.dat hhwgt0 = 124351979.8419 hhwgt1 = 124339193.2010 hhwgt2 = 124239679.5181 hhwgt3 = 124500429.3127 hhwgt4 = 124434989.0921 hhwgt5 = 124187600.0416 hhwgt6 = 124534201.0313 hhwgt7 = 124399579.4086 hhwgt8 = 124370175.1900 hhwgt9 = 124463405.0594 hhwgt10 = 124529562.0635 hhwgt11 = 124668215.6142 hhwgt12 = 124637641.7435 hhwgt13 = 124171229.5826 hhwgt14 = 124193770.1172 hhwgt15 = 124389368.4151 hhwgt16 = 124204977.6881 hhwgt17 = 124593157.8472 hhwgt18 = 124016216.1995 hhwgt19 = 124184801.7686 hhwgt20 = 124470211.6481 hhwgt21 = 124357793.3672 hhwgt22 = 124675794.0589 hhwgt23 = 124405285.5216 hhwgt24 = 124826576.5844 hhwgt25 = 124357125.6538 hhwgt26 = 124364611.1019 hhwgt27 = 124255612.4725 hhwgt28 = 124707803.4007 hhwgt29 = 124400280.4044 hhwgt30 = 124239036.0770 hhwgt31 = 124498455.2507 hhwgt32 = 124577575.0010 hhwgt33 = 124481627.7284 hhwgt34 = 124229779.0387 hhwgt35 = 124380805.7633 hhwgt36 = 124096991.2988 hhwgt37 = 124177178.2295 hhwgt38 = 124536534.2392 hhwgt39 = 124325048.5336 hhwgt40 = 124619671.3294 hhwgt41 = 124350616.6074 hhwgt42 = 124377510.9113 hhwgt43 = 124296794.4968 hhwgt44 = 124197255.2337 hhwgt45 = 124492310.6788 hhwgt46 = 123854118.0091 hhwgt47 = 124434838.3732 hhwgt48 = 124215958.2003 hhwgt49 = 124396610.8621 hhwgt50 = 124289953.2666 hhwgt51 = 124210074.3184 hhwgt52 = 124485563.7482 hhwgt53 = 124808975.8908 hhwgt54 = 124253323.4769 hhwgt55 = 124199440.1978 hhwgt56 = 124216190.1226 hhwgt57 = 124532472.5084 hhwgt58 = 124545965.1075 hhwgt59 = 124413135.3515 hhwgt60 = 124290913.2395 hhwgt61 = 124162816.6152 hhwgt62 = 124573016.3367 hhwgt63 = 124264583.5516 hhwgt64 = 124615999.8581 hhwgt65 = 124499398.3513 hhwgt66 = 124087628.1640 hhwgt67 = 124117226.0990 hhwgt68 = 124664706.2005 hhwgt69 = 124284458.0966 hhwgt70 = 124515861.4638 hhwgt71 = 124311999.0074 hhwgt72 = 124337092.6784 hhwgt73 = 124456238.4458 hhwgt74 = 124627905.7017 hhwgt75 = 124277893.6572 hhwgt76 = 124302171.6745 hhwgt77 = 124426832.4203 hhwgt78 = 124407489.9642 hhwgt79 = 124396956.9183 hhwgt80 = 124509487.7381 hhwgt81 = 124425668.3242 hhwgt82 = 124652413.6806 hhwgt83 = 124341121.2490 hhwgt84 = 124496730.4122 hhwgt85 = 124174979.5057 hhwgt86 = 124592311.2671 hhwgt87 = 124276936.4598 hhwgt88 = 124275206.6662 hhwgt89 = 124524384.0034 hhwgt90 = 124456404.9301 hhwgt91 = 124255367.0726 hhwgt92 = 124257179.4183 hhwgt93 = 124353737.0905 hhwgt94 = 124321535.7067 hhwgt95 = 124401263.9590 hhwgt96 = 124176830.3058 hhwgt97 = 124338300.3624 hhwgt98 = 124022781.0045 hhwgt99 = 124422962.4875 hhwgt100 = 124398883.7496 hhwgt101 = 124200654.1179 hhwgt102 = 124392622.6951 hhwgt103 = 124352403.0044 hhwgt104 = 124153628.5001 hhwgt105 = 124451898.3422 hhwgt106 = 124640445.8588 hhwgt107 = 124562722.4849 hhwgt108 = 124453375.7900 hhwgt109 = 124347299.2516 hhwgt110 = 124670905.4336 hhwgt111 = 124441504.0552 hhwgt112 = 124264250.0911 hhwgt113 = 124412411.9842 hhwgt114 = 124335087.3843 hhwgt115 = 124482659.9353 hhwgt116 = 124416117.0498 hhwgt117 = 124170713.5406 hhwgt118 = 124438995.4912 hhwgt119 = 124123376.5884 hhwgt120 = 124434858.3986 hhwgt121 = 124353320.2106 hhwgt122 = 124332935.7286 hhwgt123 = 124171877.4407 hhwgt124 = 124479657.0518 hhwgt125 = 124533122.6712 hhwgt126 = 124385552.1656 hhwgt127 = 124566099.3818 hhwgt128 = 124498356.2930 hhwgt129 = 124550731.7153 hhwgt130 = 124166092.5545 hhwgt131 = 124760737.8179 hhwgt132 = 124356817.5913 hhwgt133 = 124487419.9570 hhwgt134 = 124247883.3406 hhwgt135 = 124268706.1237 hhwgt136 = 124392983.8008 hhwgt137 = 124411673.5738 hhwgt138 = 124335922.8520 hhwgt139 = 124512524.8738 hhwgt140 = 124167326.2617 hhwgt141 = 124262806.5171 hhwgt142 = 124371563.3738 hhwgt143 = 124706463.3826 hhwgt144 = 124323902.0001 hhwgt145 = 124379701.6976 hhwgt146 = 124619728.9421 hhwgt147 = 124557871.8986 hhwgt148 = 124191086.6113 hhwgt149 = 124383939.0800 hhwgt150 = 124130713.3745 hhwgt151 = 124271414.4203 hhwgt152 = 124375297.3129 hhwgt153 = 124421916.3882 hhwgt154 = 124335497.2761 hhwgt155 = 124375837.2648 hhwgt156 = 124316725.9999 hhwgt157 = 124188318.6650 hhwgt158 = 124346799.2479 hhwgt159 = 124385535.7588 hhwgt160 = 124685915.0544 Use these totals to verify that your file is created correctly. */ %macro total; data _null_; set sas.repwgts_dec14 end=last; retain tot_hhwgt0-tot_hhwgt160 0; %do i = 0 %to 160; tot_hhwgt&i + hhwgt&i; %end; if last then do; file replist; put "&replist"; put; put 'DEC 2014 Food Security: Sum of Household Replicate Weights in dec14hhrep.dat'; put; %do i = 0 %to 160; put " hhwgt&i = " @16 tot_hhwgt&i f15.4; %end; end; run; %mend total; %total;