alter view
  "DBA".v_DaylyListForPeriod
  as select BK.GuestNum,
    "Name"=BK.GuestName,
    BK.ArriveDate,
    BK.LeaveDate,
    BK.LastRoom,
    BK.NumNights,
    Price=BK.RegPrice,
    G.Balance,
    // Yanko + fix_18_August_2006
    /*
    xxxxx=isnull((select sum((SC.PayedServices*sc.SumCredit)*dr.ExchangeRate)
      from "dba".ServiceCredits as sc,"dba".DayRates as dr,"dba".Resmoney as rs
      where sc.payedservices>0
      and sc.kodcurrency=dr.kodcurrency
      and sc.datecreditdt=dr.datedt and sc.GuestNo=BK.GuestNum
      and BK.GuestNum=rs.Guestno
      and rs.datemoneydt between bvrdata1 and bvrdata2),0),
    */
    xxxxx=isnull((SELECT SUM(R."SUM" * C.ExchangeRate)
      FROM ResMoney R, Currencies C, Admin A
      WHERE R.GuestNo = BK.GuestNum AND
        R.Currency = C.KodCurrency AND
        R.KodAdmin = A.AdminNo AND
        R.DateMoney <> 0 
      //  AND R.DateMoneyDt between bvrdata1 and bvrdata2
        ),0),
    // Suma=(BK.PayNightPrice+xxxxx+GetPayedDepositsByGuest(BK.GuestNum)),
    Suma=xxxxx,
    // Yanko -
    Passport=String(G.PassportSeria,G.PassportNumber),
    G.EGN,
    Country=C.Description,
    AddressData=G."Address",
    ContractName=Ctr.FullName,BK.Admin
    from "dba".v_NewArriveStayLeaveGuestBook as BK
    ,"dba".Guests as G
    ,"dba".Countries as C
    ,"dba".Contracts as Ctr
    where BK.ArriveDate<>BK.LeaveDate
    and G.GuestNum=BK.GuestNum
    and C.CountryKod=G.NativeCountry
    and G.Contract=Ctr.ContractNo
    and(DateIntersection(bvrData1,bvrData2,BK.ArriveDate,BK.LeaveDate)>0)
//[v 18.04.2005] Jorko
//[v 21.06.2005] Jorko
//[v 27.06.2005] Safa
//[v 22.08.2006] Yanko