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

Refactor out the getEditForm code from WebGUI::Workflow::Activity and

Browse source 
put it into HTMLForm.  Now HTMLForm can generate dynamic, definition
based forms for WebGUI.
This commit is contained in:
Colin Kuskie 2008-02-24 04:04:36 +00:00
parent 95b8244ce0
commit b1990836d0
3 changed files with 74 additions and 22 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -224,28 +224,14 @@ Returns the form that will be used to edit the properties of an activity.
=cut
sub getEditForm {
my $self = shift;
my $form = WebGUI::HTMLForm->new($self->session);
$form->submit;
$form->hidden(name=>"activityId", value=>$self->getId);
$form->hidden(name=>"className", value=>$self->get("className"));
my $fullDefinition = $self->definition($self->session);
foreach my $definition (reverse @{$fullDefinition}) {
my $properties = $definition->{properties};
foreach my $fieldname (keys %{$properties}) {
my %params;
foreach my $key (keys %{$properties->{$fieldname}}) {
$params{$key} = $properties->{$fieldname}{$key};
if ($fieldname eq "title" && lc($params{$key}) eq "untitled") {
$params{$key} = $fullDefinition->[0]{name};
}
}
$params{value} = $self->get($fieldname);
$params{name} = $fieldname;
$form->dynamicField(%params);
}
}
return $form;
my $self = shift;
my $form = WebGUI::HTMLForm->new($self->session);
$form->submit;
$form->hidden(name=>"activityId", value=>$self->getId);
$form->hidden(name=>"className", value=>$self->get("className"));
my $fullDefinition = $self->definition($self->session);
$form->dynamicForm($fullDefinition, $self);
return $form;
}
#-------------------------------------------------------------------