FoxPro/Visual FoxPro - Varias Tablas

   
Vista:

Varias Tablas

Publicado por Edwin (31 intervenciones) el 22/08/2010 06:31:43
Hola amigos, estoy trabajando en un proyecto que me asignaron en la universidad, el proyecto consiste en un sistema de matricula y notas.

El problema que actualmente me tiene parado es que en un form estoy trabajando con tres tablas:
Tabla registro (aki almaceno todos los datos de los alumnos)
Tabma materias (aki registro las materias que se imparten, ejm Español(ESPCBT1)
Tabla notas(aki registro las notas, para ello tengo tres campos que me ayuden a coordinar de manera eficiente losdatos, dichos campos son:
* rne (llave del alumno)
* cod_mat (codigo de la materia en la que se kiere registrar notas)
* año (lo utilizo para organizar por años las notas)

el codigo que stoy utilizando es el siguiente,

Evento click del combo año
SELECT 3
SET ORDER TO AÑO
SET ORDER TO COD_MAT
SET FILTER TO COD_MAT=THISFORM.TXTCOD_MAT.VALUE
SET FILTER TO RNE=THISFORM.TXTRNE.VALUE
SEEK (ALLTRIM(THISFORM.CMBAÑO.Value))
IF FOUND()
WAIT WINDOW "Ya hay notas este año"time 1
THISFORM.TXTIPARCIAL.Value=NOTA1
THISFORM.TXTIIPARCIAL.Value=NOTA2
THISFORM.TXTIIIPARCIAL.Value=NOTA3
THISFORM.TXTIVPARCIAL.Value=NOTA4
THISFORM.TXTPROMEDIO.Value=PROM
THISFORM.TXTOBSERV.Value=OBSERV
THISFORM.TXTREC1.Value=REC1
THISFORM.TXTREC2.Value=REC2
thisform.btnguardar.Enabled=.f.
thisform.btnmodificar.Enabled=.t.
thisform.btneliminar.Enabled=.t.
thisform.btnimprimir.Enabled=.t.
thisform.btncancelar.Enabled=.t.
thisform.refresh
ELSE
WAIT window"No hay matricula para este año"time 1
THISFORM.TXTIPARCIAL.SETFOCUS
THISFORM.TXTIPARCIAL.Value=""
THISFORM.TXTIIPARCIAL.Value=""
THISFORM.TXTIIIPARCIAL.Value=""
THISFORM.TXTIVPARCIAL.Value=""
THISFORM.TXTPROMEDIO.Value=""
THISFORM.TXTOBSERV.Value=""
THISFORM.TXTREC1.Value=""
THISFORM.TXTREC2.Value=""
thisform.btnguardar.Enabled=.t.
thisform.btnmodificar.Enabled=.f.
thisform.btneliminar.Enabled=.f.
thisform.btnimprimir.Enabled=.f.
thisform.btncancelar.Enabled=.t.
thisform.Refresh
ENDIF

si alguien sabe como ayudarme de antemano agradezco su colaboracion, tambien puedo enviar el form para que vean detenidamente lo que estoy haciendo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Mauricio

Varias Tablas

Publicado por Mauricio (1368 intervenciones) el 22/08/2010 22:44:57
Edwin, enviame el form junto con las tablas que usas, por favor, gracias!!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Varias Tablas

Publicado por Edwin (31 intervenciones) el 23/08/2010 05:01:23
Ok amigo, enviame tu email o agregame edwinjav_587@hotmail.com, solo me envias un email y yo te envio el form y las tablas...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar