Crystal reports
Publicado por pitus (6 intervenciones) el 02/09/2007 11:59:37
Buenas,
Tengo una tienda y estay haciendo un programilla para controlar las ventas mensuales segun los clientes potenciales y todo eso.
Quiero hacer en crystal reports una especie de tabla que me salga segun el dependiente y el mes (esos datos los entro yo por el teclado), las ventas echas a un cliente cada dia del mes del 1 al 31 de agosto por ejemplo.
Mi duda es como puedo cager el valor de la venta y que me lo ponga debajo de un cuadro de texto con el dia. Lo que me sale es todos los dias la misma cantidad. Tengo dos tablas una que es eqpventa donde hay el codigo de los dependientes y del cliente, la fecha de la venta y la cantidad vendida, la otra tabla hay el codigo del cliente y el nombre del cliente.
Si alguen me pudeira dar alguna pista lo agradeceria mucho.
Gracias por adelante.
Pongo los selects que uso para coger os datos de las tablas:
Try
Cadena = "select * "
Cadena += "from eqpventa where "
Cadena += "cod_dep >='" + (Me.tbcod_dep.Text) + "' "
Cadena += "and data_venta >='" + (Fecha_ini) + "' "
Cadena += "and data_venta <='" + (Fecha_fin) + "' "
Cadena += "order by data_venta"
Adaptador = New SqlClient.SqlDataAdapter(Cadena, Cn1)
Adaptador.Fill(Datos, "eqpventa")
Cadena1 = "select distinct cod_client "
Cadena1 += "from eqpventa where "
Cadena1 += "cod_dep >='" + (Me.tbcod_dep.Text) + "' "
Cadena1 += "and data_venta >='" + (Fecha_ini) + "' "
Cadena1 += "and data_venta <='" + (Fecha_fin) + "' "
Adaptador = New SqlClient.SqlDataAdapter(Cadena1, Cn1)
'Vull mostrar el codi del client i el seu nom en el report
Cadena = "select nom_client "
Cadena += "from eqpclient where "
Cadena += "cod_client ='" + (Cadena1.ToString) + "' "
Adaptador = New SqlClient.SqlDataAdapter(Cadena1, Cn1)
Adaptador.Fill(Datos, "eqpclient")
Catch
Call MsgBox("S'ha produït un error en algun select", MsgBoxStyle.Information, "Error")
End Try
Tengo una tienda y estay haciendo un programilla para controlar las ventas mensuales segun los clientes potenciales y todo eso.
Quiero hacer en crystal reports una especie de tabla que me salga segun el dependiente y el mes (esos datos los entro yo por el teclado), las ventas echas a un cliente cada dia del mes del 1 al 31 de agosto por ejemplo.
Mi duda es como puedo cager el valor de la venta y que me lo ponga debajo de un cuadro de texto con el dia. Lo que me sale es todos los dias la misma cantidad. Tengo dos tablas una que es eqpventa donde hay el codigo de los dependientes y del cliente, la fecha de la venta y la cantidad vendida, la otra tabla hay el codigo del cliente y el nombre del cliente.
Si alguen me pudeira dar alguna pista lo agradeceria mucho.
Gracias por adelante.
Pongo los selects que uso para coger os datos de las tablas:
Try
Cadena = "select * "
Cadena += "from eqpventa where "
Cadena += "cod_dep >='" + (Me.tbcod_dep.Text) + "' "
Cadena += "and data_venta >='" + (Fecha_ini) + "' "
Cadena += "and data_venta <='" + (Fecha_fin) + "' "
Cadena += "order by data_venta"
Adaptador = New SqlClient.SqlDataAdapter(Cadena, Cn1)
Adaptador.Fill(Datos, "eqpventa")
Cadena1 = "select distinct cod_client "
Cadena1 += "from eqpventa where "
Cadena1 += "cod_dep >='" + (Me.tbcod_dep.Text) + "' "
Cadena1 += "and data_venta >='" + (Fecha_ini) + "' "
Cadena1 += "and data_venta <='" + (Fecha_fin) + "' "
Adaptador = New SqlClient.SqlDataAdapter(Cadena1, Cn1)
'Vull mostrar el codi del client i el seu nom en el report
Cadena = "select nom_client "
Cadena += "from eqpclient where "
Cadena += "cod_client ='" + (Cadena1.ToString) + "' "
Adaptador = New SqlClient.SqlDataAdapter(Cadena1, Cn1)
Adaptador.Fill(Datos, "eqpclient")
Catch
Call MsgBox("S'ha produït un error en algun select", MsgBoxStyle.Information, "Error")
End Try
Valora esta pregunta


0