Changeset 318 for branches/stable/cgi-bin/checkcusts.pl

Timestamp:

04/03/06 16:20:54 (18 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Extra code changes required for new billing system rollout. Note that references
to oldcustid can be removed later; this field is NOT required long-term.

File:

• branches/stable/cgi-bin/checkcusts.pl (modified) (2 diffs)

branches/stable/cgi-bin/checkcusts.pl

@@ -26 +26 @@
 
 ($dbh,$errstr) = connectDB("ipdb", "ipdb", "ipdbpwd");
-$IDH = DBI->connect ("DBI:Pg:host=newbilling;dbname=custids", "cidcheck", "c1dch4ck");
+$IDH = DBI->connect ("DBI:Pg:host=billing;dbname=custids", "cidcheck", "c1dch4ck");
 
 $sth = $dbh->prepare("select distinct def_custid from alloctypes where listorder >=40");
@@ -35 +35 @@
 $sth = $dbh->prepare("select cidr,custid from searchme where not (custid='6750400') ".
         "and not (custid='STAFF') order by cidr");
+#$sth = $dbh->prepare("select cidr,custid from searchme order by cidr");
 $sth->execute;