$\text{}\mathrm{Tau}=2*\mathrm{Pi};\text{}\mathrm{Needs}\left[''DatabaseLink`''\right];\text{}\mathrm{conn}=\mathrm{OpenSQLConnection}\left[\mathrm{JDBC}\left[''SQLite'',''/home/hugo/.stupan/stupan.db''\right]\right];\text{}\text{}\mathrm{DataForMonth}\left[\mathrm{start\_},\mathrm{end\_}\right]:=\mathrm{SQLExecute}\left[\mathrm{conn},\text{}''SELECT\; count(l.id),\; p.name\; FROM\; log\; l\; INNER\; JOIN\; products\; p\; ON\; p.id\; =\; l.product\_id\; WHERE\; l.time\; BETWEEN\; `1`\; AND\; `2`\; GROUP\; BY\; p.id\; ORDER\; BY\; count(l.id)\; DESC'',\text{}\left\{\mathrm{DateString}\left[\mathrm{start},''ISODate''\right],\text{}\mathrm{DateString}\left[\mathrm{end},''ISODate''\right]\right\}\right];\text{}\text{}\mathrm{BarForMonth}\left[\mathrm{start\_},\mathrm{end\_}\right]:=\mathrm{Block}\left[\left\{\mathrm{data}=\mathrm{DataForMonth}\left[\mathrm{start},\mathrm{end}\right],\mathrm{values},\mathrm{names}\right\},\text{}\mathrm{values}=\mathrm{data}\left[\left[\mathrm{All},1\right]\right];\text{}\mathrm{names}=\mathrm{data}\left[\left[\mathrm{All},2\right]\right];\text{}\mathrm{BarChart}\left[\left\{\mathrm{values}\right\},\mathrm{ChartLabels}\to \left\{\mathrm{Placed}\left[\mathrm{names},\mathrm{Axis},\mathrm{Rotate}\left[\#,\mathrm{Tau}/4\right]\&\right]\right\}\right]\right];\text{}$

$\mathrm{Quantity}\left[2,''Year''\right]$

$\mathrm{Manipulate}\left[\mathrm{BarForMonth}\left[\mathrm{start},\mathrm{end}\right],\text{}\left\{\mathrm{start},\mathrm{AbsoluteTime}@\left\{2017,1\right\},\mathrm{AbsoluteTime}@\left\{2019\right\}\right\},\text{}\left\{\mathrm{end},\mathrm{AbsoluteTime}@\left\{2017\right\},\mathrm{AbsoluteTime}@\left\{2019\right\}\right\}\right]$

$\mathrm{BarForMonth}\left[\left\{2017,01,01\right\},\mathrm{Today}\right]$

$\mathrm{BarForMonth}\left[\left\{2017,1,1\right\},\begin{array}{cc}& \text{Day:}\text{Wed 31 Oct 2018}\end{array}\right]$

$\mathrm{BarForMonth}\left[\left\{2017,1,1\right\},\begin{array}{cc}& \text{Day:}\text{Wed 31 Oct 2018}\end{array}\right]$

$\mathrm{BarForMonth}\left[9\right]$

Ovanstående är ett exempel på logg för Stupan under januari månad 2018.

Test med tider

$\mathrm{2018-10-30\; 13:10:46}$

$\begin{array}{cc}& \text{Tue 30 Oct 2018 13:10:46}\text{GMT+}\text{}1.\end{array}$

$\mathrm{AS}\mathrm{CREATE}\mathrm{VIEW}\mathrm{money\_change}$

$\mathrm{SQLSelect}\left[\mathrm{conn},''products'',\left\{''name''\right\},''SortingColumns''\to \left\{\mathrm{SQLColumn}\left[''name''\right]\to ''Ascending''\right\}\right]$

$\left\{\left\{\mathrm{10\; Trappistes\; Rochefort}\right\},\left\{\mathrm{6\; Trappistes\; Rochefort}\right\},\left\{\mathrm{8\; Trappistes\; Rochefort}\right\},\left\{\text{Aecht Schlenkerla Rauchbier}\right\},\left\{\text{Anchor Christmas Ale}\right\},\left\{\text{Anchor Coffee Porter}\right\},\left\{\text{Anchor Steam Beer}\right\},\left\{\text{Bad Apple}\right\},\left\{\text{Badgers First Call}\right\},\left\{\text{Balder Pastersbier Walhöll}\right\},\left\{\text{Ballast Point Sour Blackberry}\right\},\left\{\text{Ballast point HW series}\right\},\left\{\text{Banderos Chips}\right\},\left\{\text{Bedrö Bitter}\right\},\left\{\mathrm{Bellman}\right\},\left\{\text{Berliner Vice}\right\},\left\{\text{Bernard Amber lager}\right\},\left\{\text{Bernard Celebration}\right\},\left\{\text{Biere nouvelle}\right\},\left\{\text{Billig Sprit}\right\},\left\{\mathrm{Billys}\right\},\left\{\text{Birra Nazi}\right\},\left\{\mathrm{Bitburger}\right\},\left\{\text{Black Chocolate Stout}\right\},\left\{\text{Blå Chimay}\right\},\left\{\mathrm{Borracho}\right\},\left\{\text{Boulard Cidre Biologique}\right\},\left\{\mathrm{Breznak}\right\},\left\{\text{Breznak Burk}\right\},\left\{\mathrm{Carnegie}\right\},\left\{\mathrm{Celebrator}\right\},\left\{\text{Chips [100, 250)}\right\},\left\{\text{Chips [250, 350)}\right\},\left\{\text{Cider Rose}\right\},\left\{\text{Cidre Biologique ca Ribaude}\right\},\left\{\text{Cirrus the Cloudy Lager}\right\},\left\{\mathrm{Corona}\right\},\left\{\text{Crowmoor Päron}\right\},\left\{\text{Cuvee des Jacobins}\right\},\left\{\mathrm{Daim}\right\},\left\{\text{Dale's Pale Ale}\right\},\left\{\text{Double Chocolate}\right\},\left\{\mathrm{Duvel}\right\},\left\{\text{Eko torr äppelcider}\right\},\left\{\text{Electric Nurse APA}\right\},\left\{\text{Erdinger Kristall}\right\},\left\{\text{Erdinger Weißbier}\right\},\left\{\text{Fat Tire}\right\},\left\{\mathrm{Finläsk}\right\},\left\{\text{Flat Tire}\right\},\left\{\text{Folkes Lager}\right\},\left\{\text{Folkes röda IPA}\right\},\left\{\text{Founders Curmudgeon}\right\},\left\{\text{Founders Dirty Bastard}\right\},\left\{\text{Franziskaner Weissbier}\right\},\left\{\text{Fuller's past masters}\right\},\left\{\text{Fullers ESB}\right\},\left\{\text{Gato Negro}\right\},\left\{\text{Geuze Boon Black Label}\right\},\left\{\text{Ginger Joe}\right\},\left\{\mathrm{Gorbys}\right\},\left\{\text{Goud Carolus}\right\},\left\{\text{Gouden Carolus Christmas}\right\},\left\{\text{Granny Mary's Red Ale}\right\},\left\{\text{Grebbestads Julöl}\right\},\left\{\text{Gueze Tilquin}\right\},\left\{\mathrm{Guiness}\right\},\left\{\text{Göteborgs Christmas}\right\},\left\{\text{Göteborgs nya starkpilsner}\right\},\left\{\text{Hale to Nothing}\right\},\left\{\text{Hanssens Oude Gueze}\right\},\left\{\text{Holley American Style}\right\},\left\{\text{Homework Series}\right\},\left\{\text{Honey Dew}\right\},\left\{\mathrm{Häfvöl}\right\},\left\{\text{Innis \& Gunn}\right\},\left\{\text{J.P.Chenet}\right\},\left\{\text{Jenny Nyström Påsköl}\right\},\left\{\mathrm{Jutesäck}\right\},\left\{\mathrm{Kilkenny}\right\},\left\{\text{Kona Big Wave}\right\},\left\{\text{Kravall Draget}\right\},\left\{\mathrm{LEON}\right\},\left\{\text{La Choulette Ambree}\right\},\left\{\text{La Trappe Trappist Tripel}\right\},\left\{\text{Leffe Blond}\right\},\left\{\text{Leffe Brun Storflaska}\right\},\left\{\text{Lindemans Cuvee Rene Oude Gueuze}\right\},\left\{\text{Lindemans Äpple}\right\},\left\{\text{London Pale Ale Meantime}\right\},\left\{\text{London Porter}\right\},\left\{\text{London Pride}\right\},\left\{\text{Lustgårdens Cider Torr Äpple}\right\},\left\{\text{Lättöl \& Fulläsk}\right\},\left\{\mathrm{Magners}\right\},\left\{\text{Mc Chouffe Brune}\right\},\left\{\text{McGarg Granny Marry Red Lay}\right\},\left\{\text{Medlem Halvår}\right\},\left\{\text{Medlem Helår}\right\},\left\{\mathrm{Märke}\right\},\left\{\text{N'Ice Chouffe}\right\},\left\{\mathrm{Nachos}\right\},\left\{\mathrm{Nebuchadnezzar}\right\},\left\{\text{Newcastle Brown Ale}\right\},\left\{\text{NääS Påsköl}\right\},\left\{\mathrm{Nötter}\right\},\left\{\text{Oppigårds Amarillo}\right\},\left\{\text{Oppigårds Dalalager}\right\},\left\{\text{Oppigårds Golden Ale}\right\},\left\{\text{Oppigårds Indian Tribute IPA}\right\},\left\{\text{Oppigårds New Sweden IPA}\right\},\left\{\text{Oppigårds Norn pale ale}\right\},\left\{\text{Oppigårds Thurbo Double IPA}\right\},\left\{\text{Pant rödback med flaskor}\right\},\left\{\text{Pohjala Italobänger}\right\},\left\{\text{Pohjala Jöuluöö}\right\},\left\{\mathrm{Popcorn}\right\},\left\{\mathrm{Poppels}\right\},\left\{\text{Porter Warminski}\right\},\left\{\text{Proper Job Cornish IPA}\right\},\left\{\text{Rodenbach Alexander}\right\},\left\{\text{Rodenbach Caractere Rouge}\right\},\left\{\text{S:t Erik IPA}\right\},\left\{\mathrm{SIPA}\right\},\left\{\text{Saison Dupont}\right\},\left\{\text{Schneider Weisse}\right\},\left\{\text{Ship full of ipa}\right\},\left\{\text{Sierra Nevada Pale Ale}\right\},\left\{\text{Silk Road Tie Guan Yin}\right\},\left\{\text{Sitting Bulldog IPA}\right\},\left\{\text{Skånsk Äppelcider}\right\},\left\{\text{Sleepy Bulldog Pale Ale}\right\},\left\{\text{Somersby Rose}\right\},\left\{\text{Sotholmen EXTRA Stout}\right\},\left\{\text{St Peters Cream Stout}\right\},\left\{\text{Stallhagen Baltic Porter}\right\},\left\{\text{Staropramen dark}\right\},\left\{\text{Stone White Ghost}\right\},\left\{\text{Stoodley Stout}\right\},\left\{\text{SunRise saku}\right\},\left\{\text{TexMex biljett}\right\},\left\{\text{Timmermans Kriek Lambicus}\right\},\left\{\text{Trappist Achel}\right\},\left\{\text{Tropic Thunder}\right\},\left\{\text{Twisted Thistle}\right\},\left\{\mathrm{Utskrift}\right\},\left\{\mathrm{Weihenstephaner}\right\},\left\{\text{Weihenstephaner Kristall}\right\},\left\{\text{Westmalle Trappist Dubbel}\right\},\left\{\text{Wisby Kloster}\right\},\left\{\text{Zeunerts Påskmust}\right\},\left\{\mathrm{Zlatopramen}\right\},\left\{\mathrm{Äppelcider}\right\}\right\}$

The plot should have that the whole change is noted on the Y axis, and all travel along the X axis should be
perfectly horizontal. I have however not figured out how to do that yet.

$\mathrm{PlotProducts}\left[\left\{''Breznak'',''Breznak\; Burk'',''Bitburger''\right\},\text{}\mathrm{PlotRange}\to \left\{\left\{\mathrm{DateObject}\left[\left\{2017,09,01\right\}\right],\mathrm{Today}\right\},\left\{\mathrm{Automatic},\mathrm{Automatic}\right\}\right\},\text{}\mathrm{ImageSize}\to \mathrm{Large}\right]$

$\mathrm{PlotProducts}\left[\mathrm{Flatten}\left[\mathrm{SQLSelect}\left[\mathrm{conn},''products'',\left\{''name''\right\}\right]\right]\right]$

$\mathrm{MoneyData}\left[\mathrm{id\_}\right]:=\mathrm{Block}\left[\left\{\mathrm{data},\mathrm{times},\mathrm{values}\right\},\text{}\mathrm{data}=\mathrm{SQLExecute}\left[\mathrm{conn},\text{}''SELECT\; CURRENT\_TIMESTAMP,\; amount\; /\; 100.0\; FROM\; money\; WHERE\; id\; =\; `1`\; UNION\; ALL\; SELECT\; time,\; change\; /\; 100.0\; FROM\; money\_change\; WHERE\; account\; =\; `1`\; ORDER\; BY\; time\; DESC'',\left\{\mathrm{id}\right\}\right];\text{}\mathrm{times}=\mathrm{DateObject}/@\mathrm{data}\left[\left[\mathrm{All},1\right]\right];\text{}\mathrm{values}=\mathrm{Accumulate}\left[\mathrm{data}\left[\left[\mathrm{All},2\right]\right]\right];\text{}\text{(*}\mathrm{Transpose}\left[\left\{\mathrm{times},\mathrm{values}\right\}\right]\text{*)}\text{}\mathrm{TimeSeries}\left[\mathrm{values},\left\{\mathrm{times}\right\}\right]\right]$

MoneyAll summerar helt fel, och bör *inte* användas.

$\mathrm{MoneyAll}=\mathrm{Block}\left[\left\{\mathrm{data},\mathrm{times},\mathrm{values}\right\},\text{}\mathrm{data}=\mathrm{SQLExecute}\left[\mathrm{conn},\text{}''SELECT\; CURRENT\_TIMESTAMP,\; sum(amount)\; /\; 100.0\; FROM\; money\; UNION\; ALL\; SELECT\; time,\; change\; /\; 100.0\; FROM\; money\_change\; ORDER\; BY\; time\; DESC''\right];\text{}\mathrm{times}=\mathrm{DateObject}/@\mathrm{data}\left[\left[\mathrm{All},1\right]\right];\text{}\mathrm{values}=\mathrm{Accumulate}\left[\mathrm{data}\left[\left[\mathrm{All},2\right]\right]\right];\text{}\mathrm{TimeSeries}\left[\mathrm{values},\left\{\mathrm{times}\right\}\right]\right];$

$\mathrm{DateListStepPlot}\left[\left\{\mathrm{MoneyData}\left[1\right],\mathrm{MoneyData}\left[2\right],\mathrm{MoneyData}\left[3\right],\mathrm{MoneyAll}\right\},\text{}\mathrm{PlotLegends}\to \left\{''Kassa'',''Valv'',''Fodringar'',''Totalt''\right\},\text{}\mathrm{GridLines}\to \left\{\mathrm{Automatic},\left\{0\right\}\right\},\text{}\mathrm{PlotRange}\to \left\{\left\{\mathrm{DateObject}\left[\left\{2018,03,01\right\}\right],\mathrm{Today}\right\},\mathrm{Automatic}\right\}\right]$

$\mathrm{DateListStepPlot}\left[\mathrm{MoneyAll}\right]$

$\mathrm{DateListStepPlot}\left[\left\{\mathrm{MoneyData}\left[1\right],\mathrm{MovingAverage}\left[\mathrm{MoneyData}\left[1\right],10\right]\right\},\text{}\mathrm{PlotLegends}\to \left\{''Valv'',''Moving\; Average''\right\},\text{}\mathrm{GridLines}\to \left\{\mathrm{Automatic},\left\{0\right\}\right\},\text{}\mathrm{PlotRange}\to \left\{\left\{\mathrm{DateObject}\left[\left\{2018,03,01\right\}\right],\mathrm{Today}\right\},\mathrm{Automatic}\right\}\right]$

Nu kollar vi på totalvärde
först behöver vi inventarievärde

$\mathrm{ProjectedValue}=\mathrm{SQLExecute}[\mathrm{conn},\text{"}$