SF.net SVN: ledger-smb: [777] trunk/LedgerSMB

[..hidden..]

Revision: 777
          http://svn.sourceforge.net/ledger-smb/?rev=777&view=rev
Author:   einhverfr
Date:     2007-01-22 22:53:58 -0800 (Mon, 22 Jan 2007)

Log Message:
-----------
Fixed date NULL issues in HR.pm

Modified Paths:
--------------
    trunk/LedgerSMB/Form.pm
    trunk/LedgerSMB/HR.pm

Modified: trunk/LedgerSMB/Form.pm
===================================================================
--- trunk/LedgerSMB/Form.pm	2007-01-22 21:30:44 UTC (rev 776)
+++ trunk/LedgerSMB/Form.pm	2007-01-23 06:53:58 UTC (rev 777)
@@ -2856,6 +2856,7 @@
 
 	for (@_){
 		if (!$self->{$_} and $self->{$_} ne "0"){
+			print "Undef'ing $_";
 			undef $self->{$_};
 		}
 	}

Modified: trunk/LedgerSMB/HR.pm
===================================================================
--- trunk/LedgerSMB/HR.pm	2007-01-22 21:30:44 UTC (rev 776)
+++ trunk/LedgerSMB/HR.pm	2007-01-23 06:53:58 UTC (rev 777)
@@ -154,7 +154,9 @@
 		       managerid = ?
 		 WHERE id = ?|;
 	$sth = $dbh->prepare($query);
-	$form->db_prepare_vars('dob', 'startdate', 'enddate');
+	$form->{dob} ||= undef;
+	$form->{startdate} ||= undef;
+	$form->{enddate} ||= undef;
 	$sth->execute(
 					$form->{employeenumber}, $form->{name}, $form->{address1},
 					$form->{address2}, $form->{city}, $form->{state},


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.