Discussion :

[Just-Soft]

Salut !

pour compter les lignes d'une tables avec un critère donné comme la date p.e, c'est facile de le faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
select count(*) nb_ligne from tb_energie
where tb_energie.date_mois =:date_bilan

mon problème est que je dois vérifier une dizaine de table avec le même critère pour savoir si la MAJ a été faite. Il me parait que cela soit possible dans une PS mais je ne sais par où commencer. Je dois en 1er sélectionner mes tables en mettant leurs noms dans un vecteur p.e (est-ce possible en SQL ?) puis faire une boucle pour avoir en sortie le couple (nom_table, nbr_ligne) à la date d'entrée saisie ?

quelqu'un peut-il me guider et m'orienter ?

Merci par avance.

[Ph. B.]

Bonjour,
A votre place, je procèderais comme suit :
Je créerai une table contenant 3 colonnes (nom de table, nom de colonne, valeur du paramètre):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
CREATE TABLE CHECK_TABLE (
    TABLE_NAME   VARCHAR(31),
    COLUMN_NAME  VARCHAR(31),
    PARAM_VALUE  VARCHAR(31)
);

La table est alimentée par les éléments que l'on veut contrôler.
Ensuite, je créerai la procédure stockée suivante qui parcours la table et exécute une instruction SQL construite dynamiquement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
CREATE OR ALTER PROCEDURE SP_CHECK_TABLES 
RETURNS (TableName VARCHAR(31), NbRows INTEGER)
AS
  DECLARE VARIABLE SqlStmt VARCHAR(128);
  DECLARE VARIABLE ColumnName VARCHAR(31);
  DECLARE VARIABLE ParamValue VARCHAR(31);
BEGIN
  FOR SELECT TABLE_NAME, COLUMN_NAME, PARAM_VALUE FROM CHECK_TABLE
      INTO :TableName, :ColumnName, :ParamValue DO
  BEGIN
    SQL = 'SELECT COUNT(*) FROM ' || TableName ||
          ' WHERE ' || ColumnName || ' = ' || ParamValue;
    EXECUTE STATEMENT SqlStmt into :NbRows;
    SUSPEND;
  END
END

A adapter...

[Just-Soft]

Salut Ph. B. et merci

mais reste quand même assez lourd comme process puisqu'on doit à chaque fois lui renseigner le nom de la table ! aurait-il un moyen de parcourir toutes les tables de la bdd et d'exécuter la ps pour chacune des tables puis avoir le résultat dans un fichier à la sortie ?!

je sais que j'exagère mais c'est ce que je veux avoir en finalité ....

merci encore et bienvenue à toute autre idée

[SergioMaster]

un début de réponse :
FAQ : Comment obtenir une liste des tables, vues et colonnes d'une base de données Firebird ?

donc avec une la procédure modifiée de ph.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
CREATE OR ALTER PROCEDURE SP_CHECK_TABLES 
(COLONNE VARCHAR(31), Paramvalue  VARCHAR(31))
RETURNS (TableName VARCHAR(31), NbRows INTEGER)
AS
  DECLARE VARIABLE SqlStmt VARCHAR(128);
  DECLARE VARIABLE ColumnName VARCHAR(31);
  DECLARE VARIABLE ParamValue VARCHAR(31);
BEGIN
  FOR SELECT f.RDB$RELATION_NAME
FROM RDB$RELATION_FIELDS f
JOIN RDB$RELATIONS r ON f.RDB$RELATION_NAME = r.RDB$RELATION_NAME
AND f.RDB$FIELD_NAME=:COLONNE
AND r.RDB$VIEW_BLR IS NULL
AND (r.RDB$SYSTEM_FLAG IS NULL OR r.RDB$SYSTEM_FLAG = 0);
INTO :TableName 
DO
  BEGIN
    SQL = 'SELECT COUNT(*) FROM ' || TableName ||
          ' WHERE ' || COLONNE || ' = ' || ParamValue;
    EXECUTE STATEMENT SqlStmt INTO :NbRows;
    SUSPEND;
  END
END

PS . Finalement j'aurais pas du supprimer mon premier POST j'y proposais déjà le EXECUTE STATEMENT

[Ph. B.]

Bonjour,

mais reste quand même assez lourd comme process puisqu'on doit à chaque fois lui renseigner le nom de la table ! aurait-il un moyen de parcourir toutes les tables de la bdd et d'exécuter la ps pour chacune des tables puis avoir le résultat dans un fichier à la sortie ?!

Le problème lui même n'est pas aussi simple qu'il n'y parait...
Sinon, parcourir toutes les tables pourquoi pas ?
Mais comment définir la colonne qui va servir de critère de filtre ? en fonction de son type ? et si il y en a plusieurs, laquelle prendre ?
La valeur du filtre est-elle unique pour toutes les tables ?

[Just-Soft]

Bonjour,
Le problème lui même n'est pas aussi simple qu'il n'y parait...
Sinon, parcourir toutes les tables pourquoi pas ?
Mais comment définir la colonne qui va servir de critère de filtre ? en fonction de son type ? et si il y en a plusieurs, laquelle prendre ?
La valeur du filtre est-elle unique pour toutes les tables ?

Merci ....
le chemin est assez encourageant

Bonjour,
Parcourir toutes les tables pourquoi pas ? mais comment ?

Bonjour,
Mais comment définir la colonne qui va servir de critère de filtre ? en fonction de son type ? et si il y en a plusieurs, laquelle prendre ?

La colonne en question est de type date, et fort heureusement que je n'ai qu'un seul champ date dans chacune des tables

Bonjour,
La valeur du filtre est-elle unique pour toutes les tables ?

oui elle l'est

espérant que je suis assez clair sur les points soulevés

[SergioMaster]

une jonction supplémentaire dans ce cas là avec RDB$FIELDS permettra d'obtenir (et donc de sélectionner le nom) le type de champ

RDB$FIELD_TYPE
12 ->DATE
35 ->TIMESTAMP

Donc , toutes les tables qui ont une colonne date

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
SELECT f.RDB$RELATION_NAME, f.RDB$FIELD_NAME,T.RDB$FIELD_TYPE
FROM RDB$RELATION_FIELDS f 
JOIN RDB$FIELDS t on f.RDB$FIELD_SOURCE=t.RDB$FIELD_NAME AND t.RDB$FIELD_TYPE in (12,35)
JOIN RDB$RELATIONS r ON f.RDB$RELATION_NAME = r.RDB$RELATION_NAME
AND r.RDB$VIEW_BLR IS NULL
AND (r.RDB$SYSTEM_FLAG IS NULL OR r.RDB$SYSTEM_FLAG = 0)