Informes

Hola experto necesito crear un informe por ejemplo tengo tres tablas en la primera tengo a mis clientes y la segunda sus aportes las tercera tengo esta estructura cod_cli enero, febrero, marzo, abril, etc. Entonces guardo en la tercera tabla solo los cod_cli de esta manera.
Nota:cada vez que registros sus aportes de los clientes tengo un campo que guarda el mes
SELEC clientes
GO top
DO while ! Eof()
SCATTER memvar && Copia todos los campos de la tabla
SELEC meses
APPEND blank
 **GATHER memvar&& Pega lo copiado en la tabla especificada
 replace meses.cod_cli with clientes.cod_cli
SELEC clientes
Skip
enddo
Todo muy bien luego tengo este segundo código el problema es que no copia nada en febrero y como podría hacer para especificar el año por ejemplo si quisiera los meses del 2008
SELEC meses
GO top
DO while ! Eof()
SELEC aportes
 SET order to cod_cli && El indice del codigo que evaluara
 SEEK meses.cod_cli
 IF found()
 IF aportes.ap_mes = 1
   SELEC meses
   REPLACE enero with aportes.monto
 IF aportes.ap_mes = 2
   SELEC meses
   REPLACE febrero with aportes.monto
Endif
Endif
Endif
seleC meses
Skip
enddo
Gracias.

1 Respuesta

Respuesta
1
DO while !eof()
 SELEC aportes
 SET order to cod_cli && El indice del codigo que evaluara
 SEEK meses.cod_cli
 IF found()
do case
   case aportes.ap_mes = 1
           REPLACE enero with aportes.monto
   case aportes.ap_mes = 2
           REPLACE febrero with aportes.monto
   case aportes.ap_mes = 3
           REPLACE marzo with aportes.monto  
 case aportes.ap_mes = 4
           REPLACE abril with aportes.monto
 endcase
 endif
seleC meses
Skip
Enddo
Como guardas el mes pues guardas en algún lado el año. Disculpa mi bola de cristal
se rompió ya no adivino nada

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas