ACL for hardware class config, RT#85057

[freeside.git] / FS / FS / svc_circuit.pm

diff --git a/FS/FS/svc_circuit.pm b/FS/FS/svc_circuit.pm
index e90bce5..9b781aa 100644 (file)
--- a/FS/FS/svc_circuit.pm
+++ b/FS/FS/svc_circuit.pm
@@ -40,42 +40,68 @@ supported:
 
 =over 4
 
-=item svcnum - primary key; see also L<FS::cust_svc>
+=item svcnum
 
-=item typenum - circuit type (such as DS1, DS1-PRI, DS3, OC3, etc.); foreign
+primary key; see also L<FS::cust_svc>
+
+=item typenum
+
+circuit type (such as DS1, DS1-PRI, DS3, OC3, etc.); foreign
 key to L<FS::circuit_type>.
 
-=item providernum - circuit provider (telco); foreign key to 
+=item providernum
+
+circuit provider (telco); foreign key to 
 L<FS::circuit_provider>.
 
-=item termnum - circuit termination type; foreign key to 
+=item termnum
+
+circuit termination type; foreign key to 
 L<FS::circuit_termination>
 
-=item circuit_id - provider circuit ID string defined by the provider
+=item circuit_id
+
+provider circuit ID string defined by the provider
 
-=item desired_due_date - the requested date for completion of the circuit
+=item desired_due_date
+
+the requested date for completion of the circuit
 order
 
-=item due_date - the provider's committed date for completion of the circuit
+=item due_date
+
+the provider's committed date for completion of the circuit
 order
 
-=item vendor_order_id - the provider's order number
+=item vendor_order_id
+
+the provider's order number
 
-=item vendor_qual_id - the qualification number, if a qualification was 
+=item vendor_qual_id
+
+the qualification number, if a qualification was 
 performed
 
-=item vendor_order_type -
+=item vendor_order_type
+
+=item vendor_order_status
 
-=item vendor_order_status - the order status: ACCEPTED, PENDING, COMPLETED,
+the order status: ACCEPTED, PENDING, COMPLETED,
 etc.
 
-=item endpoint_ip_addr - the IP address of the endpoint equipment, if any. 
+=item endpoint_ip_addr
+
+the IP address of the endpoint equipment, if any. 
 This will be validated as an IP address but not assigned from managed address
 space or checked for uniqueness.
 
-=item endpoint_mac_addr - the MAC address of the endpoint.
+=item endpoint_mac_addr
+
+the MAC address of the endpoint.
+
+=item internal_circuit_id
 
-=item internal_circuit_id - internal circuit ID string defined by the provider
+internal circuit ID string
 
 =back
 
@@ -201,6 +227,7 @@ sub check {
     || $self->ut_textn('vendor_order_status')
     || $self->ut_ipn('endpoint_ip_addr')
     || $self->ut_textn('endpoint_mac_addr')
+    || $self->ut_textn('internal_circuit_id')
   ;
 
   # no canonical values yet for vendor_order_status or _type
@@ -235,6 +262,17 @@ sub search_sql_addl_from {
   'LEFT JOIN circuit_type USING ( typenum )';
 }
 
+sub _upgrade_data {
+
+  require FS::Misc::FixIPFormat;
+  FS::Misc::FixIPFormat::fix_bad_addresses_in_table(
+      'svc_circuit', 'svcnum', 'endpoint_ip_addr',
+  );
+
+  '';
+
+}
+
 =back
 
 =head1 SEE ALSO
@@ -244,4 +282,3 @@ L<FS::Record>
 =cut
 
 1;
-