/* This code is for documentation of the record layout for the ASCII replicate weight code for the 2011 ASEC Data */ filename link 'CPS_ASEC_ASCII_REPWGT_2011.DAT'; filename replist 'CPS_ASEC_ASCII_REPWGT_2011.LST'; * Add SAS library; libname sas '.'; data sas.repwgt_2011; infile link lrecl=1456; input @1 pwwgt0 f9.4 @10 pwwgt1 f9.4 @19 pwwgt2 f9.4 @28 pwwgt3 f9.4 @37 pwwgt4 f9.4 @46 pwwgt5 f9.4 @55 pwwgt6 f9.4 @64 pwwgt7 f9.4 @73 pwwgt8 f9.4 @82 pwwgt9 f9.4 @91 pwwgt10 f9.4 @100 pwwgt11 f9.4 @109 pwwgt12 f9.4 @118 pwwgt13 f9.4 @127 pwwgt14 f9.4 @136 pwwgt15 f9.4 @145 pwwgt16 f9.4 @154 pwwgt17 f9.4 @163 pwwgt18 f9.4 @172 pwwgt19 f9.4 @181 pwwgt20 f9.4 @190 pwwgt21 f9.4 @199 pwwgt22 f9.4 @208 pwwgt23 f9.4 @217 pwwgt24 f9.4 @226 pwwgt25 f9.4 @235 pwwgt26 f9.4 @244 pwwgt27 f9.4 @253 pwwgt28 f9.4 @262 pwwgt29 f9.4 @271 pwwgt30 f9.4 @280 pwwgt31 f9.4 @289 pwwgt32 f9.4 @298 pwwgt33 f9.4 @307 pwwgt34 f9.4 @316 pwwgt35 f9.4 @325 pwwgt36 f9.4 @334 pwwgt37 f9.4 @343 pwwgt38 f9.4 @352 pwwgt39 f9.4 @361 pwwgt40 f9.4 @370 pwwgt41 f9.4 @379 pwwgt42 f9.4 @388 pwwgt43 f9.4 @397 pwwgt44 f9.4 @406 pwwgt45 f9.4 @415 pwwgt46 f9.4 @424 pwwgt47 f9.4 @433 pwwgt48 f9.4 @442 pwwgt49 f9.4 @451 pwwgt50 f9.4 @460 pwwgt51 f9.4 @469 pwwgt52 f9.4 @478 pwwgt53 f9.4 @487 pwwgt54 f9.4 @496 pwwgt55 f9.4 @505 pwwgt56 f9.4 @514 pwwgt57 f9.4 @523 pwwgt58 f9.4 @532 pwwgt59 f9.4 @541 pwwgt60 f9.4 @550 pwwgt61 f9.4 @559 pwwgt62 f9.4 @568 pwwgt63 f9.4 @577 pwwgt64 f9.4 @586 pwwgt65 f9.4 @595 pwwgt66 f9.4 @604 pwwgt67 f9.4 @613 pwwgt68 f9.4 @622 pwwgt69 f9.4 @631 pwwgt70 f9.4 @640 pwwgt71 f9.4 @649 pwwgt72 f9.4 @658 pwwgt73 f9.4 @667 pwwgt74 f9.4 @676 pwwgt75 f9.4 @685 pwwgt76 f9.4 @694 pwwgt77 f9.4 @703 pwwgt78 f9.4 @712 pwwgt79 f9.4 @721 pwwgt80 f9.4 @730 pwwgt81 f9.4 @739 pwwgt82 f9.4 @748 pwwgt83 f9.4 @757 pwwgt84 f9.4 @766 pwwgt85 f9.4 @775 pwwgt86 f9.4 @784 pwwgt87 f9.4 @793 pwwgt88 f9.4 @802 pwwgt89 f9.4 @811 pwwgt90 f9.4 @820 pwwgt91 f9.4 @829 pwwgt92 f9.4 @838 pwwgt93 f9.4 @847 pwwgt94 f9.4 @856 pwwgt95 f9.4 @865 pwwgt96 f9.4 @874 pwwgt97 f9.4 @883 pwwgt98 f9.4 @892 pwwgt99 f9.4 @901 pwwgt100 f9.4 @910 pwwgt101 f9.4 @919 pwwgt102 f9.4 @928 pwwgt103 f9.4 @937 pwwgt104 f9.4 @946 pwwgt105 f9.4 @955 pwwgt106 f9.4 @964 pwwgt107 f9.4 @973 pwwgt108 f9.4 @982 pwwgt109 f9.4 @991 pwwgt110 f9.4 @1000 pwwgt111 f9.4 @1009 pwwgt112 f9.4 @1018 pwwgt113 f9.4 @1027 pwwgt114 f9.4 @1036 pwwgt115 f9.4 @1045 pwwgt116 f9.4 @1054 pwwgt117 f9.4 @1063 pwwgt118 f9.4 @1072 pwwgt119 f9.4 @1081 pwwgt120 f9.4 @1090 pwwgt121 f9.4 @1099 pwwgt122 f9.4 @1108 pwwgt123 f9.4 @1117 pwwgt124 f9.4 @1126 pwwgt125 f9.4 @1135 pwwgt126 f9.4 @1144 pwwgt127 f9.4 @1153 pwwgt128 f9.4 @1162 pwwgt129 f9.4 @1171 pwwgt130 f9.4 @1180 pwwgt131 f9.4 @1189 pwwgt132 f9.4 @1198 pwwgt133 f9.4 @1207 pwwgt134 f9.4 @1216 pwwgt135 f9.4 @1225 pwwgt136 f9.4 @1234 pwwgt137 f9.4 @1243 pwwgt138 f9.4 @1252 pwwgt139 f9.4 @1261 pwwgt140 f9.4 @1270 pwwgt141 f9.4 @1279 pwwgt142 f9.4 @1288 pwwgt143 f9.4 @1297 pwwgt144 f9.4 @1306 pwwgt145 f9.4 @1315 pwwgt146 f9.4 @1324 pwwgt147 f9.4 @1333 pwwgt148 f9.4 @1342 pwwgt149 f9.4 @1351 pwwgt150 f9.4 @1360 pwwgt151 f9.4 @1369 pwwgt152 f9.4 @1378 pwwgt153 f9.4 @1387 pwwgt154 f9.4 @1396 pwwgt155 f9.4 @1405 pwwgt156 f9.4 @1414 pwwgt157 f9.4 @1423 pwwgt158 f9.4 @1432 pwwgt159 f9.4 @1441 pwwgt160 f9.4 @1450 h_seq f5.0 @1455 pppos $char2.; run; /* SUM of Weights for Verification: All replicate weights, PWWGT0 - PWWGT160, should be slightly different due to the inclusion of Armed Forces members in the ASEC estimates. Use these totals to verify that your file is created correctly. PWWGT0 = 306109649.1640 PWWGT1 = 306111599.2810 PWWGT2 = 306125108.6013 PWWGT3 = 306095658.5999 PWWGT4 = 306138872.0792 PWWGT5 = 306115829.2306 PWWGT6 = 306131321.8221 PWWGT7 = 306109352.5683 PWWGT8 = 306110337.8444 PWWGT9 = 306122634.3592 PWWGT10 = 306134747.0803 PWWGT11 = 306106503.3014 PWWGT12 = 306100623.2793 PWWGT13 = 306130157.2718 PWWGT14 = 306164720.3351 PWWGT15 = 306109859.0494 PWWGT16 = 306113873.6828 PWWGT17 = 306128484.9195 PWWGT18 = 306149716.0136 PWWGT19 = 306042430.9346 PWWGT20 = 306067895.5034 PWWGT21 = 306138852.3115 PWWGT22 = 306075518.4276 PWWGT23 = 306088516.0062 PWWGT24 = 306087224.3430 PWWGT25 = 306127573.9235 PWWGT26 = 306122938.6877 PWWGT27 = 306105052.0803 PWWGT28 = 306107735.1705 PWWGT29 = 306081366.1890 PWWGT30 = 306114891.9478 PWWGT31 = 306089777.7472 PWWGT32 = 306128376.0533 PWWGT33 = 306160206.1720 PWWGT34 = 306072030.0637 PWWGT35 = 306173819.3396 PWWGT36 = 306144935.1636 PWWGT37 = 306095749.0016 PWWGT38 = 306076373.3938 PWWGT39 = 306148031.0466 PWWGT40 = 306127747.1503 PWWGT41 = 306111894.2272 PWWGT42 = 306144118.9270 PWWGT43 = 306092898.7701 PWWGT44 = 306190776.5605 PWWGT45 = 306102341.0668 PWWGT46 = 306121128.3212 PWWGT47 = 306075855.8163 PWWGT48 = 306103792.5379 PWWGT49 = 306146491.2512 PWWGT50 = 306095074.3855 PWWGT51 = 306086793.5809 PWWGT52 = 306062762.8092 PWWGT53 = 306090458.8697 PWWGT54 = 306112979.4221 PWWGT55 = 306065980.0480 PWWGT56 = 306074903.5258 PWWGT57 = 306140748.9305 PWWGT58 = 306120060.3442 PWWGT59 = 306094132.2395 PWWGT60 = 306056498.5943 PWWGT61 = 306104310.5698 PWWGT62 = 306107277.4345 PWWGT63 = 306130043.7354 PWWGT64 = 306064448.8117 PWWGT65 = 306096994.1782 PWWGT66 = 306135384.8837 PWWGT67 = 306084375.1171 PWWGT68 = 306098718.2950 PWWGT69 = 306076618.3589 PWWGT70 = 306077535.1526 PWWGT71 = 306125558.0061 PWWGT72 = 306113830.7830 PWWGT73 = 306140966.6068 PWWGT74 = 306048149.6609 PWWGT75 = 306149273.1517 PWWGT76 = 306092759.6975 PWWGT77 = 306084139.2023 PWWGT78 = 306070581.6834 PWWGT79 = 306159177.9056 PWWGT80 = 306095527.5935 PWWGT81 = 306129219.1954 PWWGT82 = 306063503.2281 PWWGT83 = 305995163.3899 PWWGT84 = 306108882.1998 PWWGT85 = 306100458.0797 PWWGT86 = 306151311.1731 PWWGT87 = 306133497.9437 PWWGT88 = 306142726.0571 PWWGT89 = 306107527.6667 PWWGT90 = 306154362.3253 PWWGT91 = 306135405.3195 PWWGT92 = 306076181.7151 PWWGT93 = 306120491.4477 PWWGT94 = 306107049.2975 PWWGT95 = 306053643.3434 PWWGT96 = 306118645.8954 PWWGT97 = 306097246.8663 PWWGT98 = 306123103.4261 PWWGT99 = 306087041.2649 PWWGT100 = 306143608.6259 PWWGT101 = 306057270.2732 PWWGT102 = 306173756.9201 PWWGT103 = 306156277.0362 PWWGT104 = 306108474.7951 PWWGT105 = 306163669.2012 PWWGT106 = 306117202.9133 PWWGT107 = 306146991.3491 PWWGT108 = 306049715.2646 PWWGT109 = 306097126.9502 PWWGT110 = 306072880.9429 PWWGT111 = 306087243.5633 PWWGT112 = 306081863.1227 PWWGT113 = 306103125.6811 PWWGT114 = 306092464.0569 PWWGT115 = 306131850.4933 PWWGT116 = 306111614.1391 PWWGT117 = 306093696.7955 PWWGT118 = 306076223.0997 PWWGT119 = 306062705.6067 PWWGT120 = 306144517.3676 PWWGT121 = 306189462.4570 PWWGT122 = 306110289.8304 PWWGT123 = 306056716.0792 PWWGT124 = 306122845.4812 PWWGT125 = 306065011.6309 PWWGT126 = 306162743.3520 PWWGT127 = 306065234.9827 PWWGT128 = 306118324.1320 PWWGT129 = 306102536.7663 PWWGT130 = 306115391.0359 PWWGT131 = 306138520.1850 PWWGT132 = 306083977.3441 PWWGT133 = 306150809.4103 PWWGT134 = 306126227.1329 PWWGT135 = 306117123.4353 PWWGT136 = 306100924.0145 PWWGT137 = 306104486.3079 PWWGT138 = 306088497.7008 PWWGT139 = 306117658.6084 PWWGT140 = 306070419.9224 PWWGT141 = 306112162.9599 PWWGT142 = 306152247.2037 PWWGT143 = 306176462.2071 PWWGT144 = 306083818.5785 PWWGT145 = 306144736.7014 PWWGT146 = 306044801.7477 PWWGT147 = 306112566.2632 PWWGT148 = 306062187.0327 PWWGT149 = 306147994.5207 PWWGT150 = 306002959.0843 PWWGT151 = 306123315.1637 PWWGT152 = 306058028.8243 PWWGT153 = 306072190.9839 PWWGT154 = 306096418.4389 PWWGT155 = 306196372.1269 PWWGT156 = 306159322.9854 PWWGT157 = 306144705.5452 PWWGT158 = 306130423.3294 PWWGT159 = 306131079.6084 PWWGT160 = 306097881.4609 */ %macro total; data _null_; retain tot_pwwgt0-tot_pwwgt160 0; set sas.repwgt_2011 end = last; %do i = 0 %to 160; tot_pwwgt&i + pwwgt&i; %end; if last then do; file replist; put 'Sum of replicate weights'; put; %do i = 0 %to 160; put " PWWGT&i = " @16 tot_pwwgt&i f15.4; %end; end; run; %mend total; %total;