diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2016-02-02 15:16:20 -0800 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2016-02-02 15:16:20 -0800 |
| commit | 8cac4506ebadf602a905d47457b36e25cacbfbf8 (patch) | |
| tree | 0c33b0e51e24502d0095e52337062252a7d771f4 /bin/svc.replace | |
| parent | 22f23deeb9e8158cac346b1ff5a8922780d60aef (diff) | |
add service replacement script, RT#40031
Diffstat (limited to 'bin/svc.replace')
| -rw-r--r-- | bin/svc.replace | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/bin/svc.replace b/bin/svc.replace index 1d2513a..ad9cc43 100644 --- a/bin/svc.replace +++ b/bin/svc.replace @@ -12,6 +12,7 @@ my $svcpart = shift or die &usage; foreach my $cust_svc ( qsearch('cust_svc', { 'svcpart'=>$svcpart } ) ) { my $svc_x = $cust_svc->svc_x; + $svc_x->setfixed; my $error = $svc_x->replace; warn "$error\n" if $error } |