X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-test.git;a=blobdiff_plain;f=yarrg%2Fdb-idempotent-populate;h=eb1a30b43a581047e330b4f226670083366e3fb0;hp=691f77ba8af294d0f8e47e3463137df30d2205f5;hb=8c1cd4a6dd85379360c15f35fc42622408c5e154;hpb=9089113ed14d3a01ebe805ee15bd08705a59f172

diff --git a/yarrg/db-idempotent-populate b/yarrg/db-idempotent-populate
index 691f77b..eb1a30b 100755
--- a/yarrg/db-idempotent-populate
+++ b/yarrg/db-idempotent-populate
@@ -229,6 +229,7 @@ table_maycompact('commods', 'commodid',
 	commodclassid	INTEGER			NOT NULL
 	ordval		INTEGER			NOT NULL
 	posinclass	INTEGER			NOT NULL
+	flags		TEXT			NOT NULL
 END
 
 table_maycompact('islands', 'islandid',
@@ -343,6 +344,7 @@ END
 			commodclassid
 			ordval
 			posinclass
+			flags
 			);
     my $insert= $dbh->prepare("
  INSERT OR IGNORE INTO $table{commods}
@@ -370,7 +372,8 @@ END
 			  $c->{Volume},
 			  $clid,
 			  commodsortkey($commod),
-			  $posincl{$commod}
+			  $posincl{$commod},
+			  $c->{Flags}
 			  );
 	$insert->execute($commod, @valuevalues);
 	$update->execute(@valuevalues, $commod);
@@ -477,7 +480,7 @@ END
     ;
 }
 
-db_check_referential_integrity();
+db_check_referential_integrity(1);
 
 #---------- compact IDs ----------
 
@@ -539,7 +542,7 @@ END
 
 #---------- put it all into effect ----------
 
-db_chkcommit();
+db_chkcommit(1);
 
 {
     local $dbh->{AutoCommit} = 1;