1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
|
jQuery.fn.extend do
copy : -> @clone!remove-attr 'id class'
jq = (f) -> !-> $ f
# Call this to localize HighCharts
set_lang = ->
Highcharts .setOptions do
lang:
months: [\Januar, \Februar, \März, \April, \Mai, \Juni, \Juli, \August, \September, \Oktober, \November, \Dezember]
shortMonths: [\Jan, \Feb, \Mär, \Apr, \Mai, \Jun, \Jul, \Aug, \Sep, \Okt, \Nov, \Dez]
weekdays: [\Sonntag, \Montag, \Dienstag, \Mittwoch, \Donnerstag, \Freitag, \Samstag]
rangeSelectorFrom: \von
rangeSelectorTo: \bis
rangeSelectorZoom: null
# Add
export addJS = jq ->
$ 'input[name=date]' .datepicker do
dateFormat: \dd.mm.yy
firstDay: 1
# Show
export showJS = jq ->
set_lang!
$ ".detail .heading" .click ->
$ @ .closest \.detail .children \.mark:first .click!
$ ".detail > .mark" .click ->
if (@src.indexOf \closed) is not -1
@src .= replace \closed \open
else
@src .= replace \open \closed
$ @ .next-all \.details:first .toggle!
$ \.details .hide!
# draw the pies
<- $ \.pie .each
$ @
..highcharts do
title: text: null
tooltip:
hideDelay: 200
formatter: ->
"#{@key}: <b>#{@y.toFixed 2} €</b> / #{@percentage.toFixed 2}%"
chart:
backgroundColor: null
plotBorderWidth: null
plotShadow: off
spacingTop: 0
credits: enabled: false
series: [
type: \pie
size: \70%
allowPointSelect: true
dataLabels:
color: ..css \color
distance: 20
data: [ {name: if v>0 then k else '' , y: v, visible: v > 0} \
for k,v of ..data \pie ]
]
# Statistics
export statJS = jq ->
set_lang!
month = 30 * 24 * 60 * 60 * 1000
<- $ \.stats .each
$ @
..highcharts 'StockChart' do
title: text: null
credits: enabled: false
rangeSelector:
buttons: []
inputDateFormat: "%d. %b %Y"
inputEditDateFormat: "%d.%m.%Y"
inputDateParser: (value) ->
value .= split /\./
Date.UTC(value[2], # year
value[1] - 1, # month ... 0-based -.-
value[0], #day
0,0,0,0 # time
)
xAxis:
minTickInterval: month
minRange: month
series: [
data : ..data \stats
]
tooltip:
pointFormat: "<b>{point.y} €</b><br/>"
# Categories
export catsJS = jq ->
counter = 0
add_img = $ \img#add
new_input = $ \input#new
new_image = (new_name) ->
# we need to copy the image to get the correct URL
add_img.copy!
..attr \src -> @src.replace \add new_name
$ "li > span" .click ->
span = $ @
input = span.next!
img = new_image \undo
..click ->
$ @ .remove!
# reset text
input.val span.text!
<- input.fade-out \slow
span.toggle!
span.toggle!
<- input.fade-in \slow
img.insert-after input
add_img.click ->
input = new_input.copy!
img = new_image \minus
..click ->
<- $ @ .parent!fade-out \slow
$ @ .remove!
input.attr \name -> @name + counter
.remove-attr \style
.wrap "<li />"
.parent! # wrap does not return the li
.append img
.hide!
.insert-before add_img.parent!
.fade-in \slow -> input.focus!
counter++
|