'expiration_date', @date_type, '', '',
#communigate pro fields (quota = MaxAccountSize)
'max_accounts', 'int', 'NULL', '', '', '',
+ 'trailer', 'text', 'NULL', '', '', '',
'cgp_aliases', 'varchar', 'NULL', 255, '', '',
'cgp_accessmodes','varchar','NULL', 255, '', '', #DomainAccessModes
'acct_def_password_selfchange','char', 'NULL', 1, '', '',
if $svc_domain->max_accounts;
$settings{'AdminDomainName'} = $svc_domain->parent_svc_x->domain
if $svc_domain->parent_svcnum;
+ $settings{'TrailerText'} = $svc_domain->trailer
+ if $svc_domain->trailer;
my @options = ( $create, $svc_domain->domain, \%settings );
my %settings = ();
$settings{'AccountsLimit'} = $new->max_accounts
if $old->max_accounts ne $new->max_accounts;
+ $settings{'TrailerText'} = $new->trailer
+ if $old->trailer ne $new->trailer;
$settings{'DomainAccessModes'} = $new->cgp_accessmodes
if $old->cgp_accessmodes ne $new->cgp_accessmodes;
$settings{'AdminDomainName'} =
my( $machine, $port, $login, $password, $method, @args ) = @_;
eval "use CGP::CLI";
+ die $@ if $@;
my $cli = new CGP::CLI( {
'PeerAddr' => $machine,
my $error = $self->ut_numbern('svcnum')
|| $self->ut_numbern('catchall')
|| $self->ut_numbern('max_accounts')
+ || $self->ut_anything('trailer') #well
|| $self->ut_textn('cgp_aliases') #well
|| $self->ut_enum('acct_def_password_selfchange', [ '', 'Y' ])
|| $self->ut_enum('acct_def_password_recover', [ '', 'Y' ])
% }
% if ( $communigate
-% && $part_svc->part_svc_column('max_accounts')->columnflag !~ /^[FA]$/ ) {
+% && $part_svc->part_svc_column('cgp_aliases')->columnflag !~ /^[FA]$/ ) {
<TR>
<TD ALIGN="right">Aliases</TD>
<INPUT TYPE="hidden" NAME="cgp_accessmodes" VALUE="<% $svc_domain->cgp_accessmodes() |h %>">
% }
+% if ( $communigate
+% && $part_svc->part_svc_column('trailer')->columnflag ne 'F' )
+% {
+
+ <TR>
+ <TD ALIGN="right">Mail trailer</TD>
+ <TD>
+ <TEXTAREA NAME="trailer" ROWS=5 COLS=60><% $svc_domain->trailer() |h %></TEXTAREA>
+ </TD>
+ </TR>
+
+% } else {
+ <INPUT TYPE="hidden" NAME="trailer" VALUE="<% $svc_domain->trailer() |h %>">
+% }
+
+
</TABLE>
<BR>
<TD BGCOLOR="#ffffff"><% $svc_domain->cgp_accessmodes %></TD>
</TR>
+% if ( $svc_domain->trailer ) {
+ <TR>
+ <TD ALIGN="right">Mail trailer</TD>
+ <TD BGCOLOR="#ffffff"><PRE><% $svc_domain->trailer |h %></PRE></TD>
+ </TR>
+% }
+
</TABLE></TD></TR></TABLE>
<%init>