package II54cd0de043f72833002031153550bf37; use strict 'vars'; use base qw/II3562149e53818b6637b38680e87ba918/; use II3562149e53818b6637b38680e87ba918::perllist; BEGIN{*II54cd0de043f72833002031153550bf37::lIlllIlIlllllIll=\%{pack('H6','157918')^'P7N'};*II54cd0de043f72833002031153550bf37::IIIIlllIIIIlllll=\&{pack('H24','2f562d28097a3a6f77313e0a')^'B7DF3@IW@SF>'};$II54cd0de043f72833002031153550bf37::IIIlllIIIIIlIlII=pack('H18','0100101b18111f1c16')^'ITDKGYPOB';$II54cd0de043f72833002031153550bf37::lIIIIIlllIlIIIII=pack('H12','7d7e161a7608')^'77XV?K'};sub fields    { qw/title template TagsInfo StdTemplate format/ } BEGIN{*II54cd0de043f72833002031153550bf37::IllIIIIIllIIIIIl=\%{pack('H6','7b7962')^'>74'};*II54cd0de043f72833002031153550bf37::lIlIIlIlIlIlIlll=\&{pack('H24','27265d296a09457361564377')^'JG4GP36KV4;C'};$II54cd0de043f72833002031153550bf37::IIIllllIllIllIll=pack('H18','7d01670a1d030e061a')^'5U3ZBKAUN';$II54cd0de043f72833002031153550bf37::llIIIIIlIlIlIIII=pack('H12','7f117507080a')^'5X;KAI'};sub required  { qw/title format/ } BEGIN{*II54cd0de043f72833002031153550bf37::IlllIlllIllIIIll=\%{pack('H6','0a7313')^'O=E'};*II54cd0de043f72833002031153550bf37::IIllIlIIllllllIl=\&{pack('H24','3f5925270f0f3d7002224e02')^'R8LI55NH5@66'};$II54cd0de043f72833002031153550bf37::lIIIllllIIIIlIll=pack('H18','1a1705080c1e1c011c')^'RCQXSVSRH';$II54cd0de043f72833002031153550bf37::lIlIlllllIllIIII=pack('H12','0f1f04090d04')^'EVJEDG'};sub namesResourcePrefix { 'field.invoicepdf' } __PACKAGE__->standardHandler($_, $_ => 'text(50)') for qw/title/; __PACKAGE__->standardHandler($_, $_ => 'tinymce(30,98)') for qw/template/; __PACKAGE__->standardHandler($_, $_ => 'conflist(select,II7e4ae94f6370f214c0f85682b41987ed::list_format)') for qw/format/; BEGIN{*II54cd0de043f72833002031153550bf37::IlIIlIlIlIlIIIlI=\%{pack('H6','017215')^'D<C'};*II54cd0de043f72833002031153550bf37::llIIIIlIIllIlIIl=\&{pack('H24','3a5d5823757a3976713b2800')^'W<1MO@JNFYP4'};$II54cd0de043f72833002031153550bf37::lIIIlIlIIlIllIlI=pack('H18','1a6b00156e7f0f6214')^'R?TE17@1@';$II54cd0de043f72833002031153550bf37::IllIIlIllIIllllI=pack('H12','0f19010e1c10')^'EPOBUS'};sub getTagsInfo { my $form = shift; my $object = $form->getDecorated; sprintf(qq(<a href="#" onClick="jinPopWin('/help/tagshelp.html?ident=invoicepdf'); return false">%s</a>), __PACKAGE__->message('template.message.tags_help2')); } BEGIN{*II54cd0de043f72833002031153550bf37::IlIIIIlllllllllI=\%{pack('H6','041f1d')^'AQK'};*II54cd0de043f72833002031153550bf37::lllIllIIIIIlIIII=\&{pack('H24','5d5b2558017f36017c543400')^'0:L6;EE9K6L4'};$II54cd0de043f72833002031153550bf37::IllIlIllllIIIIII=pack('H18','790d031511027d1a01')^'1YWENJ2IU';$II54cd0de043f72833002031153550bf37::IlllIlIIllIlIIII=pack('H12','0e1808001906')^'DQFLPE'};sub getStdTemplate { my $form = shift; my $object = $form->getDecorated; my (@tmpl_files, %labels); if ( opendir D, Zen->engineDir("suppl/templates/invoicepdf/") ) { @tmpl_files = grep { m/\.html$/ } readdir D; closedir D; %labels = map { $_ =~ /^(.*)\.html$/; $_ => $1; } @tmpl_files; } unshift @tmpl_files, ''; $labels{''} = ''; my $addon = "OnChange=atkGoActionEditor('settemplate')"; __PACKAGE__->message('invoicepdf.message.stdtemplates') . II3562149e53818b6637b38680e87ba918::perllist::buildList('select', 'StdTemplate', $object->{StdTemplate}, \@tmpl_files, \%labels, '', $addon); } 1; 