1 package FS::agent_payment_gateway;
5 use FS::Record qw( qsearch qsearchs );
6 use FS::payment_gateway;
12 FS::agent_payment_gateway - Object methods for agent_payment_gateway records
16 use FS::agent_payment_gateway;
18 $record = new FS::agent_payment_gateway \%hash;
19 $record = new FS::agent_payment_gateway { 'column' => 'value' };
21 $error = $record->insert;
23 $error = $new_record->replace($old_record);
25 $error = $record->delete;
27 $error = $record->check;
31 An FS::agent_payment_gateway object represents a payment gateway override for
32 a specific agent. FS::agent_payment_gateway inherits from FS::Record. The
33 following fields are currently supported:
37 =item agentgatewaynum - primary key
55 Creates a new override. To add the override to the database, see L<"insert">.
57 Note that this stores the hash reference, not a distinct copy of the hash it
58 points to. You can ask the object for a copy with the I<hash> method.
62 # the new method can be inherited from FS::Record, if a table method is defined
64 sub table { 'agent_payment_gateway'; }
68 Adds this record to the database. If there is an error, returns the error,
69 otherwise returns false.
73 # the insert method can be inherited from FS::Record
77 Delete this record from the database.
81 # the delete method can be inherited from FS::Record
83 =item replace OLD_RECORD
85 Replaces the OLD_RECORD with this one in the database. If there is an error,
86 returns the error, otherwise returns false.
90 # the replace method can be inherited from FS::Record
94 Checks all fields to make sure this is a valid override. If there is
95 an error, returns the error, otherwise returns false. Called by the insert
100 # the check method should currently be supplied - FS::Record contains some
101 # data checking routines
107 $self->ut_numbern('agentgatewaynum')
108 || $self->ut_foreign_key('agentnum', 'agent', 'agentnum')
109 || $self->ut_foreign_key('gatewaynum', 'payment_gateway', 'gatewaynum' )
110 || $self->ut_textn('cardtype')
111 || $self->ut_textn('taxclass')
113 return $error if $error;
118 =item payment_gateway
122 sub payment_gateway {
124 qsearchs('payment_gateway', { 'gatewaynum' => $self->gatewaynum } );
133 L<FS::payment_gateway>, L<FS::agent>, L<FS::Record>, schema.html from the