SF.net SVN: ledger-smb: [509] trunk/LedgerSMB/IC.pm

[..hidden..]

Revision: 509
          http://svn.sourceforge.net/ledger-smb/?rev=509&view=rev
Author:   einhverfr
Date:     2006-11-10 16:03:41 -0800 (Fri, 10 Nov 2006)

Log Message:
-----------
when adding parts, etc. price update defaults to current date on save

Modified Paths:
--------------
    trunk/LedgerSMB/IC.pm

Modified: trunk/LedgerSMB/IC.pm
===================================================================
--- trunk/LedgerSMB/IC.pm	2006-11-10 23:53:23 UTC (rev 508)
+++ trunk/LedgerSMB/IC.pm	2006-11-11 00:03:41 UTC (rev 509)
@@ -383,6 +383,9 @@
 	$form->{partnumber} = $form->update_defaults(
 		$myconfig, "partnumber", $dbh) if ! $form->{partnumber};
 
+	if (!$form->{priceupdate}){
+		$form->{priceupdate} = 'now';
+	}
 	$query = qq|
 		UPDATE parts 
 		   SET partnumber = ?,


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