Publicado el Dejar un comentario

Forma Alta de Clientes creada en :net y Conexión a MybusinessPOS

La creación de esta forma de Clientes (en .net ) es para visualizar los clientes registrados en MybusinessPOS,
se integra la solución en un equipo sin la instalacion de mybusinesspos, logrando la conexión, a la
base de datos,visualizar,alta,modificacion e incluso eliminacion.

Nestor Guzmán
Desarrollador de Soluciones

Publicado el Dejar un comentario

Compartiendo Codigo (Crear Reporte)

Mediante estas lineas se creara un reporte de articulos.
Tabla Prods
articulos
descrip
precio1
existencia
lineas

1.-Business Manager
2.-Reportes
3.-Nuevo

pegar estas lineas

          IniciaDocumento()

' El reporte lo queremos horizontal   

rem articulo,descrip,existencia,precio1,unidad,linea
rem son los registros de la tabla prods

      strSQL = "" 
      strSQL = strSQL & "SELECT "
      strSQL = strSQL & "prods.articulo, " 
      strSQL = strSQL & "prods.descrip, "
      strSQL = strSQL & "prods.existencia, "
      strSQL = strSQL & "prods.precio1, "
      strSQL = strSQL & "prods.unidad, "
      strSQL = strSQL & "prods.linea " 
    ' la tabla es prods
      strSQL = strSQL & "FROM prods "
      strSQL = strSQL & "WHERE prods.articulo <> 'SYS' "
      strSQL = strSQL & cCondicion
      strSQL = strSQL & "ORDER BY prods.articulo "
      Reporte.SQL = strSQL 
      Reporte.RetrieveColumns   

'   Coloca el titulo del registro
      Reporte.Columns("articulo").Titulo = "ARTICULO"  
      Reporte.Columns("Descrip").Titulo = "DESCRIPCION"

'Coloca el formato de salida del registro existencia
      Reporte.Columns("existencia").Formato = "##0.0"



      Reporte.ImprimeReporte
FinDocumento()