use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("<SCRIPT>var multiactCfm = new Array();</SCRIPT>\n<SCRIPT>var multiactCodes = new Array();</SCRIPT>\n");my $in = $C->{TabActs}{Lister};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{a} = -1;for my $f (@$loop) {$C->{ITERATION}{a}++;$C->{a} = $f;$this->out("");if ( $C->{a}{confirm} ) {$this->out("		<SCRIPT>multiactCfm[\'$C->{a}{tabact}\'] = \"$C->{a}{confirm}\";</SCRIPT>\n");}$this->out("");if ( $C->{a}{codeMultiact} ) {$this->out("		<SCRIPT>multiactCodes[\'$C->{a}{tabact}\'] = \"$C->{a}{codeMultiact}\";</SCRIPT>\n");}$this->out("");}$this->out("\n<form name=Lister method=POST action=\"$C->{SELF_URL_NO_QS}\">\n<input type=\"hidden\" name=\"TabAct\">\n<input type=\"hidden\" name=\"cgi_ret\" value=\"$C->{INPUT}{cgi_ret}\">\n<input type=\"hidden\" name=\"ObjectID\" id=\"ListerMainObjectID\">\n");my $in = $C->{KeepFields};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{kf} = -1;for my $f (@$loop) {$C->{ITERATION}{kf}++;$C->{kf} = $f;$this->out("<input type=\"hidden\" name=\"$C->{kf}\" value=\"$C->{INPUT}{$C->{kf}}\">\n");}$this->out("\n<div class=\"card shadow mb-4\">\n	<div class=\"card-header py-3\">\n	  <h6 class=\"m-0 font-weight-bold text-primary\">$C->{TableTitle}</h6>\n	</div>\n	<div class=\"card-body\">\n\n");if ( $C->{Total} ) {$this->out("");if ( $C->{Total} >= 10 && ! $C->{TabActs}{ListerSingleControl} && ! $C->{TabActs}{ListerNoControls} ) {$this->out("	<div class=\"btn-group mb-4\">\n		<button type=\"button\" class=\"btn btn-primary\" onclick=\"atkGoActionLister(\'edit\', \'\')\">Create</button>\n		<button type=\"button\" class=\"btn btn-primary dropdown-toggle dropdown-toggle-split\" data-toggle=\"dropdown\" aria-haspopup=\"true\" aria-expanded=\"false\">\n			<span class=\"sr-only\">Toggle Dropdown</span>\n		</button>\n		<div class=\"dropdown-menu\">\n");{my $G = (ref $this)->get("$C->{TabActCfg}{template_controls}", $this->{param}) or die "no skel $C->{TabActCfg}{template_controls}";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("		</div>\n	</div>\n");}$this->out("");my $in = $C->{List};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{Record} = -1;for my $f (@$loop) {$C->{ITERATION}{Record}++;$C->{Record} = $f;$this->out("	<div class=\"row\">\n");my $in = $C->{TabActs}{ListerPerRecord};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{a} = -1;for my $f (@$loop) {$C->{ITERATION}{a}++;$C->{a} = $f;$this->out("");require IIa66da94aed9b371a0ee16b72f938ea09;my $val = "$C->{a}{codeLister}";IIb39071a48a82a07eeb9256f406abebc5::IIIIIIIllIlIIlll($II982446f8950cc3dc59e487adba22df54::llIIlIllIIIIIIlI{$IIb39071a48a82a07eeb9256f406abebc5::IllIlIIllIlIIIll},1019,$II982446f8950cc3dc59e487adba22df54::llIIlIllIIIIIIlI{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IlIlllllIllIIlIl})->evaluate(1) for $val;eval qq(\$C->{ta} = $val);die($@) if $@;$this->out("				<div class=\"col-1\">\n					$C->{ta}\n				</div>\n");}$this->out("");my $in = $C->{Fields};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{f} = -1;for my $f (@$loop) {$C->{ITERATION}{f}++;$C->{f} = $f;$this->out("			<div class=\"col-9\">\n				".$C->{Record}->${\('get'.ucfirst($C->{f}))}."\n			</div>\n");}$this->out("	</div>\n	<hr>\n");}$this->out("");}$this->out("\n\n");if ( ! $C->{TabActs}{ListerNoControls} ) {$this->out("	<div class=\"btn-group mt-4\">\n		<button type=\"button\" class=\"btn btn-primary\" onclick=\"atkGoActionLister(\'edit\', \'\')\">Create</button>\n		<button type=\"button\" class=\"btn btn-primary dropdown-toggle dropdown-toggle-split\" data-toggle=\"dropdown\" aria-haspopup=\"true\" aria-expanded=\"false\">\n			<span class=\"sr-only\">Toggle Dropdown</span>\n		</button>\n		<div class=\"dropdown-menu\">\n");{my $G = (ref $this)->get("$C->{TabActCfg}{template_controls}", $this->{param}) or die "no skel $C->{TabActCfg}{template_controls}";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("		</div>\n	</div>\n");}$this->out("</div></div>\n</form>\n");}