summaryrefslogtreecommitdiff
path: root/httemplate/search/old477/477partIV.html
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2014-07-21 15:35:33 -0700
committerMark Wells <mark@freeside.biz>2014-07-21 15:35:40 -0700
commit8fdc0ea36474cfb3d1389f41691c14598559cbe7 (patch)
tree1984c9268d53df1edb76cf40575499cfb3e0d2c4 /httemplate/search/old477/477partIV.html
parent08db5f6900bb754efb597a2967adde4dbd12e731 (diff)
477 report rewrite, #28020
Diffstat (limited to 'httemplate/search/old477/477partIV.html')
-rwxr-xr-xhttemplate/search/old477/477partIV.html17
1 files changed, 17 insertions, 0 deletions
diff --git a/httemplate/search/old477/477partIV.html b/httemplate/search/old477/477partIV.html
new file mode 100755
index 000000000..269a925dc
--- /dev/null
+++ b/httemplate/search/old477/477partIV.html
@@ -0,0 +1,17 @@
+%if ( $cgi->param('_type') eq 'html' || $cgi->param('_type') eq 'html-print' ) {
+<H2>Part IV</H2>
+%} elsif ( $cgi->param('_type') eq 'xml' ) {
+<notes>
+%}
+<% $cgi->param('notes') |h %>
+%if ( $cgi->param('_type') eq 'xml' ) {
+</notes>
+%}
+<%init>
+
+my $curuser = $FS::CurrentUser::CurrentUser;
+
+die "access denied"
+ unless $curuser->access_right('List packages');
+
+</%init>