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
| SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
ALTER PROCEDURE dbo.CHANGEMENT_NoModele AS
DECLARE @AR_Ref CHAR(30),@nbEnr FLOAT,@nb CHAR(1)
-- declaration du curseur
DECLARE Curseur CURSOR
FOR
SELECT AR_Ref
FROM F_ARTICLE
WHERE FA_CodeFamille LIKE 'TESTYAN2'
-- ouverture du curseur
OPEN Curseur
-- lecture du premier enregistrement
FETCH Curseur INTO @AR_Ref
-- boucle de traitement
WHILE @@fetch_Status = 0
BEGIN
INSERT INTO F_ARTMODELE (AR_Ref, MO_No, AM_Domaine) VALUES (@AR_Ref, 1, 2)
-- lecture de l'enregistrement suivant
FETCH Curseur INTO @AR_Ref
END
-- fermeture du curseur
CLOSE Curseur
-- libération de la mémoire
DEALLOCATE Curseur
GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO |
Partager