Lines 1835-1841
subtest 'search_ordered' => sub {
Link Here
|
1835 |
$item2->discard_changes->update( { homebranch => $library_a->branchcode } ); |
1835 |
$item2->discard_changes->update( { homebranch => $library_a->branchcode } ); |
1836 |
$item3->discard_changes->update( { homebranch => $library_z->branchcode } ); |
1836 |
$item3->discard_changes->update( { homebranch => $library_z->branchcode } ); |
1837 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1837 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1838 |
[ $item2->itemnumber, $item1->itemnumber, $item3->itemnumber ] ); |
1838 |
[ $item2->itemnumber, $item1->itemnumber, $item3->itemnumber ], |
|
|
1839 |
"not a serial - order by homebranch" ); |
1839 |
|
1840 |
|
1840 |
# order_by me.enumchron |
1841 |
# order_by me.enumchron |
1841 |
$biblio->items->update( { homebranch => $library_a->branchcode } ); |
1842 |
$biblio->items->update( { homebranch => $library_a->branchcode } ); |
Lines 1843-1849
subtest 'search_ordered' => sub {
Link Here
|
1843 |
$item2->discard_changes->update( { enumchron => 'bb' } ); |
1844 |
$item2->discard_changes->update( { enumchron => 'bb' } ); |
1844 |
$item3->discard_changes->update( { enumchron => 'aa' } ); |
1845 |
$item3->discard_changes->update( { enumchron => 'aa' } ); |
1845 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1846 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1846 |
[ $item3->itemnumber, $item2->itemnumber, $item1->itemnumber ] ); |
1847 |
[ $item3->itemnumber, $item2->itemnumber, $item1->itemnumber ], |
|
|
1848 |
"not a serial - order by enumchron" ); |
1847 |
|
1849 |
|
1848 |
# order_by LPAD( me.copynumber, 8, '0' ) |
1850 |
# order_by LPAD( me.copynumber, 8, '0' ) |
1849 |
$biblio->items->update( { enumchron => undef } ); |
1851 |
$biblio->items->update( { enumchron => undef } ); |
Lines 1851-1857
subtest 'search_ordered' => sub {
Link Here
|
1851 |
$item2->discard_changes->update( { copynumber => '34567890' } ); |
1853 |
$item2->discard_changes->update( { copynumber => '34567890' } ); |
1852 |
$item3->discard_changes->update( { copynumber => '23456789' } ); |
1854 |
$item3->discard_changes->update( { copynumber => '23456789' } ); |
1853 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1855 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1854 |
[ $item1->itemnumber, $item3->itemnumber, $item2->itemnumber ] ); |
1856 |
[ $item1->itemnumber, $item3->itemnumber, $item2->itemnumber ], |
|
|
1857 |
"not a serial - order by LPAD( me.copynumber, 8, '0' )" ); |
1855 |
|
1858 |
|
1856 |
# order_by -desc => 'me.dateaccessioned' |
1859 |
# order_by -desc => 'me.dateaccessioned' |
1857 |
$biblio->items->update( { copynumber => undef } ); |
1860 |
$biblio->items->update( { copynumber => undef } ); |
Lines 1859-1865
subtest 'search_ordered' => sub {
Link Here
|
1859 |
$item2->discard_changes->update( { dateaccessioned => '2022-07-19' } ); |
1862 |
$item2->discard_changes->update( { dateaccessioned => '2022-07-19' } ); |
1860 |
$item3->discard_changes->update( { dateaccessioned => '2022-09-19' } ); |
1863 |
$item3->discard_changes->update( { dateaccessioned => '2022-09-19' } ); |
1861 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1864 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1862 |
[ $item3->itemnumber, $item1->itemnumber, $item2->itemnumber ] ); |
1865 |
[ $item3->itemnumber, $item1->itemnumber, $item2->itemnumber ], |
|
|
1866 |
"not a serial - order by date accessioned desc" ); |
1863 |
} |
1867 |
} |
1864 |
|
1868 |
|
1865 |
{ # Is a serial |
1869 |
{ # Is a serial |
Lines 1913-1919
subtest 'search_ordered' => sub {
Link Here
|
1913 |
$serial3->discard_changes->update( { publisheddate => '2022-08-19' } ); |
1917 |
$serial3->discard_changes->update( { publisheddate => '2022-08-19' } ); |
1914 |
is_deeply( |
1918 |
is_deeply( |
1915 |
[ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1919 |
[ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1916 |
[ $item2->itemnumber, $item3->itemnumber, $item1->itemnumber ] |
1920 |
[ $item2->itemnumber, $item3->itemnumber, $item1->itemnumber ], |
|
|
1921 |
"serial - order by publisheddate" |
1917 |
); |
1922 |
); |
1918 |
|
1923 |
|
1919 |
# order_by me.enumchron |
1924 |
# order_by me.enumchron |
Lines 1924-1930
subtest 'search_ordered' => sub {
Link Here
|
1924 |
$item2->discard_changes->update( { enumchron => 'bb' } ); |
1929 |
$item2->discard_changes->update( { enumchron => 'bb' } ); |
1925 |
$item3->discard_changes->update( { enumchron => 'aa' } ); |
1930 |
$item3->discard_changes->update( { enumchron => 'aa' } ); |
1926 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1931 |
is_deeply( [ map { $_->itemnumber } $biblio->items->search_ordered->as_list ], |
1927 |
[ $item3->itemnumber, $item2->itemnumber, $item1->itemnumber ] ); |
1932 |
[ $item3->itemnumber, $item2->itemnumber, $item1->itemnumber ], |
|
|
1933 |
"serial - order by enumchron" ); |
1928 |
|
1934 |
|
1929 |
} |
1935 |
} |
1930 |
|
1936 |
|
1931 |
- |
|
|