Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#12

Re: TIBStoredProc und BIGINT Parameter

  Alt 20. Dez 2006, 19:34
Zitat von Meta777:
Ich komme schon zu Rande mit meiner IDE...
Mit Google aber anscheinend nicht. 8) Mein Beispiel war schon die Umsetzung in Delphi. Und zwar von so was :

Zitat:
Datensätze pro Tabelle in einer DB
Mit folgender Stored Procedure kann man sich schnell einen Überblick über die Anzahl der Datensätze in allen Tabellen einer Datenbank verschaffen:

SQL-Code:
CREATE PROCEDURE SP_SERVERISTATISTIK
RETURNS (
    TABLOAD VARCHAR(50),
    TABSIZE BIGINT)
AS
begin
   for
     SELECT RDB$RELATION_NAME
     FROM RDB$RELATIONS
     WHERE
     (RDB$RELATION_NAME NOT LIKE 'RDB$%')
     and
     (RDB$VIEW_SOURCE IS NULL)
     INTO
     :TABLOAD
   DO
   BEGIN
     execute statement 'SELECT CAST(COUNT(*) AS BIGINT) FROM "' || TABLOAD || '"'
     INTO :TABSIZE;
     suspend;
   END
end
Die erste Abfrage selektiert alle echten Tabellen (RDB$VIEW_SOURCE IS NULL), die keine Systemtabellen sind (RDB$RELATION_NAME NOT LIKE 'RDB$%').

Pro Tabelle wird die Anzahl der Datensätze ausgelesen.



Diese Stored Procedure kann man wie eine Tabelle abfragen:

SELECT * FROM SP_SERVERISTATISTIK;
Quelle : http://www.rrze.uni-erlangen.de/hilf...bird-faq.shtml

Wiederholung : den Rest macht As??????
Gruß
Hansa
  Mit Zitat antworten Zitat