tAdoStoredProc, manejo de parametros

[arturoio]

Estoy trabajando con Este elemento de un procedimiento almacenado que me realiza una inserción. Trabajando desde el gestor de BD no tengo ningun problema el SP realiza su trabajo.
Pero al hacerlo desde c++ builder me estan generando conflicto los parametros, ya que le esta dando valores que no le corresponden a un atributo en especifico.

Asigno los valores de la siguiente forma:

                DM1->ADOSP1->Close();
                DM1->ADOSP1->Parameters->ParamByName("identificador")->Value = "abc123";
                DM1->ADOSP1->Parameters->ParamByName("nombre")->Value = nombre;
                DM1->ADOSP1->Parameters->ParamByName("apellidoP")->Value = apellidoP;
                DM1->ADOSP1->Parameters->ParamByName("apellidoM")->Value =  apellidoM;
                DM1->ADOSP1->Parameters->ParamByName("fecha")->Value = fecha;
                DM1->ADOSP1->Parameters->ParamByName("telefono")->Value = telefono;
                DM1->ADOSP1->Parameters->ParamByName("celular")->Value = celular;
                DM1->ADOSP1->Parameters->ParamByName("pais")->Value = pais;
                DM1->ADOSP1->Parameters->ParamByName("estado")->Value = estado;
                DM1->ADOSP1->Parameters->ParamByName("ciudad")->Value = ciudad;
                DM1->ADOSP1->Parameters->ParamByName("colonia")->Value = colonia;
                DM1->ADOSP1->Parameters->ParamByName("calle")->Value = calle;
                DM1->ADOSP1->Parameters->ParamByName("numero")->Value = numero;
                DM1->ADOSP1->Parameters->ParamByName("profesion")->Value = profesion;
                DM1->ADOSP1->Parameters->ParamByName("estadoC")->Value = civil;
                DM1->ADOSP1->Parameters->ParamByName("escolaridad")->Value = escolaridad;
                DM1->ADOSP1->Parameters->ParamByName("sexo")->Index  = sexo;
                DM1->ADOSP1->Parameters->ParamByName("sangre")->Value = sangre;
                DM1->ADOSP1->Parameters->ParamByName("correo")->Value = correo;

                DM1->ADOSP1->Prepared;
                DM1->ADOSP1->Open();

Previamente asigno los valores a las variables de la siguiente forma:

 nombre = txNombre->Text.Trim();
      apellidoP = txApellidoP->Text.Trim();
      apellidoM = txApellidoM->Text.Trim();
      fecha = dpFecha->Date.FormatString("yyyy-mm-dd");
      telefono = txTelefono->Text ;
      celular = txCelular->Text ;
      correo = txCorreo->Text ;
      calle = cbCalle->KeyValue  ;
      numero = txNumero->Text;
      colonia = cbColonia->KeyValue ;
      ciudad = cbCiudad->KeyValue  ;
      estado = cbEstado->KeyValue;
      pais = cbPais->KeyValue;
      profesion = txProfesion->Text;
      escolaridad = cbEscolaridad->Text;
      civil = txEstCivil->Text;
      sangre = cbSangre->Text ;

He corrido la aplicación paso a paso y las variables tienes los valores correctos pero a pesar de eso se ocaciona el siguiente error

incorrect date value 'martinez' for colum 'fecha'...

al parecer porque asigna el valor del apellidoM al parametro fecha y así susesivamente con otros parametros.

De antemano muchas gracias

[Casimiro Notevi]

¿Y la sentencia sql insert?

[arturoio]

Como comentaba es un procedimiento almacenado. Por eso uso el TAdoStoredProc y así solo le envio los parametros y desde el inspector de propiedades le indico a cual procedimiento almacedo de la BD corresponde

[Casimiro Notevi]

Bien, pues el procedimiento almacenado

[arturoio]

Código SQL [-]
Delimiter $$
DROP PROCEDURE IF EXISTS insertaPaciente;
    CREATE PROCEDURE insertaPaciente (identificador VARCHAR(12), nombre VARCHAR(45), apellidoP VARCHAR(45), apellidoM VARCHAR(45), fecha DATE, telefono VARCHAR(15), celular VARCHAR(15),
    pais INT, estado int, ciudad int, colonia int, calle int, numero VARCHAR(7), profesion VARCHAR(45), estadoC VARCHAR(15), escolaridad VARCHAR(45), sexo int, sangre VARCHAR(2), correo VARCHAR(70)) ##Se definen los parametros que necesitara el SP
    
    BEGIN #Inicia las intrucciones para el SP
    DECLARE direccion INT; #Declaramos una variable y a continuación comprobaremos si ya existe un registro igual
    SET direccion = (Select count(cl08_Id) from cl08 where cl14_Id = pais and cl13_Id = estado and cl12_Id = ciudad and cl09_Id = calle and cl11_Id = colonia and cl08_Numero = numero);
    
    IF direccion = 0 # a traves de este if decidimos si se inserta un nuevo registro o se utiliza el que ya existe
    THEN
        INSERT INTO cl08 values (null,calle,colonia,numero,ciudad,estado,pais);
    END IF;    
    
    SET direccion = (Select cl08_Id from cl08 where cl14_Id = pais and cl13_Id = estado and cl12_Id = ciudad and cl09_Id = calle and cl11_Id = colonia and cl08_Numero = numero);
    insert into cl00 values (null,identificador, nombre, apellidoP, apellidoM, fecha, telefono, celular, profesion, estadoC,escolaridad, sexo, sangre, correo, direccion); # Hacemos nuestra inserción 

END $$

Este es el SP. Desde el gestor de la Base de datos funciona sin problemas

[orodriguezca]

Solo por ensayar, cambia la sentencia insert del procedimiento almacenado y coloca de forma explicita las columnas a afectar:

Código SQL [-]
insert into c100(nombreCol1, nombreCol2, ... etc) values (null, identificador, nombre, apellidoP.. ect)