|
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, 16 ); # borrowers.cardnumber is a nullable varchar(16) |
899 |
my ( $min, $max ) = ( 0, 32 ); # borrowers.cardnumber is a nullable varchar(20) |
| 900 |
$min = 1 if C4::Context->preference('BorrowerMandatoryField') =~ /cardnumber/; |
900 |
$min = 1 if C4::Context->preference('BorrowerMandatoryField') =~ /cardnumber/; |
| 901 |
if ( my $cardnumber_length = C4::Context->preference('CardnumberLength') ) { |
901 |
if ( my $cardnumber_length = C4::Context->preference('CardnumberLength') ) { |
| 902 |
# Is integer and length match |
902 |
# Is integer and length match |