IF (EXISTS (select Table_name from SysTable where LCase(Table_name)=LCase('v_ServForContract'))) THEN
Drop View v_ServForContract
END IF

GO

CREATE VIEW "DBA"."v_ServForContract"  as select distinct
    c.FullName as Contract,
    va.VaucherNum,
    va.VaucherSeason,
    va.VaucherBoard,
    va.VaucherRoomType,
    va.VaucherBedType,
    "at".Description as AdultType,
    va.Nights,
    va.TotalNights,
    va.GuestName,
    va.SinglePrice,
    GrandTotal=(if (vi.VAT=0 and vi.WithoutVAT<>0)  then  va.GrandTotal  else (va.GrandTotal*1.07) endif),
    GrandTotalLV=(if (vi.VAT=0 and vi.WithoutVAT<>0) then  (va.GrandTotal*cu.ExchangeRate)   else  ((va.GrandTotal*1.07)*cu.ExchangeRate) endif),
    va.ArticleName,
    va.nights as NumberServices,
    vi.InvoiceDateDt as DateCreditDt,
    va.Discount,
    cu.Symbol,
    va.InvoiceNo,
    VtdVauchers.DateArrive
    from "dba".VaucherInvoices as vi join
    "dba".VaucherArticles as va on va.InvoiceNo=vi.VaucherInvoiceNo left outer join
    "dba".VtdVauchers on VtdVauchers.VaucherN=va.VaucherN join
    "dba".Contracts as c on vi.ContractNo=c.ContractNo left outer join
    "dba".AdultTypes as "at" on "at".AdultNo=va.AdultType join
    "dba".Currencies as cu
    on va.Currency=cu.KodCurrency
    where vi.InvoiceDateDt>=bvrData1 and vi.InvoiceDateDt<=bvrData2
//[21 may 2003] - peter - modified