Einzelnen Beitrag anzeigen

omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#5

Re: [SQL] Stored Procedures...

  Alt 12. Jan 2008, 12:53
Zitat von Hansa:
Von den Dingern habe ich bestimmt 100 Stück.
und genau das ist das Problem

Hier geht es ja gerade darum, dass der Tabellenname auch dynamisch ist. Dann wird nämlich nur eine Prozedur benötigt.

Ich habe mir nochmal Gedanken dazu gemacht...

Als erstes wird geprüft, ob es die Zeile schon gibt.
SQL-Code:
CREATE PROCEDURE `p_check_insert_update`(IN tbl VARCHAR(255),
                                         IN ids VARCHAR(255),
                                         IN cols TEXT,
                                         IN vals TEXT,
                                         IN updt TEXT)
BEGIN
  SET @s = CONCAT(
    'CALL p_make_insert_update(',
      '(SELECT COUNT(*) FROM ', tbl, ' WHERE id=', ids, '), ',
      '"', tbl, '", ',
      '"', ids, '", ',
      '"', cols, '", ',
      '"', vals, '", ',
      '"', updt, '"',
    ');'
  );
  PREPARE stmt FROM @s;
  EXECUTE stmt;
  DEALLOCATE PREPARE stmt;
END
Dann wird eine zweite Prozedur aufgerufen, die für das eigentliche Ändern zuständig ist. (Ich habe es leider nicht hinbekommen, den Rückgabewert vom EXECUTE in eine Variable zu bekommen, deshalb der Trick mit der zweiten Prozedur).
SQL-Code:
CREATE PROCEDURE `p_make_insert_update`(IN cnt INTEGER,
                                        IN tbl VARCHAR(255),
                                        IN ids VARCHAR(255),
                                        IN cols TEXT,
                                        IN vals TEXT,
                                        IN updt TEXT)
BEGIN
  IF (cnt > 0) THEN
    SET @s = CONCAT(
      'UPDATE ', tbl, ' ',
      'SET ', updt, ' ',
      'WHERE id=', ids
    );
  ELSE
    SET @s = CONCAT(
      'INSERT INTO ', tbl, ' (', cols, ') ',
      'VALUES (', vals, ')'
    );
  END IF;
  PREPARE stmt FROM @s;
  EXECUTE stmt;
  DEALLOCATE PREPARE stmt;
END
Getestest mit MySQL 5.0.19.

Vielleicht gibt es ja noch eine bessere Variante, bin gespannt.

Edit: ok, marabu hat ja gerade eine bessere Möglichkeit aufgezeigt, war trotzdem ein interessantes Problem.

Gruss
Thorsten
  Mit Zitat antworten Zitat