projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
This commit was generated by cvs2svn to compensate for changes in r2523,
[freeside.git]
/
FS
/
FS
/
prepay_credit.pm
diff --git
a/FS/FS/prepay_credit.pm
b/FS/FS/prepay_credit.pm
index
113cee8
..
7ed9b83
100644
(file)
--- a/
FS/FS/prepay_credit.pm
+++ b/
FS/FS/prepay_credit.pm
@@
-21,6
+21,12
@@
FS::prepay_credit - Object methods for prepay_credit records
'amount' => '19.95',
};
'amount' => '19.95',
};
+ $record = new FS::prepay_credit {
+ 'identifier' => '4198123455512121'
+ 'seconds' => '7200',
+ };
+
+
$error = $record->insert;
$error = $new_record->replace($old_record);
$error = $record->insert;
$error = $new_record->replace($old_record);
@@
-43,6
+49,8
@@
fields are currently supported:
=item amount - amount of the credit
=item amount - amount of the credit
+=item seconds - time amount of credit (see L<FS::svc_acct/seconds>)
+
=back
=head1 METHODS
=back
=head1 METHODS
@@
-99,31
+107,18
@@
sub check {
$self->ut_numbern('prepaynum')
|| $self->ut_alpha('identifier')
|| $self->ut_money('amount')
$self->ut_numbern('prepaynum')
|| $self->ut_alpha('identifier')
|| $self->ut_money('amount')
+ || $self->utnumbern('seconds')
;
}
=back
;
}
=back
-=head1 VERSION
-
-$Id: prepay_credit.pm,v 1.2 2000-02-02 20:22:18 ivan Exp $
-
=head1 BUGS
=head1 SEE ALSO
=head1 BUGS
=head1 SEE ALSO
-L<FS::Record>, schema.html from the base documentation.
-
-=head1 HISTORY
-
-$Log: prepay_credit.pm,v $
-Revision 1.2 2000-02-02 20:22:18 ivan
-bugfix prepayment in signup server
-
-Revision 1.1 2000/01/31 05:22:23 ivan
-prepaid "internet cards"
-
+L<FS::svc_acct>, L<FS::Record>, schema.html from the base documentation.
=cut
=cut