Publicado el Dejar un comentario

Exportar a Excel

import_export_excel_mybusinessposEste ejemplo muestra cómo exportar a excel

Sub Main()
Dim Xls
Dim xlsText
Dim xlsNumber

xlsText = 2
xlsNumber = 1

Set Xls = NewExcel()

Xls.CreateFile "c:\prueba.xls"

' 1.- Tipo de dato de texto o numerico
' 2.- el tipo de fuente 0, 64, 128, 192
' 3.- La alineación donde 0 = General, 1 = Izquierda, 2 = Centrado, 3 = Derecha
' 4 = Justificado, 8 = Borde de la izquierda, 16 = Borde de la derecha
' 32 = Borde superior, 64 = Borde inferior, 128 = Sombreado
' 4.- Propìedades de la celda 0 = Normal, 64 = Bloqueado, 128 = Oculto
' 5.- Renglon
' 6.- Columna

Xls.WriteValue (xlsText), 192, 0, 0, 1, 1, "MyBusiness POS SUGERIDO DE COMPRAS"
Xls.WriteValue (xlsText), 128, 0, 0, 2, 1, "Esto va en en el renglon 1 columna 1"
Xls.WriteValue (xlsNumber), 64, 0, 0, 3, 1, 4567
Xls.WriteValue (xlsNumber), 0, 0, 0, 4, 1, 4567
Xls.CloseFile

If Question( "Desea abrir este archivo ahora" ) Then
' hWnd es una variable public que contiene un entero que identifica a la ventana
' que manda ejecutar el proceso
ShellRun hWnd, "Open", "c:\prueba.xls"
End If

End Sub

Publicado el Dejar un comentario

Mostrar Corte Z en android

Envíanos un Whats al 7222816462 y te asesoraremos a la brevedad en este tema.

image

Buen día.

Quiero compartir con ustedes este desarrollo en android, en el cual veremos el resultado del corte Z que se realizaron en el sistema. Podremos copiarlo y enviarlo por correo desde el mismo smartphone.

Este desarrollo solo tendrá un pequeño costo de recuperación de 200 pesitos, para curarla.

Saludos

José Félix

Publicado el Dejar un comentario

Quitar permiso de modificar precio

En ocasiones necesitamos bloquear permiso a usuarios limitados acerca del cambio de precios en el punto de venta.
Sin embargo, algunas versiones de mybusiness POS omite esta restricción o está incompleta. Como alternativa, quiero compartir con ustedes este bloque de código que oculta la columna de precio unitario a los usuarios que no tienen permiso de modificar el precio de venta.

Para comenzar, modificaremos el procedimiento PUNTOV001, el cual se encuentra en ConfiguraciÓn–Personalización–Procedimientos y rutinas de usuario–PUNTOV001

Nos vamos hasta el final del código e identificamos esta línea

End Sub 'Esta es la ultima línea

Antes de esta, colocaremos el bloque de código y quedaría así:

'validamos que sea un usuario con permisos para cambiar precio
Set rstUsuario = Rst( _
"SELECT * FROM usuventas WHERE usuario = '" & Ambiente.Uid & "'", Ambiente.Connection )

If Not rstUsuario.EOF Then
If rstUsuario(“Precio”) = 0 Then
fg2.ColWidth(15) = 0
‘Exit Sub
End If
End If
‘Finaliza la validación de usuario con privilegios

End Sub ‘Esta es la ultima línea
‘ .

Guardamos los cambios.

Ahora vamos a configurar el usuario limitado en Configuracion–Usuarios
Daremos clic derecho en el usuario y seleccionamos Derechos de Ventas. Deshabilitaremos la opción Cambiar Precio de Venta

Publicado el 1 comentario

Cambiar venta de moneda MXN a USD

En zonas fronterizas, las ventas en ocasiones son en pesos mexicanos y en otras se aplican en usd. Más allá de las reformas fiscales y contables, esta actividad se lleva a cabo en más de un negocio.

El punto de venta tiene un código que puede ser de utilidad, solo hay que escribir esta sintaxis:

MONEDA[espacio]CLAVE_MONEDA

Así, si nuestra moneda base es peso mexicano MXN, podemos hacer ventas en USD. Solo escribiremos:

MONEDA USD

En ese momento el sistema cambiará de acuerdo al tipo de cambio que hayamos aplicado en el sistema.

Si queremos que la moneda se convierta a peso mexicano, escribiremos

MONEDA MXN

Ya con eso es suficiente para que el sistema muestre la venta en pesos.

Cabe mencionar que una vez que cerramos el punto de venta, si lo abrimos nuevamente  el sistema iniciará con el tipo de cambio de la moneda base, en nuestro caso, peso mexicano.

Una segunda observación es que al cambiar de tipo de cambio, el sistema recalcula importes con el precio de venta que tiene el catálogo de productos.

Más info, en este enlace directo www.banxico.org.mx/contacto/whatsapp/   

El siguiente proyecto permite conectar mediante soap al Web Service de Banco de México para obtener el tipo de cambio actual desde Excel y desde .paq

Este es el tipo de cambio actual, el cual verás tambien en Excel: