none
Factura en Visual Basic 6.0 RRS feed

  • Pregunta

  • Buen dia, nuevamente por aqui para realizar una consulta que espero alguien me pueda apoyar.

    He realizado un sistema de servicios medicos con Visual Basic 6 y SQL Server con conexiones por Ado. Todo bien, pero uno de los puntos mas importantes que es la elaboracion de una factura no he podido realizar.

    Hay una tabla Notas, otra tabla cargos.
    En la tabla notas esta codigo de servicio medico "NotCodServ", nombre del servicio "NotNomServ" Fecha del servicio "NotFecha" y cantidad de servicios "CodCant"
    En la tabla cargos esta los insumos y elementos usados en cada servicio prestado. Codigo de insumo "CarCodIns" cantidad de ese codigo "CarCodCant" y fecha de uso "CarFecha" y llave foranea de admision "CarCodAdm" (esta llave foranea es la primaria de Notas, asi se identifica que cargo corresponde a que servicio).

    En la factura busco por fechas es decir ejemplo: voy a facturar del 01/07/2018 al 31/07/2018. El resultado me lo trae en dos datagrid. El primero me trae las notas en ese rango de fechas y el segundo los cargos en ese rango de fechas y me lo mustra asi.

    Datagrid 1

    Fecha Item Cantidad
    01/01/2018 Servicio medico X 1
    03/01/2018 Servicio medico X 1
    05/01/2018 Servicio medico X 1
    10/01/2018 Servicio medico X 1
    20/01/2018 Servicio medico X 1

    Datagrid 2

    Fecha Item Cantidad
    01/01/2018 Gasas 1
    03/01/2018 Gorros Medicos 1
    05/01/2018 Gasas 1
    10/01/2018 Gorros Medicos 1
    20/01/2018 Gasas 1

    Es aqi mi dolor de cabeza:

    Lo que nesesito es que me totalize todo y no se repita el item, debo exportar eso para una factura ya sea en un datareport o un MDI no importa.

    Item Cantidad
    Servicio medico X 5
    Gasas 3
    Gorros medicos 2

    Que se totalize y no se repita (aqui no trae fechas)

    Agradezco mucho a quien me pueda colaborar con esta trise inquietud que me ha dado dolor de cabeza muchooo.

    Gracias
    domingo, 5 de agosto de 2018 17:16

Todas las respuestas

  • Tenes que agrupar al traer los datos

    por ejemplo select item,sum(cantidad) from tabla group by item

    martes, 7 de agosto de 2018 0:10
  • Gracias utilice asi una sentencia colocando Select Distinct * from * y de esta forma me los trae y con un do loop los cuento.  Gracias

    Pero ahora me surge otro inconveniente, en el pc donde estoy programando la aplicacion el control Calendar funciona bien, pero al pasarlo a otra maquina el contro aparece pero no muesra las fechas es decir se queda en blanco.  Ya intente registrar las ocx mscal.ocx y no funciona.  A que se puede deber este inconveniente.

    Gracias

    sábado, 11 de agosto de 2018 19:29