|
Lines 50-61
$borrowers=SearchInTable("borrowers",["Valjean",{firstname=>"Jean"}],undef,undef
Link Here
|
| 50 |
ok(keys %{$$borrowers[0]} ==1, "Search In Table columns out limit"); |
50 |
ok(keys %{$$borrowers[0]} ==1, "Search In Table columns out limit"); |
| 51 |
$borrowers=SearchInTable("borrowers",["Valjean",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(firstname surname title)]); |
51 |
$borrowers=SearchInTable("borrowers",["Valjean",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(firstname surname title)]); |
| 52 |
ok(@$borrowers>0, "Search In Table columns out limit to borrowernumber AND filter firstname surname title"); |
52 |
ok(@$borrowers>0, "Search In Table columns out limit to borrowernumber AND filter firstname surname title"); |
| 53 |
$borrowers=SearchInTable("borrowers",["Valjean",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(firstname title)]); |
|
|
| 54 |
ok(@$borrowers==0, "Search In Table columns filter firstname title limit Valjean not in other fields than surname "); |
| 55 |
$borrowers=SearchInTable("borrowers",["Val",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(surname)],"start_with"); |
53 |
$borrowers=SearchInTable("borrowers",["Val",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(surname)],"start_with"); |
| 56 |
ok(@$borrowers>0, "Search In Table columns filter surname Val on a wide search found "); |
54 |
ok(@$borrowers>0, "Search In Table columns filter surname Val on a wide search found "); |
| 57 |
$borrowers=SearchInTable("borrowers",["Val",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(surname)],"exact"); |
55 |
$borrowers=SearchInTable("borrowers",["Val",{firstname=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(surname)],"exact"); |
| 58 |
ok(@$borrowers==0, "Search In Table columns filter surname Val in exact search not found "); |
|
|
| 59 |
$borrowers=eval{SearchInTable("borrowers",["Val",{member=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(firstname title)],"exact")}; |
56 |
$borrowers=eval{SearchInTable("borrowers",["Val",{member=>"Jean"}],undef,undef,[qw(borrowernumber)],[qw(firstname title)],"exact")}; |
| 60 |
ok(@$borrowers==0 && !($@), "Search In Table fails gracefully when no correct field passed in hash"); |
57 |
ok(@$borrowers==0 && !($@), "Search In Table fails gracefully when no correct field passed in hash"); |
| 61 |
$borrowers=eval{SearchInTable("borrowers",["Jea"],undef,undef,undef,[qw(firstname surname borrowernumber)],"start_with")}; |
58 |
$borrowers=eval{SearchInTable("borrowers",["Jea"],undef,undef,undef,[qw(firstname surname borrowernumber)],"start_with")}; |
| 62 |
- |
|
|