I have finally had a chance to get back to this.  This is
working very well for me on the basic insert.  The challenge now is to
figure out how to compare the new data to the existing data to find out
if I need to update the table or just discard the data.  I want to do
this so I can create a second table to hold the changes in providing us
with a tracking mechanism for changes.
        I am working on this now, but wanted to throw this out there
seeing as how I am probably going to get stuck shortly.  Thanks in
advance.

Scott Nipp
Phone:  (214) 858-1289
E-mail:  [EMAIL PROTECTED]
Web:  http:\\ldsa.sbcld.sbc.com



-----Original Message-----
From: Wieland Pusch [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, September 08, 2004 3:17 AM
To: CAMPBELL, BRIAN D (BRIAN)
Cc: NIPP, SCOTT V (SBCSI); dbi-users@perl.org
Subject: Re: Large SQL statements...


Hallo BRIAN,

I like your solution with foreach and bind_param. Just add the prepare
like this:
$sth = $dbh->prepare("INSERT INTO AllMid_Data VALUES(?".(",?" x 21).")")
 or print "Error with INSERT _prepare_ $DBI::errstr\n";

Tuesday, September 7, 2004, 9:31:15 PM, you wrote:
CBDB> This should work:
$sth->>bind_param(1, undef);
$sth->>bind_param($_+2, $data[$_]) foreach 0..20;
$sth->>execute() or print "something";

cu
 Wieland                            mailto:[EMAIL PROTECTED]

Reply via email to