/[SQLSession]/trunk/share/web/templates/sql
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /trunk/share/web/templates/sql

Parent Directory Parent Directory | Revision Log Revision Log


Revision 52 - (hide annotations)
Sun Jan 21 13:37:17 2007 UTC (17 years, 4 months ago) by dpavlin
File size: 2200 byte(s)
display database name even when not in edit mode
1 dpavlin 9 <%args>
2     $sth => undef
3 dpavlin 20
4 dpavlin 21 $sql_query => undef
5     $name => undef
6     $database => undef
7 dpavlin 20
8 dpavlin 26 $max_rows => 100
9    
10 dpavlin 9 </%args>
11     <%init>
12    
13 dpavlin 27 my $execute_sql = Jifty->web->new_action(
14 dpavlin 9 class => 'DoSQL',
15     moniker => 'execute_sql',
16     );
17    
18     my $result = Jifty->web->response->result('execute_sql');
19     $sth = $result->content('sth') if $result and !defined $sth;
20    
21 dpavlin 45 my $edit = Jifty->web->current_user->role('edit');
22 dpavlin 29 warn $edit ? 'edit mode for SQL' : 'student mode';
23    
24 dpavlin 9 </%init>
25    
26     <&| /_elements/wrapper, title => "Try out SQL query" &>
27     <% Jifty->web->form->start() %>
28 dpavlin 27 <% $execute_sql->form_field('sql_query',
29 dpavlin 20 default_value => $sql_query,
30 dpavlin 29 cols => 80,
31 dpavlin 34 rows => 12,
32 dpavlin 20 ) %>
33 dpavlin 29 % if ( $edit ) {
34     <% $execute_sql->form_field('database', default_value => $database ) %>
35     % } else {
36    
37     <!-- hidden database -->
38     <% $execute_sql->hidden('database', $database ) %>
39 dpavlin 52 <% $execute_sql->form_value('database', default_value => $database ) %>
40 dpavlin 29
41     % }
42 dpavlin 20 <div class="submit_button">
43 dpavlin 27 <% $execute_sql->button( label => 'Try it!' ) %>
44 dpavlin 9
45 dpavlin 21
46 dpavlin 10 % if ( defined($sth) ) {
47    
48 dpavlin 29 % if ( $edit ) {
49    
50 dpavlin 27 % warn "save SQL: ", $execute_sql->argument_value('sql_query');
51    
52 dpavlin 21 <% Jifty->web->link(
53     label => 'Save',
54     onclick => {
55     region => 'save_query',
56 dpavlin 23 replace_with => '/save',
57 dpavlin 21 args => {
58 dpavlin 27 sql_query => $execute_sql->argument_value('sql_query'),
59     database => $execute_sql->argument_value('database'),
60 dpavlin 21 },
61     refresh_self => 1,
62     toggle => 1,
63     },
64 dpavlin 23 as_button => 1,
65 dpavlin 21 ) %>
66 dpavlin 20
67 dpavlin 29 </div><!-- submit_button edit -->
68 dpavlin 20
69 dpavlin 21 <% Jifty->web->region(
70     name => 'save_query',
71     ) %>
72    
73 dpavlin 29 % } else {
74 dpavlin 20
75 dpavlin 29 </div><!-- submit_button no edit -->
76    
77     % }
78    
79     <% Jifty->web->form->end() %>
80    
81 dpavlin 9 <table cellpadding="3" cellspacing="0" border="1">
82    
83     <tr>
84     % foreach my $col ( @{ $sth->{'NAME'} } ) {
85     <th><% $col %></th>
86     % }
87     </tr>
88    
89 dpavlin 26 % my $rows = 0;
90 dpavlin 9 % while ( my @row = $sth->fetchrow_array() ) {
91 dpavlin 26 % last if (++$rows > $max_rows);
92 dpavlin 9 <tr>
93     % foreach my $v ( @row ) {
94 dpavlin 12 <td><% defined($v) ? $v : 'NULL' %></td>
95 dpavlin 9 % }
96     </tr>
97     % }
98    
99     </table>
100 dpavlin 10
101 dpavlin 26 % if ($sth->rows > $max_rows) {
102     <div class="note">
103     Query produced more than <% $max_rows %> rows, try adding <tt>LIMIT</tt> and
104     <tt>OFFSET</tt> to see another part of results.
105     </div>
106     % }
107    
108 dpavlin 21 % } else {
109    
110 dpavlin 29 </div><!-- submit_button no query -->
111 dpavlin 21 <% Jifty->web->form->end() %>
112    
113 dpavlin 20 % }
114 dpavlin 14
115 dpavlin 20 <% Jifty->web->return( label => "Go back" ) %>
116 dpavlin 14
117     </&>
118    

  ViewVC Help
Powered by ViewVC 1.1.26