bunch of bug fixes

This commit is contained in:
JT Smith 2005-02-17 03:47:35 +00:00
parent c76829a4e3
commit 877c8e1afa
11 changed files with 28 additions and 4128 deletions

View file

@ -501,7 +501,7 @@ sub setCollateral {
my $useAssetId = shift;
my $setName = shift || "assetId";
my $setValue = shift || $self->get($setName);
my ($key, $sql, $seq, $dbkeys, $dbvalues, $counter);
my ($key, $seq, $dbkeys, $dbvalues);
my $counter = 0;
my $sql;
if ($properties->{$keyName} eq "new" || $properties->{$keyName} eq "") {