Whats 7222816462. Mejoramos la experiencia en el Punto de Venta de tu NEGOCIO
Si deseas conocer las tablas que tiene el sistema (compras, ventas, inventario, clientes, proveedores, operaciones), comparto el diccionario de datos
La base de datos tiene aproximadamente 250 tablas.
Las principales tablas son:
-prods
-clavesadd
-movsinv
-entradas
-entpart
-salidas
-salpart
-ventas
-partvta
-flujo
-histcamb
El código fuente de mybusiness pos se encuentra en las tablas:
-FormasDelta
-FormatosDelta
Una fuente apropiada para alinear números en el ticket es la Courier New
Para alinear a la derecha un texto o un número existe la función PadL con esta sintaxis:
PadL (número, cantidad_espacios, relleno)
cDescrip = PadL( Mid( rstPartidas(“Descrip”), 1, 15 ), 15 )
Puede descargar de helpmybusinesspos.info el formato “ticket reducido” y por lo que identifico solo sería necesario quitar a algunas partes el texto que hace los saltos de línea :
& cLineaNueva
Para colocar la línea punteada, identifique la línea sonde dice
cSalida = cSalida & "CANT. DESCRIP. P.U. TOTAL" & cLineaNueva
Y le colocamos este código
cSalida = cSalida & "---------------------------" & cLineaNueva
cSalida = cSalida & "CANT. DESCRIP. P.U. TOTAL" & cLineaNueva
cSalida = cSalida & "---------------------------" & cLineaNueva
Existen varias formas imprimir un ticket de venta tanto en pantalla como en la miniptinter.
El formato de ticket se encuentra en la ruta del business manager: configuración–personalizacion–formatos del sistema–TICKET. Abrir el código con doble clic e ir al final de este hasta identificar esta línea que se refiere a la impresión; ahí es posible aplicar diferentes opciones de impresión:
Script.sendToPrinter Ambiente, (cSalida), prn.Pantalla
Si queremos imprimir en USB, colocar:
'Código para impresora conectada por cable USB
'o para la impresora predeterminada de Windows).
IniciaDocumento
' EstableceImpresora "Mi Impresora laser" 'esta linea permite elegir impresora USB destino
EstableceFuente "Courier New", 8 'Fuente que tendra el ticket USB
Say 0,.2, cSalida 'Alineación del texto, en pulgadas. cSalida es el texto a imprimir
FinDocumento 'Termina la Impresión USB
'Exit Sub
'Exit Sub es por si deseamos que termine el proceso y saltar las lineas de código que le preceden
'
Si deseamos imprimir en impresora conectada por cable LPT:
'Función para impresora conectada por cable LPT
'Impresión de ticket, corteX y CorteZ _
Enviamos a la impresorade tickets que está configurada en ESTACION01
Script.sendToPrinter Ambiente, (cSalida), prn.Pantalla 'cSalida es el texto que se imprimirá
'
Si deseamos ver el texto del ticket en una ventana emergente:
MsgBox ("" & cSalida) 'cSalida es el texto que se visualizará
'
Una segunda opción para visualizar el el texto del ticket en una ventana emergente.
Mymessage "" & cSalida 'cSalida es el texto que se visualizará
'
Si deseamos un Corte Z que consuma menos papel, podemos hacer el siguiente ajuste en la ruta del business manager (Configuración–Personalización–Formatos del sistema–CorteZ). Nos colocamos aproximadamente en la linea 70 e identificamos la linea:
detallado = True
Modificamos esta linea a False y quedará así:
detallado = False
Guardamos y hacemos la prueba
En caso de que necesitemos el corte completo con impuestos, lo podemos hacer el cambio a true y ya aparecerá la información detallada del corte.
