Dear Hans, Your program was quick and efficient. It did it! Thank you for your help. Ali

On 4/14/07, epidata-list-request@lists.umanitoba.ca < epidata-list-request@lists.umanitoba.ca> wrote:

Send EpiData-list mailing list submissions to epidata-list@lists.umanitoba.ca

To subscribe or unsubscribe via the World Wide Web, visit http://lists.umanitoba.ca/mailman/listinfo/epidata-list or, via email, send a message with subject or body 'help' to epidata-list-request@lists.umanitoba.ca

You can reach the person managing the list at epidata-list-owner@lists.umanitoba.ca

When replying, please edit your Subject line so it is more specific than "Re: Contents of EpiData-list digest..."

EpiData-list mailing list ___________________________________

Today's Topics:

1. BMI from US measures (epidata-list@lists.umanitoba.ca)

---

Message: 1 Date: Sat, 14 Apr 2007 00:25:35 +0200 From: epidata-list@lists.umanitoba.ca Subject: [EpiData-list] BMI from US measures To: epidata-list@lists.umanitoba.ca Message-ID: 4620035F.20600@tbrieder.org Content-Type: text/plain; charset=ISO-8859-1; format=flowed

If you do not wish to show conversion of US measures into SI units in the QES file, then your QES file should have this:

*.QES file wtpd Weight in US pounds ###.# htft Height in US feet # htin Height in US inches ## bmi Body Mass Index in kg/m^2 ##.#

You then make all your calculations in the CHK file to get the BMI in SI units:

*.CHK file

• Definitions from Wikipedia
• 1 US foot=(1200/3937) meters
• 1 US inch=25.4 millimeters
• 1 US pound= 453.59237 grams

wtpd MUSTENTER END

htft MUSTENTER END

htin MUSTENTER AFTER ENTRY bmi=(wtpd*0.45359237)/((htft*(1200/3937)+(htin*0.0254))^2) END END

bmi NOENTER END

and that should do it. Beware of empty fields contributing to the denominator. Should that be the case, you must make provisions in the CHK file. The above works only if there are no zeros for the two denominator variables, and not permitting any blank fields.

Hans

-- Hans L Rieder, MD, MPH Jetzikofenstr. 12 3038 Kirchlindach Switzerland

Tel: +41 31 829 4577 Mob: +41 79 321 9122 Web: http://www.tbrieder.org

---

---

EpiData-list@lists.umanitoba.ca http://lists.umanitoba.ca/mailman/listinfo/epidata-list

End of EpiData-list Digest, Vol 42, Issue 7

---