Determine if Caps Lock On

Is there a way in Acucobol to determine if the keyboard Caps lock is on?  We would like to display a message when one of our users is entering a password and their keyboard's Caps lock is on.

Thanks.