projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
package import w/locationnum, RT#38764
[freeside.git]
/
bin
/
sequences.reset
diff --git
a/bin/sequences.reset
b/bin/sequences.reset
index
f0fc4b7
..
2dc1d3b
100644
(file)
--- a/
bin/sequences.reset
+++ b/
bin/sequences.reset
@@
-13,7
+13,11
@@
foreach my $table ( dbdef->tables ) {
##next unless $default =~ /nextval/;
#print "$local\n";
##next unless $default =~ /nextval/;
#print "$local\n";
- my $statement = "select setval('${table}_${primary_key}_seq', ( select max($primary_key) from $table ) )\n";
+ my $statement = "select setval('${table}_${primary_key}_seq', ( select max($primary_key) from $table ) )";
+
+ print "$statement;\n";
+ next;
+
my $sth = dbh->prepare($statement) or do {
warn dbh->errstr. " preparing $statement\n";
next;
my $sth = dbh->prepare($statement) or do {
warn dbh->errstr. " preparing $statement\n";
next;