Thanks for this.

I had a few problems using DBD::ODBC and MS SQL Server. With a table of 1000 rows:

What I found is the data grid displayed the first 70 rows repeatedly as you scrolled. I tracked this down to the SQL being run and then found SQL::Abstract::Limit says $order must be specified when $rows is specified. DBIx::LiveGrid only sets $order if you click on a column heading. I verified this with SQL::Abstract::Limit which produces the following incorrect SQL when $order is not specified: 

SELECT * FROM
(
    SELECT TOP 10 * FROM
    (
        SELECT TOP 30  f1, f2 FROM bench_char 
    ) AS foo
    
) AS bar

[download]
and the following correct SQL when $order is specified: 
SELECT * FROM
(
    SELECT TOP 10 * FROM
    (
        SELECT TOP 30  f1, f2 FROM bench_char ORDER BY f1 ASC
    ) AS foo
    ORDER BY f1 DESC
) AS bar
ORDER BY f1 ASC

[download]

I did a rough change to DBIx::LiveGrid to work around this: 

sub query_database {
    my($self,$dbh,$table_name,$fields,$where,$order)=@_;
    my $rows     = $self->get('ajax_page_size');
    my $offset   = $self->get('ajax_offset');
    my $sort_dir = $self->get('ajax_sort_dir');
    my $sort_col = $self->get('ajax_sort_col');
       $sort_col = $self->clean_param('sort_col',$sort_col);
    my @porder    = ();
    if ($sort_col) {
        @porder   = ("$sort_col $sort_dir");
        $order = \@porder;
    }
    require SQL::Abstract::Limit;
    my $abstract = SQL::Abstract::Limit->new( limit_dialect => $dbh );
    my( $stmt, @bind ) = $abstract->select( $table_name
                                          , $fields
                                          , $where
                                          , $order
                                          , $rows
                                          , $offset
                                          );

[download]
and then changed livegrid.cgi: 
my $dbh        = DBI->connect("dbi:ODBC:test", "Martin_Evans", "easyso
+ft", {RaiseError=>1,PrintError=>0});
my $table_name = "bench_char";
my @fields     = qw/f1 f2/;
my @order = qw/f1/;

DBIx::LiveGrid->run( undef, $dbh, $table_name, \@fields, undef, \@orde
+r );

[download]

I hope this helps.

BTW, I think there is a bug in IE 6.0.2800.1106 which means the row data is not updated every time when scrolling past the rowset points (70).

In reply to Re: RFC : AJAX + DBI = DBIx::LiveGrid by mje
in thread RFC : AJAX + DBI = DBIx::LiveGrid by jZed

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.