/* This code is for documentation of the record layout for the ASCII replicate weight code for the 2005 ASEC Data */ filename link 'CPS_ASEC_ASCII_REPWGT_2005.DAT'; filename replist 'CPS_ASEC_ASCII_REPWGT_2005.LST'; * Add SAS library; libname sas '.'; data sas.repwgt_2005; 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 = 291166200.3987 PWWGT1 = 291183703.3623 PWWGT2 = 291187691.3821 PWWGT3 = 291155666.2725 PWWGT4 = 291132364.5183 PWWGT5 = 291150461.1587 PWWGT6 = 291146256.6976 PWWGT7 = 291168870.2920 PWWGT8 = 291162650.7775 PWWGT9 = 291144482.2905 PWWGT10 = 291119275.7760 PWWGT11 = 291169760.8882 PWWGT12 = 291149198.7029 PWWGT13 = 291154327.2537 PWWGT14 = 291207961.1866 PWWGT15 = 291208510.9915 PWWGT16 = 291161846.5941 PWWGT17 = 291190382.7265 PWWGT18 = 291276121.0919 PWWGT19 = 291132846.8657 PWWGT20 = 291119219.1834 PWWGT21 = 291187420.5357 PWWGT22 = 291173268.8118 PWWGT23 = 291155282.5100 PWWGT24 = 291122362.4927 PWWGT25 = 291147703.6338 PWWGT26 = 291219752.3320 PWWGT27 = 291134314.7600 PWWGT28 = 291169690.4062 PWWGT29 = 291078036.4923 PWWGT30 = 291180661.8213 PWWGT31 = 291164138.9839 PWWGT32 = 291200164.8177 PWWGT33 = 291180295.1376 PWWGT34 = 291132906.3831 PWWGT35 = 291204200.3506 PWWGT36 = 291139550.4754 PWWGT37 = 291161304.3245 PWWGT38 = 291208772.2123 PWWGT39 = 291176054.0770 PWWGT40 = 291158431.4733 PWWGT41 = 291178739.8787 PWWGT42 = 291188432.4654 PWWGT43 = 291194761.2307 PWWGT44 = 291210187.0847 PWWGT45 = 291212303.6982 PWWGT46 = 291164271.5701 PWWGT47 = 291145463.5895 PWWGT48 = 291136368.7080 PWWGT49 = 291207897.2097 PWWGT50 = 291198343.9309 PWWGT51 = 291138332.5065 PWWGT52 = 291093007.3450 PWWGT53 = 291193719.7893 PWWGT54 = 291167001.4172 PWWGT55 = 291188572.9415 PWWGT56 = 291165571.9080 PWWGT57 = 291202019.4509 PWWGT58 = 291176771.2112 PWWGT59 = 291137903.7364 PWWGT60 = 291153876.7067 PWWGT61 = 291198968.5479 PWWGT62 = 291149421.6340 PWWGT63 = 291127614.6318 PWWGT64 = 291151368.7409 PWWGT65 = 291173774.4063 PWWGT66 = 291162296.4710 PWWGT67 = 291155235.2455 PWWGT68 = 291147883.1310 PWWGT69 = 291136141.0181 PWWGT70 = 291175929.9467 PWWGT71 = 291203193.3001 PWWGT72 = 291145024.7992 PWWGT73 = 291202925.4676 PWWGT74 = 291113611.9684 PWWGT75 = 291166489.7160 PWWGT76 = 291189067.5399 PWWGT77 = 291176148.1685 PWWGT78 = 291106102.6215 PWWGT79 = 291201837.0177 PWWGT80 = 291181782.4532 PWWGT81 = 291184763.1864 PWWGT82 = 291120260.5662 PWWGT83 = 291138863.0475 PWWGT84 = 291161975.6999 PWWGT85 = 291211763.0201 PWWGT86 = 291184183.9691 PWWGT87 = 291136846.8066 PWWGT88 = 291183276.2258 PWWGT89 = 291168309.5160 PWWGT90 = 291163324.1423 PWWGT91 = 291195515.3518 PWWGT92 = 291135989.9386 PWWGT93 = 291171146.0468 PWWGT94 = 291107314.1679 PWWGT95 = 291131066.0568 PWWGT96 = 291181869.8710 PWWGT97 = 291177691.4786 PWWGT98 = 291154339.6337 PWWGT99 = 291180482.1508 PWWGT100 = 291191891.4873 PWWGT101 = 291174282.2743 PWWGT102 = 291186184.8165 PWWGT103 = 291188949.6728 PWWGT104 = 291210098.5196 PWWGT105 = 291213605.4731 PWWGT106 = 291138496.5429 PWWGT107 = 291196669.3845 PWWGT108 = 291154601.1451 PWWGT109 = 291184032.4084 PWWGT110 = 291147005.6569 PWWGT111 = 291183431.4647 PWWGT112 = 291105154.5856 PWWGT113 = 291167563.4409 PWWGT114 = 291145478.7827 PWWGT115 = 291224034.4193 PWWGT116 = 291194475.5657 PWWGT117 = 291136625.9472 PWWGT118 = 291178629.3526 PWWGT119 = 291182236.5815 PWWGT120 = 291148018.1103 PWWGT121 = 291192454.0697 PWWGT122 = 291168433.0458 PWWGT123 = 291131251.4515 PWWGT124 = 291120679.0583 PWWGT125 = 291091064.4387 PWWGT126 = 291211465.2249 PWWGT127 = 291139159.1402 PWWGT128 = 291153112.4391 PWWGT129 = 291088780.1725 PWWGT130 = 291181362.1820 PWWGT131 = 291139607.6766 PWWGT132 = 291153176.1857 PWWGT133 = 291148877.4327 PWWGT134 = 291180770.0014 PWWGT135 = 291164844.4696 PWWGT136 = 291162343.8134 PWWGT137 = 291216700.3714 PWWGT138 = 291224855.6733 PWWGT139 = 291187491.2901 PWWGT140 = 291204384.3062 PWWGT141 = 291156885.8237 PWWGT142 = 291227334.0122 PWWGT143 = 291196202.9900 PWWGT144 = 291145719.1211 PWWGT145 = 291169309.3631 PWWGT146 = 291208364.8860 PWWGT147 = 291175214.2844 PWWGT148 = 291103100.7868 PWWGT149 = 291163570.3952 PWWGT150 = 291111010.5553 PWWGT151 = 291156540.9695 PWWGT152 = 291201953.2970 PWWGT153 = 291133979.5313 PWWGT154 = 291177851.7532 PWWGT155 = 291203487.5207 PWWGT156 = 291142402.4448 PWWGT157 = 291162670.5388 PWWGT158 = 291190749.3997 PWWGT159 = 291149479.4977 PWWGT160 = 291144515.9503 */ %macro total; data _null_; retain tot_pwwgt0-tot_pwwgt160 0; set sas.repwgt_2005 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;