},
'groups_susp_reason' => { label =>
'Radius group mapping to reason (via template user)',
},
'groups_susp_reason' => { label =>
'Radius group mapping to reason (via template user)',
sub export_pkg_change {
my( $self, $svc_acct, $new_cust_pkg, $old_cust_pkg ) = @_;
sub export_pkg_change {
my( $self, $svc_acct, $new_cust_pkg, $old_cust_pkg ) = @_;
my @fields = qw( pkgnum pkgpart agent_pkgid ); #others?
my @date_fields = qw( order_date start_date setup bill last_bill susp adjourn
resume cancel uncancel expire contract_end );
my @fields = qw( pkgnum pkgpart agent_pkgid ); #others?
my @date_fields = qw( order_date start_date setup bill last_bill susp adjourn
resume cancel uncancel expire contract_end );
sub _export_command_or_super {
my($self, $action) = (shift, shift);
sub _export_command_or_super {
my($self, $action) = (shift, shift);
my ( $self, $action, $svc_acct) = (shift, shift, shift);
my $command = $self->option($action);
my ( $self, $action, $svc_acct) = (shift, shift, shift);
my $command = $self->option($action);