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.
143.
144.
145.
146.
147.
148.
149.
150.
151.
152.
153.
154.
155.
156.
157.
158.
159.
160.
161.
162.
163.
164.
165.
166.
167.
168.
169.
170.
171.
172.
173.
174.
175.
176.
*Добавьте процедуру для обработки исходных данных:
PROCEDURE DoData
LPARAMETERS tnCase
DO CASE
CASE tnCase = 2
PUBLIC goData
goData = CREATEOBJECT('Empty')
ADDPROPERTY(goData,"_type","column3d")
ADDPROPERTY(goData,"_renderAt","chart-container")
ADDPROPERTY(goData,"_width","800")
ADDPROPERTY(goData,"_height","600")
ADDPROPERTY(goData,"_dataFormat","json")
ADDPROPERTY(goData,"_caption","Monthly revenue for last year")
ADDPROPERTY(goData,"_subCaption","Harry's SuperMart")
ADDPROPERTY(goData,"_xAxisName","Month")
ADDPROPERTY(goData,"_yAxisName","Revenues (In USD)")
ADDPROPERTY(goData,"_paletteColors","#0075c2")
ADDPROPERTY(goData,"_valueFontColor","#ffffff")
ADDPROPERTY(goData,"_baseFont","Helvetica Neue,Arial")
ADDPROPERTY(goData,"_captionFontSize","14")
ADDPROPERTY(goData,"_subcaptionFontSize","14")
ADDPROPERTY(goData,"_subcaptionFontBold","0")
ADDPROPERTY(goData,"_placeValuesInside","1")
ADDPROPERTY(goData,"_rotateValues","1")
ADDPROPERTY(goData,"_showShadow","0")
ADDPROPERTY(goData,"_divlineColor","#999999")
ADDPROPERTY(goData,"_divLineIsDashed","1")
ADDPROPERTY(goData,"_divlineThickness","1")
ADDPROPERTY(goData,"_divLineDashLen","1")
ADDPROPERTY(goData,"_divLineGapLen","1")
ADDPROPERTY(goData,"_canvasBgColor","#ffffff")
PUBLIC ARRAY gaData[12,2]
gaData[1,1] = "Jan"
gaData[1,2] = "420000"
gaData[2,1] = "Feb"
gaData[2,2] = "810000"
gaData[3,1] = "Mar"
gaData[3,2] = "720000"
gaData[4,1] = "Apr"
gaData[4,2] = "550000"
gaData[5,1] = "May"
gaData[5,2] = "910000"
gaData[6,1] = "Jun"
gaData[6,2] = "510000"
gaData[7,1] = "Jul"
gaData[7,2] = "680000"
gaData[8,1] = "Aug"
gaData[8,2] = "620000"
gaData[9,1] = "Sep"
gaData[9,2] = "610000"
gaData[10,1] = "Oct"
gaData[10,2] = "490000"
gaData[11,1] = "Nov"
gaData[11,2] = "900000"
gaData[12,1] = "Dec"
gaData[12,2] = "730000"
ENDCASE
ENDPROC
*Внесите изменения в существующий код:
PROCEDURE combo1.CLICK
THISFORM.WINDOWSTATE=1
DO DoData WITH THIS.VALUE
DO ycharts_ WITH THIS.VALUE
ENDPROC
PROCEDURE ycharts_
***
CASE i=2
WITH goData
TEXT to m.myvar textmerge noshow
<<m.ysc>>
<script>
FusionCharts.ready(function () {
var revenueChart = new FusionCharts({
type: "<<._type>>",
renderAt: "<<._renderAt>>",
width: "<<._width>>",
height: "<<._height>>",
dataFormat: "<<._dataFormat>>",
dataSource: {
"chart": {
"caption": "<<._caption>>",
"subCaption": "<<._subCaption>>",
"xAxisName": "<<._xAxisName>>",
"yAxisName": "<<._yAxisName>>",
"paletteColors": "<<._paletteColors>>",
"valueFontColor": "<<._valueFontColor>>",
"baseFont": "<<._baseFont>>",
"captionFontSize": "<<._captionFontSize>>",
"subcaptionFontSize": "<<._subcaptionFontSize>>",
"subcaptionFontBold": "<<._subcaptionFontBold>>",
"placeValuesInside": "<<._placeValuesInside>>",
"rotateValues": "<<._rotateValues>>",
"showShadow": "<<._showShadow>>",
"divlineColor": "<<._divlineColor>>",
"divLineIsDashed": "<<._divLineIsDashed>>",
"divlineThickness": "<<._divlineThickness>>",
"divLineDashLen": "<<._divLineDashLen>>",
"divLineGapLen": "<<._divLineGapLen>>",
"canvasBgColor": "<<._canvasBgColor>>"
},
"data": [
{
"label": "<<gaData[1,1]>>",
"value": "<<gaData[1,2]>>"
},
{
"label": "<<gaData[2,1]>>",
"value": "<<gaData[2,2]>>"
},
{
"label": "<<gaData[3,1]>>",
"value": "<<gaData[3,2]>>"
},
{
"label": "<<gaData[4,1]>>",
"value": "<<gaData[4,2]>>"
},
{
"label": "<<gaData[5,1]>>",
"value": "<<gaData[5,2]>>"
},
{
"label": "<<gaData[6,1]>>",
"value": "<<gaData[6,2]>>"
},
{
"label": "<<gaData[7,1]>>",
"value": "<<gaData[7,2]>>"
},
{
"label": "<<gaData[8,1]>>",
"value": "<<gaData[8,2]>>"
},
{
"label": "<<gaData[9,1]>>",
"value": "<<gaData[9,2]>>"
},
{
"label": "<<gaData[10,1]>>",
"value": "<<gaData[10,2]>>"
},
{
"label": "<<gaData[11,1]>>",
"value": "<<gaData[11,2]>>"
},
{
"label": "<<gaData[12,1]>>",
"value": "<<gaData[12,2]>>"
}
]
}
});
revenueChart.render();
});
</script>
<<m.xx>>
ENDTEXT
ENDWITH