diff --git a/lib/WebGUI/Asset/Sku/EMSBadge.pm b/lib/WebGUI/Asset/Sku/EMSBadge.pm index d485fe508..486ae57f8 100644 --- a/lib/WebGUI/Asset/Sku/EMSBadge.pm +++ b/lib/WebGUI/Asset/Sku/EMSBadge.pm @@ -285,10 +285,10 @@ Deletes all badges and things attached to the badges. No refunds are given. sub purge { my $self = shift; my $db = $self->session->db; - $db->write("delete from EMSRegistrantTicket where badgeAssetId=?",[$self->getId]); - $db->write("delete from EMSRegistrantToken where badgeAssetId=?",[$self->getId]); - $db->write("delete from EMSRegistrantRibbon where badgeAssetId=?",[$self->getId]); - $db->write("delete from EMSRegistrant where badgeAssetId=?",[$self->getId]); + $db->write("delete from EMSRegistrantTicket where badgeId=?",[$self->getId]); + $db->write("delete from EMSRegistrantToken where badgeId=?",[$self->getId]); + $db->write("delete from EMSRegistrantRibbon where badgeId=?",[$self->getId]); + $db->write("delete from EMSRegistrant where badgeId=?",[$self->getId]); $self->SUPER::purge; } diff --git a/lib/WebGUI/Asset/Sku/EMSRibbon.pm b/lib/WebGUI/Asset/Sku/EMSRibbon.pm index 77db741df..3d6f0afd4 100644 --- a/lib/WebGUI/Asset/Sku/EMSRibbon.pm +++ b/lib/WebGUI/Asset/Sku/EMSRibbon.pm @@ -173,7 +173,7 @@ Deletes all entries in EMSRegistrationRibbon table for this sku. No refunds are sub purge { my $self = shift; - $self->session->db->write("delete from EMSRegistrantRibbon where tokenAssetId=?",[$self->getId]); + $self->session->db->write("delete from EMSRegistrantRibbon where ribbonAssetId=?",[$self->getId]); $self->SUPER::purge; } diff --git a/lib/WebGUI/Asset/Sku/Subscription.pm b/lib/WebGUI/Asset/Sku/Subscription.pm index 8b63ccbe2..ca23aff14 100644 --- a/lib/WebGUI/Asset/Sku/Subscription.pm +++ b/lib/WebGUI/Asset/Sku/Subscription.pm @@ -808,8 +808,9 @@ sub www_listSubscriptionCodes { my ($p, $codes, $output, $where, $ops, $delete); return $session->privilege->insufficient unless $self->canEdit; - +$session->errorHandler->warn(1); my $dcStart = $session->form->date('dcStart'); +$session->errorHandler->warn(2); my $dcStop = $session->datetime->addToTime($session->form->date('dcStop'), 23, 59); my $duStart = $session->form->date('duStart'); my $duStop = $session->datetime->addToTime($session->form->date('duStop'), 23, 59);