report-line.png.tmpl

buzilla软件

#------------------------------------------------------------------------
# Compiled template generated by the Template Toolkit version 2.20
#------------------------------------------------------------------------

Template::Document->new({
    METADATA => {
        'modtime' => '1152813642',
        'name' => 'reports/report-line.png.tmpl',
    },
    BLOCK => sub {
        my $context = shift || die "template sub called without context\n";
        my $stash   = $context->stash;
        my $output  = '';
        my $_tt_error;
        
        eval { BLOCK: {
    $output .=  "\n";
    $output .=  "\n";
    #line 22 "template\en\default\reports\report-line.png.tmpl"
    $output .=  $context->process('global/variables.none.tmpl');
    $output .=  "\n";
    #line 0 "template\en\default\reports\report-line.png.tmpl"
    $stash->set('y_label', ('' . $stash->get(['terms', 0, 'Bugs', 0])));
    
    $output .=  "\n";
    #line 26 "template\en\default\reports\report-line.png.tmpl"
    $output .=  $context->process('global/field-descs.none.tmpl');
    $output .=  "\n";
    #line 28 "template\en\default\reports\report-line.png.tmpl"
    $stash->set('col_field_disp', $stash->get(['field_descs', 0, $stash->get('col_field'), 0]) || $stash->get('col_field'));
    
    $output .=  "\n";
    #line 34 "template\en\default\reports\report-line.png.tmpl"
    if ($stash->get('col_field') eq 'bug_status') {
    #line 33 "template\en\default\reports\report-line.png.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = [ 0..$stash->get(['data', 0, 0, 0, 0, 0, 'max', 0]) ];
        
        unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) {
            $_tt_list = Template::Config->iterator($_tt_list)
                || die $Template::Config::ERROR, "\n"; 
        }
    
        ($_tt_value, $_tt_error) = $_tt_list->get_first();
        eval { $_tt_oldloop = $stash->get('loop') };
        $stash->set('loop', $_tt_list);
        eval {
    LOOP:   while (! $_tt_error) {
                $stash->{'i'} = $_tt_value;
    #line 32 "template\en\default\reports\report-line.png.tmpl"
    $stash->set(['data', 0, 0, 0, 0, 0, $stash->get('i'), 0], $stash->get(['status_descs', 0, $stash->get(['data', 0, 0, 0, 0, 0, $stash->get('i'), 0]), 0]));
    ;
                ($_tt_value, $_tt_error) = $_tt_list->get_next();
            }
        };
        $stash->set('loop', $_tt_oldloop);
        die $@ if $@;
        $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE;
        die $_tt_error if $_tt_error;
    };
    
    }
    
    $output .=  "\n";
    #line 40 "template\en\default\reports\report-line.png.tmpl"
    if ($stash->get('col_field') eq 'resolution') {
    #line 39 "template\en\default\reports\report-line.png.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = [ 0..$stash->get(['data', 0, 0, 0, 0, 0, 'max', 0]) ];
        
        unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) {
            $_tt_list = Template::Config->iterator($_tt_list)
                || die $Template::Config::ERROR, "\n"; 
        }
    
        ($_tt_value, $_tt_error) = $_tt_list->get_first();
        eval { $_tt_oldloop = $stash->get('loop') };
        $stash->set('loop', $_tt_list);
        eval {
    LOOP:   while (! $_tt_error) {
                $stash->{'i'} = $_tt_value;
    #line 38 "template\en\default\reports\report-line.png.tmpl"
    $stash->set(['data', 0, 0, 0, 0, 0, $stash->get('i'), 0], $stash->get(['get_resolution', [ $stash->get(['data', 0, 0, 0, 0, 0, $stash->get('i'), 0]) ]]));
    ;
                ($_tt_value, $_tt_error) = $_tt_list->get_next();
            }
        };
        $stash->set('loop', $_tt_oldloop);
        die $@ if $@;
        $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE;
        die $_tt_error if $_tt_error;
    };
    
    }
    
    $output .=  "\n";
    #line 46 "template\en\default\reports\report-line.png.tmpl"
    if ($stash->get('row_field') eq 'bug_status') {
    #line 45 "template\en\default\reports\report-line.png.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = [ 0..$stash->get(['row_names', 0, 'max', 0]) ];
        
        unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) {
            $_tt_list = Template::Config->iterator($_tt_list)
                || die $Template::Config::ERROR, "\n"; 
        }
    
        ($_tt_value, $_tt_error) = $_tt_list->get_first();
        eval { $_tt_oldloop = $stash->get('loop') };
        $stash->set('loop', $_tt_list);
        eval {
    LOOP:   while (! $_tt_error) {
                $stash->{'i'} = $_tt_value;
    #line 44 "template\en\default\reports\report-line.png.tmpl"
    $stash->set(['row_names', 0, $stash->get('i'), 0], $stash->get(['status_descs', 0, $stash->get(['row_names', 0, $stash->get('i'), 0]), 0]));
    ;
                ($_tt_value, $_tt_error) = $_tt_list->get_next();
            }
        };
        $stash->set('loop', $_tt_oldloop);
        die $@ if $@;
        $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE;
        die $_tt_error if $_tt_error;
    };
    
    }
    
    $output .=  "\n";
    #line 52 "template\en\default\reports\report-line.png.tmpl"
    if ($stash->get('row_field') eq 'resolution') {
    #line 51 "template\en\default\reports\report-line.png.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = [ 0..$stash->get(['row_names', 0, 'max', 0]) ];
        
        unless (UNIVERSAL::isa($_tt_list, 'Template::Iterator')) {
            $_tt_list = Template::Config->iterator($_tt_list)
                || die $Template::Config::ERROR, "\n"; 
        }
    
        ($_tt_value, $_tt_error) = $_tt_list->get_first();
        eval { $_tt_oldloop = $stash->get('loop') };
        $stash->set('loop', $_tt_list);
        eval {
    LOOP:   while (! $_tt_error) {
                $stash->{'i'} = $_tt_value;
    #line 50 "template\en\default\reports\report-line.png.tmpl"
    $stash->set(['row_names', 0, $stash->get('i'), 0], $stash->get(['get_resolution', [ $stash->get(['row_names', 0, $stash->get('i'), 0]) ]]));
    ;
                ($_tt_value, $_tt_error) = $_tt_list->get_next();
            }
        };
        $stash->set('loop', $_tt_oldloop);
        die $@ if $@;
        $_tt_error = 0 if $_tt_error && $_tt_error eq Template::Constants::STATUS_DONE;
        die $_tt_error if $_tt_error;
    };
    
    }
    
    $output .=  "\n";
    #line 59 "template\en\default\reports\report-line.png.tmpl"
    if ($stash->get('cumulate')) {
    #line 55 "template\en\default\reports\report-line.png.tmpl"
    # USE
    $stash->set('graph',
                $context->plugin('GD.Graph.area', [ $stash->get('width'), $stash->get('height') ]));
    #line 56 "template\en\default\reports\report-line.png.tmpl"
    $output .=  $stash->get(['graph', 0, 'set', [ { 'cumulate' => 'true' } ]]);
    }
    else {
    #line 58 "template\en\default\reports\report-line.png.tmpl"
    # USE
    $stash->set('graph',
                $context->plugin('GD.Graph.lines', [ $stash->get('width'), $stash->get('height') ]));
    }
    
    $output .=  "\n";
    #line 61 "template\en\default\reports\report-line.png.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('null')
                  || $context->throw($context->error);
    
    #line 61 "template\en\default\reports\report-line.png.tmpl"
    $output .=  $stash->get(['graph', 0, 'set', [ { 'x_label' => $stash->get('col_field_disp'), 'y_label' => $stash->get('y_label'), 'y_tick_number' => 8, 'x_label_position' => 0.5, 'x_labels_vertical' => $stash->get('x_labels_vertical'), 'legend_placement' => 'RT', 'line_width' => 2, 'dclrs' => [ 'lred', 'lgreen', 'lblue', 'lyellow', 'lpurple', 'lorange', 'black', 'green', 'blue', 'dpink', 'lbrown', 'gray', 'red', 'dpurple', 'gold', 'marine' ] } ]]);
    #line 61 "template\en\default\reports\report-line.png.tmpl"
    $output .=  $stash->get(['graph', 0, 'set_legend', [ $stash->get(['row_names', 0, 0, 0]), $stash->get(['row_names', 0, 1, 0]), $stash->get(['row_names', 0, 2, 0]), $stash->get(['row_names', 0, 3, 0]), $stash->get(['row_names', 0, 4, 0]), $stash->get(['row_names', 0, 5, 0]), $stash->get(['row_names', 0, 6, 0]), $stash->get(['row_names', 0, 7, 0]), $stash->get(['row_names', 0, 8, 0]), $stash->get(['row_names', 0, 9, 0]), $stash->get(['row_names', 0, 10, 0]), $stash->get(['row_names', 0, 11, 0]), $stash->get(['row_names', 0, 12, 0]), $stash->get(['row_names', 0, 13, 0]), $stash->get(['row_names', 0, 14, 0]), $stash->get(['row_names', 0, 15, 0]) ]]);
    #line 61 "template\en\default\reports\report-line.png.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('stdout', [ 1 ])
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['graph', 0, 'plot', [ $stash->get(['data', 0, 0, 0]) ], 'png', 0]);
        
        &$_tt_filter($output);
    };
    
        
        &$_tt_filter($output);
    };
    
    
    $output .=  "\n";
        } };
        if ($@) {
            $_tt_error = $context->catch($@, \$output);
            die $_tt_error unless $_tt_error->type eq 'return';
        }
    
        return $output;
    },
    DEFBLOCKS => {

    },
});