/*INFO: Tento script vytvoří defici grafu Fakturace dle zamestnancu
*/
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,
'Fakturace dle zamestnancu',
1,
'object TChart
  Left = 0
  Top = 33
  Width = 1024
  Height = 667
  Legend.CheckBoxes = True
  Legend.LegendStyle = lsSeries
  Title.Text.Strings = (
    ''test'')
  Align = alClient
  TabOrder = 0
  AutoSize = True
  object TBarSeries
    Active = False
    Marks.Callout.Brush.Color = clBlack
    Marks.Style = smsValue
    Marks.Visible = True
    ShowInLegend = False
    Title = ''[Prijmeni]''
    Gradient.Direction = gdTopBottom
    XValues.Name = ''X''
    XValues.Order = loAscending
    YValues.Name = ''Sloupec''
    YValues.Order = loNone
  end
  object TBarSeries
    Tag = 1
    ColorEachPoint = True
    Marks.Callout.Brush.Color = clBlack
    Marks.Style = smsValue
    Marks.Visible = True
    Title = ''[Fakturace]''
    Gradient.Direction = gdTopBottom
    XValues.Name = ''X''
    XValues.Order = loAscending
    YValues.Name = ''Sloupec''
    YValues.Order = loNone
  end
end
',
'SELECT TabCisZam.Prijmeni,SUM(TabDokladyZbozi.SumaKc) AS Fakturace
FROM TabDokladyZbozi
LEFT JOIN TabCisZam ON TabCisZam.Cislo=TabDokladyZbozi.CisloZam/*###*//*^^^*/GROUP BY TabCisZam.Prijmeni',
0,
'',
'0|Ano|Prijmeni|[Prijmeni]
1|Ne|Fakturace|[Fakturace]
')