|
Lines 956-962
database column.
Link Here
|
| 956 |
=cut |
956 |
=cut |
| 957 |
|
957 |
|
| 958 |
sub get_cardnumber_length { |
958 |
sub get_cardnumber_length { |
| 959 |
my ( $min, $max ) = ( 0, 16 ); # borrowers.cardnumber is a nullable varchar(16) |
959 |
my ( $min, $max ) = ( 0, 32 ); # borrowers.cardnumber is a nullable varchar(20) |
| 960 |
$min = 1 if C4::Context->preference('BorrowerMandatoryField') =~ /cardnumber/; |
960 |
$min = 1 if C4::Context->preference('BorrowerMandatoryField') =~ /cardnumber/; |
| 961 |
if ( my $cardnumber_length = C4::Context->preference('CardnumberLength') ) { |
961 |
if ( my $cardnumber_length = C4::Context->preference('CardnumberLength') ) { |
| 962 |
# Is integer and length match |
962 |
# Is integer and length match |