| line |
true |
false |
branch |
|
44
|
1 |
0 |
if defined $Data |
|
53
|
2 |
0 |
if defined $Graphic |
|
62
|
1 |
0 |
if defined $LabelandColor |
|
73
|
1 |
0 |
if (defined $self->getSubtype) |
|
74
|
0 |
1 |
if ($graphic eq '2Dpie') { } |
|
|
0 |
1 |
elsif ($graphic eq '2Dbar') { } |
|
|
0 |
1 |
elsif ($graphic eq '2Dcolumn') { } |
|
75
|
0 |
0 |
if (defined $subtype and $subtype == 1 or not defined $subtype) { } |
|
|
0 |
0 |
elsif ($subtype == 2) { } |
|
|
0 |
0 |
elsif ($subtype == 3) { } |
|
|
0 |
0 |
elsif ($subtype == 31) { } |
|
|
0 |
0 |
elsif ($subtype == 4) { } |
|
|
0 |
0 |
elsif ($subtype == 41) { } |
|
|
0 |
0 |
elsif ($subtype == 5) { } |
|
|
0 |
0 |
elsif ($subtype == 6) { } |
|
96
|
0 |
0 |
if (defined $subtype and $subtype == 1 or not defined $subtype) { } |
|
102
|
0 |
0 |
if (defined $subtype and $subtype == 1 or not defined $subtype) { } |
|
118
|
1 |
0 |
if defined $Subtype |
|
127
|
1 |
0 |
if defined $hscale |
|
136
|
1 |
0 |
if defined $vscale |
|
145
|
0 |
0 |
if defined $initialdegree |
|
154
|
0 |
0 |
if defined $gexport |
|
163
|
0 |
0 |
if defined $legend |
|
172
|
1 |
0 |
if defined $columnwidth |
|
181
|
1 |
0 |
if defined $format |
|
190
|
1 |
0 |
if defined $headertype |
|
199
|
1 |
0 |
if defined $axistype |
|
208
|
1 |
0 |
if defined $valuetype |
|
217
|
1 |
0 |
if defined $valuetype |
|
226
|
1 |
0 |
if defined $backgroundcolor |
|
235
|
1 |
0 |
if defined $headercolor |
|
244
|
0 |
0 |
if defined $explodeoffset |
|
257
|
0 |
0 |
if (defined $self->getSubtype) { } |
|
258
|
0 |
0 |
if (defined $self->getHscale) { } |
|
259
|
0 |
0 |
if (defined $self->getVscale) { } |
|
260
|
0 |
0 |
if (defined $self->getGexport) { } |
|
261
|
0 |
0 |
if (defined $self->getLegend) { } |
|
262
|
0 |
0 |
if (defined $self->getColumnwidth) { } |
|
263
|
0 |
0 |
if (defined $self->getFormat) { } |
|
264
|
0 |
0 |
if (defined $self->getHeadertype) { } |
|
265
|
0 |
0 |
if (defined $self->getAxistype) { } |
|
266
|
0 |
0 |
if (defined $self->getValuetype) { } |
|
267
|
0 |
0 |
if (defined $self->getBackgroundcolor) { } |
|
268
|
0 |
0 |
if (defined $self->getHeadercolor) { } |
|
269
|
0 |
0 |
if (defined $self->getExplodeoffset) { } |
|
270
|
0 |
0 |
if (defined $self->getInitialdegree) { } |
|
274
|
0 |
1 |
if ($self->{'Graphic'} eq '2Dpie') { } |
|
|
0 |
1 |
elsif ($self->{'Graphic'} eq '2Dcolumn') { } |
|
|
0 |
1 |
elsif ($self->{'Graphic'} eq '2Dbar') { } |
|
277
|
0 |
0 |
if (defined $self->{'Data'} and defined $self->{'LabelandColor'}) { } |
|
278
|
0 |
0 |
unless (defined $self->{'Hscale'}) |
|
279
|
0 |
0 |
unless (defined $self->{'Vscale'}) |
|
280
|
0 |
0 |
unless (defined $self->{'Gexport'}) |
|
281
|
0 |
0 |
unless (defined $self->{'Valuetype'}) |
|
282
|
0 |
0 |
unless (defined $self->{'Explodeoffset'}) |
|
283
|
0 |
0 |
unless (defined $self->{'Initialdegree'}) |
|
284
|
0 |
0 |
if (defined $self->{'Subtype'} and $self->{'Subtype'} == 1 or not defined $self->{'Subtype'}) { } |
|
|
0 |
0 |
elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 2) { } |
|
|
0 |
0 |
elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 3 || $self->{'Subtype'} == 31 || $self->{'Subtype'} == 4) { } |
|
|
0 |
0 |
elsif ($self->{'Subtype'} == 41) { } |
|
|
0 |
0 |
elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 5) { } |
|
|
0 |
0 |
elsif (defined $self->{'Subtype'} and $self->{'Subtype'} == 6 or not defined $self->{'Subtype'}) { } |
|
289
|
0 |
0 |
unless (defined $self->{'Legend'}) |
|
291
|
0 |
0 |
if ($leg eq 'right' or $leg eq 'left' or $leg eq 'bottom') { } |
|
292
|
0 |
0 |
if ($self->{'Subtype'} == 3) { } |
|
|
0 |
0 |
elsif ($self->{'Subtype'} == 31) { } |
|
|
0 |
0 |
elsif ($self->{'Subtype'} == 4) { } |
|
318
|
0 |
0 |
unless open LC, $self->{'LabelandColor'} |
|
323
|
0 |
0 |
if ($lc[5] != $currentsection) |
|
325
|
0 |
0 |
if (length $sectionends > 0) |
|
332
|
0 |
0 |
unless open TRANS, "<$transdata" |
|
333
|
0 |
0 |
unless open TRANSPLUS, ">$transdata1" |
|
347
|
0 |
0 |
if ($ii == $jj) |
|
348
|
0 |
0 |
if (length $sectionmiddle > 0) |
|
353
|
0 |
0 |
if ($thissection == $salength - 1) |
|
372
|
0 |
0 |
if (defined $self->{'Data'} and defined $self->{'LabelandColor'}) { } |
|
373
|
0 |
0 |
unless (defined $self->{'Hscale'}) |
|
374
|
0 |
0 |
unless (defined $self->{'Vscale'}) |
|
375
|
0 |
0 |
unless (defined $self->{'Gexport'}) |
|
376
|
0 |
0 |
unless (defined $self->{'Columnwidth'}) |
|
377
|
0 |
0 |
unless (defined $self->{'Format'}) |
|
378
|
0 |
0 |
unless (defined $self->{'Headertype'}) |
|
379
|
0 |
0 |
unless (defined $self->{'Valuetype'}) |
|
380
|
0 |
0 |
unless (defined $self->{'Axistype'}) |
|
381
|
0 |
0 |
unless (defined $self->{'Backgroundcolor'}) |
|
382
|
0 |
0 |
unless (defined $self->{'Headercolor'}) |
|
383
|
0 |
0 |
if (defined $self->{'Subtype'} and $self->{'Subtype'} == 1 or not defined $self->{'Subtype'}) |
|
390
|
0 |
0 |
if (defined $self->{'Data'} and defined $self->{'LabelandColor'}) { } |
|
391
|
0 |
0 |
unless (defined $self->{'Hscale'}) |
|
392
|
0 |
0 |
unless (defined $self->{'Vscale'}) |
|
393
|
0 |
0 |
unless (defined $self->{'Gexport'}) |
|
394
|
0 |
0 |
unless (defined $self->{'Columnwidth'}) |
|
395
|
0 |
0 |
unless (defined $self->{'Format'}) |
|
396
|
0 |
0 |
unless (defined $self->{'Headertype'}) |
|
397
|
0 |
0 |
unless (defined $self->{'Valuetype'}) |
|
398
|
0 |
0 |
unless (defined $self->{'Valuecolor'}) |
|
399
|
0 |
0 |
unless (defined $self->{'Axistype'}) |
|
400
|
0 |
0 |
unless (defined $self->{'Backgroundcolor'}) |
|
401
|
0 |
0 |
unless (defined $self->{'Headercolor'}) |
|
402
|
0 |
0 |
if (defined $self->{'Subtype'} and $self->{'Subtype'} == 1 or not defined $self->{'Subtype'}) |
|
416
|
0 |
0 |
unless open DATA, './' . $data |
|
417
|
0 |
0 |
unless open TRANS, ">$trans" |
|
418
|
0 |
0 |
unless open DATA1, '+>data1' |
|
432
|
0 |
0 |
if ($drow1 eq '') { } |
|
447
|
0 |
0 |
if ($sum[$b] > $lvalue) |
|
458
|
0 |
0 |
if ($c != $largest) |
|
460
|
0 |
0 |
if ($d[$c] > 0) |
|
461
|
0 |
0 |
if ($d[$c] < 3.6) |
|
476
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
480
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (100 * eval($thisslice) / 36 % 10 >= 5) |
|
|
0 |
0 |
if ($percent1num == 0) |
|
|
0 |
0 |
if ($wholepercent == 101) |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
483
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
if ($legend eq 'right') { } |
|
|
0 |
0 |
elsif ($legend eq 'left') { } |
|
|
0 |
0 |
elsif ($legend eq 'bottom') { } |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
if ($legend eq 'right' or $legend eq 'left') { } |
|
|
0 |
0 |
elsif ($legend eq 'bottom') { } |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($legend eq 'bottom') { } |
|
|
0 |
0 |
elsif ($legend eq 'right') { } |
|
|
0 |
0 |
elsif ($legend eq 'left') { } |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
486
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
if ($legend eq 'right') { } |
|
|
0 |
0 |
elsif ($legend eq 'left') { } |
|
|
0 |
0 |
elsif ($legend eq 'bottom') { } |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
if ($legend eq 'right' or $legend eq 'left') { } |
|
|
0 |
0 |
elsif ($legend eq 'bottom') { } |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (100 * eval($thisslice) / 36 % 10 >= 5) |
|
|
0 |
0 |
if ($percent1num == 0) |
|
|
0 |
0 |
if ($wholepercent == 101) |
|
|
0 |
0 |
if ($legend eq 'bottom') { } |
|
|
0 |
0 |
elsif ($legend eq 'right') { } |
|
|
0 |
0 |
elsif ($legend eq 'left') { } |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
489
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (100 * eval($thisslice) / 36 % 10 >= 5) |
|
|
0 |
0 |
if ($percent1num == 0) |
|
|
0 |
0 |
if ($wholepercent == 101) |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
492
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
if ($legend eq 'right') { } |
|
|
0 |
0 |
elsif ($legend eq 'left') { } |
|
|
0 |
0 |
elsif ($legend eq 'bottom') { } |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
if ($legend eq 'right' or $legend eq 'left') { } |
|
|
0 |
0 |
elsif ($legend eq 'bottom') { } |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (100 * eval($thisslice) / 36 % 10 >= 5) |
|
|
0 |
0 |
if ($percent1num == 0) |
|
|
0 |
0 |
if ($wholepercent == 101) |
|
|
0 |
0 |
if ($legend eq 'bottom') { } |
|
|
0 |
0 |
elsif ($legend eq 'right') { } |
|
|
0 |
0 |
elsif ($legend eq 'left') { } |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
495
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($slicecounter < $sectionarray[$sectioncnt]) { } |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
499
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($labelx > $labelmax) |
|
|
0 |
0 |
unless open PIECHARTDATA, "<$data" |
|
|
0 |
0 |
unless open PIE, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (eval $thisslice > 0) |
|
|
0 |
0 |
if (length $gexport > 0) |
|
503
|
0 |
0 |
unless open COLCHARTDATA, "<$data" |
|
|
0 |
0 |
unless open COL, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if ($cols[$i] > $maxval) |
|
|
0 |
0 |
if ($maxval < 10) { } |
|
|
0 |
0 |
elsif ($maxval < 100) { } |
|
|
0 |
0 |
elsif ($maxval < 1000) { } |
|
|
0 |
0 |
elsif ($maxval < 10000) { } |
|
|
0 |
0 |
elsif ($maxval < 100000) { } |
|
|
0 |
0 |
if ($maxval % $roundto == 0) { } |
|
|
0 |
0 |
if (length $label > 15) { } |
|
|
0 |
0 |
if (length $gexport > 0) |
|
506
|
0 |
0 |
unless open BARCHARTDATA, "<$data" |
|
|
0 |
0 |
if ($cols[$i] > $maxval) |
|
|
0 |
0 |
if ($maxval < 10) { } |
|
|
0 |
0 |
elsif ($maxval < 100) { } |
|
|
0 |
0 |
elsif ($maxval < 1000) { } |
|
|
0 |
0 |
elsif ($maxval < 10000) { } |
|
|
0 |
0 |
elsif ($maxval < 100000) { } |
|
|
0 |
0 |
if ($maxval % $roundto == 0) { } |
|
|
0 |
0 |
unless open BAR, ">$filewithdir" |
|
|
0 |
0 |
unless open LABELANDCOLOR, "<$labelandcolor" |
|
|
0 |
0 |
if (length $label > 15) { } |
|
|
0 |
0 |
if (length $gexport > 0) |
|
508
|
0 |
0 |
if ($number < 1000) { } |
|
|
0 |
0 |
if ($number < 10000) { } |
|
|
0 |
0 |
if ($number < 100000) { } |
|
|
0 |
0 |
if ($number < 1000000) { } |
|
|
0 |
0 |
if ($format eq 'money') |
|
|
0 |
0 |
if ($format eq 'money') { } |
|
|
0 |
0 |
elsif (substr($format, 0, 1) eq 'd') { } |
|
|
0 |
0 |
if ($scale == 1) { } |
|
520
|
0 |
1 |
if $constname eq 'constant' |
|
522
|
1 |
0 |
if ($error) |