Publicado el Dejar un comentario

Probar con Telnet si está abierto el puerto 1400

Para MyBusinessPOS, la base de datos acepta el almacenamiento y consultas a través del puerto 1400. Este puerto debemos configurarlo en Microsoft SQL Server y en el firewall del servidor de la base de datos.

Hay varias formas de comprobar que el servidor tiene abierto el puerto 1400 para tener acceso desde el la estación de trabajo. Una de las opciones es que desde el equipo del cajero, haremos la prueba a través del comando Telnet (Inicio de windows->Ejecuta->CMD->telnet). Sin embargo, por default Telnet no está habilitado en Windows 7.

¿Como se activan los servicios Telnet en Windows 7?

  1. Ingresar al Panel de Control -> Programas y Características
  2. Ingresar a la opción Activar o Desactivar las Características de Windows (esta opción se encuentra en el Bloque de Programas y Características) .
  3. En el cuadro de dialogo ubica las caracteristicas que quieres activar, en la lista puedes encontrar Cliente Telnet y Servidor Telnet, hay que marcar las casillas de las que quieras activar y dar clic en Aceptar.
  4. Las características se “activan” y una vez concluido el proceso ya están disponibles para su uso.
  5. Para probar que el puerto 1400 está disponible, desde el equipo de la Caja abrimos nuevamente el CMD (Inicio de windows->Ejecuta->CMD) y ejecutamos
    Telnet ip_servidor 1400
    Donde:

    • ip_servidor es la dirección IP de tu equipo donde se encuentra la base de datos.
    • 1400 es el puerto es el número de puesto que deseamos probar si está abierto.
      Aparecerá una pantalla en negro, eso quiere decir que el puerto 1400 está abierto y podemos proceder con conexión de MyBusiness POS desde la estación de trabajo.
Publicado el 3 comentarios

Cómo alinear números en ticket

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 )

Publicado el Dejar un comentario

Cómo quitar espacios y líneas en ticket

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

Publicado el 5 comentarios

Funciones para impresión de Ticket

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á
'

Publicado el Dejar un comentario

Cómo hacer un Corte Z más pequeño?

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.