IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Bases de données Delphi Discussion :

Equivalent "Select Case when then else end" sur Paradoxe


Sujet :

Bases de données Delphi

  1. #1
    Futur Membre du Club
    Inscrit en
    Janvier 2005
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Janvier 2005
    Messages : 4
    Points : 7
    Points
    7
    Par défaut Equivalent "Select Case when then else end" sur Paradoxe
    J'ai problème pour traiter mes requettes sur paradox. je souhaite faire une requette suivante

    Select
    case sexe when '0' then SUM(Numero_client) end As 'Fille',
    case sexe when '1' then SUM(Numero_client) end As 'Homme'
    From Table_client

    cette requette me permet de faire la somme des enregistrement d'une base Foxpro ou SQLServer par sexe.
    Je recherche l'équivalance de cette commande sur Paradox et sur InterBase

    Je vous remercie de votre aide

  2. #2
    Expert éminent sénior
    Avatar de Cl@udius
    Homme Profil pro
    Développeur Web
    Inscrit en
    Février 2006
    Messages
    4 878
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Développeur Web
    Secteur : High Tech - Matériel informatique

    Informations forums :
    Inscription : Février 2006
    Messages : 4 878
    Points : 10 008
    Points
    10 008
    Par défaut
    Salut,

    Pour paradox je ne pourrait pas te renseigner, mais pour Interbase/Firebird le select devrait être celui-ci:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Select sexe,
    case sexe when '0' then SUM(Numero_client) end As 'Fille',
    case sexe when '1' then SUM(Numero_client) end As 'Homme'
    From Table_client
    group by sexe
    Ca devrait marcher.

    [EDIT] Quoique tu vas surement obtenir deux lignes !!?
    @+

  3. #3
    Membre expert
    Avatar de TicTacToe
    Inscrit en
    Septembre 2005
    Messages
    1 940
    Détails du profil
    Informations personnelles :
    Âge : 52

    Informations forums :
    Inscription : Septembre 2005
    Messages : 1 940
    Points : 3 575
    Points
    3 575
    Par défaut
    Salut

    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
    var
       IFilles, IGarcons: Integer;
    begin
      IFilles := 0;
      IGarcons := 0;
      MaTable.DisableControls; // vaut mieux si relié à un control, + rapide
      try
      MaTable.First;
      while not MaTable.Eof do
        try
        case MaTable.FieldByName( 'Sexe' ).AsInteger of  // OU BIEN
        case MaTableSexe.AsInteger // si ta table possède des TFields... + rapide
          0 : Inc( IFilles );
          1 : Inc( IGarcons );
        end;
        finally MaTable.Next; end;
      finally 
      // éventuellement repositionnement sur enreg initial...
      MaTable.EnableControls;
      end;
      // IFilles et IGarcons à jour
    end;
    :EDIT:
    je viens de m'apercevoir que je réponds pas à la question. j'ai été un peu vite.
    Tu voulais un requête...
    je laisse le code quand même... on sait jamais.

  4. #4
    Modérateur
    Avatar de Rayek
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mars 2005
    Messages
    5 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 50
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mars 2005
    Messages : 5 235
    Points : 8 504
    Points
    8 504
    Par défaut
    Simplement en fesant une requete union (si paradox supporte)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
    Select SUM(Numero_client) As Fille from Table_Client
    where Sexe = '0'
    union
    Select SUM(Numero_client) As Homme from Table_Client
    where Sexe = '1'

  5. #5
    Expert éminent sénior
    Avatar de Cl@udius
    Homme Profil pro
    Développeur Web
    Inscrit en
    Février 2006
    Messages
    4 878
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : Développeur Web
    Secteur : High Tech - Matériel informatique

    Informations forums :
    Inscription : Février 2006
    Messages : 4 878
    Points : 10 008
    Points
    10 008
    Par défaut
    @Malatar, Salut

    La solution du l'Union marche bien sûr, mais je crois que Seuh.m cherchait à n'obtenir qu'un seul enregistrement de sa requête.

    Ta requête renverra 2 enregs, tout comme la mienne d'ailleurs !

    @+ Claudius

Discussions similaires

  1. SUM(CASE WHEN THEN 1 ELSE 0 END) SUR PLUSIEURS LIGNES
    Par Dr_No dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 13/11/2012, 14h35
  2. Select case avec then qui retourne une variable
    Par dinette dans le forum SQL
    Réponses: 6
    Dernier message: 06/07/2009, 11h03
  3. pb SELECT CASE WHEN
    Par bb5477 dans le forum SQL
    Réponses: 2
    Dernier message: 18/12/2007, 17h16
  4. Access et SELECT CASE WHEN dans requetes
    Par Orion01 dans le forum Requêtes et SQL.
    Réponses: 1
    Dernier message: 06/12/2007, 11h24
  5. Réponses: 7
    Dernier message: 29/05/2007, 10h21

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo