n;
use HTML::GUI::log::eventList;
use UNIVERSAL qw(isa);
our @ISA = qw(HTML::GUI::container);
use JSON;
use Log::Log4perl qw(:easy);
=head1 SCREEN
Manage a screen : it loads its definition with a
GHW:screenDescription'} ?
$params->{'GHW:screenDescription'} : '{}';
return JSON::decode_json($descDataString);
}
=head3 getDescriptionFieldsHtml
Return :
a string containi
onFieldsHtml
{
my ($self)=@_;
#we create a JSON string that contain all the usefull data we need for this screen
my $descDataString = JSON::encode_json({screenName => $self->getProp('path'),