summaryrefslogtreecommitdiff
path: root/FS/FS/ac_type.pm
blob: e83c5c5f040a71e691ad694c79ed83afdf943dba (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
package FS::ac_type;

use strict;
use vars qw( @ISA );
use FS::Record qw( qsearchs );
use FS::ac;

@ISA = qw( FS::Record );

=head1 NAME

FS::ac_type - Object methods for ac_type records

=head1 SYNOPSIS

  use FS::ac_type;

  $record = new FS::ac_type \%hash;
  $record = new FS::ac_type { 'column' => 'value' };

  $error = $record->insert;

  $error = $new_record->replace($old_record);

  $error = $record->delete;

  $error = $record->check;

=head1 DESCRIPTION

L<FS::ac_type> refers to a type of access concentrator.  L<FS::svc_broadband>
records refer to a specific L<FS::ac_type> limiting the choice of access
concentrator to one of the chosen type.  This should be set as a fixed
default in part_svc to prevent provisioning the wrong type of service for
a given package or service type.  Supported fields as follows:

=over 4

=item actypenum - Primary key.  see L<FS::ac>

=item actypename - Text identifier for access concentrator type.

=back

=head1 METHODS

=over 4

=item new HASHREF

Create a new record.  To add the record to the database, see L<"insert">.

=cut

sub table { 'ac_type'; }

=item insert

Adds this record to the database.  If there is an error, returns the error,
otherwise returns false.

=item delete

Deletes this record from the database.  If there is an error, returns the
error, otherwise returns false.

=item replace OLD_RECORD

Replaces OLD_RECORD with this one in the database.  If there is an error,
returns the error, otherwise returns false.

=item check

Checks all fields to make sure this is a valid record.  If there is an error,
returns the error, otherwise returns false.  Called by the insert and replace
methods.

=cut

sub check {
  my $self = shift;

  # What do we check?

  ''; #no error
}

=item ac

Returns a list of all L<FS::ac> records of this type.

=cut

sub ac {
  my $self = shift;

  return qsearch('ac', { actypenum => $self->actypenum });
}

=item part_ac_field

Returns a list of all L<FS::part_ac_field> records of this type.

=cut

sub part_ac_field {
  my $self = shift;

  return qsearch('part_ac_field', { actypenum => $self->actypenum });
}

=back

=head1 VERSION

$Id: 

=head1 BUGS

=head1 SEE ALSO

L<FS::svc_broadband>, L<FS::ac>, L<FS::ac_block>, L<FS::ac_field>,  schema.html
from the base documentation.

=cut

1;