Delete et insert into dans une même procédure stockée

Version imprimable

29/08/2022, 15h32
facteur

Delete et insert into dans une même procédure stockée

Bonjour
J'ai créée une table sur SQL server et je souhaiterais travailler sur cette table avec une même procédure stockée.
Ma question est la suivante : Est il possible dans une même procédure stockée de :
1- supprimer des données avec "delete" ou "truncate"
2- d'insérer des nouvelles données avec" insert into"

Merci
29/08/2022, 15h41
tatayo

Bonjour,
Oui, c'est possible, d'ailleurs je ne vois pas trop pourquoi ce ne serait pas possible.

Tatayo.

Bonjour Tatayo
voila le debut de ma procedure stockée avec la creation de ma table.
Mais l'insertion de la valeur" tintin" ne se fait pas dans ma la table TblCAB.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
USE [Customer]
GO
 
Create PROCEDURE [dbo].[MAJ_TableCAB] -- Creation de la procedure
 
AS
BEGIN
SET NOCOUNT ON;
 
 
IF OBJECT_ID(TblCAB) IS NOT NULL DROP TABLE TblCAB -- si la table  existe alors on la supprime
 
 
--Création de la table  "TblCAB"
CREATE TABLE TblCAB (
    CAB varchar(30)
  )
 
--Inserer les données dans la table  "TblCAB"
INSERT INTO TblCAB (CAB)
Values('TINTIN')
 
END

29/08/2022, 21h26
Mat.M

je ne comprends pas trop l'intérêt de créer la table à chaque fois dans la procédure stockée.
En général on la crée une bonne fois pour toute.
30/08/2022, 07h58
facteur

Bonjour Mat,
Si je crée une table dans la procédure stockée c'est que cette table est une table temporaire où les données seront supprimée et remplacé par d'autres données.

Bonjour,
Quel est le SGBD utilisé (je dirai SqlServer, mais quelle version) ?

Je viens de faire le test, pour que ta procédure fonctionne j'ai du faire une petite correction :
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 USE [Customer] GO Create PROCEDURE [dbo].[MAJ_TableCAB] -- Creation de la procedure AS BEGIN SET NOCOUNT ON; IF OBJECT_ID('TblCAB') IS NOT NULL DROP TABLE TblCAB -- Ici j'ai du mettre le nom de la table entre guillemets. --Création de la table "TblCAB" CREATE TABLE TblCAB ( CAB varchar(30) ) --Inserer les données dans la table "TblCAB" INSERT INTO TblCAB (CAB) Values('TINTIN') END
La table est bien créée, et la ligne ajoutée.
Si je modifie la requête pour mettre une autre valeur, ça fonctionne aussi, l'ancienne valeur est supprimée et la nouvelle ajoutée.

Tu nous indiques que le code présenté est "le début de la procédure", donc il est tout à fait possible que le problème vienne d'une autre partie du code.

Tatayo.

Tatayo
merci pour ta réponse.
Mais cela ne fonctionne pas lorsque je change le champ et que ensuite j'exécute la procédure stockée.
Si je remplace 'TINTIN' par 'TONTON', la correction ne se fait pas. Le champ "CAB" reste toujours sur 'TINTIN'
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 USE [Customer] GO ALTER PROCEDURE [dbo].[MAJ_TableCAB] -- Creation de la procedure AS BEGIN SET NOCOUNT ON; IF OBJECT_ID('TblCAB') IS NOT NULL DROP TABLE TblCAB -- Ici j'ai du mettre le nom de la table entre guillemets. --Création de la table "TblCAB" CREATE TABLE TblCAB ( CAB varchar(30) ) --Inserer les données dans la table "TblCAB" INSERT INTO TblCAB (CAB) Values('TONTON') END

30/08/2022, 10h17
tatayo
C'est pourtant le test que j'ai fait:
1. Une première passe, avec la valeur 'TINTIN'
2. J'appelle la procédure => j'ai 'TINTIN' dans la seule ligne de la table
3. Suppression de la procédure, puis création avec la valeur 'TONTON'
4. J'appelle la procédure => j'ai 'TONTON' dans la seule ligne de la table
Comme la valeur est en dur dans la procédure, il faut la supprimer/recréer ou la modifier (ALTER PROCEDURE) pour que ça fonctionne.

Bref là je ne vois pas trop ce qui cloche de ton côté.

Tatayo.
30/08/2022, 11h02
facteur

je viens de trouver l'erreur. je ne peux pas les droits pour supprimer une table dans la base de donénes où etait inséré la table. J'ai donc changer la base de donnée où est inséré la table. et cela fonctionne.

Tatayo lorsque tu dis que tu supprimes la procédure stockée , tu voulais dire plutôt modifier avec "ALTER"
30/08/2022, 11h05
tatayo

J'avais supprimé/recréée la procédure "en mode bourrin", mais un "ALTER PROCEDURE" fonctionne aussi.

Par contre je suis étonné que tu n'ai pas eut de message d'erreur si tu n'as pas les droits pour supprimer la table.

Tatayo.

J'ai le message lorsque j'exécute la procédure stockée sur Excel.
Et cela me permet de faire la transition avec la suite :roll:
Donc voici ma procédure stockée. Ce que j'essaie de faire ensuite c'est d'alimenter la variable @nom de la table "MyTblCAB" avec une liste de données issue de Excel.:roll:
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 USE [Customer] GO /****** Object: StoredProcedure [dbo].[MAJ_TableCAB] Script Date: 30/08/2022 09:50:23 ******/ ALTER PROCEDURE [dbo].[MAJ_TableCAB] -- Creation de la procedure @Nom varchar(50) AS BEGIN SET NOCOUNT ON; IF OBJECT_ID('tempdb..#MyTblCAB') IS NOT NULL DROP TABLE #MyTblCAB -- CREATE TABLE #MyTblCAB ( CAB varchar(30) ) ----Inserer les données dans la table "TblCAB" INSERT INTO #MyTblCAB (CAB) Values(@nom) select* from #MyTblCAB MyTblCAB end

Tatayo
je sais comment exceuter une procédute stockée à partir d'Excel ( cf ci-dessous).
Mais là ou je bloque c'est que je sais insérer une seul donnée issue de Excel dans la variable @nom mais pas une liste ??

Code:

1
2
P1 = Sheets("NumCAB").Range("A2")
 .Parameters.Append .CreateParameter("P1", adVarChar, adParamInput, 129, Sheets("NumCab").Range("A2")) 'CAB

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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
Sub MAJ_InsertionCAB()
 
 
  Dim cn As ADODB.Connection
  Dim cm As ADODB.Command
  Dim rs As ADODB.Recordset
  Dim sql As String
  Dim GenereCSTRING As String
  Dim i As Integer
  Dim lesCols As Range
  Dim Feuille As Worksheet
 
 
 
Set Feuille = Worksheets("test")
 
'supprimer les annciennes données
Set lesCols = Feuille.Range("A1")
lesCols.EntireColumn.ClearContents
 
 
Set cn = New ADODB.Connection
 
 sql = "[Customer].dbo.MAJ_TableCAB" ' je nomme ma procédure stockée
 
 GenereCSTRING = "Provider=SQLOLEDB.1;Password=" & "MdP" & ";Persist Security Info=True;User ID=" & "exploitation" & ";Initial Catalog=" & "NomServeur" & ";Data Source=" & "000000000" & " " '* SQLServer2008R2
 cn.Open GenereCSTRING 'J'ouvre ma connection.
 
 
 
 
P1 = Sheets("NumCAB").Range("A2")
 
  Set cm = New ADODB.Command
  With cm
    .ActiveConnection = cn
    .CommandText = sql
    .CommandTimeout = 0 'evite que le delai d'attente de requete expire (que la requte bugue)
    .CommandType = adCmdStoredProc 'invoque une procédure stockée. Le serveur SQL doit savoir où aller chercher la commande, c'est le pourquoi de la ligne qui spécifie le CommandType
   .Parameters.Append .CreateParameter("P1", adVarChar, adParamInput, 129, Sheets("NumCab").Range("A2")) 'CAB
 
 
 
  End With
 
 
  Set rs = cm.Execute()
 
 
 
  With ThisWorkbook.Sheets("test")
     For i = 0 To rs.Fields.Count - 1 'On place le nom des champs sur la ligne 4 de ma feuille Excel
               .Range("A1").Offset(0, i) = rs(i).Name
     Next
        .Range("A2").CopyFromRecordset rs 'la on copie le résultat de la requête
 
 
End With
 
 
End Sub

30/08/2022, 11h54
tatayo

Là je ne peux pas t'aider, je ne sais pas appeler une procédure Sql Serveur depuis Excel.

Il faut peut-être poser la question dans la section Excel de ce forum, vu que c'est plus un problème VBA que SQL ?

Tatayo.
30/08/2022, 12h44
facteur

Ok Tatayo
Et merci d'avoir pris le temps de me répondre;)
31/08/2022, 15h41
SQLpro

C'est possible aussi de faire cela en une seule instruction sans devoir passer par une procédure en utilisant la commande SQL normalisée MERGE...

A +