Hola gente..
Estoy necesitando armar un xbrowse de carga rápida como para lector de código de barras
para un supermercado.
He visto ejemplos varios algunas veces y ahora que lo necesito no los puedo encontrar.
Me podrían facilitar un ejemplo de algo que seleccione con el código de barras y automáticamente
vaya pasando al próximo renglón??
Muchas muchas gracias!!
Roberto
Xbrowse para carga rápida
- TOTOVIOTTI
- Posts: 430
- Joined: Fri Feb 05, 2010 11:30 am
- Location: San Francisco - Córdoba - Argentina
- Has thanked: 5 times
- TOTOVIOTTI
- Posts: 430
- Joined: Fri Feb 05, 2010 11:30 am
- Location: San Francisco - Córdoba - Argentina
- Has thanked: 5 times
- karinha
- Posts: 7933
- Joined: Tue Dec 20, 2005 7:36 pm
- Location: São Paulo - Brasil
- Been thanked: 3 times
- Contact:
- TOTOVIOTTI
- Posts: 430
- Joined: Fri Feb 05, 2010 11:30 am
- Location: San Francisco - Córdoba - Argentina
- Has thanked: 5 times
Re: Xbrowse para carga rápida
Gracias Joao!
En el get, le das enter y lo pasa al browse.. así sería?
Gracias
En el get, le das enter y lo pasa al browse.. así sería?
Gracias
- karinha
- Posts: 7933
- Joined: Tue Dec 20, 2005 7:36 pm
- Location: São Paulo - Brasil
- Been thanked: 3 times
- Contact:
Re: Xbrowse para carga rápida
Si te entiendo bien vas a usar un Lector de Código de Barras, entonces al pasar el Lector sobre el Código de Barras, disparas con el Código a la BASE DE DATOS DE PRODUCTOS, tomas el Código de Barras del Producto y lo muestras en el LixtBox/xBrowse(), como en una Pantalla de Ventas.
Saludos.
Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
- karinha
- Posts: 7933
- Joined: Tue Dec 20, 2005 7:36 pm
- Location: São Paulo - Brasil
- Been thanked: 3 times
- Contact:
- TOTOVIOTTI
- Posts: 430
- Joined: Fri Feb 05, 2010 11:30 am
- Location: San Francisco - Córdoba - Argentina
- Has thanked: 5 times
Re: Xbrowse para carga rápida
Hola. usas un Get, yo lo uso asi
REDEFINE GET aGets[17] VAR codbarra ID 30 OF oDlg PICTURE "@!" UPDATE
aGets[17]:bKeyDown:={|nKey|If(nkey == VK_RETURN,BuscarProd( @codbarra,oBrw1,aPunto_A,oDlg,TotVal,aGets ), ) }
saludos
REDEFINE GET aGets[17] VAR codbarra ID 30 OF oDlg PICTURE "@!" UPDATE
aGets[17]:bKeyDown:={|nKey|If(nkey == VK_RETURN,BuscarProd( @codbarra,oBrw1,aPunto_A,oDlg,TotVal,aGets ), ) }
saludos