summaryrefslogtreecommitdiff
path: root/htdocs
diff options
context:
space:
mode:
Diffstat (limited to 'htdocs')
-rwxr-xr-xhtdocs/edit/cust_credit.cgi97
-rwxr-xr-xhtdocs/edit/cust_pay.cgi76
-rwxr-xr-xhtdocs/images/sisd.jpgbin0 -> 22122 bytes
-rwxr-xr-xhtdocs/search/cust_bill.html21
-rwxr-xr-xhtdocs/search/cust_main-payinfo.html21
-rwxr-xr-xhtdocs/search/cust_main.html36
-rwxr-xr-xhtdocs/search/svc_acct.html21
-rwxr-xr-xhtdocs/search/svc_acct_sm.html23
-rwxr-xr-xhtdocs/search/svc_domain.html22
9 files changed, 317 insertions, 0 deletions
diff --git a/htdocs/edit/cust_credit.cgi b/htdocs/edit/cust_credit.cgi
new file mode 100755
index 000000000..75ef21208
--- /dev/null
+++ b/htdocs/edit/cust_credit.cgi
@@ -0,0 +1,97 @@
+#!/usr/bin/perl -Tw
+#
+# cust_credit.cgi: Add a credit (output form)
+#
+# Usage: cust_credit.cgi custnum [ -paybatch ]
+# http://server.name/path/cust_credit?custnum [ -paybatch ]
+#
+# Note: Should be run setuid root as user nobody.
+#
+# some hooks in here for modifications as well as additions, but needs (lots) more work.
+# also see process/cust_credit.cgi, the script that processes the form.
+#
+# ivan@voicenet.com 96-dec-05
+#
+# paybatch field, differentiates between credits & credits+refunds by commandline
+# ivan@voicenet.com 96-dec-08
+#
+# added (but commented out) sprintf("%.2f" in amount field. Hmm.
+# ivan@voicenet.com 97-jan-3
+#
+# paybatch stuff thrown out - has checkbox now instead.
+# (well, sort of. still passed around for backward compatability and possible editing hook)
+# ivan@voicenet.com 97-apr-21
+#
+# rewrite ivan@sisd.com 98-mar-16
+
+use strict;
+use Date::Format;
+use CGI::Base qw(:DEFAULT :CGI); #CGI module
+use FS::UID qw(cgisuidsetup getotaker);
+
+my($cgi) = new CGI::Base;
+$cgi->get;
+cgisuidsetup($cgi);
+
+#untaint custnum
+$QUERY_STRING =~ /^(\d+)$/;
+my($custnum)=$1;
+
+#untaint otaker
+my($otaker)=getotaker;
+
+SendHeaders(); # one guess.
+print <<END;
+<HTML>
+ <HEAD>
+ <TITLE>Post Credit</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Post Credit</H1>
+ </CENTER>
+ <FORM ACTION="process/cust_credit.cgi" METHOD=POST>
+ <HR><PRE>
+END
+
+#crednum
+my($crednum)="";
+print qq!Credit #<B>!, $crednum ? $crednum : " <I>(NEW)</I>", qq!</B><INPUT TYPE="hidden" NAME="crednum" VALUE="$crednum">!;
+
+#custnum
+print qq!\nCustomer #<B>$custnum</B><INPUT TYPE="hidden" NAME="custnum" VALUE="$custnum">!;
+
+#paybatch
+print qq!<INPUT TYPE="hidden" NAME="paybatch" VALUE="">!;
+
+#date
+my($date)=time;
+print qq!\nDate: <B>!, time2str("%D",$date), qq!</B><INPUT TYPE="hidden" NAME="_date" VALUE="$date">!;
+
+#amount
+my($amount)='';
+print qq!\nAmount \$<INPUT TYPE="text" NAME="amount" VALUE="$amount" SIZE=8 MAXLENGTH=8>!;
+
+#refund?
+#print qq! <INPUT TYPE="checkbox" NAME="refund" VALUE="yes">Also post refund!;
+
+#otaker (hidden)
+print qq!<INPUT TYPE="hidden" NAME="otaker" VALUE="$otaker">!;
+
+#reason
+my($reason)='';
+print qq!\nReason <INPUT TYPE="text" NAME="reason" VALUE="$reason" SIZE=72>!;
+
+print <<END;
+</PRE>
+<BR>
+<CENTER><INPUT TYPE="submit" VALUE="Post"></CENTER>
+END
+
+print <<END;
+
+ </FORM>
+ </BODY>
+</HTML>
+END
+
diff --git a/htdocs/edit/cust_pay.cgi b/htdocs/edit/cust_pay.cgi
new file mode 100755
index 000000000..a6cb204d1
--- /dev/null
+++ b/htdocs/edit/cust_pay.cgi
@@ -0,0 +1,76 @@
+#!/usr/bin/perl -Tw
+#
+# cust_pay.cgi: Add a payment (output form)
+#
+# Usage: cust_pay.cgi invnum
+# http://server.name/path/cust_pay.cgi?invnum
+#
+# Note: Should be run setuid as user nobody.
+#
+# some hooks for modifications as well as additions, but needs work.
+#
+# ivan@voicenet.com 96-dec-11
+#
+# rewrite ivan@sisd.com 98-mar-16
+
+use strict;
+use Date::Format;
+use CGI::Base qw(:DEFAULT :CGI);
+use FS::UID qw(cgisuidsetup);
+
+my($cgi) = new CGI::Base;
+$cgi->get;
+cgisuidsetup($cgi);
+
+#untaint invnum
+$QUERY_STRING =~ /^(\d+)$/;
+my($invnum)=$1;
+
+SendHeaders(); # one guess.
+print <<END;
+<HTML>
+ <HEAD>
+ <TITLE>Enter payment</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Enter payment</H1>
+ </CENTER>
+ <FORM ACTION="process/cust_pay.cgi" METHOD=POST>
+ <HR><PRE>
+END
+
+#invnum
+print qq!Invoice #<B>$invnum</B><INPUT TYPE="hidden" NAME="invnum" VALUE="$invnum">!;
+
+#date
+my($date)=time;
+print qq!<BR>Date: <B>!, time2str("%D",$date), qq!</B><INPUT TYPE="hidden" NAME="_date" VALUE="$date">!;
+
+#paid
+print qq!<BR>Amount \$<INPUT TYPE="text" NAME="paid" VALUE="" SIZE=8 MAXLENGTH=8>!;
+
+#payby
+my($payby)="BILL";
+print qq!<BR>Payby: <B>$payby</B><INPUT TYPE="hidden" NAME="payby" VALUE="$payby">!;
+
+#payinfo (check # now as payby="BILL" hardcoded.. what to do later?)
+my($payinfo)="";
+print qq!<BR>Check #<INPUT TYPE="text" NAME="payinfo" VALUE="$payinfo">!;
+
+#paybatch
+print qq!<INPUT TYPE="hidden" NAME="paybatch" VALUE="">!;
+
+print <<END;
+</PRE>
+<BR>
+<CENTER><INPUT TYPE="submit" VALUE="Post"></CENTER>
+END
+
+print <<END;
+
+ </FORM>
+ </BODY>
+</HTML>
+END
+
diff --git a/htdocs/images/sisd.jpg b/htdocs/images/sisd.jpg
new file mode 100755
index 000000000..908a5eaff
--- /dev/null
+++ b/htdocs/images/sisd.jpg
Binary files differ
diff --git a/htdocs/search/cust_bill.html b/htdocs/search/cust_bill.html
new file mode 100755
index 000000000..4adb40e4a
--- /dev/null
+++ b/htdocs/search/cust_bill.html
@@ -0,0 +1,21 @@
+<HTML>
+ <HEAD>
+ <TITLE>Invoice Search</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Invoice Search</H1>
+ </CENTER>
+ <HR>
+ <FORM ACTION="cust_bill.cgi" METHOD="post">
+ Search for <B>invoice #</B>:
+ <INPUT TYPE="text" NAME="invnum">
+
+ <P><INPUT TYPE="submit" VALUE="Search">
+
+ </FORM>
+
+ <HR>
+ </BODY>
+</HTML>
+
diff --git a/htdocs/search/cust_main-payinfo.html b/htdocs/search/cust_main-payinfo.html
new file mode 100755
index 000000000..92341ad13
--- /dev/null
+++ b/htdocs/search/cust_main-payinfo.html
@@ -0,0 +1,21 @@
+<HTML>
+ <HEAD>
+ <TITLE>Customer Search</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Customer Search</H1>
+ </CENTER>
+ <HR>
+ <FORM ACTION="cust_main.cgi" METHOD="post">
+ Search for <B>Credit card #</B>:
+ <INPUT TYPE="hidden" NAME="card_on" VALUE="TRUE">
+ <INPUT TYPE="text" NAME="card">
+
+ <P><INPUT TYPE="submit" VALUE="Search">
+
+ </FORM>
+ <HR>
+ </BODY>
+</HTML>
+
diff --git a/htdocs/search/cust_main.html b/htdocs/search/cust_main.html
new file mode 100755
index 000000000..656943f9c
--- /dev/null
+++ b/htdocs/search/cust_main.html
@@ -0,0 +1,36 @@
+<HTML>
+ <HEAD>
+ <TITLE>Customer Search</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Customer Search</H1>
+ </CENTER>
+ <HR>
+ <FORM ACTION="cust_main.cgi" METHOD="post">
+ <INPUT TYPE="checkbox" NAME="last_on"> Search for <B>last name</B>:
+ <INPUT TYPE="text" NAME="last_text">
+ using search method(s): <SELECT NAME="last_type" MULTIPLE>
+ <OPTION SELECTED>Fuzzy
+ <OPTION>Exact
+ </SELECT>
+
+ <P><INPUT TYPE="checkbox" NAME="company_on"> Search for <B>company</B>:
+ <INPUT TYPE="text" NAME="company_text">
+ using search methods(s): <SELECT NAME="company_type" MULTIPLE>
+ <OPTION SELECTED>Fuzzy
+ <OPTION>Exact
+ </SELECT>
+
+ <P><INPUT TYPE="submit" VALUE="Search"> Note: Fuzzy searching can take a while. Please be patient.
+
+ </FORM>
+
+ <HR>Explanation of search methods:
+ <UL>
+ <LI><B>Fuzzy</B> - Searches for matches that are close to your text.
+ <LI><B>Exact</B> - Finds exact matches only, but much faster than the other search methods.
+ </UL>
+ </BODY>
+</HTML>
+
diff --git a/htdocs/search/svc_acct.html b/htdocs/search/svc_acct.html
new file mode 100755
index 000000000..91291be99
--- /dev/null
+++ b/htdocs/search/svc_acct.html
@@ -0,0 +1,21 @@
+<HTML>
+ <HEAD>
+ <TITLE>Account Search</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Account Search</H1>
+ </CENTER>
+ <HR>
+ <FORM ACTION="svc_acct.cgi" METHOD="post">
+ Search for <B>username</B>:
+ <INPUT TYPE="text" NAME="username">
+
+ <P><INPUT TYPE="submit" VALUE="Search">
+
+ </FORM>
+
+ <HR>
+ </BODY>
+</HTML>
+
diff --git a/htdocs/search/svc_acct_sm.html b/htdocs/search/svc_acct_sm.html
new file mode 100755
index 000000000..0719856db
--- /dev/null
+++ b/htdocs/search/svc_acct_sm.html
@@ -0,0 +1,23 @@
+<HTML>
+ <HEAD>
+ <TITLE>Mail Alias Search</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Mail Alias Search</H1>
+ </CENTER>
+ <HR>
+ <FORM ACTION="svc_acct_sm.cgi" METHOD="post">
+ Search for <B>mail alias</B>:
+ <INPUT TYPE="text" NAME="domuser"><FONT SIZE=-1>(opt.)</FONT> @
+ <INPUT TYPE="text" NAME="domain"><FONT SIZE=-1>(req.)</FONT>
+
+ <P><INPUT TYPE="submit" VALUE="Search">
+
+ </FORM>
+
+ <HR>
+
+ </BODY>
+</HTML>
+
diff --git a/htdocs/search/svc_domain.html b/htdocs/search/svc_domain.html
new file mode 100755
index 000000000..533743ba2
--- /dev/null
+++ b/htdocs/search/svc_domain.html
@@ -0,0 +1,22 @@
+<HTML>
+ <HEAD>
+ <TITLE>Domain Search</TITLE>
+ </HEAD>
+ <BODY>
+ <CENTER>
+ <H1>Domain Search</H1>
+ </CENTER>
+ <HR>
+ <FORM ACTION="svc_domain.cgi" METHOD="post">
+ Search for <B>domain</B>:
+ <INPUT TYPE="text" NAME="domain">
+
+ <P><INPUT TYPE="submit" VALUE="Search">
+
+ </FORM>
+
+ <HR>
+
+ </BODY>
+</HTML>
+
generated by cgit v1.2.1 (git 2.18.0) at 2025-08-03 15:34:43 +0000