Ver Mensaje Individual
  #18  
Antiguo 26-06-2005
(VIH)Lestat (VIH)Lestat is offline
Miembro
 
Registrado: abr 2005
Posts: 95
Reputación: 20
(VIH)Lestat Va por buen camino
Busque el Meoyo del asunto compadre... jajajaajaa ya lo tengo logre resolver mi problema....

El codigo quedo de la siguiente manera:

Código:
//Se pasan los parametros a los Querys
 
 		ModuloSID.IBQuery1.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery1.Params[1].AsString:=apellidopa;
 		ModuloSID.IBQuery1.Params[2].AsString:=apellidoma;
 		ModuloSID.IBQuery1.Params[3].AsString:=Nombre;
 		ModuloSID.IBQuery1.Params[4].AsString:=Sex;
 		ModuloSID.IBQuery1.Params[5].AsString:=Dir;
 		ModuloSID.IBQuery1.Params[6].AsString:=Local;
 		ModuloSID.IBQuery1.Params[7].AsString:=ciud;
 		ModuloSID.IBQuery1.Params[8].AsString:=Tele;
 		ModuloSID.IBQuery1.Params[9].Value:=fecha_ing;
 		ModuloSID.IBQuery1.Params[10].AsString:=statu;
 		ModuloSID.IBQuery1.Params[11].AsBlob:=imagen;
 		MOduloSID.IBQuery1.Params[12].AsString:=edoc;
 
 
 		ModuloSID.IBQuery2.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery2.Params[1].AsString:=carrera;
 
 		ModuloSID.IBQuery3.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery3.Params[1].AsInteger:=sem;
 
 		ModuloSID.IBQuery4.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery4.Params[1].AsInteger:=cert;
 		ModuloSID.IBQuery4.Params[2].AsInteger:=act;
 		ModuloSID.IBQuery4.Params[3].AsInteger:=fot;
 		ModuloSID.IBQuery4.Params[4].AsInteger:=cur;
 
 		//Se ejecuta los Querys del 1 al 4 para almacenar datos
 
 		  ModuloSID.IBQuery1.ExecSQL;
 		  ModuloSID.IBQuery2.ExecSQL;
 		  ModuloSID.IBQuery3.ExecSQL;
 		  ModuloSid.IBQuery4.ExecSQL;
 
 	   //Se abren y cierran las tablas para actualizar sus valores
 
 		MOduloSID.IBTalum_doc.Close;
 		ModuloSID.IBTalum_doc.Open;
 
 		ModuloSID.IBTalumnos.Close;
 		ModuloSID.IBTalumnos.Open;
 
 		ModuloSID.IBTalumno_carrera.Open;
 		ModuloSID.IBTalumno_carrera.Close;
 
 		ModuloSID.IBTsemestre.Close;
 		ModuloSID.IBTsemestre.Open;
como pueden darse cuenta el valor de la dni del alumno no me lo almacenaba en las demas tablas porque primero se ejecutaba el QUery 1 y luego se cerraban y abrian las tablas para actualizar los datos,, y por eso ya no me dejaba pasarle de nuevo el parametro a los demas querys.. y como pueden estas sentencias las deje de ultimo para que todos los parametros se pasen correctamente....

jajajaaj un poco complicado ... pero no imposible... verdad???

GRax a todos por su ayuda.....
Responder Con Cita