Stored Procedure updaten

[shmia]

Ändere mal deinen Code so ab:

Delphi-Quellcode:

  query.sql.add('ALTER PROCEDURE');
  query.sql.add('MYPROCEDURE (');
  ...
  query.sql.add('   SUSPEND;');
  query.sql.add('END');
  Assert(query.ParamCount=0, 'Parameter nicht erlaubt');
try
  query.ExecSQL;
except
  on E:Exception do
  begin
    E.Message := E.Message +#13#10+query.SQL.Text;
    raise;
end;

Nur um 150%ig sicher zu gehen, dass dein SQL-Kommando in Ordnung ist und du nicht die berühmt-berüchtigten Tomaten auf den Augen hast.

PS:
wenn das Alles nicht hilft, dann würde ich mal versuchen, den SQL-Befehl direkt
über die Database-Komponente abzuschicken:

Delphi-Quellcode:

sql:string;

sql := 'ALTER PROCEDURE'#13#10+
  'MYPROCEDURE ('#13#10+
...
  ;
  Database1.Execute(sql);

[ibp]

Zitat von shmia:

Ändere mal deinen Code so ab:

Delphi-Quellcode:

  query.sql.add('ALTER PROCEDURE');
  query.sql.add('MYPROCEDURE (');
  ...
  query.sql.add('   SUSPEND;');
  query.sql.add('END');
  Assert(query.ParamCount=0, 'Parameter nicht erlaubt');
try
  query.ExecSQL;
except
  on E:Exception do
  begin
    E.Message := E.Message +#13#10+query.SQL.Text;
    raise;
end;

Nur um 150%ig sicher zu gehen, dass dein SQL-Kommando in Ordnung ist und du nicht die berühmt-berüchtigten Tomaten auf den Augen hast.

jupp so mache ich das ja auch wollte hier nur nicht allen Ballast mit posten. Ich habe die SP vor und zurück kontrolliert, mit der ist alles ok.

Zitat von shmia:

PS:
wenn das Alles nicht hilft, dann würde ich mal versuchen, den SQL-Befehl direkt
über die Database-Komponente abzuschicken:

Delphi-Quellcode:

sql:string;

sql := 'ALTER PROCEDURE'#13#10+
  'MYPROCEDURE ('#13#10+
...
  ;
  Database1.Execute(sql);

ok, das werde ich mal versuchen....

[Lemmy]

Hi,

was du auch versuchen kannst: über query.sql.SaveToFile() das Statement speichern und in IBExpert ausführen. Wenn da doch ein Tippfehler drin ist, findest DU den so am schnellsten. Anschließend halt nicht vergessen das SaveToFile wieder auszubauen...

Grüße

[ibp]

Zitat von Lemmy:

Hi,

was du auch versuchen kannst: über query.sql.SaveToFile() das Statement speichern und in IBExpert ausführen. Wenn da doch ein Tippfehler drin ist, findest DU den so am schnellsten. Anschließend halt nicht vergessen das SaveToFile wieder auszubauen...

Grüße

Danke, habe ich aber schon gemacht, daher kann ich mir sehr sicher sein, dass die SP OK ist!

[mjustin]

Nur eine Idee:

wenn man mit IBExpert ein Matadata Extract durchführt, kann man bei Stored Procedures gut sehen, dass zuerst der Statement Delimiter von ';' auf '^' umgesetzt wird, damit man im alter procedure statement das Semikolon als Anweisungstrenner verwenden kann. Und dann muss am Ende des Prozedurtextes das ^ stehen, also

Delphi-Quellcode:

alter procedure x
begin
  suspend;
end^  <<---

[ibp]

komisch anscheinend liegt es nicht am update der variablen der SP.

Er meckert immer die erste Benutzung der Variablen an, aber nicht die Input- oder Output-Variablen.

[ibp]

Lösung:

Code:

query.paramcheck:=false

nun ist klar warum er auf die erste Variable innerhalb der Prozedur zeigt, da diese mit einem ":" beginnt.

Aber danke an alle!


@shmia nach deinem Post hätte es mir auffallen müssen! Ich habe den Test auf ParamCount übersehen!