[firebase-br] Help, :((( ... procedure unknown dbexpress

Antonio Carlos a.lima.silva em terra.com.br
Seg Nov 27 18:23:37 -03 2006


Por favor criei a stored procedure em um banco, consigo executar ela via Sql 
do EMS interbase Firebird Manange e do IBO Console, mas quando tento do 
DBexpress do delphi da o erro : SQL Server Error procedure unknown : 
NEW_MOVIMENTACA0

o código esta abaixo.

try
    Screen.Cursor := crSQLWait;
    TD4.TransactionID := 1;
    TD4.IsolationLevel := xilREADCOMMITTED;
    SQLConnection1.StartTransaction(TD4);
    Sql1.Close;
    Sql1.SQL.Clear;
    Sql1.SQL.Add('EXECUTE PROCEDURE NEW_MOVIMENTACA0 
(:P00,:P01,:P02,:P03,:P04,:P05,:P06,:P07,:P08,:P09,:P10,:P11,:P12,:P13,:P14,:P15)');
    Sql1.ParamByName('P00').AsString := '1234567';
    Sql1.ParamByName('P01').AsString := '1';
    Sql1.ParamByName('P02').AsString := 'SV';
    Sql1.ParamByName('P03').AsString := 'P456';
    Sql1.ParamByName('P04').AsString := 'NORMAL';
    Sql1.ParamByName('P05').AsString := 'PRODUTO DE TESTE';
    Sql1.ParamByName('P06').AsString := 'UN';
    Sql1.ParamByName('P07').AsString := 'NAO';
    Sql1.ParamByName('P08').AsString := '';
    Sql1.ParamByName('P09').AsCurrency := 123.65;
    Sql1.ParamByName('P10').AsString := '';
    Sql1.ParamByName('P11').AsDate   := date;
    Sql1.ParamByName('P12').AsDate   := date;
    Sql1.ParamByName('P13').AsDate   := date;
    Sql1.ParamByName('P14').AsString := 'LANCADO';
    Sql1.ParamByName('P15').AsDate   := date;
    Sql1.ExecSQL;
    SQLConnection1.Commit(TD4);
    Sql1.Close;
    Screen.Cursor := crDefault;
  except
    on e: Exception do
        begin
          SQLConnection1.Rollback(TD4);
          Screen.Cursor := crDefault;
          MessageDlg('NovaMovimentacao : '+E.Message,mtError,[mbOK],0);
        end;
  end; 





Mais detalhes sobre a lista de discussão lista