/* This code is for documentation of the record layout for the ASCII replicate weight code for the 2022 ASEC Data */ filename link 'CPS_ASEC_ASCII_REPWGT_2022.DAT'; filename replist 'CPS_ASEC_ASCII_REPWGT_2022.LST'; * Add SAS library; libname sas '.'; data sas.repwgt_2022; 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 = 328721875.4442 PWWGT1 = 328747681.0424 PWWGT2 = 328799388.7513 PWWGT3 = 328700074.2596 PWWGT4 = 328715800.1475 PWWGT5 = 328728392.3961 PWWGT6 = 328716290.1075 PWWGT7 = 328680485.2359 PWWGT8 = 328743215.4800 PWWGT9 = 328720942.8876 PWWGT10 = 328733323.2923 PWWGT11 = 328714094.5029 PWWGT12 = 328691568.3900 PWWGT13 = 328783127.8013 PWWGT14 = 328704050.7108 PWWGT15 = 328711626.8594 PWWGT16 = 328739629.3401 PWWGT17 = 328746655.0934 PWWGT18 = 328694055.5988 PWWGT19 = 328702576.2408 PWWGT20 = 328692274.7256 PWWGT21 = 328747568.1700 PWWGT22 = 328738945.8281 PWWGT23 = 328730403.3938 PWWGT24 = 328699644.8804 PWWGT25 = 328744524.8114 PWWGT26 = 328713474.4530 PWWGT27 = 328712859.7484 PWWGT28 = 328689355.9775 PWWGT29 = 328741550.1546 PWWGT30 = 328720385.4856 PWWGT31 = 328778871.8575 PWWGT32 = 328766158.9944 PWWGT33 = 328715822.4378 PWWGT34 = 328719389.6480 PWWGT35 = 328762827.4416 PWWGT36 = 328729235.2120 PWWGT37 = 328680143.3036 PWWGT38 = 328740906.0165 PWWGT39 = 328733664.9702 PWWGT40 = 328688202.7708 PWWGT41 = 328763906.6975 PWWGT42 = 328754456.4338 PWWGT43 = 328736137.1703 PWWGT44 = 328758632.1252 PWWGT45 = 328690783.7899 PWWGT46 = 328816546.2128 PWWGT47 = 328689895.7308 PWWGT48 = 328694191.3947 PWWGT49 = 328709815.3284 PWWGT50 = 328641090.7773 PWWGT51 = 328685553.2957 PWWGT52 = 328643606.2098 PWWGT53 = 328732723.9600 PWWGT54 = 328739213.4222 PWWGT55 = 328736530.2114 PWWGT56 = 328712206.2732 PWWGT57 = 328707931.8955 PWWGT58 = 328737893.6105 PWWGT59 = 328683949.6848 PWWGT60 = 328717762.9585 PWWGT61 = 328666973.6500 PWWGT62 = 328685260.7342 PWWGT63 = 328767220.3215 PWWGT64 = 328691042.4354 PWWGT65 = 328793617.8917 PWWGT66 = 328731443.4416 PWWGT67 = 328691154.2110 PWWGT68 = 328692604.1111 PWWGT69 = 328773399.3997 PWWGT70 = 328700733.5196 PWWGT71 = 328776137.3914 PWWGT72 = 328717791.6763 PWWGT73 = 328616778.7309 PWWGT74 = 328708139.7106 PWWGT75 = 328765458.3174 PWWGT76 = 328740024.2710 PWWGT77 = 328733235.2533 PWWGT78 = 328738434.9388 PWWGT79 = 328755887.7746 PWWGT80 = 328649849.3563 PWWGT81 = 328720079.0309 PWWGT82 = 328661929.7282 PWWGT83 = 328717708.0575 PWWGT84 = 328628928.9582 PWWGT85 = 328768887.8631 PWWGT86 = 328728377.3239 PWWGT87 = 328754121.8875 PWWGT88 = 328647251.5552 PWWGT89 = 328669092.5859 PWWGT90 = 328771352.7635 PWWGT91 = 328752050.1597 PWWGT92 = 328744641.0561 PWWGT93 = 328706094.9639 PWWGT94 = 328712116.3040 PWWGT95 = 328771161.5315 PWWGT96 = 328798822.9062 PWWGT97 = 328725925.7134 PWWGT98 = 328771795.6428 PWWGT99 = 328737635.4229 PWWGT100 = 328717267.7007 PWWGT101 = 328709724.0182 PWWGT102 = 328790714.6997 PWWGT103 = 328782682.0482 PWWGT104 = 328719235.7349 PWWGT105 = 328674283.7585 PWWGT106 = 328736494.2783 PWWGT107 = 328730188.2337 PWWGT108 = 328747284.0615 PWWGT109 = 328695668.0301 PWWGT110 = 328661008.0659 PWWGT111 = 328735806.0450 PWWGT112 = 328754795.5825 PWWGT113 = 328739203.7255 PWWGT114 = 328717052.4948 PWWGT115 = 328666917.5005 PWWGT116 = 328693479.1692 PWWGT117 = 328805118.7496 PWWGT118 = 328690342.0264 PWWGT119 = 328693526.9530 PWWGT120 = 328676309.5890 PWWGT121 = 328762373.3243 PWWGT122 = 328655212.9342 PWWGT123 = 328699540.5700 PWWGT124 = 328728043.2024 PWWGT125 = 328781456.2994 PWWGT126 = 328724107.0295 PWWGT127 = 328747120.5235 PWWGT128 = 328715701.5298 PWWGT129 = 328749095.8318 PWWGT130 = 328758718.4083 PWWGT131 = 328737197.0284 PWWGT132 = 328707319.5796 PWWGT133 = 328676922.0081 PWWGT134 = 328720863.6973 PWWGT135 = 328736755.8431 PWWGT136 = 328728236.3370 PWWGT137 = 328688366.0417 PWWGT138 = 328708760.2445 PWWGT139 = 328713659.7163 PWWGT140 = 328726956.4059 PWWGT141 = 328792173.1391 PWWGT142 = 328790629.5321 PWWGT143 = 328712469.8381 PWWGT144 = 328756683.1858 PWWGT145 = 328688884.5844 PWWGT146 = 328715422.1778 PWWGT147 = 328695747.3840 PWWGT148 = 328710487.4177 PWWGT149 = 328675040.8295 PWWGT150 = 328720243.2325 PWWGT151 = 328721626.7379 PWWGT152 = 328694116.9900 PWWGT153 = 328744448.5963 PWWGT154 = 328696792.9411 PWWGT155 = 328738815.4213 PWWGT156 = 328713133.0398 PWWGT157 = 328738911.1224 PWWGT158 = 328670591.0386 PWWGT159 = 328688788.6383 PWWGT160 = 328690002.9811 */ %macro total; data _null_; retain tot_pwwgt0-tot_pwwgt160 0; set sas.repwgt_2022 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;