add 'STATE' field for suspensions to Radiator export
authorivan <ivan>
Wed, 14 Dec 2005 18:52:22 +0000 (18:52 +0000)
committerivan <ivan>
Wed, 14 Dec 2005 18:52:22 +0000 (18:52 +0000)
FS/FS/part_export/radiator.pm

index 11ce3e7..2ac3edb 100644 (file)
@@ -93,6 +93,8 @@ sub _radiator_hash {
     if $cust_pkg && $cust_pkg->setup;
   $hash{'validfrom'} = $cust_pkg->last_bill || $cust_pkg->setup
     if $cust_pkg &&  ( $cust_pkg->last_bill || $cust_pkg->setup );
+  $hash{'state'} = $cust_pkg->susp ? 1 : 0
+    if $cust_pkg;
 
   %hash;
 }