report.html.tmpl

buzilla软件

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

Template::Document->new({
    METADATA => {
        'modtime' => '1161556322',
        'name' => 'reports/report.html.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  \n";
    $output .=  "\n";
    #line 37 "template\en\default\reports\report.html.tmpl"
    $stash->set('width', 600, 1);
    $stash->set('height', 350, 1);
    
    $output .=  "\n";
    #line 43 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('min_width') && $stash->get('width') < $stash->get('min_width')) {
    #line 42 "template\en\default\reports\report.html.tmpl"
    $stash->set('width', $stash->get('min_width'));
    
    }
    
    $output .=  "\n\n";
    #line 48 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('format') eq 'pie') {
    #line 47 "template\en\default\reports\report.html.tmpl"
    $stash->set('row_field', '');
    
    }
    
    $output .=  "\n";
    #line 50 "template\en\default\reports\report.html.tmpl"
    $output .=  $context->process('global/field-descs.none.tmpl');
    $output .=  "\n";
    #line 52 "template\en\default\reports\report.html.tmpl"
    $stash->set('tbl_field_disp', $stash->get(['field_descs', 0, $stash->get('tbl_field'), 0]) || $stash->get('tbl_field'));
    
    #line 53 "template\en\default\reports\report.html.tmpl"
    $stash->set('col_field_disp', $stash->get(['field_descs', 0, $stash->get('col_field'), 0]) || $stash->get('col_field'));
    
    #line 54 "template\en\default\reports\report.html.tmpl"
    $stash->set('row_field_disp', $stash->get(['field_descs', 0, $stash->get('row_field'), 0]) || $stash->get('row_field'));
    
    #line 55 "template\en\default\reports\report.html.tmpl"
    
    # CAPTURE
    $stash->set('switchbase', do {
        my $output = '';
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('switchbase');
        
        &$_tt_filter($output);
    };
    
        $output;
    });
    
    $output .=  "\n";
    #line 68 "template\en\default\reports\report.html.tmpl"
    
    # CAPTURE
    $stash->set('title', do {
        my $output = '';
    $output .=  "\n  Report: ";
    #line 61 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('tbl_field')) {
    #line 60 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('tbl_field_disp');
        
        &$_tt_filter($output);
    };
    
    }
    
    #line 62 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('tbl_field') && ($stash->get('col_field') || $stash->get('row_field'))) {
    $output .=  ' / ';
    }
    
    #line 65 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('row_field')) {
    #line 64 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('row_field_disp');
        
        &$_tt_filter($output);
    };
    
    }
    
    #line 66 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('col_field') && $stash->get('row_field')) {
    $output .=  ' / ';
    }
    
    #line 67 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('col_field_disp');
        
        &$_tt_filter($output);
    };
    
        $output;
    });
    
    $output .=  "\n";
    #line 70 "template\en\default\reports\report.html.tmpl"
    $output .=  $context->process('global/header.html.tmpl', { 'style' => '
        .t1     { background-color: #ffffff } /* white       */
        .t2     { background-color: #dfefff } /* light blue  */
        .t3     { background-color: #dddddd } /* grey        */
        .t4     { background-color: #c3d3ed } /* darker blue */
        .ttotal { background-color: #cfffdf } /* light green */
      ', 'header_addl_info' => $stash->get(['time2str', [ '%Y-%m-%d %H:%M:%S', $stash->get('time') ]]) });
    $output .=  "\n";
    #line 83 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('debug')) {
    $output .=  "\n  <p>";
    #line 82 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('query');
        
        &$_tt_filter($output);
    };
    
    $output .=  "</p>";
    }
    
    $output .=  "\n\n<div align=\"center\">\n";
    #line 120 "template\en\default\reports\report.html.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = $stash->get('tbl_names');
        
        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->{'tbl'} = $_tt_value;
    $output .=  "    ";
    #line 92 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('tbl') eq '-total-') {
    #line 89 "template\en\default\reports\report.html.tmpl"
    $stash->set('tbl_disp', 'Total');
    
    }
    else {
    #line 91 "template\en\default\reports\report.html.tmpl"
    $stash->set('tbl_disp', $stash->get('tbl'));
    
    }
    
    $output .=  "\n";
    #line 118 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('format') eq 'table') {
    #line 95 "template\en\default\reports\report.html.tmpl"
    $output .=  $context->process('reports/report-table.html.tmpl');
    }
    else {
    #line 99 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('tbl')) {
    $output .=  "\n        <h2>";
    #line 98 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('tbl_disp');
        
        &$_tt_filter($output);
    };
    
    $output .=  "</h2>";
    }
    
    $output .=  "\n      ";
    #line 114 "template\en\default\reports\report.html.tmpl"
    
    # CAPTURE
    $stash->set('imageurl', do {
        my $output = '';
    $output .=  "report.cgi?";
    #line 101 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('imagebase');
        
        &$_tt_filter($output);
    };
    
    $output .=  "&amp;format=";
    #line 102 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('url_quote')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('format');
        
        &$_tt_filter($output);
    };
    
    $output .=  "&amp;ctype=png&amp;action=plot&amp;";
    #line 113 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('tbl_field')) {
    #line 112 "template\en\default\reports\report.html.tmpl"
    if ($stash->get('tbl') ne '-total-') {
    #line 105 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('url_quote')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('tbl_field');
        
        &$_tt_filter($output);
    };
    
    $output .=  "=";
    #line 105 "template\en\default\reports\report.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('url_quote')
                  || $context->throw($context->error);