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

GO

create view DBA.v_IzdadeniSmetki as
  select SmetkaNo=(select first Inv1.ExternalNo from DBA.Invoices as Inv1 where Inv1.InvoiceNo = Inv.InvoiceNo),
    RealSmetkaNo=Inv.InvoiceNo,
    FakturaNo=if((Inv.TrueInvoiceNo <> 0) and(Inv.TrueInvoiceNo < 1000000000)) then
      Inv.MaskaFaktura || substr('0000000000',1,9-length(Inv.TrueInvoiceNo)) || Inv.TrueInvoiceNo
    else convert(varchar,Inv.TrueInvoiceNo)
    endif,
    DokData=Inv.InvoiceDateDt,
    --Maria +, 1975
    DokTime=DateFormat(Inv.TrueInvoiceHour,'hh:mm'),
    --Maria -
    Klient=Inv.Whom,
    DanNo=Inv.Bulstat,
    Operator=Adm.ShortName,
    SumaBDDS=round(Inv.TotalNoVAT+Inv.WithoutVAT,4),
    DDS=round(Inv.VAT,4),
    Suma=round(Inv.GrandTotal,4),
    PlatVBroi=round(Pari.VBroi,4),
    PlatPoSmetka=round(Pari.PoSmetka,4),
    Plateni=round(Pari.VBroi+Pari.PoSmetka,4),
    DDSTypeSt=DBA.GetVatRateInvoice(INV.InvoiceNo),
	Fiscal=(if Inv.Fiscal = 0 then 'Не'
    else 'Да' --Maria -
    endif) from DBA.Invoices as Inv,DBA.v_PariPoSmetki as Pari,DBA.Admin as Adm
    where Inv.InvoiceNo = Pari.SmetkaNo and Inv.KodAdmin = Adm.AdminNo union all
  select SmetkaNo=(select first Inv1.ExternalNo from DBA.Invoices as Inv1 where Inv1.InvoiceNo = Inv.VaucherInvoiceNo),
    RealSmetkaNo=Inv.VaucherInvoiceNo,
    FakturaNo=if((Inv.TrueInvoiceNo <> 0) and(Inv.TrueInvoiceNo < 1000000000)) then
      Inv.MaskaFaktura || substr('0000000000',1,9-length(Inv.TrueInvoiceNo)) || Inv.TrueInvoiceNo
    else convert(varchar,Inv.TrueInvoiceNo)
    endif,
    DokData=Inv.InvoiceDateDt,
    --Maria +, 1975
    DokTime=DateFormat(Inv.TrueInvoiceHour,'hh:mm'),
    --Maria -
    Klient=Inv.Whom,
    DanNo=Inv.Bulstat,
    Operator=Adm.ShortName,
    SumaBDDS=round(Inv.TotalNoVAT+Inv.WithoutVAT,4),
    DDS=round(Inv.VAT,4),
    Suma=round(Inv.GrandTotal,4),
    PlatVBroi=round(Pari.VBroi,4),
    PlatPoSmetka=round(Pari.PoSmetka,4),
    Plateni=round(Pari.VBroi+Pari.PoSmetka,4),
	DDSTypeSt=DBA.GetVatRateInvoice(INV.VaucherInvoiceNo),
    --Maria +, 1982
    Fiscal=(if Inv.Fiscal = 0 then 'Не'
    else 'Да' --Maria -
    endif) from DBA.VaucherInvoices as Inv,DBA.v_VtdPariPoSmetki as Pari,DBA.Admin as Adm
    where Inv.VaucherInvoiceNo = Pari.SmetkaNo and Inv.KodAdmin = Adm.AdminNo and(
    (select Registers.IntStojnost from DBA.Registers where Registers.RegisterName = 'VTDCommonCounter') = 0)
    order by RealSmetkaNo asc
-- gnikolov - добавено съобразяване с регистър VTDCommonCounter поръчка 2008
--[30.07.2009] - Yoan - Izchislqva pravilno SumaBDDS