From 7e845b1ddaae5c89d50f5fdb7c2ed3ee0aab4b08 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Thu, 14 Feb 2008 03:48:16 +0000
Subject: [PATCH] add FS::h_cust_pay class

---
 FS/FS/h_cust_pay.pm  | 33 +++++++++++++++++++++++++++++++++
 FS/t/h_cust_credit.t |  5 +++++
 FS/t/h_cust_pay.t    |  5 +++++
 3 files changed, 43 insertions(+)
 create mode 100644 FS/FS/h_cust_pay.pm
 create mode 100644 FS/t/h_cust_credit.t
 create mode 100644 FS/t/h_cust_pay.t

diff --git a/FS/FS/h_cust_pay.pm b/FS/FS/h_cust_pay.pm
new file mode 100644
index 000000000..6434b3f07
--- /dev/null
+++ b/FS/FS/h_cust_pay.pm
@@ -0,0 +1,33 @@
+package FS::h_cust_pay;
+
+use strict;
+use vars qw( @ISA );
+use FS::h_Common;
+use FS::cust_pay;
+
+@ISA = qw( FS::h_Common FS::cust_pay );
+
+sub table { 'h_cust_pay' };
+
+=head1 NAME
+
+FS::h_cust_pay - Historical record of customer payment changes
+
+=head1 SYNOPSIS
+
+=head1 DESCRIPTION
+
+An FS::h_cust_pay object represents historical changes to payments.
+FS::h_cust_pay inherits from FS::h_Common and FS::cust_pay.
+
+=head1 BUGS
+
+=head1 SEE ALSO
+
+L<FS::cust_pay>,  L<FS::h_Common>, L<FS::Record>, schema.html from the base
+documentation.
+
+=cut
+
+1;
+
diff --git a/FS/t/h_cust_credit.t b/FS/t/h_cust_credit.t
new file mode 100644
index 000000000..e20f4765a
--- /dev/null
+++ b/FS/t/h_cust_credit.t
@@ -0,0 +1,5 @@
+BEGIN { $| = 1; print "1..1\n" }
+END {print "not ok 1\n" unless $loaded;}
+use FS::h_cust_credit;
+$loaded=1;
+print "ok 1\n";
diff --git a/FS/t/h_cust_pay.t b/FS/t/h_cust_pay.t
new file mode 100644
index 000000000..6a3fe95ab
--- /dev/null
+++ b/FS/t/h_cust_pay.t
@@ -0,0 +1,5 @@
+BEGIN { $| = 1; print "1..1\n" }
+END {print "not ok 1\n" unless $loaded;}
+use FS::h_cust_pay;
+$loaded=1;
+print "ok 1\n";
-- 
2.11.0