Committing the new Ecommerce system

This commit is contained in:
Martin Kamerbeek 2004-11-29 15:31:22 +00:00
parent 1847a18ec7
commit 5676bf9585
16 changed files with 2576 additions and 0 deletions

18
lib/WebGUI/Commerce.pm Normal file
View file

@ -0,0 +1,18 @@
package WebGUI::Commerce;
use strict;
use WebGUI::SQL;
#-------------------------------------------------------------------
sub setCommerceSetting {
my ($entry);
$entry = shift;
WebGUI::SQL->write("delete from commerceSettings where ".
"namespace=".quote($entry->{namespace})." and ".
"type=".quote($entry->{type})." and fieldName=".quote($entry->{fieldName}));
WebGUI::SQL->write("insert into commerceSettings (namespace, type, fieldName, fieldValue) values ".
"(".quote($entry->{namespace}).",".quote($entry->{type}).",".quote($entry->{fieldName}).",".quote($entry->{fieldValue}).")");
}
1;