package II5ce392d130464e9dc300bbd13eca932d; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; use II3562149e53818b6637b38680e87ba918::perllist; use II1e8c1dd7eb964277e5dade4202b07c31; BEGIN{*II5ce392d130464e9dc300bbd13eca932d::llIlIIlllIIlIIII=\%{pack('H6','757814')^'06B'};*II5ce392d130464e9dc300bbd13eca932d::lIllIIIlIIllIlIl=\&{pack('H24','3a5222386c00306c07202d77')^'W3KVV:CT0BUC'};$II5ce392d130464e9dc300bbd13eca932d::lIIIlIIllIIIllll=pack('H18','7a6a1b1766780f6a1f')^'2>OG90@9K';$II5ce392d130464e9dc300bbd13eca932d::lIlIlllllIIlllll=pack('H12','7f7f0b797a02')^'56E53A'};sub fields    { II1e8c1dd7eb964277e5dade4202b07c31::llllllllIIllllll($II1e8c1dd7eb964277e5dade4202b07c31::lIllIllIlIlllIIl{$II3562149e53818b6637b38680e87ba918::lIIllllllIIIlIIl},628,$II1e8c1dd7eb964277e5dade4202b07c31::lIllIllIlIlllIIl{$II3562149e53818b6637b38680e87ba918::lIIlIIlllIIllIll})->dbFields } BEGIN{*II5ce392d130464e9dc300bbd13eca932d::lllIllllllllIIII=\%{pack('H6','017c04')^'D2R'};*II5ce392d130464e9dc300bbd13eca932d::lIIlIllIIlIIIIII=\&{pack('H24','24592e2d0c01430c03294407')^'I8GC6;044K<3'};$II5ce392d130464e9dc300bbd13eca932d::lllllIIIlIIlIIIl=pack('H18','06696e006611796013')^'N=:P9Y63G';$II5ce392d130464e9dc300bbd13eca932d::IlIIllIlllIlIIll=pack('H12','7f0c1f700374')^'5EQ<J7'};sub required  { qw// } BEGIN{*II5ce392d130464e9dc300bbd13eca932d::llIIIIlIllIlIIll=\%{pack('H6','081e6c')^'MP:'};*II5ce392d130464e9dc300bbd13eca932d::IIlIIlIIIllIIlII=\&{pack('H24','512b2a510e73320a0f5f4d7d')^'<JC?4IA28=5I'};$II5ce392d130464e9dc300bbd13eca932d::lIIlIlIllllIIIll=pack('H18','711769021f03721068')^'9C=R@K=C<';$II5ce392d130464e9dc300bbd13eca932d::lIIllIIIIlllIlIl=pack('H12','7201140a041b')^'8HZFMX'};sub namesResourcePrefix { 'field.promogen' } __PACKAGE__->standardHandler($_, $_ => 'text(96)') for qw/title subject url imageUrl/; __PACKAGE__->standardHandler($_, $_ => 'tinymce(20,96)') for qw/instructions description message/; __PACKAGE__->standardHandler($_, $_ => 'textarea(15,96)') for qw/keywords/; BEGIN{*II5ce392d130464e9dc300bbd13eca932d::IlIIIllllIllIIII=\%{pack('H6','76720c')^'3<Z'};*II5ce392d130464e9dc300bbd13eca932d::lIlIIllIIlIIIIll=\&{pack('H24','28525d24607531760b504361')^'E34JZOBN<2;U'};$II5ce392d130464e9dc300bbd13eca932d::IllIlIIIIlIlllIl=pack('H18','1f1210041b721c6214')^'WFDTD:S1@';$II5ce392d130464e9dc300bbd13eca932d::llIllllIllllllII=pack('H12','097f04741311')^'C6J8ZR'};sub getTemplate { my $this = shift; my $object = $this->getDecorated; my $in = $this->getInput; my $type = $object->{type} or die "no type for object"; my @data = II3562149e53818b6637b38680e87ba918::lllIIIIIIIlllIlI($II5ce392d130464e9dc300bbd13eca932d::IlIIIllllIllIIII{$II5ce392d130464e9dc300bbd13eca932d::IllIlIIIIlIlllIl},720,$II5ce392d130464e9dc300bbd13eca932d::IlIIIllllIllIIII{$II5ce392d130464e9dc300bbd13eca932d::lIlIlllllIIlllll})->search(type => $type, ORDER => 'title'); my @values = map { $_->{id} } @data; my %labels = map { $_->{id} => $_->{title} } @data; my $default =  $object->stored ? $object->{template} : (map { $_->{id} } grep { $_->{is_default} } @data)[0]; II3562149e53818b6637b38680e87ba918::perllist::buildList('select', $this->pfx.'template', $default, \@values, \%labels); } 1; 