oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more workflow stuff

Browse source
This commit is contained in:
JT Smith 2006-02-09 18:45:14 +00:00
parent d9ae5745a5
commit ec5193e5d3
8 changed files with 676 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lib/WebGUI/Workflow/Activity.pm
View file

@ -57,7 +57,9 @@ sub create {
my $class = shift;
my $session = shift;
my $workflowId = shift;
my $activityId = $session->db->setRow("WorkflowActivity","activityId",{activityId=>"new", workflowId=>$workflowId});
my ($sequenceNumber) = $session->db->quickArray("select count(*) from WorkflowActivity where workflowId=?", [$workflowId]);
$sequenceNumber++;
my $activityId = $session->db->setRow("WorkflowActivity","activityId",{sequenceNumber=>$sequenceNumber, activityId=>"new", className=>$class, workflowId=>$workflowId});
return $class->new($session, $activityId);
}
@ -72,8 +74,9 @@ Removes this activity from its workflow.
sub delete {
my $self = shift;
my $sth = $self->session->db->prepare("delete from WorkflowActivityData where activityId=?");
$sth->execute($self->getId);
$sth->execute([$self->getId]);
$self->session->db->deleteRow("WorkflowActivity","activityId",$self->getId);
undef $self;
}
#-------------------------------------------------------------------