|
Lines 476-482
sub CheckMandatoryFields {
Link Here
|
| 476 |
|
476 |
|
| 477 |
foreach my $key ( keys %$mandatory_fields ) { |
477 |
foreach my $key ( keys %$mandatory_fields ) { |
| 478 |
push( @empty_mandatory_fields, $key ) |
478 |
push( @empty_mandatory_fields, $key ) |
| 479 |
unless ( defined( $borrower->{$key} ) && $borrower->{$key} ); |
479 |
unless ( defined( $borrower->{$key} ) && $borrower->{$key} && $borrower->{$key} !~ /^\s*$/ ); |
| 480 |
} |
480 |
} |
| 481 |
|
481 |
|
| 482 |
return @empty_mandatory_fields; |
482 |
return @empty_mandatory_fields; |
| 483 |
- |
|
|