Procédure Stockée et programme externe

Version imprimable

salut à tous.
Je développe sous Windev, et j'attaque une base SQLServer. Par contre là où je buche, c'est sur la récupération d'une valeur renvoyée par une procédure stockée.

Code:

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
31
32
33
34
35
36
37
38
39
40
41
CREATE 
 
    PROCEDURE [U_AIG].[PR_AIG_ADD_XML_INPUT] 
        @sender varchar(20),
        @xml_type numeric(3,0),
        @xml_data varchar(max)
    AS
 
	DECLARE	@return_value int,
			@sequence_value numeric(38, 0)
 
	BEGIN 
 
		EXEC	@return_value = [U_REF].[PR_REF_GET_NEXT_SEQUENCE_VALUE]
				@schema_name = N'U_AIG',
				@sequence_name = N'S_AIG_INPUT_EVTSUIVI',
				@sequence_value = @sequence_value OUTPUT
 
        INSERT INTO U_AIG.T_AIG_INPUT
          (
            U_AIG.T_AIG_INPUT.AIG_INPUT_VC_SENDER, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_DT_POSTAGE, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_NB_TRAITE, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_CL_XMLDATA, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_NB_TYPEXML, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_NB_EVTSUIVI
          )
          VALUES 
            (
              @sender, 
              getdate(), 
              0, 
              @xml_data, 
              @xml_type, 
              @sequence_value
            )
 
        IF (@@TRANCOUNT > 0)
            COMMIT WORK
            return @sequence_value
	END

je n'ai pas les autorisations de modifier cette procédure, mais j'aimerais savoir si elle est correcte, si elle renvoie bien une valeur numérique, et si oui comment fait on avec un programme externe pour récupérer cette valeur renvoyée.

Merci de votre aide, et j'espère ne pas m'être trompé de section. :aie:

11/01/2007, 12h05
m-mas

une procédure ne renvoie pas de valeur mais elle fait un traitemant précis
il faudra créer une fonction pour avoir le renvoi d'une valeur et utiliser le mot clé Returns ...

Question de principe

dans le principe je suis d'accord avec toi sur le fait qu'une procédure ne renvoie normalement pas de valeur.

mais en pratique c'est tout à fait possible, et c'est la cas ici:

Code:

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
31
32
33
34
35
36
37
38
39
40
41
CREATE 
 
    PROCEDURE [U_AIG].[PR_AIG_ADD_XML_INPUT] 
        @sender varchar(20),
        @xml_type numeric(3,0),
        @xml_data varchar(max)
    AS
 
	DECLARE	@return_value int,
			@sequence_value numeric(38, 0)
 
	BEGIN 
 
		EXEC	@return_value = [U_REF].[PR_REF_GET_NEXT_SEQUENCE_VALUE]
				@schema_name = N'U_AIG',
				@sequence_name = N'S_AIG_INPUT_EVTSUIVI',
				@sequence_value = @sequence_value OUTPUT
 
        INSERT INTO U_AIG.T_AIG_INPUT
          (
            U_AIG.T_AIG_INPUT.AIG_INPUT_VC_SENDER, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_DT_POSTAGE, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_NB_TRAITE, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_CL_XMLDATA, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_NB_TYPEXML, 
            U_AIG.T_AIG_INPUT.AIG_INPUT_NB_EVTSUIVI
          )
          VALUES 
            (
              @sender, 
              getdate(), 
              0, 
              @xml_data, 
              @xml_type, 
              @sequence_value
            )
 
        IF (@@TRANCOUNT > 0)
            COMMIT WORK
            return @sequence_value
	END

si je lis bien c'est une procédure, et elle renvoie @sequence_value. je ne suis pas maître de cettre procédure, et n'ai aucune autorisation de modification, mais elle est ainsi faite et fonctionne parfaitement.
Par contre c'est moi qui ne parvient pas à trouver la syntaxe pour récupérer cette @sequance_value

11/01/2007, 12h49
Nico*

Procédure Stockée et programme externe

Bonjour,

Normalement tu exécutes ta ps via les fonctions qui vont bien de windev : exec ma_ps et, ensuite tu récupères la valeur renvoyée comme tu le ferais avec une simple requête SQL (tu parcours un recordset).

Cordialement,

Nicolas

Exactement

J'ai exactement fait cela, mais mon fetch ne m'apporte rien du tout.
ALors j'ai réalisé ceci:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
sMyInPut			est une chaîne ="EXECUTE U_AIG.PR_AIG_ADD_XML_INPUT 'ITEMTRANS',5,'"+sMyXMLInput+"'"						      
nResultat			est un entier
 
 
 
SI PAS SQLExec(sMyInPut,sNomRequete) ALORS
	SQLInfoGene(sNomRequete)
	Erreur(SQL.MesErreur)
	SQLFerme(sNomRequete)
SINON
	TANTQUE SQLFetch(sNomRequete) = 0
		nResultat = Val(SQLLitCol(sNomRequete,1))
	FIN
	SQLFerme(sNomRequete)
FIN

ce code me renvoi rien, car le fetch ne parcours rien, ce qui voudrait dire que la procédure ne renvoie rien.
Alors j'ai fais ainsi :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
sMyInPut			est une chaîne ="DECLARE @sequence_value int; EXECUTE U_AIG.PR_AIG_ADD_XML_INPUT 'ITEMTRANS',5,'"+sMyXMLInput+"'; SELECT @sequence_value;"
 
nResultat			est un entier
 
SI PAS SQLExec(sMyInPut,sNomRequete) ALORS
	SQLInfoGene(sNomRequete)
	Erreur(SQL.MesErreur)
	SQLFerme(sNomRequete)
SINON
	TANTQUE SQLFetch(sNomRequete) = 0
		nResultat = Val(SQLLitCol(sNomRequete,1))
	FIN
	SQLFerme(sNomRequete)
FIN

et ce code me renvoie 0 mais le Fetch est parcouru.
Bref je galère je n'y parviens pas. :( :aie:

11/01/2007, 15h01
Nico*

Mmmmh désolé, j'ai été un peu rapide dans ma réponse, en fait pour récupérer ta valeur de façon "classique" comme si c'était un recordset il faut que tu remplaces (si tu peux) le "RETURN @sequence_value" par "SELECT @sequence_value". En tout cas, c'est ce que je fais quand je dois récupérer une variable / valeur de retour d'une ps. Je ne vois pas comment faire autrement...

Cordialement,

Nicolas
11/01/2007, 16h01
lelapinou

c'estlà que le bas blesse!!!

Je ne peux justement pas faire cette modification. Et elle ne sera pas faite.
Mais ce n'est pas grave, je me suis débrouillé autrement.

Merci à tous les posters! :mouarf: :mouarf: :mouarf: