Hola! compañero Eduardo Ureña
[email protected] , le agradezco su aporte a mi inquietud, estuve tratando de agregar sus sugerencias a mi pequeña aplicación; pero, surgió un pequeño error a la hora de realizar la compilación de la misma, el error es este:
Compilando c:\colpro\progs\copia.prg
SET ORDER TAG Llave
Error en la línea 11: El comando contiene una frase o palabra clave no reconocida.
Error en la línea 28: Error de anidamiento.
estas son las lineas del código que usted me sugirió, hice unos cambios debido a que los campos de la tabla notas son:
codigo, es la identificación del estudiante.
codigo_mat, es el código de cada materia en total son diez materias.
periodo, es el periodo de cada ciclo de calificaciones en total son 4 más el periodo final(acumulado total de los 4 periodos).
cm, es donde se introduce la calificación respectiva del estudiante por cada materia.
En el codigo hay unos argumentos por ejemplo INDE, es asi o es INDEX, usted uso Mayúsculas para identificar los campos y las tablas esto es valido?, El cursor promedios guarda los promedios por cada estudiante?
CREATE CURSOR Promedios (periodo c(4),codigo c(8),promedio n(10,2),codigo_mat n(4))
SELECT PROMEDIOS
INDE ON periodo+codigo TAG Llave
SELECT notas
SET ORDER TAG Llave &&ESta llave sería la combinación de período+codigo_mat
GO TOP
DO WHILE ! EOF()
MiLlave=periodo+codigo
DO WHILE periodo+codigo=MiLlave .AND. ! EOF()
SELECT PROMEDIOS
IF ! SEEK(MiLlave)
APPEND BLANK
REPLACE periodo WITH notas.periodo
REPLACE codigo WITH notas.codigo
endif
REPLACE promedio WITH promedio+notas.Cm
REPLACE codigo_mat WITH codigo_mat+1
SELECT notas
SKIP
ENDDO
SELECT Promedios
REPLACE ALL promedio WITH promedio/codigo_mat
Bueno compañero Eduardo Ureña, si esta a su alcance poder revisar y sugerirme los respectivos cambios se lo agradezco mucho y disculpe por molestarlo con este inconveniente.
Utilizo Visual Foxpro versión 9.0 para diseñar mi pequeña aplicación
Muchas gracias,....