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

Diff of /trunk/share/web/templates/fragments/enter_query

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 83 by dpavlin, Mon Jan 29 20:11:20 2007 UTC revision 84 by dpavlin, Tue Jan 30 14:08:47 2007 UTC
# Line 2  Line 2 
2  $sth => undef  $sth => undef
3  $q => undef  $q => undef
4  $max_rows => 100  $max_rows => 100
5    
6    $sql_query => undef
7    $on_database => undef
8  </%args>  </%args>
9  <%init>  <%init>
10    
11    $sql_query = $q->sql_query if ($q && $q->can('sql_query'));
12    $on_database = $q->on_database->id if ($q && $q->can('on_database'));
13    
14  my $query = Jifty->web->new_action(  my $query = Jifty->web->new_action(
15          class => 'DoSQL',          class => 'DoSQL',
16          moniker => 'query',          moniker => 'query',
# Line 25  warn $edit ? 'edit mode for SQL' : 'stud Line 31  warn $edit ? 'edit mode for SQL' : 'stud
31  <% Jifty->web->form->start() %>  <% Jifty->web->form->start() %>
32  % if ( Jifty->web->current_user->id ) {  % if ( Jifty->web->current_user->id ) {
33  <% $query->form_field('sql_query',  <% $query->form_field('sql_query',
34          default_value => $q->sql_query,          default_value => $sql_query,
35          cols => 80,          cols => 80,
36          rows => 12,          rows => 12,
37  ) %>  ) %>
38  % } else {  % } else {
39  <% $query->hidden('sql_query', $q->sql_query ) %>  <% $query->hidden('sql_query', $sql_query ) %>
40  <% $query->form_value('sql_query', default_value => $q->sql_query ) %>  <% $query->form_value('sql_query', default_value => $sql_query ) %>
41  % }  % }
42    
43  <div class="database-schema">  <div class="database-schema">
44  <%perl>  <%perl>
45  my $db = SQLSession::Model::Database->new();  my $db = SQLSession::Model::Database->new();
46  $db->load_by_cols( id => $q->on_database->id );  $db->load_by_cols( id => $on_database );
47  my $name = $db->dsn;  my $name = $db->dsn;
48  $name =~ s/^.*dbname=//;  $name =~ s/^.*dbname=//;
49  $m->out("<a href=\"/static/spy/$name/index.html\" target=\"_spy\">$name shema</a>");  $m->out("<a href=\"/static/spy/$name/index.html\" target=\"_spy\">$name shema</a>");
# Line 45  $m->out("<a href=\"/static/spy/$name/ind Line 51  $m->out("<a href=\"/static/spy/$name/ind
51  </div>  </div>
52    
53  % if ( $edit ) {  % if ( $edit ) {
54  <% $query->form_field('database', default_value => $q->on_database->id ) %>  <% $query->form_field('on_database', default_value => $on_database ) %>
55  % } else {  % } else {
56    
57  <!-- hidden database -->  <!-- hidden database -->
58  <% $query->hidden('database', $q->on_database->id ) %>  <% $query->hidden('on_database', $on_database ) %>
59  <% $query->form_value('database', default_value => $q->on_database->id ) %>  <% $query->form_value('on_database', default_value => $on_database ) %>
60    
61  % }  % }
62    
63  <div class="submit_button">  <div class="submit_button">
64  <% $query->button( label => 'Try it!' ) %>  <% $query->button( label => 'Try it!' ) %>
65    
66    % if ($sth && $edit) {
67    <% Jifty->web->tangent(
68            label => 'Save query',
69            onclick => {
70                    region => 'query',
71                    replace_with => '/fragments/save_query',
72                    args => {
73                            sql_query => $query->argument_value('sql_query'),
74                            on_database => $query->argument_value('on_database'),
75                    },
76                    #toggle => 1,
77            },
78            as_button => 1,
79    ) %>
80    % }
81    
82    </div>
Legend:
Removed from v.83  
changed lines
  Added in v.84
  ViewVC Help
Powered by ViewVC 1.1.26