Resultados de la búsqueda para: ayuda configurar impresora comanda corte

Publicado el por — 5 comentarios

Error de sistema: -2147217913

Error_mybusinesspos_codigo_duro_58Error de sistema: -2147217913 The conversion of a char data type to a datetime data type resulted in an out-of-range datetime value.

Este error aparece cuando intentamos dar formato (año-mes-dia) a una fecha para aplicarlo en una consulta que solo acepta la estructura (dia-mes-año). Por ejemplo:


Set rstCorte = Rst("SELECT top 1 * FROM corteszx WHERE corte = 'z' and usufecha = '" & Libreria.Formato(date, "yyyy-mm-dd") & "' " , Ambiente.Connection )

El error se soluciona al modificar el orden de dia-mes-año de esta manera: Libreria.Formato(date, “dd-mm-yyyy”)

Set rstCorte = Rst("SELECT top 1 * FROM corteszx WHERE corte = 'z' and usufecha = '" & Libreria.Formato(date, "dd-mm-yyyy") & "' " , Ambiente.Connection )

Descargar Reinicia SQL Server.bat

Este pequeño archivo .bat permite reiniciar el Servicio de SQL server,

es como si apagara y encendiera su equipo servidor.

jofelchez@gmail.com Se Recomienda Descargar con Google Chrome

Escribe comentarios respecto a este Archivo, para realizar las mejoras necesarias

Publicado el por — 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 por — 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 por — 11 comentarios

Colocar logo en ticket USB


La ruta donde encontramos el formato de ticket dentro del business manager es: Configuración–Presonalización–Formatos del sistema–Ticket USB
Trataremos de identificar la línea que dice IniciaDocumento y debajo de esta podemos colocar el logo


IniciaDocumento 'tratamos de identificar esta línea, indica el inicio de la impresión

'Ruta del logo: C:\archivos de programa\MyBusiness POS 2012\images\logo.jpg
'El logo debe tener extensión logo.jpg
' Los valores Col(0), Row(0), Col(3),Row(4) son las coordenadas inicio y el tamaño

Picture Ambiente.path & "\Images\logo.jpg", Col(0), Row(0), Col(3),Row(4)
'EstableceImpresora "Mi Impresora laser" 'esta linea permite elegir impresora USB destino
EstableceFuente "Courier New", 8 'Fuente que tendra el ticket USB
Say 0,0.2, cSalida 'Alineación del texto, en pulgadas. cSalida es el texto a imprimir

FinDocumento 'Termina la Impresión USB
'