|
Lines 466-472
sub CheckMandatoryFields {
Link Here
|
| 466 |
|
466 |
|
| 467 |
foreach my $key ( keys %$mandatory_fields ) { |
467 |
foreach my $key ( keys %$mandatory_fields ) { |
| 468 |
push( @empty_mandatory_fields, $key ) |
468 |
push( @empty_mandatory_fields, $key ) |
| 469 |
unless ( defined( $borrower->{$key} ) && $borrower->{$key} ); |
469 |
unless ( defined( $borrower->{$key} ) && $borrower->{$key} && $borrower->{$key} !~ /^\s*$/ ); |
| 470 |
} |
470 |
} |
| 471 |
|
471 |
|
| 472 |
return @empty_mandatory_fields; |
472 |
return @empty_mandatory_fields; |
| 473 |
- |
|
|