DECLARE @BARKOD varchar(40)
DECLARE UP CURSOR
KEYSET
FOR SELECT KODU FROM STOK
DECLARE @K varchar(40)
OPEN UP
FETCH NEXT FROM UP INTO @K
WHILE (@@fetch_status =0)
BEGIN


SET @BARKOD =(SELECT TOP 1 BARKODNO FROM STOK_BARKOD WHERE STOK=@K)
IF @BARKOD<>''
IF (SELECT COUNT(*) FROM STOK WHERE KODU=@BARKOD) =0
IF @BARKOD<>@K
EXEC [dbo].[sp_KodDegistir] 'STOK',@K,@BARKOD

FETCH NEXT FROM UP INTO @K


END
CLOSE UP
DEALLOCATE UP
GO