Lines 1034-1044
sub GetImportRecordsRange {
Link Here
|
1034 |
|
1034 |
|
1035 |
my $order_by = $parameters->{order_by} || 'import_record_id'; |
1035 |
my $order_by = $parameters->{order_by} || 'import_record_id'; |
1036 |
( $order_by ) = grep( /^$order_by$/, qw( import_record_id title status overlay_status ) ) ? $order_by : 'import_record_id'; |
1036 |
( $order_by ) = grep( /^$order_by$/, qw( import_record_id title status overlay_status ) ) ? $order_by : 'import_record_id'; |
1037 |
$order_by .= ",authorized_heading" if $order_by eq 'title'; |
|
|
1038 |
|
1037 |
|
1039 |
my $order_by_direction = |
1038 |
my $order_by_direction = |
1040 |
uc( $parameters->{order_by_direction} ) eq 'DESC' ? 'DESC' : 'ASC'; |
1039 |
uc( $parameters->{order_by_direction} ) eq 'DESC' ? 'DESC' : 'ASC'; |
1041 |
|
1040 |
|
|
|
1041 |
$order_by .= " $order_by_direction, authorized_heading" if $order_by eq 'title'; |
1042 |
|
1042 |
my $query = "SELECT title, author, isbn, issn, authorized_heading, import_records.import_record_id, |
1043 |
my $query = "SELECT title, author, isbn, issn, authorized_heading, import_records.import_record_id, |
1043 |
record_sequence, status, overlay_status, |
1044 |
record_sequence, status, overlay_status, |
1044 |
matched_biblionumber, matched_authid, record_type |
1045 |
matched_biblionumber, matched_authid, record_type |
1045 |
- |
|
|