Ver Mensaje Individual
  #2  
Antiguo 03-03-2011
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Arrow

Bueno sino me equivoco ese código es mio....
Viendo el error me hace pensar en que dicho error no es dentro de delphi sino más bien al hacer o llamar el procedimiento almacenado en MySQL.humm... de todas formas haber intenta de ésta forma:
Código Delphi [-]
with zq_empresa do begin
       //si nuestro procedimiento tiene parametro de entrada entoces seria asi
     SQL.Text:='Call MantencionEmpresa(:emp_rut,:emp_nf,:emp_rs,:emp_gr,:emp_dir,:emp_com,:emp_tel,:emp_fx,:emp_rl,:emp_r  r);';
                                                      {Al poner dos puntos ( : ) Delphi crea los parámetros automáticamente}

     ParamByName('emp_rut').AsString:=datos.reg_emp_rut;
     ParamByName('emp_nf').AsString:=datos.reg_emp_nf;
     ParamByName('emp_rs').AsString:=datos.reg_emp_rs;
     ParamByName('emp_gr').AsString:=datos.reg_emp_gr;
     ParamByName('emp_dir').AsString:=datos.reg_emp_dir;
     ParamByName('emp_com').AsString:=datos.reg_emp_com;
     ParamByName('emp_tel').AsString:=datos.reg_emp_tel;
     ParamByName('emp_fx').AsString:=datos.reg_emp_fx;
     ParamByName('emp_rl').AsString:=datos.reg_emp_rl;
     ParamByName('emp_rr').AsString:=datos.reg_emp_rr;
      Open;
 // ExecSQL;
 end;
...
Si sigues teniendo problemas pues rogaría que pusierás el código de tu procedimiento almacenado "MantencionEmpresa"
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita