X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=bin%2Ffs-setup;h=e05d44531c953e7ccd3980345f04b9da80c263fa;hb=f36b6a178c9811357ff5d5291874aa239d22bc2a;hp=2da0431bbd40256e3e46601b7536912eed176e3f;hpb=fd597aef277c522889a849d78dc7dcae67d00d95;p=freeside.git diff --git a/bin/fs-setup b/bin/fs-setup index 2da0431bb..e05d44531 100755 --- a/bin/fs-setup +++ b/bin/fs-setup @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: fs-setup,v 1.86 2002-04-10 08:39:47 ivan Exp $ +# $Id: fs-setup,v 1.90 2002-05-04 15:00:18 ivan Exp $ #to delay loading dbdef until we're ready BEGIN { $FS::Record::setup_hack = 1; } @@ -162,7 +162,9 @@ foreach $attribute (@check_attributes) { #create history tables (false laziness w/create-history-tables) foreach my $table ( grep { ! /^h_/ } $dbdef->tables ) { - my $tableobj = $dbdef->table($table); + my $tableobj = $dbdef->table($table) + or die "unknown table $table"; + my $h_tableobj = DBIx::DBSchema::Table->new( { name => "h_$table", primary_key => 'historynum', @@ -382,7 +384,8 @@ sub tables_hash_hack { 'statustext', 'text', 'NULL', '', ], 'primary_key' => 'eventnum', - 'unique' => [ [ 'eventpart', 'invnum' ] ], + #no... there are retries now #'unique' => [ [ 'eventpart', 'invnum' ] ], + 'unique' => [], 'index' => [ ['invnum'], ['status'] ], }, @@ -515,6 +518,8 @@ sub tables_hash_hack { 'state', 'varchar', 'NULL', $char_d, 'county', 'varchar', 'NULL', $char_d, 'country', 'char', '', 2, + 'taxclass', 'varchar', 'NULL', $char_d, + 'exempt_amount', @money_type, 'tax', 'real', '', '', #tax % ], 'primary_key' => 'taxnum', @@ -656,6 +661,7 @@ sub tables_hash_hack { 'plan', 'varchar', 'NULL', $char_d, 'plandata', 'text', 'NULL', '', 'disabled', 'char', 'NULL', 1, + 'taxclass', 'varchar', 'NULL', $char_d, ], 'primary_key' => 'pkgpart', 'unique' => [ [] ], @@ -927,10 +933,21 @@ sub tables_hash_hack { 'index' => [ [ 'jobnum' ] ], }, + 'export_svc' => { + 'columns' => [ + 'exportsvcnum' => 'int', '', '', + 'exportnum' => 'int', '', '', + 'svcpart' => 'int', '', '', + ], + 'primary_key' => 'exportsvcnum', + 'unique' => [ [ 'exportnum', 'svcpart' ] ], + 'index' => [ [ 'exportnum' ], [ 'svcpart' ] ], + }, + 'part_export' => { 'columns' => [ 'exportnum', 'int', '', '', - 'svcpart', 'int', '', '', + #'svcpart', 'int', '', '', 'machine', 'varchar', '', $char_d, 'exporttype', 'varchar', '', $char_d, 'nodomain', 'char', 'NULL', 1, @@ -975,6 +992,22 @@ sub tables_hash_hack { 'index' => [], }, + 'cust_tax_exempt' => { + 'columns' => [ + 'exemptnum', 'int', '', '', + 'custnum', 'int', '', '', + 'taxnum', 'int', '', '', + 'year', 'int', '', '', + 'month', 'int', '', '', + 'amount', @money_type, + ], + 'primary_key' => 'exemptnum', + 'unique' => [ [ 'custnum', 'taxnum', 'year', 'month' ] ], + 'index' => [], + }, + + + ); %tables;