use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");if ( $C->{Form}{errors} ) {$this->out("	<div class=\"card mb-4 py-3 border-left-danger\"><div class=\"card-body\">\n");my $in = $C->{Form}{errors};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{error} = -1;for my $f (@$loop) {$C->{ITERATION}{error}++;$C->{error} = $f;$this->out("		 $C->{error}{message}\n");}$this->out("	</div></div>\n");}$this->out("\n<form name=Editor action=\"$C->{SYS}{URL}$C->{ENV}{PATH_INFO}\" method=POST enctype=\"multipart/form-data\">\n<input type=hidden name=cgi_ret value=\"$C->{INPUT}{cgi_ret}\">\n<input type=hidden name=\"js_receiver\" value=\"$C->{INPUT}{js_receiver}\">\n<input type=hidden name=TabAct>\n<input type=hidden name=ObjectID value=\"$C->{INPUT}{ObjectID}\">\n<input type=hidden name=TabCustom1 value=\"$C->{INPUT}{TabCustom1}\">\n<input type=hidden name=TabCustom2 value=\"$C->{INPUT}{TabCustom2}\">\n<input type=hidden name=TabCustom3 value=\"$C->{INPUT}{TabCustom3}\">\n\n\n	<div class=\"card shadow mb-4\"> <div class=\"card-header py-3\"> <h6 class=\"m-0 font-weight-bold text-primary\">\n		Survey data (#$C->{View}{ID})\n	</h6>\n</div>\n\n<div class=\"card-body\">\n	<div class=\"btn-group mb-4\">\n		<button type=\"button\" class=\"btn btn-primary\" onclick=\"atkGoActionEditor(\'save\')\">Save</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\n\n");$C->{SurveyData} = $C->{Form}{SurveyData};$this->out("");my $in = $C->{SurveyData};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{q} = -1;for my $f (@$loop) {$C->{ITERATION}{q}++;$C->{q} = $f;$this->out("			<b>$C->{q}{question}{title}");if ( $C->{q}{question}{required} ) {$this->out("&nbsp;<font style=\"color:red\">*</font>");}$this->out("</b>\n");if ( $C->{q}{question}{selector_data} ) {$this->out("				$C->{q}{sel}\n");}$this->out("");if ( $C->{q}{question}{text_enabled} ) {$this->out("				$C->{q}{question}{text_caption}s\n				$C->{q}{text}\n");}$this->out("");}$this->out("\n\n	<div class=\"btn-group mb-4\">\n		<button type=\"button\" class=\"btn btn-primary\" onclick=\"atkGoActionEditor(\'save\')\">Save</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\n	</div></div>\n\n</form>\n");}