On Mar 29, 2012, at 1:46 PM, Bruce Johnson wrote:
> Can't mix placeholder styles (:foo/?) at /usr/local/lib64/perl5/DBD/Oracle.pm
> line 329., referer:
> https://resource-scheduler.pharmacy.arizona.edu/calendar/reserve.pl
>
Commenting out this section code gets rid of the error, so I know this is the
offending section. What is causing this error? The code looks right to me.
> my $sq_res_pend = "insert into reservations_pend (pid, email, cn, purpose,
> reserver_affstring) values(:1,:2,:3,:4,:5) returning reservations_pend_id
> into :NEWID";
>
> my $csr_res_pend = $lda->prepare($sq_res_pend) or die $DBI::errstr;
> $csr_res_pend->bind_param(':1',$res_pid) or die $DBI::errstr;
> $csr_res_pend->bind_param(':2',$res_email) or die $DBI::errstr;
> $csr_res_pend->bind_param(':3',$res_name) or die $DBI::errstr;
> $csr_res_pend->bind_param(':4',$res_purp) or die $DBI::errstr;
> $csr_res_pend->bind_param(':5',$res_affil) or die $DBI::errstr;
> $csr_res_pend->bind_param_inout(":NEWID",\$new_res_id, 25) or die
> $DBI::errstr;
>
> $csr_res_pend->execute();
--
Bruce Johnson
University of Arizona
College of Pharmacy
Information Technology Group
Institutions do not have opinions, merely customs
