In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Columna no editable no se ve Browse hasta pasar a la siguiente linea

Foro público de Xailer en español
User avatar
MarceloAR
Posts: 2
Joined: Sun Dec 01, 2019 2:38 pm
Location: Argentina
Contact:

Columna no editable no se ve Browse hasta pasar a la siguiente linea

Postby MarceloAR » Wed Jan 22, 2020 6:17 pm

Hola buenas tardes, como bien puse en el asunto, estoy armando un facturador y en los items del comprobante hay columnas no editable y por lo tanto no las puedo ver hasta terminar la edición de la fila.
Tal vez sea una tontera pero no logro solucionarlo.
Les comparto parte del código y también una liga a un video para que se logre entender bien el problema.
http://samvt.com.ar/xailer/facturador.mp4

Code: Select all

METHOD edClienteExit( oSender, oNextCtl ) CLASS TFacturaFrm

   LOCAL frm

   IF Empty( oSender:value )
      MsgInfo( "Debes ingresar un Cliente para realizar la búsqueda", "Aviso del Sistema" )
      RETURN NIL//.f.
   ELSE

      // Llamo el browse para buscar y seleccionar el cliente
      WITH object frm := TClienteBuscar()
         :cWhere += " AND nombre LIKE '%" + AllTrim( oSender:value ) + "%'"
         :New()
         :ShowModal()
      END
      IF frm:nID <> 0
         ::IdCliente         := frm:nID
         ::edCliente:value   := frm:cNombre
         ::edDomicilio:value := frm:cDomicilio
         ::edLocalidad:value := frm:cLocalidad
         ::edIva:value       := frm:cIva
         ::edCuit:value      := frm:cCuit
      ENDIF

      oNextCtl:setFocus()

   ENDIF

RETURN NIL

Saludos y gracias de antemano.
Marcelo Roggeri
Argentina
hgarciaj
Posts: 86
Joined: Thu Sep 23, 2010 12:44 am

Re: Columna no editable no se ve Browse hasta pasar a la siguiente linea

Postby hgarciaj » Tue Jan 28, 2020 2:15 am

Marcelo:
En el evento onexit de la columna codigo ejecuta el método :setvalue(numcol,xvalor) de tu browse y con ello se actualiza al tiempo que se cambia a la siguiente columna
Saludos
Héctor García

Return to “Spanish”