/*INFO: Tento script vytvoří defici grafu Saldo */ DECLARE @BrowseGraf INT,@Prehled INT SET @Prehled=1 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( 1, 'Saldo', 0, 'object TChart Left = 0 Top = 33 Width = 1024 Height = 667 AllowPanning = pmHorizontal BackWall.Color = 13626620 BackWall.Pen.Visible = False BackWall.Size = 5 BackWall.Transparent = False Border.Color = 9423874 Border.Width = 7 Border.Visible = True BottomWall.Color = 16550915 BottomWall.Pen.Visible = False BottomWall.Size = 5 Gradient.Direction = gdFromCenter Gradient.EndColor = clWhite Gradient.MidColor = 16777088 Gradient.StartColor = 10814240 Gradient.Visible = True LeftWall.Color = 16744576 LeftWall.Pen.Visible = False LeftWall.Size = 5 Legend.CheckBoxes = True Legend.DividingLines.Color = clSilver Legend.DividingLines.Visible = True Legend.Font.Color = 6553600 Legend.Frame.Visible = False Legend.Gradient.Direction = gdTopBottom Legend.Gradient.EndColor = 13556735 Legend.Gradient.MidColor = 14739177 Legend.Gradient.StartColor = 16774122 Legend.Gradient.Visible = True Legend.Shadow.HorizSize = 4 Legend.Shadow.Transparency = 50 Legend.Shadow.VertSize = 5 Legend.Symbol.Squared = True RightWall.Size = 5 Title.Color = clBlack Title.Font.Color = clNavy Title.Font.Height = -16 Title.Frame.Color = 10083835 Title.Frame.Width = 2 Title.Gradient.Balance = 40 Title.Gradient.Direction = gdRightLeft Title.Gradient.EndColor = clBlack Title.Gradient.MidColor = 8388672 Title.Gradient.StartColor = clGray Title.Gradient.Visible = True Title.Shadow.HorizSize = 4 Title.Shadow.Transparency = 70 Title.Shadow.VertSize = 4 Title.Text.Strings = ( ''Saldo'') BottomAxis.Axis.Width = 1 BottomAxis.Grid.Color = 16759225 BottomAxis.Grid.SmallDots = True BottomAxis.LabelsFont.Color = clNavy BottomAxis.LabelsFont.Name = ''Tahoma'' BottomAxis.LabelsFont.Style = [fsBold] BottomAxis.MinorGrid.Color = 15066597 BottomAxis.MinorGrid.Visible = True BottomAxis.MinorTickCount = 7 BottomAxis.TickLength = 5 Frame.Visible = False LeftAxis.Axis.Color = clNavy LeftAxis.Axis.Width = 1 LeftAxis.Grid.Color = clBlue LeftAxis.Grid.SmallDots = True LeftAxis.LabelsFont.Color = clNavy LeftAxis.LabelsFont.Name = ''Tahoma'' LeftAxis.LabelsFont.Style = [fsBold] MaxPointsPerPage = 7 Shadow.Color = clBlack Shadow.HorizSize = 7 Shadow.VertSize = 7 Zoom.Animated = True Align = alClient BevelInner = bvLowered BevelOuter = bvNone BevelWidth = 2 TabOrder = 1 AutoSize = True ColorPaletteIndex = 3 object THorizBarSeries Tag = 1 Marks.Callout.Brush.Color = clBlack Marks.Style = smsValue Marks.Visible = True Title = #268#237''slo organizace'' Gradient.Direction = gdTopBottom XValues.Name = ''Sloupec'' XValues.Order = loNone YValues.Name = ''Y'' YValues.Order = loAscending end object THorizBarSeries Tag = 2 Marks.Callout.Brush.Color = clBlack Marks.Style = smsValue Marks.Visible = True Title = ''Saldo celkem'' Gradient.Direction = gdTopBottom XValues.Name = ''Sloupec'' XValues.Order = loNone YValues.Name = ''Y'' YValues.Order = loAscending end object THorizBarSeries Tag = 3 Marks.Callout.Brush.Color = clBlack Marks.Style = smsValue Marks.Visible = True Title = ''Fakturace celkem'' Gradient.Direction = gdTopBottom XValues.Name = ''Sloupec'' XValues.Order = loNone YValues.Name = ''Y'' YValues.Order = loAscending end end ', 'SELECT Nazev,CisloOrg,Saldo,FaSumaCelkem FROM TabCisOrg', 0, '', '')