** SAS code for "Size for Gestational Age" ** ** The following SAS code was developed for determining ** size for gestational age, based on the tables from Kramer, MS ** et al. “Fetal Health Study group of the Canadian Perinatal ** Surveillance System. A new and improved population-based ** Canadian reference for birth weight for gestational age". ** Pediatrics, 2001; 108(2):1-7. ***********************************************; proc format; value $pregl '0' = '0. missing or invalid combination' '1' = '1. Preterm-Acceptable wght for GA' '2' = '2. Preterm-Small wght for GA' '3' = '3. Preterm-Large wght for GA' '4' = '4. Term-Acceptable wght for GA' '5' = '5. Term-Small wght for GA' '6' = '6. Term-Large wght for GA' '7' = '7. PostTerm-Acceptable wght for GA' '8' = '8. PostTerm-Small wght for GA' '9' = '9. PostTerm-Large wght for GA'; run; data liveborn; set liveborn; pregout= '0' ; if (nbgestpb le 22 and sex = '1' and nbweight le 400) then pregout='2' ; else if (nbgestpb le 22 and sex = '1' and (nbweight ge 401 and nbweight le 587)) then pregout='1'; else if (nbgestpb le 22 and sex = '1' and nbweight gt 587) then pregout='3' ; else if (nbgestpb le 22 and sex = '2' and nbweight le 384) then pregout='2' ; else if (nbgestpb le 22 and sex = '2' and (nbweight ge 385 and nbweight le 552)) then pregout='1' ; else if (nbgestpb le 22 and sex = '2' and nbweight gt 552) then pregout='3' ; else if (nbgestpb=23 and sex = '1' and nbweight le 474) then pregout='2' ; else if (nbgestpb=23 and sex = '1' and (nbweight ge 475 and nbweight le 714)) then pregout='1' ; else if (nbgestpb=23 and sex = '1' and nbweight gt 714) then pregout='3' ; else if (nbgestpb=23 and sex = '2' and nbweight le 449) then pregout='2' ; else if (nbgestpb=23 and sex = '2' and (nbweight ge 450 and nbweight le 669)) then pregout='1' ; else if (nbgestpb=23 and sex = '2' and nbweight gt 669) then pregout='3' ; else if (nbgestpb=24 and sex = '1' and nbweight le 546) then pregout='2' ; else if (nbgestpb=24 and sex = '1' and (nbweight ge 547 and nbweight le 844)) then pregout='1' ; else if (nbgestpb=24 and sex = '1' and nbweight gt 844) then pregout='3' ; else if (nbgestpb=24 and sex = '2' and nbweight le 512) then pregout='2' ; else if (nbgestpb=24 and sex = '2' and (nbweight ge 513 and nbweight le 790)) then pregout='1' ; else if (nbgestpb=24 and sex = '2' and nbweight gt 790) then pregout='3' ; else if (nbgestpb=25 and sex = '1' and nbweight le 616) then pregout='2' ; else if (nbgestpb=25 and sex = '1' and (nbweight ge 617 and nbweight le 981)) then pregout='1' ; else if (nbgestpb=25 and sex = '1' and nbweight gt 981) then pregout='3' ; else if (nbgestpb=25 and sex = '2' and nbweight le 577) then pregout='2' ; else if (nbgestpb=25 and sex = '2' and (nbweight ge 578 and nbweight le 918)) then pregout='1' ; else if (nbgestpb=25 and sex = '2' and nbweight gt 918) then pregout='3' ; else if (nbgestpb=26 and sex = '1' and nbweight le 685) then pregout='2' ; else if (nbgestpb=26 and sex = '1' and (nbweight ge 686 and nbweight le 1125)) then pregout='1' ; else if (nbgestpb=26 and sex = '1' and nbweight gt 1125) then pregout='3' ; else if (nbgestpb=26 and sex = '2' and nbweight le 644) then pregout='2' ; else if (nbgestpb=26 and sex = '2' and (nbweight ge 645 and nbweight le 1060)) then pregout='1' ; else if (nbgestpb=26 and sex = '2' and nbweight gt 1060) then pregout='3' ; else if (nbgestpb=27 and sex = '1' and nbweight le 762) then pregout='2' ; else if (nbgestpb=27 and sex = '1' and (nbweight ge 763 and nbweight le 1278)) then pregout='1' ; else if (nbgestpb=27 and sex = '1' and nbweight gt 1278) then pregout='3' ; else if (nbgestpb=27 and sex = '2' and nbweight le 716) then pregout='2' ; else if (nbgestpb=27 and sex = '2' and (nbweight ge 717 and nbweight le 1218)) then pregout='1' ; else if (nbgestpb=27 and sex = '2' and nbweight gt 1218) then pregout='3' ; else if (nbgestpb=28 and sex = '1' and nbweight le 852) then pregout='2' ; else if (nbgestpb=28 and sex = '1' and (nbweight ge 853 and nbweight le 1445)) then pregout='1' ; else if (nbgestpb=28 and sex = '1' and nbweight gt 1445) then pregout='3' ; else if (nbgestpb=28 and sex = '2' and nbweight le 801) then pregout='2' ; else if (nbgestpb=28 and sex = '2' and (nbweight ge 802 and nbweight le 1390)) then pregout='1' ; else if (nbgestpb=28 and sex = '2' and nbweight gt 1390) then pregout='3' ; else if (nbgestpb=29 and sex = '1' and nbweight le 963) then pregout='2' ; else if (nbgestpb=29 and sex = '1' and (nbweight ge 964 and nbweight le 1629)) then pregout='1' ; else if (nbgestpb=29 and sex = '1' and nbweight gt 1629) then pregout='3' ; else if (nbgestpb=29 and sex = '2' and nbweight le 902) then pregout='2' ; else if (nbgestpb=29 and sex = '2' and (nbweight ge 903 and nbweight le 1578)) then pregout='1' ; else if (nbgestpb=29 and sex = '2' and nbweight gt 1578) then pregout='3' ; else if (nbgestpb=30 and sex = '1' and nbweight le 1098) then pregout='2' ; else if (nbgestpb=30 and sex = '1' and (nbweight ge 1099 and nbweight le 1837)) then pregout='1' ; else if (nbgestpb=30 and sex = '1' and nbweight gt 1837) then pregout='3' ; else if (nbgestpb=30 and sex = '2' and nbweight le 1021) then pregout='2' ; else if (nbgestpb=30 and sex = '2' and (nbweight ge 1022 and nbweight le 1783)) then pregout='1' ; else if (nbgestpb=30 and sex = '2' and nbweight gt 1783) then pregout='3' ; else if (nbgestpb=31 and sex = '1' and nbweight le 1258) then pregout='2' ; else if (nbgestpb=31 and sex = '1' and (nbweight ge 1259 and nbweight le 2069)) then pregout='1' ; else if (nbgestpb=31 and sex = '1' and nbweight gt 2069) then pregout='3' ; else if (nbgestpb=31 and sex = '2' and nbweight le 1167) then pregout='2' ; else if (nbgestpb=31 and sex = '2' and (nbweight ge 1168 and nbweight le 2004)) then pregout='1' ; else if (nbgestpb=31 and sex = '2' and nbweight gt 2004) then pregout='3' ; else if (nbgestpb=32 and sex = '1' and nbweight le 1443) then pregout='2' ; else if (nbgestpb=32 and sex = '1' and (nbweight ge 1444 and nbweight le 2319)) then pregout='1' ; else if (nbgestpb=32 and sex = '1' and nbweight gt 2319) then pregout='3' ; else if (nbgestpb=32 and sex = '2' and nbweight le 1345) then pregout='2' ; else if (nbgestpb=32 and sex = '2' and (nbweight ge 1346 and nbweight le 2242)) then pregout='1' ; else if (nbgestpb=32 and sex = '2' and nbweight gt 2242) then pregout='3' ; else if (nbgestpb=33 and sex = '1' and nbweight le 1647) then pregout='2' ; else if (nbgestpb=33 and sex = '1' and (nbweight ge 1648 and nbweight le 2580)) then pregout='1' ; else if (nbgestpb=33 and sex = '1' and nbweight gt 2580) then pregout='3' ; else if (nbgestpb=33 and sex = '2' and nbweight le 1547) then pregout='2' ; else if (nbgestpb=33 and sex = '2' and (nbweight ge 1548 and nbweight le 2494)) then pregout='1' ; else if (nbgestpb=33 and sex = '2' and nbweight gt 2494) then pregout='3' ; else if (nbgestpb=34 and sex = '1' and nbweight le 1865) then pregout='2' ; else if (nbgestpb=34 and sex = '1' and (nbweight ge 1866 and nbweight le 2851)) then pregout='1' ; else if (nbgestpb=34 and sex = '1' and nbweight gt 2851) then pregout='3' ; else if (nbgestpb=34 and sex = '2' and nbweight le 1767) then pregout='2' ; else if (nbgestpb=34 and sex = '2' and (nbweight ge 1768 and nbweight le 2761)) then pregout='1' ; else if (nbgestpb=34 and sex = '2' and nbweight gt 2761) then pregout='3' ; else if (nbgestpb=35 and sex = '1' and nbweight le 2090) then pregout='2' ; else if (nbgestpb=35 and sex = '1' and (nbweight ge 2091 and nbweight le 3132)) then pregout='1' ; else if (nbgestpb=35 and sex = '1' and nbweight gt 3132) then pregout='3' ; else if (nbgestpb=35 and sex = '2' and nbweight le 1997) then pregout='2' ; else if (nbgestpb=35 and sex = '2' and (nbweight ge 1998 and nbweight le 3037)) then pregout='1' ; else if (nbgestpb=35 and sex = '2' and nbweight gt 3037) then pregout='3' ; else if (nbgestpb=36 and sex = '1' and nbweight le 2320) then pregout='2' ; else if (nbgestpb=36 and sex = '1' and (nbweight ge 2321 and nbweight le 3411)) then pregout='1' ; else if (nbgestpb=36 and sex = '1' and nbweight gt 3411) then pregout='3' ; else if (nbgestpb=36 and sex = '2' and nbweight le 2226) then pregout='2' ; else if (nbgestpb=36 and sex = '2' and (nbweight ge 2227 and nbweight le 3307)) then pregout='1' ; else if (nbgestpb=36 and sex = '2' and nbweight gt 3307) then pregout='3' ; else if (nbgestpb=37 and sex = '1' and nbweight le 2551) then pregout='5' ; else if (nbgestpb=37 and sex = '1' and (nbweight ge 2552 and nbweight le 3665)) then pregout='4' ; else if (nbgestpb=37 and sex = '1' and nbweight gt 3665) then pregout='6' ; else if (nbgestpb=37 and sex = '2' and nbweight le 2451) then pregout='5' ; else if (nbgestpb=37 and sex = '2' and (nbweight ge 2452 and nbweight le 3543)) then pregout='4' ; else if (nbgestpb=37 and sex = '2' and nbweight gt 3543) then pregout='6' ; else if (nbgestpb=38 and sex = '1' and nbweight le 2765) then pregout='5' ; else if (nbgestpb=38 and sex = '1' and (nbweight ge 2766 and nbweight le 3877)) then pregout='4' ; else if (nbgestpb=38 and sex = '1' and nbweight gt 3877) then pregout='6' ; else if (nbgestpb=38 and sex = '2' and nbweight le 2657) then pregout='5' ; else if (nbgestpb=38 and sex = '2' and (nbweight ge 2658 and nbweight le 3738)) then pregout='4' ; else if (nbgestpb=38 and sex = '2' and nbweight gt 3738) then pregout='6' ; else if (nbgestpb=39 and sex = '1' and nbweight le 2941) then pregout='5' ; else if (nbgestpb=39 and sex = '1' and (nbweight ge 2942 and nbweight le 4049)) then pregout='4' ; else if (nbgestpb=39 and sex = '1' and nbweight gt 4049) then pregout='6' ; else if (nbgestpb=39 and sex = '2' and nbweight le 2824) then pregout='5' ; else if (nbgestpb=39 and sex = '2' and (nbweight ge 2825 and nbweight le 3895)) then pregout='4' ; else if (nbgestpb=39 and sex = '2' and nbweight gt 3895) then pregout='6' ; else if (nbgestpb=40 and sex = '1' and nbweight le 3078) then pregout='5' ; else if (nbgestpb=40 and sex = '1' and (nbweight ge 3079 and nbweight le 4200)) then pregout='4' ; else if (nbgestpb=40 and sex = '1' and nbweight gt 4200) then pregout='6' ; else if (nbgestpb=40 and sex = '2' and nbweight le 2954) then pregout='5' ; else if (nbgestpb=40 and sex = '2' and (nbweight ge 2955 and nbweight le 4034)) then pregout='4' ; else if (nbgestpb=40 and sex = '2' and nbweight gt 4034) then pregout='6' ; else if (nbgestpb=41 and sex = '1' and nbweight le 3178) then pregout='5' ; else if (nbgestpb=41 and sex = '1' and (nbweight ge 3179 and nbweight le 4328)) then pregout='4' ; else if (nbgestpb=41 and sex = '1' and nbweight gt 4328) then pregout='6' ; else if (nbgestpb=41 and sex = '2' and nbweight le 3050) then pregout='5' ; else if (nbgestpb=41 and sex = '2' and (nbweight ge 3051 and nbweight le 4154)) then pregout='4' ; else if (nbgestpb=41 and sex = '2' and nbweight gt 4154) then pregout='6' ; else if (nbgestpb=42 and sex = '1' and nbweight le 3232) then pregout='8' ; else if (nbgestpb=42 and sex = '1' and (nbweight ge 3233 and nbweight le 4433)) then pregout='7' ; else if (nbgestpb=42 and sex = '1' and nbweight gt 4433) then pregout='9' ; else if (nbgestpb=42 and sex = '2' and nbweight le 3113) then pregout='8' ; else if (nbgestpb=42 and sex = '2' and (nbweight ge 3114 and nbweight le 4251)) then pregout='7' ; else if (nbgestpb=42 and sex = '2' and nbweight gt 4251) then pregout='9' ; else if (nbgestpb=43 and sex = '1' and nbweight le 3248) then pregout='8' ; else if (nbgestpb=43 and sex = '1' and (nbweight ge 3249 and nbweight le 4528)) then pregout='7' ; else if (nbgestpb=43 and sex = '1' and nbweight gt 4528) then pregout='9' ; else if (nbgestpb=43 and sex = '2' and nbweight le 3158) then pregout='8' ; else if (nbgestpb=43 and sex = '2' and (nbweight ge 3159 and nbweight le 4333)) then pregout='7' ; else if (nbgestpb=43 and sex = '2' and nbweight gt 4333) then pregout='9' ; if nbgestpb = . then pregout = '0'; if nbweight = . then pregout = '0'; if (nbgestpb < 20 or nbgestpb > 50) then pregout = '0'; if (nbweight < 300 or nbweight > 9000) then pregout = '0'; run;