/*INFO: Tento script vytvoří defici grafu Vydané faktury dle nákladových okruhů (středisek)
*/
DECLARE @BrowseGraf INT,@Prehled INT
SET @Prehled=29
IF NOT EXISTS(SELECT 0 FROM TabExtKom WHERE Typ=3 AND IdBrowse = @Prehled AND UP='OrangeGraf.Graf')
INSERT INTO TabExtKom(Skupina,Typ,Popis,UP,Parametry,IdBrowse,TextBrowse,NazevPodmenu,ParamHe)
VALUES('Graf',3,'Graf','OrangeGraf.Graf','',@Prehled,@Prehled,'Graf',0)
INSERT INTO tOrangeGraf(IdBrowse,Popis,TypDefinice,Definice,Body,ZdrojDat,Poznamka,Popisky)
VALUES(
29,
'Vydané faktury dle nákladových okruhů (středisek)',
1,
'object TChart
  Left = 0
  Top = 33
  Width = 1024
  Height = 667
  Legend.CheckBoxes = True
  Legend.LegendStyle = lsSeries
  Title.Text.Strings = (
    ''test B'')
  Align = alClient
  TabOrder = 0
  AutoSize = True
  object TBarSeries
    Active = False
    Marks.Callout.Brush.Color = clBlack
    Marks.Style = smsValue
    Marks.Visible = True
    ShowInLegend = False
    Gradient.Direction = gdTopBottom
    XValues.Name = ''X''
    XValues.Order = loAscending
    YValues.Name = ''Sloupec''
    YValues.Order = loNone
  end
  object TBarSeries
    Tag = 1
    Marks.Callout.Brush.Color = clBlack
    Marks.Style = smsValue
    Marks.Visible = True
    Gradient.Direction = gdTopBottom
    XValues.Name = ''X''
    XValues.Order = loAscending
    YValues.Name = ''Sloupec''
    YValues.Order = loNone
  end
end
',
'SELECT TabNakladovyOkruh.Nazev,SUM(TabDokladyZbozi.SumaKc) SumaKc
FROM TabDokladyZbozi
JOIN TabNakladovyOkruh ON TabDokladyZbozi.NOkruhCislo=TabNakladovyOkruh.Cislo/*###*//*^^^*/GROUP BY TabNakladovyOkruh.Nazev',
0,
'',
'0|Ano|Nazev|Název dokladu
1|Ne|SumaKc|Kč celkem
')