IF (EXISTS(Select * from sys.systable where LCase(table_name) = LCase('v_RegBaseServicesPeriod')))
THEN Drop view v_RegBaseServicesPeriod
END IF

GO

create view
  DBA.v_RegBaseServicesPeriod( RegDate,RealDateTime,
  GuestName,
  Account,
  RoomNo,
  Service,
  ServicesNum,
  ServiceSngPrice,
  AllSum,
  Dogovor,
  Plateni) 
  as select RegDate=DateRegDt,RealDateTime=RealDateTime,
    GuestName=Guests.Name,
    Account=BK.Guest,
    --Maria
    --RoomNo=BK.Room,
    RoomNo=R.RoomName,Service= PK.Description,  //'Нощувка и застраховка',
    --Maria
    ServicesNum=DBA.GetMonthsForBook(BK.RegNum,0), --DateIntersection(bvrData1,bvrData2,DateRegDt,Days(DateRegDt,NumLodgings)) Dobrin 2195
    ServiceSngPrice=Currencies.ExchangeRate*BK.Price,
    AllSum=ServicesNum*ServiceSngPrice,
    Dogovor=Contracts.ShortName,
    -- Plateni=null
    Plateni=if PK.NachinPlat = 0 then BK.PayedLodgings*ServiceSngPrice else DBA.GetMonthsForBook(BK.RegNum,1)*ServiceSngPrice endif from --Dobrin 2195 - promqna na nachina na izchislenie na platenite
    DBA.PriceKinds as PK, --Dobrin 2195
    --Maria
    DBA.Rooms as R,
    --Maria
    DBA.Book as BK,dba.Guests,DBA.Currencies,DBA.Contracts where
    PK.PriceKind = BK.PriceKind and --Dobrin 2195
    --Maria
    BK.Room = R.RoomNum and
    --Maria
    Guests.GuestNum = BK.Guest and Guests.Contract = Contracts.ContractNo and
    Contracts.GroupNo = any(select ShowType from dba.GrContracts where GrNo = -1) and
    BK.KodCurrency = Currencies.KodCurrency and
    Guests.Status <> 0 and ServicesNum <> 0
// 04.August.2006 - Yanko - променено Plateni, за да се показва в Регистрирани услуги
// 21.December.2007 - Maria - добавена колоната RealDateTime
// 12.January.2009 - Dobrin - интегрирано за месечните наеми да не взима брой платени нощувки, а бр платени месеци
// 23.Februari.2009 - Milko - сменено Service= 'Нощувка и застраховка' да изписва името на ценоразписа