5 use FS::Record qw( qsearchs );
12 FS::port - Object methods for port records
18 $record = new FS::port \%hash;
19 $record = new FS::port { 'column' => 'value' };
21 $error = $record->insert;
23 $error = $new_record->replace($old_record);
25 $error = $record->delete;
27 $error = $record->check;
31 An FS::port object represents an individual port on a NAS. FS::port inherits
32 from FS::Record. The following fields are currently supported:
36 =item portnum - primary key
38 =item ip - IP address of this port
40 =item nasport - port number on the NAS
42 =item nasnum - NAS this port is on - see L<FS::nas>
52 Creates a new port. To add the example to the database, see L<"insert">.
54 Note that this stores the hash reference, not a distinct copy of the hash it
55 points to. You can ask the object for a copy with the I<hash> method.
59 # the new method can be inherited from FS::Record, if a table method is defined
65 Adds this record to the database. If there is an error, returns the error,
66 otherwise returns false.
70 # the insert method can be inherited from FS::Record
74 Delete this record from the database.
78 # the delete method can be inherited from FS::Record
80 =item replace OLD_RECORD
82 Replaces the OLD_RECORD with this one in the database. If there is an error,
83 returns the error, otherwise returns false.
87 # the replace method can be inherited from FS::Record
91 Checks all fields to make sure this is a valid example. If there is
92 an error, returns the error, otherwise returns false. Called by the insert
97 # the check method should currently be supplied - FS::Record contains some
98 # data checking routines
103 $self->ut_numbern('portnum')
104 || $self->ut_ipn('ipn')
105 || $self->ut_numbern('nasport')
106 || $self->ut_number('nasnum');
108 return $error if $error;
109 return "Either ip or nasport must be specified"
110 unless $self->ip || $self->nasport;
111 return "Unknown nasnum"
112 unless qsearchs('nas', { 'nasnum' => $self->nasnum } );
120 $Id: port.pm,v 1.1 2000-10-27 20:18:32 ivan Exp $
124 The author forgot to customize this manpage.
128 L<FS::Record>, schema.html from the base documentation.
132 ivan@voicenet.com 97-jul-1
135 ivan@sisd.com 97-nov-13
138 Revision 1.1 2000-10-27 20:18:32 ivan
139 oops, also necessary for session monitor
141 Revision 1.1 1999/08/04 08:03:03 ivan
142 move table subclass examples out of production directory
144 Revision 1.4 1998/12/29 11:59:57 ivan
145 mostly properly OO, some work still to be done with svc_ stuff
147 Revision 1.3 1998/11/15 04:33:00 ivan
148 updates for newest versoin
150 Revision 1.2 1998/11/15 03:48:49 ivan
151 update for current version