El cargo Total de Caracteres de la descripcion de producto apareció primero en José Félix ♞.

Agregar estas Lineas

txtFields(0).backcolor = vbRed
txtFields(1).backcolor = vbBlack
txtFields(2).backcolor = vbWhite
txtFields(3).backcolor = vbYellow
txtFields(4).backcolor = vbGreen
txtFields(5).backcolor = vbRed
txtFields(6).backcolor = vbBlue
txtFields(7).backcolor = vbCyan
txtFields(8).backcolor = vbMagenta

El cargo Cambio de color forma (Productos) apareció primero en José Félix ♞.

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()

El cargo Compartiendo Codigo (Crear Reporte) apareció primero en José Félix ♞.

1.-Muestra la malla de los productos.
2.-Muestra la malla de las existencias en almacén
3.-Cambio de Almacén

El cargo CAMBIO DE ALMACEN (PRODUCTO) apareció primero en José Félix ♞.

Mas Info …..

El cargo Crear Barra de Menu en MyBusinessPOS (2006,2008,2010,2011,2012) apareció primero en José Félix ♞.