FoxPro/Visual FoxPro - Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

   
Vista:
Imágen de perfil de Luis

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Luis (6 intervenciones) el 28/09/2015 18:20:09
Tengo 4 tablas: control1, usuarios, horarios y una vacia que es estudiantes.
Quiero tomar datos de cada tabla y pasarlos a la tabla de estudiantes.
y todo lo tengo que hacer en un .prg
esto es lo que intente pero no me queda bien.


CLEAR
Select usuarios
Go Top
Do While !eof()
fac = usuarios.facultad
car = usuarios.carrera
Select estudiantes
Append Blank
Replace estudiantes.facultad With fac
Replace estudiantes.carrera With car
Select usuarios
Skip
Enddo

SELECT control1
Go Top
Do While !eof()
lab = control1.laboratorio
fec = control1.fecha
hor = control1.hora_inicial
Select estudiantes
Append Blank
Replace estudiantes.salon With lab
Replace estudiantes.fecha With fec
Replace estudiantes.hora WITH hor
Select control1
Skip
Enddo

CLEAR
SELECT horarios
Go Top
Do While !eof()
cur = horarios.curso
nom = horarios.nombre_cate
com = horarios.comentarios
Select estudiantes
Append Blank
Replace estudiantes.curso1 With cur
Replace estudiantes.docente With nom
Replace estudiantes.comentario WITH com
Select horarios
Skip
Enddo


Untitled

y lo que pasa es que me pasa los datos de una tabla primero y los datos de la siguiente tabla me los pasa abajo, y yo quiero que los datos me queden juntos.

como puedo lograr esto con un .prg
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 Antonio

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Mauricio Antonio (1367 intervenciones) el 28/09/2015 19:29:44
Puedes poner la estructura de las 3 tablas: usuarios, control1 y estudiantes y los indices de cada tabla?
Espero que alguien no se moleste por esta pregunta.
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
Imágen de perfil de Luis

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Luis (6 intervenciones) el 28/09/2015 20:30:53
Estan son las estructuras de las tablas y cuales son los campos que quiero pasar a la tabla de estudiantes.

Tabla: control1, de esta tabla necesito los campos laboratorio, fecha, hora_inicial


control1

Tabla: horarios, de esta tabla necesito los campos curso, nombre_cate y comentarios

horarios

Tabla: usuarios, de esta tabla necesito los campos carrera, facultad.

usuarios

Y esta tabla es a donde tienen que llegar los datos de las 3 tablas anteriores, y esta es su estructura.


estudiantes


espero que puedas ayudarme. n_n
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
Imágen de perfil de Mauricio Antonio

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Mauricio Antonio (1367 intervenciones) el 28/09/2015 21:19:31
En la tabla control1, existe no_carnet N(10), luego en usuarios y estudiantes, existe carnet_cate char(20)
La pregunta es que aclares si los 3 tipos de carnet se refieren a estudiantes o a catedraticos, caso contrario no existe campo comun entre la primera tabla y las otras dos.
Es esta una tarea escolar?
quien te dijo que la fecha es N(20)?
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
Imágen de perfil de Luis

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Luis (6 intervenciones) el 28/09/2015 22:27:13
No, no tienen campos en común.
Yo solo quiero pasar los datos de los campos que te mencione, a los campos de la tabla Estudiantes.
Ejemplo: el campo laboratorio que esta en la tabla de control1, quiero que se valla a el campo salon de la tabla de estudiantes.
el campo facultad de la tabla usuarios, que se valla al campo facultad de la tabla estudiantes.

Y todo este proceso tiene que funcionar con un .prg para que sea automático.


Si tienen que tener campos en común, que puedo hacer al respecto.?
La fecha así me la pidieron n_n

Espero que puedas ayudarme amigo. u_u n_n
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
Imágen de perfil de Mauricio Antonio

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Mauricio Antonio (1367 intervenciones) el 28/09/2015 23:04:53
Lo siento mucho Luis, pero tengo la impresion que es un trabajo escolar, tienes demasiados vacios, personalmente no te puedo ayudar a resolver tu tarea escolar.
Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de Luis

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Luis (6 intervenciones) el 28/09/2015 23:25:31
No es una tarea escolar, estoy haciendo practicas en una empresa y me pidieron hacer un programa que hiciera esto.
pero Buena vibra n_n
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

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por santiago (376 intervenciones) el 28/09/2015 23:59:44
Hola, usa el siguiente prg, cámbiale los campos a discreción y traslada tu información:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
*** PASADBF.PRG ***                 &&  PASA DATOS DE UNA BASE DE DATOS A OTRA
CLEAR
@ 1,1 CLEA TO 24,78
 
**Set Esca Off
Set Bell Off
Set Carr Off
Set Conf Off
Set Cons On
Set Excl Off
Set Dele On
Set Date Brit
Set Cent On
Set Deci To 5
Set Devi To Scre
Set Exac Off
Set Prin Off
Set Safe Off
Set Scor Off
Set Stat Off
Set Talk Off
 
stor ' ' to campo1,campo2,campo3,campo4     && CAMPOS ALFANUMERICOS
stor 0 to x,y,z1,z2,campo5,campo6                   && CAMPOS NUMERICOS
 
SELECT 1
USE produc alias BASE1           && BASE DE DATOS ORIGEN
GO BOTT
@  9,18 TO 11,60
@ 10,20 SAY 'TOTAL DE REGISTROS:'
@ 10,40 SAY RECNO()
GO TOP
 
SELECT 2
USE maestro alias BASE2           && BASE DE DATOS DESTINO
INDEX ON codigo TO SANT
 
SELE BASE1
 
DO WHILE .NOT. EOF()
 
   SELE BASE1
   campo1=codIGO           &&   C  10
   campo2=clasificac
   campo3=categoria
   campo4=subcategor
 
   SELE BASE2
   SEEK CAMPO1
   IF FOUND()
      REPL marca with campo2
      REPL tipo with campo3
      REPL ccosto with campo4
   ENDIF
 
   x=x+1
   @ 13,18 TO 15,60
   @ 14,20 SAY 'REG.  REEMPLAZADOS:'
   @ 14,40 SAY x
 
   SELE BASE1
   SKIP
   IF EOF()
      EXIT
   ELSE
      LOOP
   ENDIF
 
ENDDO

mensaje='PROCESO TERMINADO.'
? mensaje
? mensaje
? mensaje


Suerte.
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

Pasar ciertos datos de 3 tablas diferentes a otra tabla (vacia)

Publicado por Luis (676 intervenciones) el 29/09/2015 00:57:14
Creo, que tu problema no esta en grabar datos.

Esta como tienes los enlaces o relaciones entre tablas.
Yo lo haría de esta forma

ESTUDIANTE.DBF

Codigo C 10
Nombre C 60
Cod_Facultad C 3 ---> Relacionado con Tabla FACTULTAD
Cod_Carrera C 3 ---> Relacionado con Tabla CARRERA
Cod_Salon C 3 ---> Relacionado con Tabla SALON
Cod_Horario C 3 ---> Relacionado con Tabla HORARIO
Cod_Docente C 3 ---> Relacionado con Tabla DOCENTE


FACULTAD.DBF
Codigo C 3
Nombre C 50

CARRERA.DBF
Codigo C 3
Nombre C 50

SALON.DBF
Codigo C 3
Nombre C 50
Cod_Materia C3

MATERIA.DBF
Codigo C 3
Nombre C 50


Etc.

Haz una prueba en Excel con tus datos para que veamos como analizar (Creo que por allí te estas equivocando)

Saludos

Sha
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