Power Builder - Validacion en un SingleLineEdit (Caja de Texto)

Quiero hacer lo siguiente que en una caja de texto(SingleLineEdit) solo me permita el ingreso de numeros, es decir si yo pulso un caracter que no es un numero este no se llegue a imprimir en la caja de texto, es decir solo los números serán mostrados,
como lo puedo hacer he tratado de crear un nuevo evento para el SingleLineEdit que es el (Event_Id) pbm_keydown pero sin obtener el resultado que espero si alguien tiene una idea o un script, se lo
agradecere bastante.

No puedes utilizar un editmask??