summaryrefslogtreecommitdiff
path: root/LedgerSMB
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB')
-rwxr-xr-xLedgerSMB/Form.pm2
-rwxr-xr-xLedgerSMB/HR.pm2
2 files changed, 3 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 44e4a0e1..2c5d3f3b 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -2861,6 +2861,8 @@ sub update_defaults {
}
sub db_prepare_vars {
+ my $self = shift;
+
for (@_){
if (!$self->{$_} and $self->{$_} ne "0"){
undef $self->{$_};
diff --git a/LedgerSMB/HR.pm b/LedgerSMB/HR.pm
index 1b9d0ad5..0b08b13f 100755
--- a/LedgerSMB/HR.pm
+++ b/LedgerSMB/HR.pm
@@ -154,7 +154,7 @@ sub save_employee {
managerid = ?
WHERE id = ?|;
$sth = $dbh->prepare($query);
- $form->db_prepare_vars('startdate', 'enddate');
+ $form->db_prepare_vars('dob', 'startdate', 'enddate');
$sth->execute(
$form->{employeenumber}, $form->{name}, $form->{address1},
$form->{address2}, $form->{city}, $form->{state},