Hallo marabu,
ich beziehe mich auf das Buch "Interbase Datenbankentwicklung mit Delphi" von Andreas Kosch.
Ich weiß nicht, ob ichs darf, aber ich zeige mal das (leider einzige) Beispiel zu Current Of und Cursor.
SQL-Code:
CREATE PROCEDURE CursorBsp AS
DECLARE VARIABLE temp;
BEGIN
FOR SELECT p.CARGO
FROM Table1 t, Table2 p
WHERE p.MasterNumber = t.MasterNumber
AND p.HouseNumber = t.HouseNumber
AND p.ArrivalDate = t.ArrivalDate
INTO :temp
AS CURSOR TmpCursor
DO
UPDATE Table1 SET Origin = :temp
WHERE CURRENT OF TmpCursor;
END
Das ist das Beispiel von Andreas Kosch. Mein Beispiel war natürlich nicht sehr sinnvoll, dafür benötige ich keinen Cursor. Ich habs nur schnell zusammengezimmert, weil ich alle Prozeduren schon auf Nicht-Cursor-Technik umgestellt hatte. Trotzdem interessiert es mich noch brennend für zukünftige Einsätze, wie ich im Interbase 6.1 besser einen Cursor definieren, verwenden und freigeben könnte.
Ist vielleicht jemand kreativer als ich und kann ein gutes Beispiel demonstrieren?
Danke
René