create-chart.html.tmpl

buzilla软件

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

Template::Document->new({
    METADATA => {
        'modtime' => '1168217806',
        'name' => 'reports/create-chart.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 29 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $context->process('global/header.html.tmpl', { 'title' => 'Create Chart' });
    $output .=  "\n";
    #line 33 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $context->process('reports/series-common.html.tmpl', { 'donames' => 1 });
    $output .=  "\n\n<script type=\"text/javascript\">\n";
    $output .=  "\nfunction subcatSelected() {\n  var cat = document.chartform.category.value;\n  var subcat = document.chartform.subcategory.value;\n  var names = series[cat][subcat];\n  \n  var namewidget = document.chartform.name;\n\n  namewidget.options.length = 0;\n  var i = 0;\n\n  for (x in names) {\n    namewidget.options[i] = new Option(x, names[x]);\n    i++;\n  }\n\n  namewidget.options[0].selected = true;\n  \n  checkNewState();\n}\n</script>\n  ";
    #line 60 "template\en\default\reports\create-chart.html.tmpl"
    $stash->set('gttext', 'Grand Total');
    
    $output .=  "\n\n<form method=\"get\" action=\"chart.cgi\" name=\"chartform\">  \n  \n  <table cellpadding=\"2\" cellspacing=\"2\" border=\"0\">";
    #line 125 "template\en\default\reports\create-chart.html.tmpl"
    if (! $stash->get('category') || $stash->get(['category', 0, 'size', 0]) eq 0) {
    $output .=  "\n      <tr>\n        <td>\n          <i>No data sets exist, or none are visible to you.</i>\n        </td>\n      </tr>";
    }
    else {
    $output .=  "\n      <tr>\n        <th><label for=\"category\">Category</label>:</th>\n        <th></th>\n        <th><label for=\"subcategory\">Sub-category</label>:</th>\n        <th></th>\n        <th><label for=\"name\" accesskey=\"N\">Name</label>:</th>\n        <th><br>\n        </th>\n      </tr>\n      <tr>\n      ";
    #line 83 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $context->process('series_select', { 'sel' => { 'name' => 'category', 'size' => 5, 'onchange' => 'catSelected();
                                                         subcatSelected();'  } });
    $output .=  "\n                                   \n        <td>\n          <noscript>\n            <input type=\"submit\" name=\"action-assemble\" value=\"Update --&gt;\"\n                   id=\"action-assemble\">\n          </noscript>\n        </td>\n        ";
    #line 95 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $context->process('series_select', { 'sel' => { 'name' => 'subcategory', 'size' => 5, 'onchange' => 'subcatSelected()'  } });
    $output .=  "\n                                   \n        <td>\n          <noscript>\n            <input type=\"submit\" name=\"action-assemble\" value=\"Update --&gt;\"\n                   id=\"action-assemble\">\n          </noscript>\n        </td>\n        \n        <td align=\"left\">\n          <select name=\"name\" id=\"name\" style=\"width: 15em\"\n                  size=\"5\" multiple=\"multiple\"\n                  ";
    #line 109 "template\en\default\reports\create-chart.html.tmpl"
    if (!($stash->get(['name', 0, 'keys', 0, 'size', 0]))) {
    $output .=  ('' . "disabled=\"disabled\"");
    }
    
    $output .=  ">";
    #line 113 "template\en\default\reports\create-chart.html.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = $stash->get(['name', 0, 'keys', 0, 'sort', 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->{'x'} = $_tt_value;
    $output .=  "\n              <option value=\"";
    #line 111 "template\en\default\reports\create-chart.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get(['name', 0, $stash->get('x'), 0]);
        
        &$_tt_filter($output);
    };
    
    $output .=  "\">";
    #line 112 "template\en\default\reports\create-chart.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  $stash->get('x');
        
        &$_tt_filter($output);
    };
    
    $output .=  "</option>";;
                ($_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;
    };
    
    #line 116 "template\en\default\reports\create-chart.html.tmpl"
    if (!($stash->get(['name', 0, 'keys', 0, 'size', 0]))) {
    $output .=  "\n              <option value=\"\" disabled=\"disabled\"></option>";
    }
    
    $output .=  "\n          </select>\n        </td>\n\n        <td align=\"center\" valign=\"middle\"> \n          <input type=\"submit\" name=\"action-add\" value=\"Add To List\"\n                 id=\"action-add\"><br>\n        </td>\n      </tr>";
    }
    
    $output .=  "\n  </table>\n\n  <script type=\"text/javascript\">\n    document.chartform.category[0].selected = true;\n    document.chartform.subcategory.disabled = '';\n    document.chartform.name.disabled = '';\n    catSelected();\n    subcatSelected();\n  </script>\n\n  <h3>List Of Data Sets To Plot</h3>\n";
    #line 260 "template\en\default\reports\create-chart.html.tmpl"
    if ($stash->get(['chart', 0, 'lines', 0, 'size', 0]) > 0) {
    $output .=  "\n    <table cellspacing=\"2\" cellpadding=\"2\">\n      <tr>\n        <th style=\"width: 5em;\">Select</th>\n        <th>Label</th>\n        <th></th>\n        <th>Data Set</th>\n        <th></th>\n      </tr>\n      \n      ";
    #line 153 "template\en\default\reports\create-chart.html.tmpl"
    $stash->set('labelidx', 0);
    
    #line 154 "template\en\default\reports\create-chart.html.tmpl"
    $stash->set('newidx', 0);
    
    $output .=  "\n      ";
    #line 205 "template\en\default\reports\create-chart.html.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = $stash->get(['chart', 0, 'lines', 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->{'line'} = $_tt_value;
    #line 163 "template\en\default\reports\create-chart.html.tmpl"
    if (! $stash->get('line')) {
    $output .=  "\n          ";
    #line 161 "template\en\default\reports\create-chart.html.tmpl"
    $stash->set('labelidx', $stash->get('labelidx') + 1);
    
    #line 162 "template\en\default\reports\create-chart.html.tmpl"
    ($_tt_value, $_tt_error) = $_tt_list->get_next();
    next LOOP;
    
    }
    
    $output .=  "\n        ";
    #line 202 "template\en\default\reports\create-chart.html.tmpl"
    
    # FOREACH 
    do {
        my ($_tt_value, $_tt_error, $_tt_oldloop);
        my $_tt_list = $stash->get('line');
        
        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->{'series'} = $_tt_value;
    $output .=  "\n          <tr>";
    #line 176 "template\en\default\reports\create-chart.html.tmpl"
    if ($stash->get(['loop', 0, 'first', 0])) {
    $output .=  "\n              <td align=\"center\" rowspan=\"";
    #line 168 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $stash->get(['line', 0, 'size', 0]);
    $output .=  "\">\n                <input type=\"checkbox\" value=\"1\" name=\"select";
    #line 169 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $stash->get('newidx');
    $output .=  "\">\n              </td>\n              <td rowspan=\"";
    #line 171 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $stash->get(['line', 0, 'size', 0]);
    $output .=  "\">\n                <input type=\"text\" size=\"20\" name=\"label";
    #line 172 "template\en\default\reports\create-chart.html.tmpl"
    $output .=  $stash->get('newidx');
    $output .=  "\"\n                       value=\"";
    #line 173 "template\en\default\reports\create-chart.html.tmpl"
    
    # FILTER
    $output .=  do {
        my $output = '';
        my $_tt_filter = $context->filter('html')
                  || $context->throw($context->error);
    
    $output .=  ($stash->get(['chart', 0, 'labels', 0, $stash->get('labelidx'), 0]) || $stash->get(['series', 0, 'name', 0]));
        
        &$_tt_filter($output);
    };
    
    $output .=  "\">\n              </td>";
    }
    
    $output .=  "\n\n            <td>";
    #line 179 "template\en\default\reports\create-chart.html.tmpl"
    if ($stash->get(['line', 0, 'size', 0]) > 1) {
    $output .=  '{';
    }