corregida la logica frmRegObra