IF (EXISTS (select table_name from systable where LCase(table_name)=LCase('v_DDSProdagbiVTD'))) THEN
 Drop view v_DDSProdagbiVTD
END IF

go

create view DBA.v_DDSProdagbiVTD as select
    --RedNo=Number(*),
    N=Invoices.InvoiceNo,
    Faktura=Invoices.TrueInvoiceNo,
    Ime=Invoices.Whom,
    DanN=Invoices.WhomDanNum,
    Suma=Invoices.GrandTotal,
    DDS=Invoices.VAT,
    SumaBezDDS=Invoices.TotalNoVAT,
    NeoblSuma=Invoices.WithoutVAT,
    FDate=Invoices.TrueInvoiceDate,
    TYPE=(select Type from dba.DocTypes where N = 4),
    TypeName=DocTypes.DocName,Sdelka='ÓÑËÓÃÀ',
    Mask=Invoices.MaskaFaktura from
    dba.Invoices,dba.DocTypes
    where
    Invoices.TrueInvoiceNo <> 0 and
    ((Invoices.CancelInvoiceNo > 0 and DocTypes.N = 5) or((Invoices.CancelInvoiceNo = 0 or Invoices.CancelInvoiceNo = -1) and DocTypes.N = 4))
  union all
  select --RedNo=Number(*),
    N=VaucherInvoices.VaucherInvoiceNo,
    Faktura=VaucherInvoices.TrueInvoiceNo,
    Ime=VaucherInvoices.Whom,
    DanN=VaucherInvoices.WhomDanNum,
    Suma=VaucherInvoices.TotalNoVAT*VaucherInvoices.ExchangeRate,
    DDS=VaucherInvoices.VAT*VaucherInvoices.ExchangeRate,
    SumaBezDDS=VaucherInvoices.GrandTotal*VaucherInvoices.ExchangeRate,
    NeoblSuma=VaucherInvoices.WithoutVAT*VaucherInvoices.ExchangeRate,
    FDate=VaucherInvoices.TrueInvoiceDate,
    TYPE=(select Type from dba.DocTypes where N = 4),
    TypeName=DocTypes.DocName,Sdelka='ÓÑËÓÃÀ',
    Mask=VaucherInvoices.MaskaFaktura from
    dba.VaucherInvoices,dba.DocTypes
    --,dba.VaucherArticles 
    where
    VaucherInvoices.TrueInvoiceNo <> 0
    and DocTypes.N = (if VaucherInvoices.CancelInvoiceNo > 0 then 5 else 4 endif)
    and VaucherInvoices.CancelInvoiceNo >= -1
    -- and ((VaucherInvoices.CancelInvoiceNo > 0 and DocTypes.N = 6) or((VaucherInvoices.CancelInvoiceNo = 0 or VaucherInvoices.CancelInvoiceNo = -1) and DocTypes.N = 4))
     --and VaucherInvoices.VaucherInvoiceNo=VaucherArticles.InvoiceNo
//[23.08.2007] - Maria - VTD da se pokazvat v Spravka za fakturite