?? chart.csv.tmpl
字號:
#------------------------------------------------------------------------# Compiled template generated by the Template Toolkit version 2.20#------------------------------------------------------------------------Template::Document->new({ METADATA => { 'modtime' => '1121825674', 'name' => 'reports/chart.csv.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\chart.csv.tmpl" $stash->set('colsepchar', $stash->get(['user', 0, 'settings', 0, 'csv_colsepchar', 0, 'value', 0])); $output .= "\n"; #line 24 "template\en\default\reports\chart.csv.tmpl" $stash->set('data', $stash->get(['chart', 0, 'data', 0])); $output .= "\nDate\\Series"; #line 28 "template\en\default\reports\chart.csv.tmpl" # FOREACH do { my ($_tt_value, $_tt_error, $_tt_oldloop); my $_tt_list = $stash->get(['chart', 0, 'labels', 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->{'label'} = $_tt_value; #line 27 "template\en\default\reports\chart.csv.tmpl" $output .= $stash->get('colsepchar'); #line 27 "template\en\default\reports\chart.csv.tmpl" # FILTER $output .= do { my $output = ''; my $_tt_filter = $context->filter('csv') || $context->throw($context->error); $output .= $stash->get('label'); &$_tt_filter($output); }; ; ($_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 33 "template\en\default\reports\chart.csv.tmpl" $stash->set('i', 0); #line 45 "template\en\default\reports\chart.csv.tmpl" # WHILE do { my $_tt_failsafe = 1000000; LOOP: while (--$_tt_failsafe && ($stash->get('i') < $stash->get(['data', 0, 0, 0, 'size', 0]))) { #line 35 "template\en\default\reports\chart.csv.tmpl" $stash->set('j', 0); #line 42 "template\en\default\reports\chart.csv.tmpl" # WHILE do { my $_tt_failsafe = 1000000; LOOP: while (--$_tt_failsafe && ($stash->get('j') < $stash->get(['data', 0, 'size', 0]))) { #line 39 "template\en\default\reports\chart.csv.tmpl" if ($stash->get('j') > 0) { #line 38 "template\en\default\reports\chart.csv.tmpl" $output .= $stash->get('colsepchar'); } #line 40 "template\en\default\reports\chart.csv.tmpl" $output .= $stash->get(['data', 0, $stash->get('j'), 0, $stash->get('i'), 0]); #line 41 "template\en\default\reports\chart.csv.tmpl" $stash->set('j', $stash->get('j') + 1); } die "WHILE loop terminated (> 1000000 iterations)\n" unless $_tt_failsafe; }; #line 43 "template\en\default\reports\chart.csv.tmpl" $stash->set('i', $stash->get('i') + 1); $output .= "\n "; } die "WHILE loop terminated (> 1000000 iterations)\n" unless $_tt_failsafe; }; $output .= " \n"; } }; if ($@) { $_tt_error = $context->catch($@, \$output); die $_tt_error unless $_tt_error->type eq 'return'; } return $output; }, DEFBLOCKS => { },});
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -