From 9d722730eba9b3d03b6a68615e99d5de9b830111 Mon Sep 17 00:00:00 2001
From: steve <steve>
Date: Sat, 14 Dec 2002 11:17:27 +0000
Subject: add email address to shellcommands

---
 FS/FS/part_export/shellcommands.pm |  3 +++
 FS/bin/freeside-setup              | 10 ++++------
 2 files changed, 7 insertions(+), 6 deletions(-)

(limited to 'FS')

diff --git a/FS/FS/part_export/shellcommands.pm b/FS/FS/part_export/shellcommands.pm
index 04e5041c3..3d3e88ea4 100644
--- a/FS/FS/part_export/shellcommands.pm
+++ b/FS/FS/part_export/shellcommands.pm
@@ -39,6 +39,9 @@ sub _export_command {
     no strict 'refs';
     ${$_} = $svc_acct->getfield($_) foreach $svc_acct->fields;
   }
+  $email = ( grep { $_ ne 'POST' }
+             $svc_acct->cust_svc->cust_pkg->cust_main->invoicing_list
+             )[0];
   $finger = shell_quote $finger;
   $quoted_password = shell_quote $_password;
   $domain = $svc_acct->domain;
diff --git a/FS/bin/freeside-setup b/FS/bin/freeside-setup
index 133d248b8..78a03385c 100755
--- a/FS/bin/freeside-setup
+++ b/FS/bin/freeside-setup
@@ -547,7 +547,7 @@ sub tables_hash_hack {
         '_date',    @date_type,
         'payby',    'char',   '',     4, # CARD/BILL/COMP, should be index into
                                          # payment type table.
-        'payinfo',  'varchar',   'NULL', $char_d,  #see cust_main above
+        'payinfo',  'varchar',   'NULL', 16,  #see cust_main above
         'paybatch', 'varchar',   'NULL', $char_d, #for auditing purposes.
         'closed',    'char', 'NULL', 1,
       ],
@@ -624,7 +624,7 @@ sub tables_hash_hack {
         'reason',       'varchar',   '',   $char_d,
         'payby',        'char',   '',     4, # CARD/BILL/COMP, should be index
                                              # into payment type table.
-        'payinfo',      'varchar',   'NULL', $char_d,  #see cust_main above
+        'payinfo',      'varchar',   'NULL', 16,  #see cust_main above
         'paybatch',     'varchar',   'NULL', $char_d,
         'closed',    'char', 'NULL', 1,
       ],
@@ -823,12 +823,10 @@ sub tables_hash_hack {
       'columns' => [
         'recnum',    'int',     '',  '',
         'svcnum',    'int',     '',  '',
-        #'reczone',   'varchar', '',  $char_d,
-        'reczone',   'varchar', '',  255,
+        'reczone',   'varchar', '',  $char_d,
         'recaf',     'char',    '',  2,
         'rectype',   'char',    '',  5,
-        #'recdata',   'varchar', '',  $char_d,
-        'recdata',   'varchar', '',  255,
+        'recdata',   'varchar', '',  $char_d,
       ],
       'primary_key' => 'recnum',
       'unique'      => [],
-- 
cgit v1.2.1