CREATE FUNCTION rrr() 
RETURNS @Ost22 table (Period DateTime,Skl Char( 9 ),Tov Char( 9 ),Kontr Char( 13 ),T int,Kvo dec( 18 , 3 ),Sum dec( 18 , 3 ))
Begin 
declare @FirstDayMonth datetime
declare @FirstDayPrevMonth datetime
declare @CurrentDate datetime
declare @LastDate datetime
declare @DaysCount int
declare @Year char( 4 )
declare @Month char( 2 )
declare @Day1 char( 2 )
declare @Day2 char( 2 )
 ---============================================ ???????????? ????????? ========================================
 
set @DaysCount=(select count(distinct left(date_time_iddoc, 8 )) from _1sjourn(nolock) where rf22= 1 )
set @LastDate=(select top  1  convert(datetime,left(date_time_iddoc, 8 )) from _1sjourn(nolock) where rf22= 1  order by date_time_iddoc desc)
 ---============================================ ???? ?? ?????????? ========================================
 
while @DaysCount>- 1  
Begin
  set @CurrentDate=dateadd(day,-@DaysCount,@LastDate)
  set @Year=convert(char( 4 ),datepart(year,@CurrentDate))
  set @Month=datepart(month,@CurrentDate)
  set @Day1='01'
  set @Day2=datepart(day,@CurrentDate)
  if @Month< 10  
   begin
    set @Month='0'+convert(char( 2 ),@Month)
   end
  else
   begin
    set @Month=convert(char( 2 ),@Month)
   end
  if @Day2< 10  
   begin
    set @Day2='0'+convert(char( 2 ),@Day2)
   end
  else
   begin
    set @Day2=convert(char( 2 ),@Day2)
  end
  set @FirstDayMonth=convert(datetime,@Year+@Month+@Day1)
  set @FirstDayPrevMonth=dateadd(month,- 1 ,@FirstDayMonth)

 Insert into @Ost22  
 select Period=@CurrentDate,Skl,Tov,Kontr,t,Kvo=sum(Kvo),Sum=sum(sum) from(
   select Skl=sp26,Tov=sp23,Kontr=sp29,t=sp459,Kvo=sum(sp38),Sum=sum(sp214)
    from RA22(nolock) 
    where date_time_iddoc between @Year+@Month+@Day1 and @Year+@Month+@Day2
    group by sp26,sp23,sp29,sp459
   union all
    select Skl=sp26,Tov=sp23,Kontr=sp29,t=sp459,Kvo=sum(sp38),Sum=sum(sp214)
    from RG22(nolock) 
    where period=@FirstDayPrevMonth
    group by sp26,sp23,sp29,sp459) h 
  group by Skl,Tov,Kontr,t
  set @DaysCount=@DaysCount- 1 
 End
 return 
End