insert dbexpress+delphi7+oracle

Question

Estou com um problema na empresa no qual quero fazer um insert no B.D oracle utilizando o Dbexpress. SQLConnection conectado ao banco. sqlquery1 conectado ao sqlconnection. DataSetProvider1 conectado...

Joel Rodrigues · Answer

Provavelmente � algum componente n�o instanciado. Depure o c�digo para ver exatamente onde est� ocorrendo o problema....

Marcos Souza · Answer

Nao sei se fiz da forma correta, pois esses comandos estao no tbutton. O sqlquery1 na verdade consta apenas uma consulta simples (select * from pcbairro), apenas para fazer conexao com sqlconnection. A depura��o deu erro na linha abaixo:
sqlquery1.ExecSQL;

Joel Rodrigues · Answer

Existe mais algum comando na tela que possa estar sendo executado?...

Marcos Souza · Answer

N�o. � somente isso mesmo. Insert basico para depois ser implementado....

Joel Rodrigues · Answer

Bom, se � uma SQLQuery para inser��o, voc� n�o precisa do SELECT inicial, certo? Use um controle para cada fun��o. Retire o select que consta na query e os comandos Close e o Open antes da execu��o. Vejamos no que d�....

Marcos Souza · Answer

Caso eu retire o comando sql da query o mesmo nao fica ativo.  Apresenta o seguinte erro ao tentar iniciar a query:missing query, table name or procedure name....

Joel Rodrigues · Answer

Cara, vamos come�ar o tratamento de choque:
- como � uma instru��o de inser��o, voc� n�o precisa de DataSetProvider nem ClientDataSet, desligue-os da SQLQuery.
- Defina a instru��o de inser��o em tempo de design e, em runtime, passe apenas os par�metros.

Vamos ver no que d�...

Marcos Souza · Answer

Bom, nao sou programador, portanto desculpe por talvez nao ter entendido o que quis dizer. Fiz o seguinte, coloquei o comando: insert into pcbairro (codbairro,descricao) values (:CODBAIRRO,:BAIRRO) na propriedade SQL da query e deixei no button apenas os parametros. Quando fui ativar a query aparece a seguinte mensagem: CANNOT INSERT NULL INTO (BASEDADOS.PCBAIRRO.CODBAIRRO).
Sera que o problema nao pode ser por causa que o campo DESCRICAO � um campo CHAR, no qual aceita qualquer tipo de caracteres e o oracle para entender esses caracteres, � necessaio estar com aspas simples . Caso eu informe dentro das aspas simples o proprio delphi informa erro: MISSING OPERATOR OR SIMICOLON.

Joel Rodrigues · Answer

Voc� n�o deve ativar a query, deve apenas chamar o ExecSQL a partir do c�digo....

Marcos Souza · Answer

Mesmo nao ativando, eu executo, preencho os edits e quando clico no button ele informa a mesma mensagem: cannot insert null......

Marcos Souza · Answer

Joel, consegui fazer o insert da seguinte forma:
sqlquery1.Close;
SQLQUERY1.Open;
SQLQUERY1.SQL.Clear;
sqlquery1.SQL.Add(insert into pcbairro(codbairro,descricao) values (+QuotedStr(EDIT1.Text)+,+QuotedStr(EDIT2.Text)+));
//sqlquery1.ParamByName(CODBAIRRO).Value := EDIT1.Text;
//sqlquery1.ParamByName(BAIRRO).AsString := EDIT2.Text;
SQLQUERY1.ExecSQL(TRUE);
Caso possa me dar mais alguma dica referente o porque o registro nao inclui duas vezes seguidas. Ex: inseri o codbairro 1 e sua descricao. Quando informo manualmente codigo 2 e sua descricao, o delphi entende que ainda � codigo 1, entao fica dois codigos 1 gravado no banco. Sabe como proceder quanto a isso?

Marcos Souza · Answer

Achei o problema. Debuguei novamente e vi que a linha abaixo esta abrindo novamente a query e ocasionava o erro. Agora esta funcionando perfeitamente e ja vou incrementar o restante do insert.
SQLQUERY1.Open;

Obrigado!

F�rum insert dbexpress+delphi7+oracle #417299