X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpart_export%2Faradial.pm;h=c7356bf3986340766b559b7108e7161655b9ceea;hb=389b6f1116c3309c2ee57a6c295ed1a793503095;hp=296430af1219e4d3d1c8efe093c71fde9681f95f;hpb=81d6b6bc794de95911a7e3f85a89def8be1dc496;p=freeside.git diff --git a/FS/FS/part_export/aradial.pm b/FS/FS/part_export/aradial.pm index 296430af1..c7356bf39 100644 --- a/FS/FS/part_export/aradial.pm +++ b/FS/FS/part_export/aradial.pm @@ -46,6 +46,7 @@ sub export_insert { my $result = $self->request_user_edit( 'Add' => 1, $self->svc_acct_params($svc), + 'db_$N$Users.Status' => 0, ); if ($svc->cust_svc->cust_pkg->susp > 0 ) { $result ||= $self->export_suspend($svc); @@ -58,14 +59,14 @@ sub export_replace { if ($new->email ne $old->email) { return $old->export_delete || $new->export_insert; } - my $UserLockout = 0; - $UserLockout = 1 if $new->cust_svc->cust_pkg->susp > 0; + my $Status = 0; + $Status = 3 if $new->cust_svc->cust_pkg->susp > 0; $self->request_user_edit( 'Page' => 'UserEdit', 'Modify' => 1, 'UserID' => $old->email, $self->svc_acct_params($new), - UserLockout => $UserLockout, + 'db_$N$Users.Status' => $Status, ); } @@ -74,7 +75,7 @@ sub export_suspend { $self->request_user_edit( 'Modify' => 1, 'UserID' => $svc->email, - 'UserLockout' => 1, + 'db_$N$Users.Status' => '3', ); } @@ -83,7 +84,7 @@ sub export_unsuspend { $self->request_user_edit( 'Modify' => 1, 'UserID' => $svc->email, - 'UserLockout' => 0, + 'db_$N$Users.Status' => 0, ); } @@ -151,7 +152,6 @@ sub svc_acct_params { ( 'db_Users.UserID' => $svc->email, $self->password_params($svc), - 'db_$N$Users.Status' => 0, # we suspend using UserLockout 'db_$D$Users.StartDate' => $setup_date, 'db_$D$Users.UserExpiryDate' => $expire_date, 'db_$RS$Users.GroupName' => $self->option('group'),