1 package # Hide from PAUSE
2 DBIx::Class::SQLAHacks::MSSQL;
4 use base qw( DBIx::Class::SQLAHacks );
5 use Carp::Clan qw/^DBIx::Class|^SQL::Abstract/;
8 my ($self, $sql, $order, $rows, $offset ) = @_;
11 my $last = $rows + $offset - 1;
12 my ( $order_by ) = $self->_order_by( $order );
17 SELECT Q1.*, ROW_NUMBER() OVER( $order_by ) AS ROW_NUM FROM (
21 WHERE ROW_NUM BETWEEN $offset AND $last