=item acctnum - DISH account number
+=item installdate - Installation date (as Unix timestamp)
+
=item note - Installation notes: location on property, physical access, etc.
=back
'name' => 'Dish service',
'display_weight' => 58,
'cancel_weight' => 85,
+ 'manual_require' => 1,
'fields' => {
- 'svcnum' => { label => 'Service' },
- 'acctnum' => { label => 'DISH account#', %opts },
+ 'svcnum' => { label => 'Service' },
+ 'acctnum' => { label => 'DISH account#', required => 1, %opts },
+ 'installdate' => { label => 'Install date', %opts },
'note' => { label => 'Installation notes', %opts },
}
}
my $error =
$self->ut_numbern('svcnum')
|| $self->ut_text('acctnum')
- || $self->ut_textn('note')
+ || $self->ut_numbern('installdate')
+ || $self->ut_anything('note')
;
return $error if $error;