KorektaDzialLiscie

--* gSkrypt.sOpis = $Korekta Liści$
-->
--alter procedure KorektaDzialLiscie
--  as

    set nocount on


        ALTER TABLE [CDN].[Dzialy] ALTER COLUMN [DZL_Lisc] SMALLINT

        declare
            @ID int,
            @AdresWezla NVARCHAR(512),
            @Lisc smallint,
            @tmpLisc int


        declare DZIALY cursor local fast_forward
            for
                select DZL_DzlId,DZL_AdresWezla, DZL_Lisc from CDN.Dzialy

            open DZIALY

                while (1=1)

                    begin
                            fetch next from DZIALY into @ID, @AdresWezla, @Lisc

                            if @@fetch_status <> 0 break

                            if exists (select * from cdn.Dzialy where DZL_DzlId = @ID and DZL_Poziom > 1)
                            begin
                                set @tmpLisc  = (select  CONVERT(INT,RIGHT(DZL_AdresWezla, 3)) from cdn.Dzialy  where DZL_DzlId = @ID)
                                update CDN.Dzialy set DZL_Lisc = @tmpLisc where DZL_DzlId = @ID
                            end

                    end

            close DZIALY

            deallocate DZIALY

            declare
            @PracID int,
            @DzialID int

set nocount off
--<