New DBI user

--===============1763837195==
MIME-Version: 1.0
Content-class: urn:content-classes:message
Content-Type: multipart/alternative;
	boundary="----_=_NextPart_001_01C93D1A.AC7A3C07"

------_=_NextPart_001_01C93D1A.AC7A3C07
Content-Type: text/plain;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable


> Hello,=20
> My program has the potential to access multiple databases. It will
> first check to ensure that the specific schema handle is not available
> before creating a new one. In other words I don't want to tear down a
> connection if the next query is going to same schema.=20
> What is happening is that in some cases if the previous connection
> fails with say invalid userid/passwd, then the next request to create
> a new database handle fails without giving any clear indication why
> even though the database credentials are correct. I don't know how to
> deal with the database handle after such a failure since it is not
> defined.=20
> ...=20
> print "DEBUG:get_recordset:before:state - $DBI::state\n";
> unless($conn_string eq $prev_conn_string){
> $dbh->disconnect if defined($dbh);=20
>=20
> $prev_conn_string =3D $conn_string;=20
> print
> "DEBUG:get_recordset:before:***$username***,***$passwd***,***$data_sou
> rce***\n"
> ;
> $dbh =3D DBI->connect( "dbi:Oracle:$data_source", $username, $passwd,
> \%attr );
> print "DEBUG:get_recordset:after:$username,$passwd,$data_source\n";
> unless(defined($dbh)){
> #undef $dbh;
> print "DEBUG:get_recordset:ERROR:$username,$passwd,$data_source\n";
> $db_error =3D 1;
> print "DEBUG:get_recordset:state - $DBI::state\n";
> push @rs,$DBI::errstr;
> }
> print "DEBUG:get_recordset:error - $DBI::errstr\n";=20
> }=20
> ...=20
> [Trace level 3]=20
> DBI 1.607-ithread default trace level set to 0x0/2 (pid 4571) at
> db_copy_ban.pl line 698 via db_copy_ban.pl line 2537
> -> $DBI::state (") FETCH from lasth=3Dnone
> <- $DBI::state=3D undef
> -> DBI->connect(dbi:Oracle:USG1RO, rcst01_01, ****, HASH(0x400ea8f0))
> -> DBI->install_driver(Oracle) for hpux perl=3D5.008003 pid=3D4571
> ruid=3D6157 euid=3D6157
> install_driver: DBD::Oracle version 1.22 loaded from
> /vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-thread
> -multi/DBD/Oracle.pm
> -> STORE in DBD::_::common for DBD::Oracle::dr
> (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 'ShowErrorStatement' 1)
> thr#40017db0
> <- STORE=3D 1 at Oracle.pm line 68
> <- install_driver=3D DBI::dr=3DHASH(0x403c8b40)
> -> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0
> 'USG1RO' 'rcst01_01' **** HASH(0x4012c35c)) thr#40017db0
> <- connect=3D DBI::db=3DHASH(0x404258b8) at DBI.pm line 638
> -> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'RaiseError' 0) thr#40017db0
> <- STORE=3D 1 at DBI.pm line 690
> -> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'PrintError' 0) thr#40017db0
> <- STORE=3D 1 at DBI.pm line 690
> -> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'AutoCommit' 1) thr#40017db0
> <- STORE=3D 1 at DBI.pm line 690
> -> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'ShowErrorStatement' 1) thr#40017db0
> <- STORE=3D 1 at DBI.pm line 693
> -> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'ShowErrorStatement') thr#40017db0
> <- FETCH=3D 1 at DBI.pm line 693
> -> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'Username' 'rcst01_01') thr#40017db0
> <- STORE=3D 1 at DBI.pm line 693
> <> FETCH=3D 'rcst01_01' ('Username' from cache) at DBI.pm line 693
> -> connected in DBD::_::db for DBD::Oracle::db
> (DBI::db=3DHASH(0x404258b8)~0x40424890 'dbi:Oracle:USG1RO' 'rcst01_01'
> 'rcst01_01' HASH(0x400ea8f0)) thr#40017db0
> <- connected=3D undef at DBI.pm line 699
> <- connect=3D DBI::db=3DHASH(0x404258b8)
> -> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
> 'dbi_connect_closure' CODE(0x4040e07c)) thr#40017db0
> <- STORE=3D 1 at DBI.pm line 708
> -> $DBI::errstr (&) FETCH from lasth=3DHASH
> <- $DBI::errstr=3D undef
> -> $DBI::state (") FETCH from lasth=3DHASH
> <- $DBI::state=3D ''
> -> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x404258b8)~0x40424890
> 'SELECT sysdate
> FROM dual
> ') thr#40017db0
> fbh 1: 'SYSDATE' NULLable, otype 12-> 5, dbsize 7/76, p75.s0
> <- prepare=3D DBI::st=3DHASH(0x40425a68) at db_copy_ban.pl line 730
> -> execute for DBD::Oracle::st (DBI::st=3DHASH(0x40425a68)~0x404259cc)
> thr#40017db0
> dbd_st_execute SELECT (out0, lob0)...
> Statement Execute Mode is 0 (DEFAULT)
> dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)
> <- execute=3D '0E0' at db_copy_ban.pl line 730
> -> FETCH for DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER
> 'NUM_OF_FIELDS') thr#40017db0
> <- FETCH=3D 1 at db_copy_ban.pl line 360
> -> fetchrow_array for DBD::Oracle::st
> (DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0
> <- fetchrow_array=3D ( '02-NOV-08' ) [1 items] row1 at db_copy_ban.pl
> line 363
> -> FETCH for DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER
> 'NAME_lc') thr#40017db0
> <- FETCH=3D [ 'sysdate' ] at db_copy_ban.pl line 369
> -> fetchrow_array for DBD::Oracle::st
> (DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0
> <- fetchrow_array=3D ( ) [0 items] row1 at db_copy_ban.pl line 378
> -> err in DBD::_::common for DBD::Oracle::st
> (DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0
> <- err=3D undef at db_copy_ban.pl line 381
> -> $DBI::state (") FETCH from lasth=3DHASH
> <- $DBI::state=3D ''
> -> disconnect for DBD::Oracle::db
> (DBI::db=3DHASH(0x404258b8)~0x40424890) thr#40017db0
> <- disconnect=3D 1 at db_copy_ban.pl line 701
> -> DBI->connect(dbi:Oracle:USG1RO, rcst01_20, ****, HASH(0x4042593c))
> -> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0
> 'USG1RO' 'rcst01_20' **** HASH(0x404258d0)) thr#40017db0
> DESTROY for DBI::db=3DHASH(0x404c58f0) ignored - handle not =
initialised
> !! ERROR: '1017' 'ORA-01017: invalid username/password; logon denied
> (DBD ERROR: OCISessionBegin)' (err#0)
> <- connect=3D undef at DBI.pm line 638
> -> $DBI::errstr (&) FETCH from lasth=3DHASH
> <- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon denied
> (DBD ERROR: OCISessionBegin)'
> DBI connect('USG1RO','rcst01_20',...) failed: ORA-01017: invalid
> username/password; logon denied (DBD ERROR: OCISessionBegin)
> -> $DBI::state (") FETCH from lasth=3DHASH
> <- $DBI::state=3D 'S1000'
> -> $DBI::errstr (&) FETCH from lasth=3DHASH
> <- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon denied
> (DBD ERROR: OCISessionBegin)'
> -> $DBI::errstr (&) FETCH from lasth=3DHASH
> <- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon denied
> (DBD ERROR: OCISessionBegin)'
> -> $DBI::state (") FETCH from lasth=3DHASH
> <- $DBI::state=3D 'S1000'
> -> $DBI::state (") FETCH from lasth=3DHASH
> <- $DBI::state=3D 'S1000'
> -> DBI->connect(dbi:Oracle:USG2RO, rcst02_20, ****, HASH(0x40425be8))
> !! ERROR: '1017' CLEARED by call to connect method
> -> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0
> 'USG2RO' 'rcst02_20' **** HASH(0x402d
> 6620)) thr#40017db0
> New 'DBI::db' (for DBD::Oracle::db, =
parent=3DDBI::dr=3DHASH(0x403c8bd0),
> id=3Dundef)
> =
dbih_setup_handle(DBI::db=3DHASH(0x40177810)=3D>DBI::db=3DHASH(0x404c5910=
),
> DBD::Oracle::db, 404c6344, Null!)
> dbih_make_com(DBI::dr=3DHASH(0x403c8bd0), 403c9818, DBD::Oracle::db,
> 148, 404c5964) thr#40017db0
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Err,
> DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c6314) (already de
> fined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), State,
> DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c88) (already
> defined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Errstr,
> DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c94) (already
> defined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), TraceLevel,
> DBI::dr=3DHASH(0x403c8bd0)) 0 (already defined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), FetchHashKeyName,
> DBI::dr=3DHASH(0x403c8bd0)) 'NAME' (already d
> efined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleSetErr,
> DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleError,
> DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), ReadOnly,
> DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
> dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Profile,
> DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
> Environment variables:=20
> ...=20
> OCIHandleAlloc(4049e660,4049f948,OCI_HTYPE_ERROR,0,0)=3DINVALID_HANDLE
> <> DESTROY(DBI::db=3DHASH(0x40177810)) ignored for outer handle (inner
> DBI::db=3DHASH(0x404c5910) has ref cnt
> 1)
> -> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x404c5910)~INNER)
> thr#40017db0
> DESTROY for DBI::db=3DHASH(0x404c5910) ignored - handle not =
initialised
> <- DESTROY=3D undef
> DESTROY (dbih_clearcom) (dbh 0x404c5910, com 0x4049f8e0, imp
> DBD::Oracle::db):
> FLAGS 0x102011: COMSET Warn PrintWarn ShowErrorStatement
> PARENT DBI::dr=3DHASH(0x403c8bd0)
> KIDS 0 (0 Active)
> dbih_clearcom 0x404c5910 (com 0x4049f8e0, type 2) done.=20
> -- DBI::END ($@: , $!: )
> -> disconnect_all for DBD::Oracle::dr
> (DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0) thr#40017db0
> <- disconnect_all=3D (not implemented) at
> /vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-t
> hread-multi/DBI.pm line 717 via at ./db_copy_ban.pl line 0
> ! <> DESTROY(DBI::st=3DHASH(0x40425a14)) ignored for outer handle =
(inner
> DBI::st=3DHASH(0x40425948) has ref cnt
> 1)
> ! -> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x40425948)~INNER)
> thr#40017db0
> dbd_st_destroy (OCIHandleFree skipped during global destruction)
> ! <- DESTROY=3D undef during global destruction
> DESTROY (dbih_clearcom) (sth 0x40425948, com 0x4053c648, imp global
> destruction):
> FLAGS 0x182011: COMSET Warn PrintWarn ShowErrorStatement
> PARENT DBI::db=3DHASH(0x404248c0)
> KIDS 0 (0 Active)
> NUM_OF_FIELDS 1
> NUM_OF_PARAMS 0
> ! -> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x404248c0)~INNER)
> thr#40017db0
> OCIHandleFree(404b99f0,OCI_HTYPE_SESSION)=3DINVALID_HANDLE
>=20
>=20
> Ransford Hewitt
> Technical Consultant
> Information Technology
> ROGERS Communication Inc.
> Rogers Brampton Campus 8200 Dixie Road
> Brampton, Ontario L6T 0C1
> Tel    (647) 747-7461
>=20

------_=_NextPart_001_01C93D1A.AC7A3C07
Content-Type: text/html;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; =
charset=3Dus-ascii">
<META NAME=3D"Generator" CONTENT=3D"MS Exchange Server version =
6.5.7653.38">
<TITLE> New DBI user</TITLE>
</HEAD>
<BODY>
<!-- Converted from text/rtf format -->
<BR>

<P><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">Hello, =
</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">My program has =
the potential to access multiple databases. It will first check to =
ensure that the specific schema handle is not available before creating =
a new one. In other words I don't want to tear down a connection if the =
next query is going to same schema. </FONT></SPAN></P>

<P><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">What is happening =
is that in some cases if the previous connection fails with say invalid =
userid/passwd, then the next request to create a new database handle =
fails without giving any clear indication why even though the database =
credentials are correct. I don't know how to deal with the database =
handle after such a failure since it is not defined. </FONT></SPAN></P>

<P><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">... =
</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">print =
&quot;DEBUG:get_recordset:before:state - $DBI::state\n&quot;;<BR>
unless($conn_string eq $prev_conn_string){<BR>
$dbh-&gt;disconnect if defined($dbh); </FONT></SPAN>
<BR>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New =
Roman">$prev_conn_string =3D $conn_string; </FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">print =
&quot;DEBUG:get_recordset:before:***$username***,***$passwd***,***$data_s=
ource***\n&quot;<BR>
;<BR>
$dbh =3D DBI-&gt;connect( &quot;dbi:Oracle:$data_source&quot;, =
$username, $passwd, \%attr );<BR>
print =
&quot;DEBUG:get_recordset:after:$username,$passwd,$data_source\n&quot;;<B=
R>
unless(defined($dbh)){<BR>
#undef $dbh;<BR>
print =
&quot;DEBUG:get_recordset:ERROR:$username,$passwd,$data_source\n&quot;;<B=
R>
$db_error =3D 1;<BR>
print &quot;DEBUG:get_recordset:state - $DBI::state\n&quot;;<BR>
push @rs,$DBI::errstr;<BR>
}<BR>
print &quot;DEBUG:get_recordset:error - $DBI::errstr\n&quot;; =
</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">} </FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">... =
</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">[Trace level 3] =
</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">DBI =
1.607-ithread default trace level set to 0x0/2 (pid 4571) at =
db_copy_ban.pl line 698 via db_copy_ban.pl line 2537<BR>
-&gt; $DBI::state (&quot;) FETCH from lasth=3Dnone<BR>
&lt;- $DBI::state=3D undef<BR>
-&gt; DBI-&gt;connect(dbi:Oracle:USG1RO, rcst01_01, ****, =
HASH(0x400ea8f0))<BR>
-&gt; DBI-&gt;install_driver(Oracle) for hpux perl=3D5.008003 pid=3D4571 =
ruid=3D6157 euid=3D6157<BR>
install_driver: DBD::Oracle version 1.22 loaded from =
/vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-thread-mu=
lti/DBD/Oracle.pm<BR>
-&gt; STORE in DBD::_::common for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 'ShowErrorStatement' 1) =
thr#40017db0<BR>
&lt;- STORE=3D 1 at Oracle.pm line 68<BR>
&lt;- install_driver=3D DBI::dr=3DHASH(0x403c8b40)<BR>
-&gt; connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 =
'USG1RO' 'rcst01_01' **** HASH(0x4012c35c)) thr#40017db0<BR>
&lt;- connect=3D DBI::db=3DHASH(0x404258b8) at DBI.pm line 638<BR>
-&gt; STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'RaiseError' 0) thr#40017db0<BR>
&lt;- STORE=3D 1 at DBI.pm line 690<BR>
-&gt; STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'PrintError' 0) thr#40017db0<BR>
&lt;- STORE=3D 1 at DBI.pm line 690<BR>
-&gt; STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'AutoCommit' 1) thr#40017db0<BR>
&lt;- STORE=3D 1 at DBI.pm line 690<BR>
-&gt; STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'ShowErrorStatement' 1) thr#40017db0<BR>
&lt;- STORE=3D 1 at DBI.pm line 693<BR>
-&gt; FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'ShowErrorStatement') thr#40017db0<BR>
&lt;- FETCH=3D 1 at DBI.pm line 693<BR>
-&gt; STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'Username' 'rcst01_01') thr#40017db0<BR>
&lt;- STORE=3D 1 at DBI.pm line 693<BR>
&lt;&gt; FETCH=3D 'rcst01_01' ('Username' from cache) at DBI.pm line =
693<BR>
-&gt; connected in DBD::_::db for DBD::Oracle::db =
(DBI::db=3DHASH(0x404258b8)~0x40424890 'dbi:Oracle:USG1RO' 'rcst01_01' =
'rcst01_01' HASH(0x400ea8f0)) thr#40017db0<BR>
&lt;- connected=3D undef at DBI.pm line 699<BR>
&lt;- connect=3D DBI::db=3DHASH(0x404258b8)<BR>
-&gt; STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'dbi_connect_closure' CODE(0x4040e07c)) thr#40017db0<BR>
&lt;- STORE=3D 1 at DBI.pm line 708<BR>
-&gt; $DBI::errstr (&amp;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::errstr=3D undef<BR>
-&gt; $DBI::state (&quot;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::state=3D ''<BR>
-&gt; prepare for DBD::Oracle::db (DBI::db=3DHASH(0x404258b8)~0x40424890 =
'SELECT sysdate<BR>
FROM dual<BR>
') thr#40017db0<BR>
fbh 1: 'SYSDATE' NULLable, otype 12-&gt; 5, dbsize 7/76, p75.s0<BR>
&lt;- prepare=3D DBI::st=3DHASH(0x40425a68) at db_copy_ban.pl line =
730<BR>
-&gt; execute for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0<BR>
dbd_st_execute SELECT (out0, lob0)...<BR>
Statement Execute Mode is 0 (DEFAULT)<BR>
dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)<BR>
&lt;- execute=3D '0E0' at db_copy_ban.pl line 730<BR>
-&gt; FETCH for DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER =
'NUM_OF_FIELDS') thr#40017db0<BR>
&lt;- FETCH=3D 1 at db_copy_ban.pl line 360<BR>
-&gt; fetchrow_array for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0<BR>
&lt;- fetchrow_array=3D ( '02-NOV-08' ) [1 items] row1 at db_copy_ban.pl =
line 363<BR>
-&gt; FETCH for DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER =
'NAME_lc') thr#40017db0<BR>
&lt;- FETCH=3D [ 'sysdate' ] at db_copy_ban.pl line 369<BR>
-&gt; fetchrow_array for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0<BR>
&lt;- fetchrow_array=3D ( ) [0 items] row1 at db_copy_ban.pl line =
378<BR>
-&gt; err in DBD::_::common for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0<BR>
&lt;- err=3D undef at db_copy_ban.pl line 381<BR>
-&gt; $DBI::state (&quot;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::state=3D ''<BR>
-&gt; disconnect for DBD::Oracle::db =
(DBI::db=3DHASH(0x404258b8)~0x40424890) thr#40017db0<BR>
&lt;- disconnect=3D 1 at db_copy_ban.pl line 701<BR>
-&gt; DBI-&gt;connect(dbi:Oracle:USG1RO, rcst01_20, ****, =
HASH(0x4042593c))<BR>
-&gt; connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 =
'USG1RO' 'rcst01_20' **** HASH(0x404258d0)) thr#40017db0<BR>
DESTROY for DBI::db=3DHASH(0x404c58f0) ignored - handle not =
initialised<BR>
!! ERROR: '1017' 'ORA-01017: invalid username/password; logon denied =
(DBD ERROR: OCISessionBegin)' (err#0)<BR>
&lt;- connect=3D undef at DBI.pm line 638<BR>
-&gt; $DBI::errstr (&amp;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon =
denied (DBD ERROR: OCISessionBegin)'<BR>
DBI connect('USG1RO','rcst01_20',...) failed: ORA-01017: invalid =
username/password; logon denied (DBD ERROR: OCISessionBegin)<BR>
-&gt; $DBI::state (&quot;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::state=3D 'S1000'<BR>
-&gt; $DBI::errstr (&amp;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon =
denied (DBD ERROR: OCISessionBegin)'<BR>
-&gt; $DBI::errstr (&amp;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon =
denied (DBD ERROR: OCISessionBegin)'<BR>
-&gt; $DBI::state (&quot;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::state=3D 'S1000'<BR>
-&gt; $DBI::state (&quot;) FETCH from lasth=3DHASH<BR>
&lt;- $DBI::state=3D 'S1000'<BR>
-&gt; DBI-&gt;connect(dbi:Oracle:USG2RO, rcst02_20, ****, =
HASH(0x40425be8))<BR>
!! ERROR: '1017' CLEARED by call to connect method<BR>
-&gt; connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0 =
'USG2RO' 'rcst02_20' **** HASH(0x402d<BR>
6620)) thr#40017db0<BR>
New 'DBI::db' (for DBD::Oracle::db, parent=3DDBI::dr=3DHASH(0x403c8bd0), =
id=3Dundef)<BR>
dbih_setup_handle(DBI::db=3DHASH(0x40177810)=3D&gt;DBI::db=3DHASH(0x404c5=
910), DBD::Oracle::db, 404c6344, Null!)<BR>
dbih_make_com(DBI::dr=3DHASH(0x403c8bd0), 403c9818, DBD::Oracle::db, =
148, 404c5964) thr#40017db0<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Err, =
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c6314) (already de<BR>
fined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), State, =
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c88) (already<BR>
defined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Errstr, =
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c94) (already<BR>
defined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), TraceLevel, =
DBI::dr=3DHASH(0x403c8bd0)) 0 (already defined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), FetchHashKeyName, =
DBI::dr=3DHASH(0x403c8bd0)) 'NAME' (already d<BR>
efined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleSetErr, =
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleError, =
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), ReadOnly, =
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)<BR>
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Profile, =
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)<BR>
Environment variables: </FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">... =
</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New =
Roman">OCIHandleAlloc(4049e660,4049f948,OCI_HTYPE_ERROR,0,0)=3DINVALID_HA=
NDLE<BR>
&lt;&gt; DESTROY(DBI::db=3DHASH(0x40177810)) ignored for outer handle =
(inner DBI::db=3DHASH(0x404c5910) has ref cnt<BR>
1)<BR>
-&gt; DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x404c5910)~INNER) =
thr#40017db0<BR>
DESTROY for DBI::db=3DHASH(0x404c5910) ignored - handle not =
initialised<BR>
&lt;- DESTROY=3D undef<BR>
DESTROY (dbih_clearcom) (dbh 0x404c5910, com 0x4049f8e0, imp =
DBD::Oracle::db):<BR>
FLAGS 0x102011: COMSET Warn PrintWarn ShowErrorStatement<BR>
PARENT DBI::dr=3DHASH(0x403c8bd0)<BR>
KIDS 0 (0 Active)<BR>
dbih_clearcom 0x404c5910 (com 0x4049f8e0, type 2) done. </FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT FACE=3D"Times New Roman">-- DBI::END ($@: =
, $!: )<BR>
-&gt; disconnect_all for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0) thr#40017db0<BR>
&lt;- disconnect_all=3D (not implemented) at =
/vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-t<BR>
hread-multi/DBI.pm line 717 via at ./db_copy_ban.pl line 0<BR>
! &lt;&gt; DESTROY(DBI::st=3DHASH(0x40425a14)) ignored for outer handle =
(inner DBI::st=3DHASH(0x40425948) has ref cnt<BR>
1)<BR>
! -&gt; DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x40425948)~INNER) =
thr#40017db0<BR>
dbd_st_destroy (OCIHandleFree skipped during global destruction)<BR>
! &lt;- DESTROY=3D undef during global destruction<BR>
DESTROY (dbih_clearcom) (sth 0x40425948, com 0x4053c648, imp global =
destruction):<BR>
FLAGS 0x182011: COMSET Warn PrintWarn ShowErrorStatement<BR>
PARENT DBI::db=3DHASH(0x404248c0)<BR>
KIDS 0 (0 Active)<BR>
NUM_OF_FIELDS 1<BR>
NUM_OF_PARAMS 0<BR>
! -&gt; DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x404248c0)~INNER) =
thr#40017db0<BR>
OCIHandleFree(404b99f0,OCI_HTYPE_SESSION)=3DINVALID_HANDLE</FONT></SPAN>
</P>
<BR>

<P><B><SPAN LANG=3D"en-us"><FONT COLOR=3D"#808080" SIZE=3D2 =
FACE=3D"Arial">Ransford Hewitt</FONT></SPAN></B><SPAN =
LANG=3D"en-us"></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT COLOR=3D"#808080" SIZE=3D2 =
FACE=3D"Arial">Technical Consultant</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT COLOR=3D"#808080" SIZE=3D2 =
FACE=3D"Arial">Information Technology</FONT></SPAN>

<BR><SPAN LANG=3D"en-us"><B><FONT COLOR=3D"#808080" SIZE=3D2 =
FACE=3D"Arial">ROGERS Communication Inc.</FONT></B></SPAN>

<BR><SPAN LANG=3D"en-us"><FONT COLOR=3D"#808080" SIZE=3D1 =
FACE=3D"Arial">Rogers Brampton Campus 8200 Dixie Road</FONT></SPAN>

<BR><SPAN LANG=3D"fr"><FONT COLOR=3D"#808080" SIZE=3D1 =
FACE=3D"Arial">Brampton, Ontario L6T 0C1</FONT></SPAN>

<BR><SPAN LANG=3D"fr"><FONT COLOR=3D"#808080" SIZE=3D1 =
FACE=3D"Arial">Tel&nbsp;&nbsp;&nbsp; (647) 747-7461</FONT></SPAN><SPAN =
LANG=3D"en-ca"></SPAN>
</P>

</BODY>
</HTML>
------_=_NextPart_001_01C93D1A.AC7A3C07--
--===============1763837195==
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

This e-mail (and attachment(s)) is confidential, proprietary, may be subjec=
t to copyright and legal privilege and no related rights are waived. If you=
 are not the intended recipient or its agent, any review, dissemination, di=
stribution or copying of this e-mail or any of its content is strictly proh=
ibited and may be unlawful. All messages may be monitored as permitted by a=
pplicable law and regulations and our policies to protect our business. E-m=
ails are not secure and you are deemed to have accepted any risk if you com=
municate with us by e-mail. If received in error, please notify us immediat=
ely and delete the e-mail (and any attachments) from any computer or any st=
orage medium without printing a copy.

Ce courriel (ainsi que ses pi=C3=A8ces jointes) est confidentiel, exclusif,=
 et peut faire l=E2=80=99objet de droit d=E2=80=99auteur et de privil=C3=A8=
ge juridique; aucun droit connexe n=E2=80=99est exclu. Si vous n=E2=80=99=
=C3=AAtes pas le destinataire vis=C3=A9 ou son repr=C3=A9sentant, toute =C3=
=A9tude, diffusion, transmission ou copie de ce courriel en tout ou en part=
ie, est strictement interdite et peut =C3=AAtre ill=C3=A9gale. Tous les mes=
sages peuvent =C3=AAtre surveill=C3=A9s, selon les lois et r=C3=A8glements =
applicables et les politiques de protection de notre entreprise. Les courri=
els ne sont pas s=C3=A9curis=C3=A9s et vous =C3=AAtes r=C3=A9put=C3=A9s avo=
ir accept=C3=A9 tous les risques qui y sont li=C3=A9s si vous choisissez de=
 communiquer avec nous par ce moyen. Si vous avez re=C3=A7u ce message par =
erreur, veuillez nous en aviser imm=C3=A9diatement et supprimer ce courriel=
 (ainsi que toutes ses pi=C3=A8ces jointes) de tout ordinateur ou support d=
e donn=C3=A9es sans en imprimer une copie.=20

--===============1763837195==--
0
Ransford
11/2/2008 6:41:52 PM
perl.dbi.users 11100 articles. 1 followers. Follow

1 Replies
697 Views

Similar Articles

[PageSpeed] 11

--===============1727384805==
MIME-Version: 1.0
Content-class: urn:content-classes:message
Content-Type: multipart/alternative;
	boundary="----_=_NextPart_001_01C93E8A.0EECE249"

------_=_NextPart_001_01C93E8A.0EECE249
Content-Type: text/plain;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

Problem resolved:
=20
ora_envhp=20
The first time a connection is made a new OCI 'environment' is created
by DBD::Oracle and stored in the driver handle. Subsequent connects
reuse (share) that same OCI environment by default.

The ora_envhp attribute can be used to disable the reuse of the OCI
environment from a previous connect. If the value is 0 then a new OCI
environment is allocated and used for this connection.


________________________________

From: Ransford Hewitt [mailto:Ransford.Hewitt@rci.rogers.com]=20
Sent: Sunday, November 02, 2008 1:42 PM
To: dbi-users@perl.org
Subject: New DBI user




Hello,=20
My program has the potential to access multiple databases. It will first
check to ensure that the specific schema handle is not available before
creating a new one. In other words I don't want to tear down a
connection if the next query is going to same schema.=20

What is happening is that in some cases if the previous connection fails
with say invalid userid/passwd, then the next request to create a new
database handle fails without giving any clear indication why even
though the database credentials are correct. I don't know how to deal
with the database handle after such a failure since it is not defined.=20

....=20
print "DEBUG:get_recordset:before:state - $DBI::state\n";
unless($conn_string eq $prev_conn_string){
$dbh->disconnect if defined($dbh);=20

$prev_conn_string =3D $conn_string;=20
print
"DEBUG:get_recordset:before:***$username***,***$passwd***,***$data_sourc
e***\n"
;
$dbh =3D DBI->connect( "dbi:Oracle:$data_source", $username, $passwd,
\%attr );
print "DEBUG:get_recordset:after:$username,$passwd,$data_source\n";
unless(defined($dbh)){
#undef $dbh;
print "DEBUG:get_recordset:ERROR:$username,$passwd,$data_source\n";
$db_error =3D 1;
print "DEBUG:get_recordset:state - $DBI::state\n";
push @rs,$DBI::errstr;
}
print "DEBUG:get_recordset:error - $DBI::errstr\n";=20
}=20
....=20
[Trace level 3]=20
DBI 1.607-ithread default trace level set to 0x0/2 (pid 4571) at
db_copy_ban.pl line 698 via db_copy_ban.pl line 2537
-> $DBI::state (") FETCH from lasth=3Dnone
<- $DBI::state=3D undef
-> DBI->connect(dbi:Oracle:USG1RO, rcst01_01, ****, HASH(0x400ea8f0))
-> DBI->install_driver(Oracle) for hpux perl=3D5.008003 pid=3D4571 =
ruid=3D6157
euid=3D6157
install_driver: DBD::Oracle version 1.22 loaded from
/vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-thread-m
ulti/DBD/Oracle.pm
-> STORE in DBD::_::common for DBD::Oracle::dr
(DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 'ShowErrorStatement' 1)
thr#40017db0
<- STORE=3D 1 at Oracle.pm line 68
<- install_driver=3D DBI::dr=3DHASH(0x403c8b40)
-> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0
'USG1RO' 'rcst01_01' **** HASH(0x4012c35c)) thr#40017db0
<- connect=3D DBI::db=3DHASH(0x404258b8) at DBI.pm line 638
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
'RaiseError' 0) thr#40017db0
<- STORE=3D 1 at DBI.pm line 690
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
'PrintError' 0) thr#40017db0
<- STORE=3D 1 at DBI.pm line 690
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
'AutoCommit' 1) thr#40017db0
<- STORE=3D 1 at DBI.pm line 690
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
'ShowErrorStatement' 1) thr#40017db0
<- STORE=3D 1 at DBI.pm line 693
-> FETCH for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
'ShowErrorStatement') thr#40017db0
<- FETCH=3D 1 at DBI.pm line 693
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER =
'Username'
'rcst01_01') thr#40017db0
<- STORE=3D 1 at DBI.pm line 693
<> FETCH=3D 'rcst01_01' ('Username' from cache) at DBI.pm line 693
-> connected in DBD::_::db for DBD::Oracle::db
(DBI::db=3DHASH(0x404258b8)~0x40424890 'dbi:Oracle:USG1RO' 'rcst01_01'
'rcst01_01' HASH(0x400ea8f0)) thr#40017db0
<- connected=3D undef at DBI.pm line 699
<- connect=3D DBI::db=3DHASH(0x404258b8)
-> STORE for DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER
'dbi_connect_closure' CODE(0x4040e07c)) thr#40017db0
<- STORE=3D 1 at DBI.pm line 708
-> $DBI::errstr (&) FETCH from lasth=3DHASH
<- $DBI::errstr=3D undef
-> $DBI::state (") FETCH from lasth=3DHASH
<- $DBI::state=3D ''
-> prepare for DBD::Oracle::db (DBI::db=3DHASH(0x404258b8)~0x40424890
'SELECT sysdate
FROM dual
') thr#40017db0
fbh 1: 'SYSDATE' NULLable, otype 12-> 5, dbsize 7/76, p75.s0
<- prepare=3D DBI::st=3DHASH(0x40425a68) at db_copy_ban.pl line 730
-> execute for DBD::Oracle::st (DBI::st=3DHASH(0x40425a68)~0x404259cc)
thr#40017db0
dbd_st_execute SELECT (out0, lob0)...
Statement Execute Mode is 0 (DEFAULT)
dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4, out0)
<- execute=3D '0E0' at db_copy_ban.pl line 730
-> FETCH for DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER
'NUM_OF_FIELDS') thr#40017db0
<- FETCH=3D 1 at db_copy_ban.pl line 360
-> fetchrow_array for DBD::Oracle::st
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0
<- fetchrow_array=3D ( '02-NOV-08' ) [1 items] row1 at db_copy_ban.pl =
line
363
-> FETCH for DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER =
'NAME_lc')
thr#40017db0
<- FETCH=3D [ 'sysdate' ] at db_copy_ban.pl line 369
-> fetchrow_array for DBD::Oracle::st
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0
<- fetchrow_array=3D ( ) [0 items] row1 at db_copy_ban.pl line 378
-> err in DBD::_::common for DBD::Oracle::st
(DBI::st=3DHASH(0x40425a68)~0x404259cc) thr#40017db0
<- err=3D undef at db_copy_ban.pl line 381
-> $DBI::state (") FETCH from lasth=3DHASH
<- $DBI::state=3D ''
-> disconnect for DBD::Oracle::db =
(DBI::db=3DHASH(0x404258b8)~0x40424890)
thr#40017db0
<- disconnect=3D 1 at db_copy_ban.pl line 701
-> DBI->connect(dbi:Oracle:USG1RO, rcst01_20, ****, HASH(0x4042593c))
-> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0
'USG1RO' 'rcst01_20' **** HASH(0x404258d0)) thr#40017db0
DESTROY for DBI::db=3DHASH(0x404c58f0) ignored - handle not initialised
!! ERROR: '1017' 'ORA-01017: invalid username/password; logon denied
(DBD ERROR: OCISessionBegin)' (err#0)
<- connect=3D undef at DBI.pm line 638
-> $DBI::errstr (&) FETCH from lasth=3DHASH
<- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon denied
(DBD ERROR: OCISessionBegin)'
DBI connect('USG1RO','rcst01_20',...) failed: ORA-01017: invalid
username/password; logon denied (DBD ERROR: OCISessionBegin)
-> $DBI::state (") FETCH from lasth=3DHASH
<- $DBI::state=3D 'S1000'
-> $DBI::errstr (&) FETCH from lasth=3DHASH
<- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon denied
(DBD ERROR: OCISessionBegin)'
-> $DBI::errstr (&) FETCH from lasth=3DHASH
<- $DBI::errstr=3D 'ORA-01017: invalid username/password; logon denied
(DBD ERROR: OCISessionBegin)'
-> $DBI::state (") FETCH from lasth=3DHASH
<- $DBI::state=3D 'S1000'
-> $DBI::state (") FETCH from lasth=3DHASH
<- $DBI::state=3D 'S1000'
-> DBI->connect(dbi:Oracle:USG2RO, rcst02_20, ****, HASH(0x40425be8))
!! ERROR: '1017' CLEARED by call to connect method
-> connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0
'USG2RO' 'rcst02_20' **** HASH(0x402d
6620)) thr#40017db0
New 'DBI::db' (for DBD::Oracle::db, parent=3DDBI::dr=3DHASH(0x403c8bd0),
id=3Dundef)
dbih_setup_handle(DBI::db=3DHASH(0x40177810)=3D>DBI::db=3DHASH(0x404c5910=
),
DBD::Oracle::db, 404c6344, Null!)
dbih_make_com(DBI::dr=3DHASH(0x403c8bd0), 403c9818, DBD::Oracle::db, =
148,
404c5964) thr#40017db0
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Err,
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c6314) (already de
fined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), State,
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c88) (already
defined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Errstr,
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c94) (already
defined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), TraceLevel,
DBI::dr=3DHASH(0x403c8bd0)) 0 (already defined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), FetchHashKeyName,
DBI::dr=3DHASH(0x403c8bd0)) 'NAME' (already d
efined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleSetErr,
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleError,
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), ReadOnly,
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Profile,
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)
Environment variables:=20
....=20
OCIHandleAlloc(4049e660,4049f948,OCI_HTYPE_ERROR,0,0)=3DINVALID_HANDLE
<> DESTROY(DBI::db=3DHASH(0x40177810)) ignored for outer handle (inner
DBI::db=3DHASH(0x404c5910) has ref cnt
1)
-> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x404c5910)~INNER)
thr#40017db0
DESTROY for DBI::db=3DHASH(0x404c5910) ignored - handle not initialised
<- DESTROY=3D undef
DESTROY (dbih_clearcom) (dbh 0x404c5910, com 0x4049f8e0, imp
DBD::Oracle::db):
FLAGS 0x102011: COMSET Warn PrintWarn ShowErrorStatement
PARENT DBI::dr=3DHASH(0x403c8bd0)
KIDS 0 (0 Active)
dbih_clearcom 0x404c5910 (com 0x4049f8e0, type 2) done.=20
-- DBI::END ($@: , $!: )
-> disconnect_all for DBD::Oracle::dr
(DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0) thr#40017db0
<- disconnect_all=3D (not implemented) at
/vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-t
hread-multi/DBI.pm line 717 via at ./db_copy_ban.pl line 0
! <> DESTROY(DBI::st=3DHASH(0x40425a14)) ignored for outer handle (inner
DBI::st=3DHASH(0x40425948) has ref cnt
1)
! -> DESTROY for DBD::Oracle::st (DBI::st=3DHASH(0x40425948)~INNER)
thr#40017db0
dbd_st_destroy (OCIHandleFree skipped during global destruction)
! <- DESTROY=3D undef during global destruction
DESTROY (dbih_clearcom) (sth 0x40425948, com 0x4053c648, imp global
destruction):
FLAGS 0x182011: COMSET Warn PrintWarn ShowErrorStatement
PARENT DBI::db=3DHASH(0x404248c0)
KIDS 0 (0 Active)
NUM_OF_FIELDS 1
NUM_OF_PARAMS 0
! -> DESTROY for DBD::Oracle::db (DBI::db=3DHASH(0x404248c0)~INNER)
thr#40017db0
OCIHandleFree(404b99f0,OCI_HTYPE_SESSION)=3DINVALID_HANDLE=20


Ransford Hewitt=20
Technical Consultant=20
Information Technology=20
ROGERS Communication Inc.=20
Rogers Brampton Campus 8200 Dixie Road=20
Brampton, Ontario L6T 0C1=20
Tel    (647) 747-7461=20


------_=_NextPart_001_01C93E8A.0EECE249
Content-Type: text/html;
	charset="us-ascii"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>New DBI user</TITLE>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Dus-ascii">
<META content=3D"MSHTML 6.00.2900.3429" name=3DGENERATOR></HEAD>
<BODY>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D980303114-04112008><FONT =
face=3DArial=20
color=3D#0000ff size=3D2>Problem resolved:</FONT></SPAN></DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D980303114-04112008><FONT =
face=3DArial=20
color=3D#0000ff size=3D2></FONT></SPAN>&nbsp;</DIV>
<DIV dir=3Dltr align=3Dleft><SPAN class=3D980303114-04112008>
<DT><A name=3Dora_envhp>ora_envhp</A>=20
<DD>
<P>The first time a connection is made a new OCI 'environment' is =
created by=20
DBD::Oracle and stored in the driver handle. Subsequent connects reuse =
(share)=20
that same OCI environment by default.</P>
<P>The ora_envhp attribute can be used to disable the reuse of the OCI=20
environment from a previous connect. If the value is <CODE>0</CODE> then =
a new=20
OCI environment is allocated and used for this=20
connection.</P></DD></SPAN></DIV><BR>
<DIV class=3DOutlookMessageHeader lang=3Den-us dir=3Dltr align=3Dleft>
<HR tabIndex=3D-1>
<FONT face=3DTahoma size=3D2><B>From:</B> Ransford Hewitt=20
[mailto:Ransford.Hewitt@rci.rogers.com] <BR><B>Sent:</B> Sunday, =
November 02,=20
2008 1:42 PM<BR><B>To:</B> dbi-users@perl.org<BR><B>Subject:</B> New DBI =

user<BR></FONT><BR></DIV>
<DIV></DIV><!-- Converted from text/rtf format --><BR>
<P><SPAN lang=3Den-us><FONT face=3D"Times New Roman">Hello, =
</FONT></SPAN><BR><SPAN=20
lang=3Den-us><FONT face=3D"Times New Roman">My program has the potential =
to access=20
multiple databases. It will first check to ensure that the specific =
schema=20
handle is not available before creating a new one. In other words I =
don't want=20
to tear down a connection if the next query is going to same schema.=20
</FONT></SPAN></P>
<P><SPAN lang=3Den-us><FONT face=3D"Times New Roman">What is happening =
is that in=20
some cases if the previous connection fails with say invalid =
userid/passwd, then=20
the next request to create a new database handle fails without giving =
any clear=20
indication why even though the database credentials are correct. I don't =
know=20
how to deal with the database handle after such a failure since it is =
not=20
defined. </FONT></SPAN></P>
<P><SPAN lang=3Den-us><FONT face=3D"Times New Roman">... =
</FONT></SPAN><BR><SPAN=20
lang=3Den-us><FONT face=3D"Times New Roman">print =
"DEBUG:get_recordset:before:state=20
- $DBI::state\n";<BR>unless($conn_string eq=20
$prev_conn_string){<BR>$dbh-&gt;disconnect if defined($dbh);=20
</FONT></SPAN><BR><BR><SPAN lang=3Den-us><FONT=20
face=3D"Times New Roman">$prev_conn_string =3D $conn_string; =
</FONT></SPAN><BR><SPAN=20
lang=3Den-us><FONT face=3D"Times New Roman">print=20
"DEBUG:get_recordset:before:***$username***,***$passwd***,***$data_source=
***\n"<BR>;<BR>$dbh=20
=3D DBI-&gt;connect( "dbi:Oracle:$data_source", $username, $passwd, =
\%attr=20
);<BR>print=20
"DEBUG:get_recordset:after:$username,$passwd,$data_source\n";<BR>unless(d=
efined($dbh)){<BR>#undef=20
$dbh;<BR>print=20
"DEBUG:get_recordset:ERROR:$username,$passwd,$data_source\n";<BR>$db_erro=
r =3D=20
1;<BR>print "DEBUG:get_recordset:state - $DBI::state\n";<BR>push=20
@rs,$DBI::errstr;<BR>}<BR>print "DEBUG:get_recordset:error - =
$DBI::errstr\n";=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT face=3D"Times New Roman">}=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT face=3D"Times New Roman">...=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT face=3D"Times New =
Roman">[Trace level 3]=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT face=3D"Times New Roman">DBI=20
1.607-ithread default trace level set to 0x0/2 (pid 4571) at =
db_copy_ban.pl line=20
698 via db_copy_ban.pl line 2537<BR>-&gt; $DBI::state (") FETCH from=20
lasth=3Dnone<BR>&lt;- $DBI::state=3D undef<BR>-&gt;=20
DBI-&gt;connect(dbi:Oracle:USG1RO, rcst01_01, ****, =
HASH(0x400ea8f0))<BR>-&gt;=20
DBI-&gt;install_driver(Oracle) for hpux perl=3D5.008003 pid=3D4571 =
ruid=3D6157=20
euid=3D6157<BR>install_driver: DBD::Oracle version 1.22 loaded from=20
/vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-thread-mu=
lti/DBD/Oracle.pm<BR>-&gt;=20
STORE in DBD::_::common for DBD::Oracle::dr =
(DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0=20
'ShowErrorStatement' 1) thr#40017db0<BR>&lt;- STORE=3D 1 at Oracle.pm =
line=20
68<BR>&lt;- install_driver=3D DBI::dr=3DHASH(0x403c8b40)<BR>-&gt; =
connect for=20
DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 'USG1RO' =
'rcst01_01' ****=20
HASH(0x4012c35c)) thr#40017db0<BR>&lt;- connect=3D =
DBI::db=3DHASH(0x404258b8) at=20
DBI.pm line 638<BR>-&gt; STORE for DBD::Oracle::db=20
(DBI::db=3DHASH(0x40424890)~INNER 'RaiseError' 0) thr#40017db0<BR>&lt;- =
STORE=3D 1=20
at DBI.pm line 690<BR>-&gt; STORE for DBD::Oracle::db=20
(DBI::db=3DHASH(0x40424890)~INNER 'PrintError' 0) thr#40017db0<BR>&lt;- =
STORE=3D 1=20
at DBI.pm line 690<BR>-&gt; STORE for DBD::Oracle::db=20
(DBI::db=3DHASH(0x40424890)~INNER 'AutoCommit' 1) thr#40017db0<BR>&lt;- =
STORE=3D 1=20
at DBI.pm line 690<BR>-&gt; STORE for DBD::Oracle::db=20
(DBI::db=3DHASH(0x40424890)~INNER 'ShowErrorStatement' 1) =
thr#40017db0<BR>&lt;-=20
STORE=3D 1 at DBI.pm line 693<BR>-&gt; FETCH for DBD::Oracle::db=20
(DBI::db=3DHASH(0x40424890)~INNER 'ShowErrorStatement') =
thr#40017db0<BR>&lt;-=20
FETCH=3D 1 at DBI.pm line 693<BR>-&gt; STORE for DBD::Oracle::db=20
(DBI::db=3DHASH(0x40424890)~INNER 'Username' 'rcst01_01') =
thr#40017db0<BR>&lt;-=20
STORE=3D 1 at DBI.pm line 693<BR>&lt;&gt; FETCH=3D 'rcst01_01' =
('Username' from=20
cache) at DBI.pm line 693<BR>-&gt; connected in DBD::_::db for =
DBD::Oracle::db=20
(DBI::db=3DHASH(0x404258b8)~0x40424890 'dbi:Oracle:USG1RO' 'rcst01_01' =
'rcst01_01'=20
HASH(0x400ea8f0)) thr#40017db0<BR>&lt;- connected=3D undef at DBI.pm =
line=20
699<BR>&lt;- connect=3D DBI::db=3DHASH(0x404258b8)<BR>-&gt; STORE for=20
DBD::Oracle::db (DBI::db=3DHASH(0x40424890)~INNER 'dbi_connect_closure'=20
CODE(0x4040e07c)) thr#40017db0<BR>&lt;- STORE=3D 1 at DBI.pm line =
708<BR>-&gt;=20
$DBI::errstr (&amp;) FETCH from lasth=3DHASH<BR>&lt;- $DBI::errstr=3D =
undef<BR>-&gt;=20
$DBI::state (") FETCH from lasth=3DHASH<BR>&lt;- $DBI::state=3D =
''<BR>-&gt; prepare=20
for DBD::Oracle::db (DBI::db=3DHASH(0x404258b8)~0x40424890 'SELECT =
sysdate<BR>FROM=20
dual<BR>') thr#40017db0<BR>fbh 1: 'SYSDATE' NULLable, otype 12-&gt; 5, =
dbsize=20
7/76, p75.s0<BR>&lt;- prepare=3D DBI::st=3DHASH(0x40425a68) at =
db_copy_ban.pl line=20
730<BR>-&gt; execute for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc)=20
thr#40017db0<BR>dbd_st_execute SELECT (out0, lob0)...<BR>Statement =
Execute Mode=20
is 0 (DEFAULT)<BR>dbd_st_execute SELECT returned (SUCCESS, rpc0, fn4,=20
out0)<BR>&lt;- execute=3D '0E0' at db_copy_ban.pl line 730<BR>-&gt; =
FETCH for=20
DBD::Oracle::st (DBI::st=3DHASH(0x404259cc)~INNER 'NUM_OF_FIELDS')=20
thr#40017db0<BR>&lt;- FETCH=3D 1 at db_copy_ban.pl line 360<BR>-&gt;=20
fetchrow_array for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc)=20
thr#40017db0<BR>&lt;- fetchrow_array=3D ( '02-NOV-08' ) [1 items] row1 =
at=20
db_copy_ban.pl line 363<BR>-&gt; FETCH for DBD::Oracle::st=20
(DBI::st=3DHASH(0x404259cc)~INNER 'NAME_lc') thr#40017db0<BR>&lt;- =
FETCH=3D [=20
'sysdate' ] at db_copy_ban.pl line 369<BR>-&gt; fetchrow_array for=20
DBD::Oracle::st (DBI::st=3DHASH(0x40425a68)~0x404259cc) =
thr#40017db0<BR>&lt;-=20
fetchrow_array=3D ( ) [0 items] row1 at db_copy_ban.pl line 378<BR>-&gt; =
err in=20
DBD::_::common for DBD::Oracle::st =
(DBI::st=3DHASH(0x40425a68)~0x404259cc)=20
thr#40017db0<BR>&lt;- err=3D undef at db_copy_ban.pl line 381<BR>-&gt; =
$DBI::state=20
(") FETCH from lasth=3DHASH<BR>&lt;- $DBI::state=3D ''<BR>-&gt; =
disconnect for=20
DBD::Oracle::db (DBI::db=3DHASH(0x404258b8)~0x40424890) =
thr#40017db0<BR>&lt;-=20
disconnect=3D 1 at db_copy_ban.pl line 701<BR>-&gt;=20
DBI-&gt;connect(dbi:Oracle:USG1RO, rcst01_20, ****, =
HASH(0x4042593c))<BR>-&gt;=20
connect for DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b40)~0x403c8ba0 =
'USG1RO'=20
'rcst01_20' **** HASH(0x404258d0)) thr#40017db0<BR>DESTROY for=20
DBI::db=3DHASH(0x404c58f0) ignored - handle not initialised<BR>!! ERROR: =
'1017'=20
'ORA-01017: invalid username/password; logon denied (DBD ERROR:=20
OCISessionBegin)' (err#0)<BR>&lt;- connect=3D undef at DBI.pm line =
638<BR>-&gt;=20
$DBI::errstr (&amp;) FETCH from lasth=3DHASH<BR>&lt;- $DBI::errstr=3D =
'ORA-01017:=20
invalid username/password; logon denied (DBD ERROR: =
OCISessionBegin)'<BR>DBI=20
connect('USG1RO','rcst01_20',...) failed: ORA-01017: invalid =
username/password;=20
logon denied (DBD ERROR: OCISessionBegin)<BR>-&gt; $DBI::state (") FETCH =
from=20
lasth=3DHASH<BR>&lt;- $DBI::state=3D 'S1000'<BR>-&gt; $DBI::errstr =
(&amp;) FETCH=20
from lasth=3DHASH<BR>&lt;- $DBI::errstr=3D 'ORA-01017: invalid =
username/password;=20
logon denied (DBD ERROR: OCISessionBegin)'<BR>-&gt; $DBI::errstr (&amp;) =
FETCH=20
from lasth=3DHASH<BR>&lt;- $DBI::errstr=3D 'ORA-01017: invalid =
username/password;=20
logon denied (DBD ERROR: OCISessionBegin)'<BR>-&gt; $DBI::state (") =
FETCH from=20
lasth=3DHASH<BR>&lt;- $DBI::state=3D 'S1000'<BR>-&gt; $DBI::state (") =
FETCH from=20
lasth=3DHASH<BR>&lt;- $DBI::state=3D 'S1000'<BR>-&gt;=20
DBI-&gt;connect(dbi:Oracle:USG2RO, rcst02_20, ****, =
HASH(0x40425be8))<BR>!!=20
ERROR: '1017' CLEARED by call to connect method<BR>-&gt; connect for=20
DBD::Oracle::dr (DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0 'USG2RO' =
'rcst02_20' ****=20
HASH(0x402d<BR>6620)) thr#40017db0<BR>New 'DBI::db' (for =
DBD::Oracle::db,=20
parent=3DDBI::dr=3DHASH(0x403c8bd0),=20
id=3Dundef)<BR>dbih_setup_handle(DBI::db=3DHASH(0x40177810)=3D&gt;DBI::db=
=3DHASH(0x404c5910),=20
DBD::Oracle::db, 404c6344, =
Null!)<BR>dbih_make_com(DBI::dr=3DHASH(0x403c8bd0),=20
403c9818, DBD::Oracle::db, 148, 404c5964)=20
thr#40017db0<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Err,=20
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c6314) (already=20
de<BR>fined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), State,=20
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c88)=20
(already<BR>defined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), =
Errstr,=20
DBI::dr=3DHASH(0x403c8bd0)) SCALAR(0x404c5c94)=20
(already<BR>defined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), =
TraceLevel,=20
DBI::dr=3DHASH(0x403c8bd0)) 0 (already=20
defined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), =
FetchHashKeyName,=20
DBI::dr=3DHASH(0x403c8bd0)) 'NAME' (already=20
d<BR>efined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), =
HandleSetErr,=20
DBI::dr=3DHASH(0x403c8bd0)) undef (not=20
defined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), HandleError,=20
DBI::dr=3DHASH(0x403c8bd0)) undef (not=20
defined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), ReadOnly,=20
DBI::dr=3DHASH(0x403c8bd0)) undef (not=20
defined)<BR>dbih_setup_attrib(DBI::db=3DHASH(0x404c5910), Profile,=20
DBI::dr=3DHASH(0x403c8bd0)) undef (not defined)<BR>Environment =
variables:=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT face=3D"Times New Roman">...=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT=20
face=3D"Times New =
Roman">OCIHandleAlloc(4049e660,4049f948,OCI_HTYPE_ERROR,0,0)=3DINVALID_HA=
NDLE<BR>&lt;&gt;=20
DESTROY(DBI::db=3DHASH(0x40177810)) ignored for outer handle (inner=20
DBI::db=3DHASH(0x404c5910) has ref cnt<BR>1)<BR>-&gt; DESTROY for =
DBD::Oracle::db=20
(DBI::db=3DHASH(0x404c5910)~INNER) thr#40017db0<BR>DESTROY for=20
DBI::db=3DHASH(0x404c5910) ignored - handle not initialised<BR>&lt;- =
DESTROY=3D=20
undef<BR>DESTROY (dbih_clearcom) (dbh 0x404c5910, com 0x4049f8e0, imp=20
DBD::Oracle::db):<BR>FLAGS 0x102011: COMSET Warn PrintWarn=20
ShowErrorStatement<BR>PARENT DBI::dr=3DHASH(0x403c8bd0)<BR>KIDS 0 (0=20
Active)<BR>dbih_clearcom 0x404c5910 (com 0x4049f8e0, type 2) done.=20
</FONT></SPAN><BR><SPAN lang=3Den-us><FONT face=3D"Times New Roman">-- =
DBI::END ($@:=20
, $!: )<BR>-&gt; disconnect_all for DBD::Oracle::dr=20
(DBI::dr=3DHASH(0x403c8b88)~0x403c8bd0) thr#40017db0<BR>&lt;- =
disconnect_all=3D (not=20
implemented) at=20
/vol09/rgs/test/webadm/usr/local/lib/site_perl/5.8.3/PA-RISC1.1-t<BR>hrea=
d-multi/DBI.pm=20
line 717 via at ./db_copy_ban.pl line 0<BR>! &lt;&gt;=20
DESTROY(DBI::st=3DHASH(0x40425a14)) ignored for outer handle (inner=20
DBI::st=3DHASH(0x40425948) has ref cnt<BR>1)<BR>! -&gt; DESTROY for=20
DBD::Oracle::st (DBI::st=3DHASH(0x40425948)~INNER) =
thr#40017db0<BR>dbd_st_destroy=20
(OCIHandleFree skipped during global destruction)<BR>! &lt;- DESTROY=3D =
undef=20
during global destruction<BR>DESTROY (dbih_clearcom) (sth 0x40425948, =
com=20
0x4053c648, imp global destruction):<BR>FLAGS 0x182011: COMSET Warn =
PrintWarn=20
ShowErrorStatement<BR>PARENT DBI::db=3DHASH(0x404248c0)<BR>KIDS 0 (0=20
Active)<BR>NUM_OF_FIELDS 1<BR>NUM_OF_PARAMS 0<BR>! -&gt; DESTROY for=20
DBD::Oracle::db (DBI::db=3DHASH(0x404248c0)~INNER)=20
thr#40017db0<BR>OCIHandleFree(404b99f0,OCI_HTYPE_SESSION)=3DINVALID_HANDL=
E</FONT></SPAN>=20
</P><BR>
<P><B><SPAN lang=3Den-us><FONT face=3DArial color=3D#808080 =
size=3D2>Ransford=20
Hewitt</FONT></SPAN></B><SPAN lang=3Den-us></SPAN> <BR><SPAN =
lang=3Den-us><FONT=20
face=3DArial color=3D#808080 size=3D2>Technical Consultant</FONT></SPAN> =
<BR><SPAN=20
lang=3Den-us><FONT face=3DArial color=3D#808080 size=3D2>Information=20
Technology</FONT></SPAN> <BR><SPAN lang=3Den-us><B><FONT face=3DArial =
color=3D#808080=20
size=3D2>ROGERS Communication Inc.</FONT></B></SPAN> <BR><SPAN =
lang=3Den-us><FONT=20
face=3DArial color=3D#808080 size=3D1>Rogers Brampton Campus 8200 Dixie=20
Road</FONT></SPAN> <BR><SPAN lang=3Dfr><FONT face=3DArial =
color=3D#808080=20
size=3D1>Brampton, Ontario L6T 0C1</FONT></SPAN> <BR><SPAN =
lang=3Dfr><FONT=20
face=3DArial color=3D#808080 size=3D1>Tel&nbsp;&nbsp;&nbsp; (647)=20
747-7461</FONT></SPAN><SPAN lang=3Den-ca></SPAN> </P></BODY></HTML>

------_=_NextPart_001_01C93E8A.0EECE249--
--===============1727384805==
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

This e-mail (and attachment(s)) is confidential, proprietary, may be subjec=
t to copyright and legal privilege and no related rights are waived. If you=
 are not the intended recipient or its agent, any review, dissemination, di=
stribution or copying of this e-mail or any of its content is strictly proh=
ibited and may be unlawful. All messages may be monitored as permitted by a=
pplicable law and regulations and our policies to protect our business. E-m=
ails are not secure and you are deemed to have accepted any risk if you com=
municate with us by e-mail. If received in error, please notify us immediat=
ely and delete the e-mail (and any attachments) from any computer or any st=
orage medium without printing a copy.

Ce courriel (ainsi que ses pi=C3=A8ces jointes) est confidentiel, exclusif,=
 et peut faire l=E2=80=99objet de droit d=E2=80=99auteur et de privil=C3=A8=
ge juridique; aucun droit connexe n=E2=80=99est exclu. Si vous n=E2=80=99=
=C3=AAtes pas le destinataire vis=C3=A9 ou son repr=C3=A9sentant, toute =C3=
=A9tude, diffusion, transmission ou copie de ce courriel en tout ou en part=
ie, est strictement interdite et peut =C3=AAtre ill=C3=A9gale. Tous les mes=
sages peuvent =C3=AAtre surveill=C3=A9s, selon les lois et r=C3=A8glements =
applicables et les politiques de protection de notre entreprise. Les courri=
els ne sont pas s=C3=A9curis=C3=A9s et vous =C3=AAtes r=C3=A9put=C3=A9s avo=
ir accept=C3=A9 tous les risques qui y sont li=C3=A9s si vous choisissez de=
 communiquer avec nous par ce moyen. Si vous avez re=C3=A7u ce message par =
erreur, veuillez nous en aviser imm=C3=A9diatement et supprimer ce courriel=
 (ainsi que toutes ses pi=C3=A8ces jointes) de tout ordinateur ou support d=
e donn=C3=A9es sans en imprimer une copie.=20

--===============1727384805==--
0
Ransford
11/4/2008 2:31:43 PM
Reply:

Similar Artilces:

POSSIBLE BUG IN Win32 DBI INSTALL MODULE: DBI "prepare" no work FW: List 'dbi-users' closed to public posts
I have ActiveState Win32perl running. I installed fresh DBI, DBD, etc. from perl ppm.pl> prompt. But prepare( ) doesn't work (see below). perldoc DBI/DBD/DBI-FAQ are not useful since they assume it works. Any hints? Art www.mp3.com/ArthurSulit Classical Artist recently charted above Madonna -----Original Message----- From: Art Sulit [mailto:art@prs.net] Sent: Saturday, January 20, 2001 1:51 PM To: Webmaster@ActiveState.com Subject: POSSIBLE BUG IN YOUR DBI INSTALL MODULE: DBI "prepare" no work Hello, THERE IS A POSSIBLE BUG IN YOUR DBI INSTALL M...

password recover ? it sent me new user password, how can i get user password ? (not new user password )
hi password recovery sent me new user password, how can i get user password ?(not new user password) it also changed user password to new user password. i want that it should not change user password how can i do this ? SincerelyMark as me if my question or my answer can be helpful for you :) Refer to these two articles.http://msdn.microsoft.com/en-us/library/ms178335.aspxhttp://quickstarts.asp.net/QuickStartv20/aspnet/doc/ctrlref/login/passwordrecovery.aspx Hope this helps.  hi thank you for your reply :) i have deleted enablePasswordReset="t...

New User DBI Question/Problem
When I try to run a script I get an error that is listed below. This script works on another server. I have DBI 1-14 loaded BUT the mysql.pm file that the error is moaning about only appears to be in the following directories. Any help would be appriciated. /root/.cpan/build/Msql-Mysql-modules-1.2215/mysql/lib/DBD/mysql.pm /root/.cpan/Bundle/DBD/mysql.pm /usr/local/lib/perl5/site_perl/5.6.0/i586-linux/Bundle/DBD/mysql.pm /usr/local/lib/perl5/site_perl/5.6.0/i586-linux/DBD/mysql.pm /usr/local/Msql-Mysql-modules-1.2214/mysql/lib/DBD/mysql.pm /usr/local/Msql-Mysql-modules-1.2214/my...

DBI::Pg Question
I am new at using DBI. I would like to have a form that order data can be = entered in, and when submitted the user will be given a reference number = from the database. The reference number is set-up as a sequence in the = PostgreSQL database. How can I pull this field after the data is = submitted? Any help would greatly be appreciated. Thanks, Jacob jpetrie@kitsapcu.org=20 On 14 May 2001, at 15:00, JACOB PETRIE wrote: > I am new at using DBI. I would like to have a form that order data > can be entered in, and when submitted the user will be given a > ref...

DBI Step By Step Tutorial for New User
Hello - I have recently joined this list and have fairly extensive experience with Perl. I am looking for a good beginners step by step tutorial to create a simple database application using DBI. Something along the lines of an address book using DBD::CSV with a shell or CGI interface to that information. Thanks, Kevin -- Kevin Diffily InterNetWorkingSolutions Enterprise Class Solutions for All Enterprises PO Box 152, Cabot, VT 05647 USA VOICE: 1.866.inetwsnet (Toll Free), 802.563.3...

New users/External users
We are merging with another organization. I need to create some new users to our GW system. They will be accessing these accounts temporarily through GW WebAccess. This will be until they get there offices and servers up an running. We want to be able to create these users as normal and then switch to external users. Can I do this? What problems may I encounter? Thanks in advance for your help. Bob Braun, > We are merging with another organization. I need to create some new > users to our GW system. They will be accessing these accounts > temporarily throug...

Custom Create New User automatically logs-in New User
Hi. I've written a custom Create New User form that allows Admins to add new Users. The problem is it also logs-in the new User.  I realize the CreateUserWizard has a property (LoginCreatedUser); however, I'm not using the wizard. Can't find a way to programmatically NOT login a new User.  Does anyone know how to turn this off?  Here's my code: MembershipUser newUser = Membership.CreateUser(this.txtUserName.Text, this.txtPassword.Text, this.txtEmail.Text, this.txtQuestion.Text, this.txtAnswer.Text, false, out status); Thank you. -Nicole are you using the production ...

Retrieving the new user ID after details have been created with Create New User Wizard
I've got a 'create new user' wizard set up with several additional wizard pages containing extra information. This information will be stored into the database when the CreatedUser event fires. However, I need to obtain the user ID of the newly created user. How can this be achieved? Assuming the user id is an Identity field that is generated in SQL, I would return the user id as an output parameter in your stored procedure and reference that parameter in your ASP.NET code.   I believe the code to get the identity value of a newly added record is: SELECT @myoutputp...

Old User Archive to New User
Hello, Well to make a long story short our GW was hit by lightning and wala had to rebuild. Now I installed the latest and greatest GW 7.0.2 HP I think that is it. Now the problem I have is when I setup the first email server a few years ago I didn't write down any of the settings (I know document everything). Anyway.... The problem now is when you go into groupwise and look at the user name and how groupwise sees it the name comes up as userID.sd60.shelley@sd60.k12.id.us, the old one was userID.sd60.sd60@sd60 etc... When I setup the new box I was one of the first...

New User
I have created a table to hold a userID, firstName, lastName, email, username and password.I currently have my code to enter in the values from text boxes except for the userID.             SqlDataSource1.InsertParameters("firstName").DefaultValue = txtFirstName.Text            SqlDataSource1.InsertParameters("lastName").DefaultValue = txtLastName.Text            SqlDataSource1.InsertParameters("email").DefaultValue = txtEma...

new to DBI/Trying to setup DBI
Here is what I wish to do with the DBI: I want to get my RedHat 6.1 computer to communicate with my Personal Oracle 7.3 database on my Windows 95 machine. I am having a great difficultly trying to figure out all the DBI/DBD stuff. I installed the lastest basic DBI package on Linux and I am getting lost trying to figure out what else I need , whether to go with odbc or the Oracle DBD and how to set all the other stuff up. I would greatly appreciate help on this. Michael Watts __________________________________________________ Do You Yahoo!? Get personalized email...

spammer on dbi-users
Who's ever the dbi-users group monitor, please shut this annoying person off: Kenneth Webber <mp34ken@hotmail.com> They'll only use another address if you do. There are a lot of these originating from Hotmail accounts at the moment. -----Original Message----- From: jeff [mailto:jeff@roqc.no] Sent: 25 March 2010 16:57 To: dbi-users@perl.org Subject: spammer on dbi-users Who's ever the dbi-users group monitor, please shut this annoying person off: Kenneth Webber <mp34ken@hotmail.com> .. This message is intended only for the use of the p...

dbi-users archive?
Is this list archived? The archive at http://archive.develooper.com/dbi-users@perl.org/ looks like it only has a few days' worth or messages. -- Todd Federman gdulli@zdnetonebox.com ___________________________________________________________________ To get your own FREE ZDNet Onebox - FREE voicemail, email, and fax, all in one place - sign up today at http://www.zdnetonebox.com There are quite a few archives, this one being one of many and who ever keeps it up decided to only keep three days of mails, doesn't mean that all are like that. Try this site http:/...

DBI/Solaris User
Hello Sir, My name is Shamaal Blaise. I wanted to know if the Perl module had been tested on Sun/Solaris system??? And if so, where here any problems??? I am currently trying to do so on that type of system. I had noticed that there was not any mention of it on the page. I would greatly appreciate your time taken towards this concern of mine. Have a blessed day. Shamaal Blaise -- System Administrator ************************************************************************ This e-mail and any of its attachments may contain Exelon Corporation proprietary information, which ...

Web resources about - New DBI user - perl.dbi.users

User:Ram-Man - Wikipedia, the free encyclopedia
This user is interested in many things: preaching , aquariums , woodworking , carpentry , cooking , gardening , computers , and chess . The user ...

Unity (user interface) - Wikipedia, the free encyclopedia
Unity 5.12, with the launcher and the dash displayed, running on Ubuntu 12.04 . Unity is a shell interface for the GNOME desktop environment ...

NT diesel users still gouged
TERRITORIANS are still &shy;getting gouged at the bowser despite diesel prices dropping more than 2.5&cent; per litre &shy;yesterday.

WhatsApp is now free for all users forever, dropping subscription fees entirely in favor of other revenue ...
... shift in its business model. The popular chat client is going completely free . Facebook-owned WhatsApp used to run on a trial model: users ...

Netflix won’t keep letting proxy users access its catalog
... availability in more than 190 countries. Unfortunately, not all of Netflixs content is available in every country. Because of this, many users ...

Rogue dentist who allegedly hit patients now targets anonymous YouTube user
A well-known First Amendment lawyer has leapt to the defense of an anonymous YouTube user who re-published a Georgia TV station’s 2009 news story ...

Microsoft offers free Office 365 subscription to Lumia 950, Lumia 950 XL users
... giant has just announced that it is now offering a free, one-year subscription to Office 365 Personal to Lumia 950 and Lumia 950 XL users. ...

Netflix says the party’s over, plans to start cracking down on proxy users
... the library of programming available to Netflix subscribers varies wildly from country to country. As a result, many enterprising users employ ...

App Limits Users’ Oversharing
... at Binghamton University in upstate New York, and a team of researchers have created a smartphone app that is designed to hide the user’s location. ...

What Is UX? Who Owns User Experience Optimization? What You Need to Know About SEO & User Satisfaction ...
What Is UX? Who Owns User Experience Optimization? What You Need to Know About SEO & User Satisfaction from #SEOchat was originally published ...

Resources last updated: 1/19/2016 8:02:56 AM