Joao y José: Gracias por molestarse!!! Algo debo esta haciendo mal ( muy Mal ) No logro hacerlo funcionar. mi fuente es asi: ..... REDEFINE GET oRamo VAR nRamo PICTURE "99" ID Ma_Ramo OF oDlgMa valid veoramo(@nRamo,@cVeoRamo) .and. (oRamo:Refresh(),oVeoRamo:Refresh(),.t.) ...