Resultados de la búsqueda para: comando configurar impresora

Publicado el por — 7 comentarios

Imprimir una remisión de más de una hoja (solución)

Hoy voy a compartir con ustedes el tip sobre la impresión de una remisión o cualquier otro documento en tamaño carta que tenga bastantes partidas.

El código se encuentra en la siguiente ruta, dentro del sistema MyBusinessPOS:

Configuración–Personalización–Formatos del Sistema. Ahi se encuentra el formato REMISIONES

Damos doble clic y podemos modoficarlo. Dentro del reporte encontramos un bloque grande IF. Antes de que termine el bloque IF y FinDocumento, colocamos el siguiente código:

'-----------------------------------------------------------------------------------------------------------------------------------
'-----------------------------------------------------------------------------------------------------------------------------------
'2011-04-01
'Jose Felix jofelchez@gmail.com
'ESTE BLOQUECITO DE CÓDIGO ES EL QUE PERMITE QUE SE REALICE EL SALTO DE PÁGINA
'

if val2(Row( Incremento )) > 0.025 Then 'EN ESTE CASO, EL VALOR 0.025 SON PULGADAS
Incremento = 1
PaginaNueva
end if

'-----------------------------------------------------------------------------------------------------------------------------------
'-----------------------------------------------------------------------------------------------------------------------------------

Incremento = Incremento + 1
rstPartidas.MoveNext
Wend

End If

Guardamos y listo

Pero no se preocupen si les parece confuso, les dejo tambien el código fuente y el archivo .paq; y como siempre les recomiendo que antes de hacer pruebas, se haga un respaldo. Este es el link de descarga:

remision en varias paginas EJEMPLO.paq

REMISION_VARIAS_PAGINAS_Ejemplo_codigo_TEXTO

Publicado el por — 8 comentarios

Cómo Instalar My Business POS

Hay muchas personas interesadas en la instalación de la versión 2010.
Sin embargo se presentan diferencias y problemas mayores a los que nos enfrentamos con la versión 2006. En el sitio oficial de MyBusiness POS encontramos el tutorial de la instalación. Aquí les dejo el link para el video de la instalación de My Business POS
Publicado el por — 29 comentarios

Administrar la Base de Datos de My Business POS: Navicat

navicat_mybusinessposEn ocasiones queremos saber cómo se llaman las tablas y columnas de la Base de Datos, con el fin de hacer reportes y formatos personalizados. Navicat Portable es uno de los programas más amigables para administrar, como si estuviese en SQL o Access. Aquí nos damos cuenta de que el sistema está conformado por 252 tablas, pero de estas solo utilizamos cerca de la mitad, dependiendo del giro de la empresa. El link para descargar el software es el siguiente: Navicat.Portable.8.0.23 Como su nombre lo indica, este programa se puede ejecutar desde una memoria usb o cualquier otro medio de lectura-escritura, pero es recomendable que sea alojado en la pc donde se va a trabajar. Una vez descargado el archivo, lo descomprimimos y colocamos el archivo ejecutable en alguna carpeta en la unidad C. Podemos crear un acceso directo a este programa dando clic derecho sobre el ejecutable – después seleccionamos enviar a – seleccionamos Escritorio (Acceso Directo). Una vez ejecutado el programa, para conectarnos a MyBusinesPOS de forma local, Damos clic en Connection, después solo escribimos el nombre a la conexión y aceptar.

Las tablas más comunes que podemos visualizar (mas no modificar, al menos de que estemos seguros de lo que estamos realizando) son:

  • -prods (Catálogo de productos, precios y existencias)
  • -movsinv (para el kardex)
  • -clients
  • -ventas
  • -partvta
  • -clavesadd (Presentaciones del producto)
  • -ventas
  • -compras entre otras

Solo hay una recomendación: para evitar errores en el sistema, debemos evitar el uso de esta herramienta para hacer modificaciones en las tablas, sobre todo en aquellas que están relacionadas con los inventarios.

Publicado el por — 6 comentarios

Cambios y Devoluciones (Solucionado) My Business POS

¿CÓMO HACER LA DEVOLUCIÓN Y EL PAGO DE UN TICKET DESDE EL PUNTO DE VENTA?

La devolución del ticket le permite tener un mejor control el sus inventarios y flujo de caja ya que al hacer la devolución generará una nota de crédito o un vale (dependiendo de la versión que tenga del software) que le permitirá hacer el pago de la devolución o el canje por otro articulo de igual o mayor valor pagando la diferencia.

 

Y se hace la de la siguiente manera:

  1. Presiona F2 y elige la opción “Devolución de un ticket” o //DEV

 

 

 

  • Selecciona el numero de ticket que deseas devolver (para usted como usuario es bueno recomendar a sus clientes que conserven su ticket para hacer una devolución rápida )

     

  • Le aparecerán las partidas del ticket del cual deberá seleccionar el articulo que desea devolver dando in clic sobre la partida y la cantidad que desea devolver

     

  • Coloque la cantidad de productos va a devolver y un clic en Aceptar.

     

  • Posteriormente presione F5 para confirmar la devolución

     

  • En la parte inferior de la izquierda le aparecerá el numero de devolución de la venta

     

  • Si desea hacer el pago de la devolución presione F2 y elija “Pago de Devolución”

     

  • Seleccione el numero de devolución que va apagar selecciónelo y de un clic en aceptar.

     

  • Aparecerá un mensaje en la parte inferior de la izquierda confirmando el pago de la devolución




 

Publicado el por — 45 comentarios

Etiquetas de Código de Barras en Hoja Tamaño Carta

Icono

Editor de Etiquetas, generar e imprimir código de barras

1 archivo(s) 16.34 KB
Descarga

Icono

Código de barras en hoja Carta

1 archivo(s) 88.00 KB
Descarga

El generador de etiquetas de MyBusiness POS 2006 es una herramienta muy útil para la empresa. Sin embargo, en ocasiones es necesario hacer las adaptaciones necesarias para que se adapte la “caída” sobre hojas tamaño carta con etiquetas.
El código más común es el CODE39.   Este va a ser creado dentro de la siguiente ruta del Business Manager: personalización…formatos del sistema….(aquí creamos un nuevo archivo, llamado CODE39_AJUSTADO,  escribimos en el grupo ETIQUETAS, para que pueda ser utilizado desde la ventana etiquetas)
A continuación se muestra el código:

Public Sub Main()

‘TIPO DE PAPEL: 6287 T. CARTA
‘MARCA DE PAPEL: BIC PIMACO
‘ETIQUETAS/HOJA: 80
‘CONSEGUIRLO EN OFFICE DEPOT
‘IMPRESORA LÁSER
‘cada milimetro es equivalente a 57.1428571428571 pixels

IniciaDocumento

‘DEBIDO A QUE NUESTRA HOJA TIENE VARIAS FILAS Y COLUMNAS, SOLICITAMOS A PARTIR DE QUÉ FILA Y COLUMNA SE DEBE EMPEZAR A IMPRIMIR, POR SI EN ALGUN MOMENTO ESTÁ CASI COMPLETA LA HOJA

nColumna = InputBox( “Comenzar con la columna no.:”, 0 )
nFila = InputBox( “Comenzar con la fila no.:”, 0 )

‘EN CASO DE QUE SE CONTESTE 0 EN ALGUNO DE LOS CASOS, NO SE IMPRIMIRÁ NADA
if Val2( nColumna ) <= 0 Then
Exit Sub
end if

if Val2( nFila ) <= 0 Then Exit Sub end if ‘REALIZAMOS LA CONSULTA Set rstProds = CreaRecordSet( “SELECT * FROM prods WHERE etiquetas > 0 ORDER BY articulo”, Ambiente.Connection )

‘ESPECIFICAMOS EL LA SEPARACIÓN ENTRE CADA ETIQUETA, EN PIXELES, TANTO EN X(HORIZONTAL) COMO Y(VERTICAL)
nX = 2714.28571428571
nY = 725.714285714286

‘DEFINIMOS LOS MÁRGENES DE LA HOJA, EL SUPERIOR Y EL IZQUIERDO
nMargensuperior = 400
nMargenIzquierda = 828.57

While Not rstProds.EOF

cArticulo = Trim( rstProds(“articulo”) )
cDescrip = Trim( Mid(rstProds(“descrip”),1,16) ) & ” ” & Trim( rstProds(“modelo”) ) & ” ” & Trim( rstProds(“talla”) ) & ” ” & Formato( rstProds(“precio1?), “$##,##0.00? )
cEmpresa = Ambiente.Empresa

For i = 1 To rstProds(“Etiquetas”)

‘AQUÍ SE REALIZAN LAS OPERACIONES CON LAS VARIABLES QUE ANTES HABÍAMOS DEFINIDO
PosicionX = ((nX * nColumna) – nX) + nMargenIzquierda
PosicionY = ((nY * nFila) – nY) + nMargensuperior

‘EN LA SIGUIENTE LÍNEA, EL 10 ES EL GROSOR DE LAS BARRITAS, EL 200 ES LA ALTURA (EN PIXELS) DEL CÓDIGO DE BARRAS
Codigo39 PosicionX, PosicionY, 10, 200, cArticulo, True,, cDescrip

nColumna = nColumna + 1

‘EN EL SIGUIENTE BLOQUE ESPECIFICAMOS CUÁNTAS COLUMNAS VA A TENER LA HOJA TAMAÑO CARTA (EN ESTE CASO, 4)
if nColumna > 4 Then
nColumna = 1
nFila = nFila + 1
end if

if i = rstProds(“Etiquetas”) Then
Exit For
end if

‘EN EL SIGUIENTE BLOQUE ESPECIFICAMOS CUÁNTAS FILAS VA A TENER LA HOJA TAMAÑO CARTA (EN ESTE CASO, 20)
if nFila > 20 Then
nFila = 1
PaginaNueva

end if
Next
rstProds.MoveNext
Wend
FinDocumento
End Sub

 

Y listo!!!
ya tenemos nuestro formato totalmente funcional para imprimir.
Cabe aclarar que el rendimiento de una impresora láser es menor a comparación de una impresora especial para etiquetas, ya que la primera no está totalmente diseñada para este fin.

Espero sus comentarios y dudas.