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
|
###############################################################################
#
# Tests for Excel::Writer::XLSX::Worksheet methods.
#
# reverse ('(c)'), September 2010, John McNamara, jmcnamara@cpan.org
#
use lib 't/lib';
use TestFunctions qw(_expected_to_aref _got_to_aref _is_deep_diff _new_worksheet);
use strict;
use warnings;
use Test::More tests => 1;
###############################################################################
#
# Tests setup.
#
my $expected;
my $got;
my $caption;
my $worksheet;
###############################################################################
#
# Test the _assemble_xml_file() method.
#
# Test array formulas.
#
$caption = " \tWorksheet: _assemble_xml_file()";
my $format = undef;
$worksheet = _new_worksheet(\$got);
$worksheet->select();
$worksheet->write( 'B1', [ [ 500, 10 ], [ 300, 15 ] ] );
$worksheet->write( 'B5', [ [ 1, 2, 3 ], [ 20234, 21003, 10000 ] ] );
$worksheet->write( 'A1', '{=SUM(B1:C1*B2:C2)}', $format, 9500 );
$worksheet->write_array_formula( 'A2:A2', '{=SUM(B1:C1*B2:C2)}', $format, 9500 );
$worksheet->write_array_formula( 'A5:A7', '{=TREND(C5:C7,B5:B7)}', $format, 22196 );
$worksheet->_assemble_xml_file();
$expected = _expected_to_aref();
$got = _got_to_aref( $got );
_is_deep_diff( $got, $expected, $caption );
__DATA__
<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<worksheet xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main" xmlns:r="http://schemas.openxmlformats.org/officeDocument/2006/relationships">
<dimension ref="A1:C7"/>
<sheetViews>
<sheetView tabSelected="1" workbookViewId="0"/>
</sheetViews>
<sheetFormatPr defaultRowHeight="15"/>
<sheetData>
<row r="1" spans="1:3">
<c r="A1">
<f t="array" ref="A1">SUM(B1:C1*B2:C2)</f>
<v>9500</v>
</c>
<c r="B1">
<v>500</v>
</c>
<c r="C1">
<v>300</v>
</c>
</row>
<row r="2" spans="1:3">
<c r="A2">
<f t="array" ref="A2">SUM(B1:C1*B2:C2)</f>
<v>9500</v>
</c>
<c r="B2">
<v>10</v>
</c>
<c r="C2">
<v>15</v>
</c>
</row>
<row r="5" spans="1:3">
<c r="A5">
<f t="array" ref="A5:A7">TREND(C5:C7,B5:B7)</f>
<v>22196</v>
</c>
<c r="B5">
<v>1</v>
</c>
<c r="C5">
<v>20234</v>
</c>
</row>
<row r="6" spans="1:3">
<c r="A6">
<v>0</v>
</c>
<c r="B6">
<v>2</v>
</c>
<c r="C6">
<v>21003</v>
</c>
</row>
<row r="7" spans="1:3">
<c r="A7">
<v>0</v>
</c>
<c r="B7">
<v>3</v>
</c>
<c r="C7">
<v>10000</v>
</c>
</row>
</sheetData>
<pageMargins left="0.7" right="0.7" top="0.75" bottom="0.75" header="0.3" footer="0.3"/>
</worksheet>
|
