Discussion :

[Fred 57220]

Bonjour

j' ai besoin de créer une procedure stockée complexe qui me retourne des enregistrements

j' ai l' habitude avec firedird 2 et Delphi de les ecrires de la facon suivante
:

peux ton le faire avec hyperfiles ??? ( a la syntaxe pret bien sur)

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
25
26
27
28
29
30
* Procedure stockée pour la gestion de la distribution */
 
SET TERM ^ ;
Create procedure PROC_VUE_DISTRIBUTION (V_E_DATE Date ,V_E_JOUR Integer , V_E_NUM_ID_OPERATEUR Integer   )
AS
Declare Variable  V_GONDOLE_ID              Integer ;
Declare Variable  V_HEURE                   Time ;
Declare Variable  V_RANG                    Decimal(6,2) ;
Declare Variable  V_DESIGNATION_PRODUIT     VarChar(50) ;
Declare Variable  V_QTE                     Integer ;
Declare Variable  V_PRIX_VENTE              Decimal(8,4) ;
 
Begin
 
     /* Efface la table des tournée */
     Delete From "$SORTIES_PRODUITS";
 
     /*Lundi */
     If (:V_E_JOUR = 1) Then
     Begin
       /*Determination de la designation Rang, Identification gondole , section , gondole et produit */
       For Select G.GONDOLE_ID , ATTP.DESIGNATION_PRODUIT
       From GONDOLE G , ATTRIBUTION_PRODUIT ATTP
       Where  G.GONDOLE_ID = ATTP.GONDOLE_ID And  G.LUNDI ='T'  And ATTP.DATE_MISE_HORS_SERVICE Is Null And G.PRODUCTION = 'T' And
          EXISTS (
             Select ATT.NUM_ID_OPERATEUR From ATTRIBUTION_GONDOLES ATT
             Where  ATT .NUM_ID_OPERATEUR  = :V_E_NUM_ID_OPERATEUR And ATT.GONDOLE_ID = G.GONDOLE_ID
              )
        Into :V_GONDOLE_ID,  :V_DESIGNATION_PRODUIT
        Do

[peijnoob]

Je n'ai pas beaucoup regardé la procédure en elle même mais normalement, tout ce que tu peux faire avec Windev, tu peux le faire en procédure stockées :

Les procédures stockées sont simplement des procédures comme les autres, sauf qu'elles sont stockées et exécutées sur le serveur HF (elles sont liées à l'analyse).

Alors, c'est sur que le code SQL que tu a mis ne fonctionnera pas, mais il suffit de l'adapter en WLangage et c'est parti !

Bon dev !