use strict;return sub{my $this = shift;my $C = $this->{C};$this->out("");$C->{IFrameID} = "IFrameImportPieces";$this->out("");{my $G = (ref $this)->get("/headfoot/inc_tinymce.html", $this->{param}) or die "no skel /headfoot/inc_tinymce.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("");{my $G = (ref $this)->get("/headfoot/inner_header.html", $this->{param}) or die "no skel /headfoot/inner_header.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");{my $G = (ref $this)->get("/zen/table/supl_atk.html", $this->{param}) or die "no skel /zen/table/supl_atk.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out(" \n\n");$this->out(Zen::PerlHandler->get("II5e3f37e49e069d9b1ca273777183e87e->mnt")->do($this->{C}));$this->out("\n\n");if ( $C->{import_succeed} ) {$this->out("	<div class=\"card mb-4 py-3 border-left-primary\">\n		<div class=\"card-body\">\n			Import succeed\n		</div>\n	</div>\n");}$this->out("\n");if ( $C->{Error} ) {$this->out("	<div class=\"card mb-4 py-3 border-left-danger\">\n		<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("				<br>* $C->{error}{message}\n");}$this->out("		</div>\n	</div>\n");}$this->out("\n<form method=POST action=\"$C->{SELF_URL_NO_QS}\" ENCTYPE=\"multipart/form-data\">\n\n	<div class=\"card shadow mb-4\">\n		<div class=\"card-header py-3\">\n			<h6 class=\"m-0 font-weight-bold text-primary\">\n				Import pieces\n			</h6>\n		</div>\n		<div class=\"card-body\">	\n			<div class=\"form-group row\">\n				<label class=\"col-sm-12 col-md-4 col-form-label\">File name</label>\n				<div class=\"col-sm-12 col-md-8\">\n					<div class=\"input-group\">\n						<div class=\"input-group-prepend\">\n						  <span class=\"input-group-text\" id=\"inputGroupFileAddon01\">Upload</span>\n						</div>\n						<div class=\"custom-file\">\n						  <input type=\"file\" class=\"custom-file-input\" id=\"inputGroupFile01\" name=\"filename\" aria-describedby=\"inputGroupFileAddon01\">\n						  <label class=\"custom-file-label\" for=\"inputGroupFile01\">Choose file</label>\n						</div>\n					</div>\n				</div>\n			</div>\n");if ( $C->{INPUT}{upload} ) {$this->out("			<div class=\"form-group row\">\n				<label class=\"col-sm-12 col-md-4 col-form-label\">Piece description</label>\n				<div class=\"col-sm-12 col-md-8\">\n					<a style=\"color:blue\">$C->{INPUT}{upload}</a>\n					<input type=hidden name=upload value=\'$C->{INPUT}{upload}\'>\n					$C->{INPUT}{descr}\n				</div>\n			</div>\n");}$this->out("			<div class=\"form-group row\">\n				<label class=\"col-sm-12 col-md-4 col-form-label\"></label>\n				<div class=\"col-sm-12 col-md-8\">\n					<input type=submit class=\"btn btn-primary\" name=view value=\"View\">\n					<input type=submit class=\"btn btn-primary\" name=import value=\"Import\">\n				</div>\n			</div>\n		</div>\n	</div>\n</form>\n\n");{my $G = (ref $this)->get("/headfoot/inner_footer.html", $this->{param}) or die "no skel /headfoot/inner_footer.html";my $ctx = $this->{C};my $out = $G->execute($ctx);$this->out(@$out) if $out;}$this->out("\n");}