svc_dish fixes, #11454

diff --git a/FS/FS/hardware_status.pm b/FS/FS/hardware_status.pm
index 4836fc5..d4edcb1 100644 (file)
--- a/FS/FS/hardware_status.pm
+++ b/FS/FS/hardware_status.pm
@@ -35,6 +35,7 @@ are currently supported:
 
 =item label - descriptive label
 
+=item disabled - 'Y' to disable
 
 =back
 
@@ -98,6 +99,7 @@ sub check {
   my $error = 
     $self->ut_numbern('statusnum')
     || $self->ut_text('label')
+    || $self->ut_enum('disabled', [ '', 'Y' ])
   ;
   return $error if $error;
 

diff --git a/httemplate/edit/process/svc_dish.html b/httemplate/edit/process/svc_dish.html
index 6c8851e..f1c83a7 100644 (file)
--- a/httemplate/edit/process/svc_dish.html
+++ b/httemplate/edit/process/svc_dish.html
@@ -1,5 +1,6 @@
 <% include( 'elements/svc_Common.html',
                'table'    => 'svc_dish',
+               'value_callback' => $value_callback,
            )
 %>
 <%init>
@@ -7,4 +8,8 @@
 die "access denied"
   unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
 
+my $value_callback = sub {
+  my ($field, $value) = @_;
+  ($field eq 'installdate') ? parse_datetime($value) : $value;
+};
 </%init>