projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 83039 - only towers with sectors shown on provisioning page when export requires...
[freeside.git]
/
bin
/
sequences.reset
diff --git
a/bin/sequences.reset
b/bin/sequences.reset
old mode 100644
(file)
new mode 100755
(executable)
index
f0fc4b7
..
2dc1d3b
--- 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;