Publicado el Dejar un comentario

Zebra 2844 USB

zebra2844_mybusinessposLa impresora Zebra que se conecta por cable USB se comporta de forma similar a cualquier otra impresora de tickets y puede programarse como tal; por ejemplo, vemos que tiene las funciones IniciaDocumento y FinDocumento.



Sub Main()
Dim rstProds
Dim n

Set rstProds = CreaRecordSet( _
“SELECT * FROM prods WHERE etiquetas > 0”,_
Ambiente.Connection )

While Not rstProds.EOF

For n = 1 To rstProds(“etiquetas”)
ImprimeEtiqueta rstProds
Next

rstProds.MoveNext

Wend

End Sub

Sub ImprimeEtiqueta( rstProds )

‘EstableceImpresora “ZDesigner LP 2844”
IniciaDocumento

EstableceFuente “C39HrP24DhTt”,35
Say 5.25, 3.53, “*” & Trim(rstProds(“articulo”)) & “*”
EstableceFuente “Times New Roman”, 9
Say 5.1, 3.53, “$ ” & PadL(Formato( rstProds(“precio1”), Ambiente.FDinero ),6)
‘Trim(rstProds(“Descrip”))

FinDocumento

End Sub

Publicado el 3 comentarios

Como colocar Impuesto Especial a los artículos en MyBusiness POS

Debido a la cantidad de impuestos especiales que han surgido desde hace algunos años y los recientes que a nuevos productos, el sistema MyBusiness POS tiene definido un campo para los impuestos especiales en cada uno de los artículos que lo requieran.

Para agregar un impuesto especial, abrimos la ventana de artículos, posteriormente seleccionamos la pestaña observaciones y entre los campos se encuentra el espacio para impuesto especial. Colocamos el importe especial y guardamos el artículo