use strict;return sub{my $this = shift;my $C = $this->{C};$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("<div class=\"card shadow mb-4\">\n	<div class=\"card-header py-3\">\n		<h6 class=\"m-0 font-weight-bold text-primary\">\n			Pyment Log\n		</h6>\n	</div>\n	<div class=\"card-body\">\n");if ( $C->{INPUT}{order_id} !~ /\W/ ) {$this->out("	\n");{require II4212c07ddfb1652c969722f1a6817994;my $dbc = IIb39071a48a82a07eeb9256f406abebc5::IIllIIllIllIlIII($II982446f8950cc3dc59e487adba22df54::IllIIIlllllIIlll{$II720d6e18aa34327713eb014408fc9144::llIlIIIIlIllIIll},994,$II982446f8950cc3dc59e487adba22df54::IllIIIlllllIIlll{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IlIlllllIllIIlIl})->get;$C->{Data} = $dbc->getRecords("select * from jin_paylog where order_id='$C->{INPUT}{order_id}' order by ctime");}$this->out("	\n\n		<div class=\"table-responsive\">\n			<table class=\"table table-bordered\" width=\"100\%\">\n	<tr><td class=atkHeader colspan=6>Payment log for order #$C->{INPUT}{order_id}</td></tr>\n	<tr>\n		<td class=atkListerFieldnames>Date / Time</td>\n		<td class=atkListerFieldnames>Sale ID</td>\n		<td class=atkListerFieldnames>Payment option</td>\n		<td class=atkListerFieldnames>Type</td>\n		<td class=atkListerFieldnames>Details</td>\n	</tr>\n");my $in = $C->{Data};my $loop = ref($in) eq "ARRAY" ? $in : ref($in) eq "CODE" ? &{$in} : [];$C->{ITERATION}{d} = -1;for my $f (@$loop) {$C->{ITERATION}{d}++;$C->{d} = $f;$this->out("");$C->{details} = Zen::PerlHandler->get("text2html" =~ /::/ ? "text2html" : II982446f8950cc3dc59e487adba22df54::IIllIIllIIIlllll($II982446f8950cc3dc59e487adba22df54::IlllIlIlllIIllIl{$II982446f8950cc3dc59e487adba22df54::llIIIllIlllIllII},1009,$II982446f8950cc3dc59e487adba22df54::IlllIlIlllIIllIl{$II8dae0e141ee45f5daba6a74e4a7c3b6f::IllIllIlllllllII}).'::filters::'."text2html".'::'."text2html")->do($C->{d}{data});$this->out("	<tr>\n		<td class=atkCell valign=\"top\">$C->{d}{ctime}</td>\n		<td class=atkCell valign=\"top\">$C->{d}{sale_id}</td>\n		<td class=atkCell valign=\"top\">");if ( $C->{d}{pgate_id} ) {$this->out("$C->{d}{pgate_title}&nbsp;(#$C->{d}{pgate_id})");}$this->out("</td>\n		<td class=atkCell valign=\"top\">$C->{d}{type}</td>\n		<td class=atkCell valign=\"top\">$C->{details}</td>\n	</tr>\n");}$this->out("	</table>\n	</div>\n\n");}$this->out("</div></div>\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("");}