Acumular totales
Hola experto
Tengo una tabla donde guardo los ingresos y egresos presupuestados los cuales los tengo codificados de la siguientes manera:
ejm "01-01-01" Sueldos, correspondientes a los doce meses del año y así sucesivamente con los demás ingreso y egresos.
Tengo un grid donde quiero que me aparezcan los registros
acumulados por ejm si es el código "01-01-01" Sueldos que me muestre en
una sola linea el total de sueldos para así igualmente poder
compararlos con los ingresos reales los cuales los debo traer de la
tabla apuntes reales
Agradeciendo de antemano la ayuda que se que obtendré me despido
Hasta pronto
Gracias
Tengo una tabla donde guardo los ingresos y egresos presupuestados los cuales los tengo codificados de la siguientes manera:
ejm "01-01-01" Sueldos, correspondientes a los doce meses del año y así sucesivamente con los demás ingreso y egresos.
Tengo un grid donde quiero que me aparezcan los registros
acumulados por ejm si es el código "01-01-01" Sueldos que me muestre en
una sola linea el total de sueldos para así igualmente poder
compararlos con los ingresos reales los cuales los debo traer de la
tabla apuntes reales
Agradeciendo de antemano la ayuda que se que obtendré me despido
Hasta pronto
Gracias
1 Respuesta
Respuesta de Víctor Arturo Mercado Fernández
1
Puedes generar una tabla temporal que contenga el resumen de los conceptos que deseas.
Disculpa mi ignorancia experto pero no se como hacer una tabla resumen te agradezco me lo expliques más datalladamente y nuevamente disculpa
Suponiendo que deseas el resumen por el campo cve_empleado y que quieres la suma de las cantidades en los campo ingresos y egresos:
Select origen
Go Top
Do While !Eof()
Select resumen
Seek origen.cve_empleado
If Eof()
Append Blank
Replace resumen.cve_empleado With origen.cve_empleado
EndIf
Replace resumen.ingresos With resumen.ingresos + origen.ingresos, ;
resumen.egresos With resumen.egresos + origen.egresos
Select origen
Skip
EndDo
Select origen
Go Top
Do While !Eof()
Select resumen
Seek origen.cve_empleado
If Eof()
Append Blank
Replace resumen.cve_empleado With origen.cve_empleado
EndIf
Replace resumen.ingresos With resumen.ingresos + origen.ingresos, ;
resumen.egresos With resumen.egresos + origen.egresos
Select origen
Skip
EndDo
