|
Lines 896-902
database column.
Link Here
|
| 896 |
=cut |
896 |
=cut |
| 897 |
|
897 |
|
| 898 |
sub get_cardnumber_length { |
898 |
sub get_cardnumber_length { |
| 899 |
my ( $min, $max ) = ( 0, 32 ); # borrowers.cardnumber is a nullable varchar(20) |
899 |
my $borrower = Koha::Schema->resultset('Borrower'); |
|
|
900 |
my $field_size = $borrower->result_source->column_info('cardnumber')->{size}; |
| 901 |
my ( $min, $max ) = ( 0, $field_size ); # borrowers.cardnumber is a nullable varchar(20) |
| 900 |
$min = 1 if C4::Context->preference('BorrowerMandatoryField') =~ /cardnumber/; |
902 |
$min = 1 if C4::Context->preference('BorrowerMandatoryField') =~ /cardnumber/; |
| 901 |
if ( my $cardnumber_length = C4::Context->preference('CardnumberLength') ) { |
903 |
if ( my $cardnumber_length = C4::Context->preference('CardnumberLength') ) { |
| 902 |
# Is integer and length match |
904 |
# Is integer and length match |
|
Lines 912-920
sub get_cardnumber_length {
Link Here
|
| 912 |
} |
914 |
} |
| 913 |
|
915 |
|
| 914 |
} |
916 |
} |
| 915 |
my $borrower = Koha::Schema->resultset('Borrower'); |
917 |
$min = $max if $min > $max; |
| 916 |
my $field_size = $borrower->result_source->column_info('cardnumber')->{size}; |
|
|
| 917 |
$min = $field_size if $min > $field_size; |
| 918 |
return ( $min, $max ); |
918 |
return ( $min, $max ); |
| 919 |
} |
919 |
} |
| 920 |
|
920 |
|
| 921 |
- |
|
|