Hello community, here is the log from the commit of package perl-DBD-ODBC for openSUSE:Factory checked in at Tue May 19 02:28:01 CEST 2009. -------- --- perl-DBD-ODBC/perl-DBD-ODBC.changes 2009-04-28 13:53:09.000000000 +0200 +++ perl-DBD-ODBC/perl-DBD-ODBC.changes 2009-05-18 17:55:10.000000000 +0200 @@ -1,0 +2,6 @@ +Mon May 18 17:13:02 CEST 2009 - anicka@suse.cz + +- update to 1.21 + * bugfixes, documentation fixes + +------------------------------------------------------------------- calling whatdependson for head-i586 Old: ---- DBD-ODBC-1.20.tar.bz2 perl-DBD-ODBC-1.20-Makefile.diff New: ---- DBD-ODBC-1.21.tar.bz2 perl-DBD-ODBC-1.21-Makefile.diff ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-DBD-ODBC.spec ++++++ --- /var/tmp/diff_new_pack.Oj2114/_old 2009-05-19 02:25:10.000000000 +0200 +++ /var/tmp/diff_new_pack.Oj2114/_new 2009-05-19 02:25:10.000000000 +0200 @@ -1,5 +1,5 @@ # -# spec file for package perl-DBD-ODBC (Version 1.20) +# spec file for package perl-DBD-ODBC (Version 1.21) # # Copyright (c) 2009 SUSE LINUX Products GmbH, Nuernberg, Germany. # @@ -27,7 +27,7 @@ Requires: perl-DBI unixODBC Requires: perl = %{perl_version} Summary: Perl DBD module for interfacing with ODBC databases -Version: 1.20 +Version: 1.21 Release: 1 Source: DBD-ODBC-%{version}.tar.bz2 Patch: %{name}-%{version}-Makefile.diff @@ -76,6 +76,9 @@ /var/adm/perl-modules/%{name} %changelog +* Mon May 18 2009 anicka@suse.cz +- update to 1.21 + * bugfixes, documentation fixes * Tue Apr 28 2009 anicka@suse.cz - update to 1.20 * bugfixes, test fixes ++++++ DBD-ODBC-1.20.tar.bz2 -> DBD-ODBC-1.21.tar.bz2 ++++++ diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/Changes new/DBD-ODBC-1.21/Changes --- old/DBD-ODBC-1.20/Changes 2009-04-20 17:21:34.000000000 +0200 +++ new/DBD-ODBC-1.21/Changes 2009-04-27 18:19:34.000000000 +0200 @@ -43,7 +43,20 @@ =head1 CHANGES -=head2 Changes in DBD::ODBC 1.20 April 7, 2009 +=head2 Changes in DBD::ODBC 1.21 April 27, 2009 + +Change 02simple test to output Perl, DBI and DBD::ODBC versions. + +Fixed bug where if ODBC driver supports SQLDescribeParam and it +succeeds for a parameterised query but you override the parameter +type, DBD::ODBC was still using the size returned by +SQLDescribeParam. Thanks to Brian Becker for finding, diagnosing and +fixing this issue. + +Added FAQ entry about SQL Server and calling procedures with named +parameters out of order. + +=head2 Changes in DBD::ODBC 1.20 April 20, 2009 Fix bug in handling of SQL_WLONGVARCHAR when not built with unicode support. The column was not identified as a long column and hence the diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/dbdimp.c new/DBD-ODBC-1.21/dbdimp.c --- old/DBD-ODBC-1.20/dbdimp.c 2009-04-20 17:21:34.000000000 +0200 +++ new/DBD-ODBC-1.21/dbdimp.c 2009-04-27 17:45:48.000000000 +0200 @@ -2290,7 +2290,7 @@ /* Bind output column variables */ if (DBIc_TRACE(imp_sth, 0, 0, 4)) PerlIO_printf(DBIc_LOGPIO(imp_dbh), - "Bind %d: type = %s(%d), buf=%p, buflen=%ld\n", + " Bind %d: type = %s(%d), buf=%p, buflen=%ld\n", i+1, S_SqlTypeToString(fbh->ftype), fbh->ftype, fbh->data, fbh->ColDisplaySize); rc = SQLBindCol(imp_sth->hstmt, @@ -3209,7 +3209,8 @@ } if ((phs->describe_param_called == 1) && - (SQL_SUCCEEDED(phs->describe_param_status))) { + (SQL_SUCCEEDED(phs->describe_param_status)) && + (phs->requested_type == 0)) { /* type not overriden */ default_column_size = phs->param_size; } else { if ((phs->sql_type == SQL_VARCHAR) && !phs->is_inout) { diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/FAQ new/DBD-ODBC-1.21/FAQ --- old/DBD-ODBC-1.20/FAQ 2008-12-16 10:48:10.000000000 +0100 +++ new/DBD-ODBC-1.21/FAQ 2009-04-27 18:08:33.000000000 +0200 @@ -524,6 +524,36 @@ error e.g., if you attempt to bind a non-datetime string to a datetime column or a non-numeric string to a numeric column. +=head2 Why do I get strange results with SQL Server and named parameters? + +If you are using a MS SQL Server driver and named parameters to +procedures be very careful to use then in the sasme order they are +defined in the procedure. i.e., if you have a procedure like this: + + create procedure test + @param1 varchar(50), + @param2 smallint + as + begin + .. + end + +then ensure if you call it using named parameters you specify them in +the same order they are declared: + + exec test @param1=?,@param2=? + +and not + + exec test @param2=?,@param1=? + +The reason for this is that all SQL Server drivers we have seen +describe procedures parameters in the order they are declared and +ignore the order they are used in the SQL. If you specify them out of +order DBD::ODBC will get details on p1 which are really for p2 +etc. This can lead to data truncation errors and all sort of other +problems it is impossible for DBD::ODBC spot or workaround. + =head1 AUTHOR Parts of this document were written by Tim Bunce, diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/MANIFEST new/DBD-ODBC-1.21/MANIFEST --- old/DBD-ODBC-1.20/MANIFEST 2009-03-31 17:24:04.000000000 +0200 +++ new/DBD-ODBC-1.21/MANIFEST 2009-04-27 18:22:14.000000000 +0200 @@ -10,6 +10,7 @@ Makefile.PL MANIFEST This list of files META.yml +test_results.txt examples/cancel.pl examples/coltest.pl examples/contest.pl diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/META.yml new/DBD-ODBC-1.21/META.yml --- old/DBD-ODBC-1.20/META.yml 2009-04-07 10:54:21.000000000 +0200 +++ new/DBD-ODBC-1.21/META.yml 2009-04-27 18:20:02.000000000 +0200 @@ -1,7 +1,7 @@ --- #YAML:1.0 name: DBD-ODBC abstract: ODBC DBD for Perl DBI -version: 1.20 +version: 1.21 version_from: ODBC.pm author: - Tim Bunce diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/ODBC.pm new/DBD-ODBC-1.21/ODBC.pm --- old/DBD-ODBC-1.20/ODBC.pm 2009-04-07 11:04:11.000000000 +0200 +++ new/DBD-ODBC-1.21/ODBC.pm 2009-04-27 18:19:53.000000000 +0200 @@ -12,7 +12,7 @@ require 5.006; -$DBD::ODBC::VERSION = '1.20'; +$DBD::ODBC::VERSION = '1.21'; { package DBD::ODBC; diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/t/02simple.t new/DBD-ODBC-1.21/t/02simple.t --- old/DBD-ODBC-1.20/t/02simple.t 2009-04-02 12:54:58.000000000 +0200 +++ new/DBD-ODBC-1.21/t/02simple.t 2009-04-27 18:21:07.000000000 +0200 @@ -3,6 +3,7 @@ use Test::More; use strict; +use Config; $| = 1; @@ -38,6 +39,10 @@ # Output DBMS which is useful when debugging cpan-testers output { diag("\n"); + diag("Perl $Config{PERL_REVISION}.$Config{PERL_SUBVERSION}.$Config{PERL_VERSION}\n"); + diag("osname=$Config{osname}, osvers=$Config{osvers}, archname=$Config{archname}\n"); + diag("Using DBI $DBI::VERSION\n"); + diag("Using DBD::ODBC $DBD::ODBC::VERSION\n"); diag("Using DBMS_NAME " . DBI::neat($dbh->get_info(17)) . "\n"); diag("Using DBMS_VER " . DBI::neat($dbh->get_info(18)) . "\n"); $driver_name = DBI::neat($dbh->get_info(6)); diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/t/12blob.t new/DBD-ODBC-1.21/t/12blob.t --- old/DBD-ODBC-1.20/t/12blob.t 2009-04-20 17:21:34.000000000 +0200 +++ new/DBD-ODBC-1.21/t/12blob.t 2009-04-21 15:22:07.000000000 +0200 @@ -11,7 +11,7 @@ my $has_test_nowarnings = 1; eval "require Test::NoWarnings"; $has_test_nowarnings = undef if $@; -my $tests = 21; +my $tests = 24; $tests += 1 if $has_test_nowarnings; plan tests => $tests; @@ -141,7 +141,12 @@ diag($ev) if $ev; ok(!$ev, 'select test data back'); - is($row->[0]->[0], $value, 'data read back compares'); + my $rc = is(length($row->[0]->[0]), length($value), + "sizes of insert/select compare"); + SKIP: { + skip "sizes do not match", 1 unless $rc; + is($row->[0]->[0], $value, 'data read back compares'); + }; return; } diff -urN --exclude=CVS --exclude=.cvsignore --exclude=.svn --exclude=.svnignore old/DBD-ODBC-1.20/test_results.txt new/DBD-ODBC-1.21/test_results.txt --- old/DBD-ODBC-1.20/test_results.txt 1970-01-01 01:00:00.000000000 +0100 +++ new/DBD-ODBC-1.21/test_results.txt 2009-04-27 18:21:38.000000000 +0200 @@ -0,0 +1,51 @@ +====================================================================== +t/01base................ok +t/02simple..............ok 1/65# +# Perl v5.9.5 built for MSWin32-x64-multi-thread +# Using DBI 1.59 +# Using DBD::ODBC 1.20 +# Using DBMS_NAME 'Microsoft SQL Server' +# Using DBMS_VER '09.00.3042' +# Using DRIVER_NAME 'sqlncli10.dll' +# Using DRIVER_VER '10.00.1049' +# odbc_has_unicode 1 +t/02simple..............ok +t/03dbatt...............ok 1/29# +# N.B. Some drivers (postgres/cache) may return ODBC 2.0 column names for the SQ +LTables result-set e.g. TABLE_QUALIFIER instead of TABLE_CAT +t/03dbatt...............ok +t/05meth................ok +t/07bind................ok +t/08bind2...............ok +t/09multi...............ok +t/10handler.............ok +t/12blob................ok +t/20SqlServer...........ok +t/30Oracle..............ok + 3/5 skipped: various reasons +t/40UnicodeRoundTrip....ok +t/41Unicode.............ok +t/pod-coverage..........ok 1/1# Test::Pod::Coverage 1.04 required for testing PO +D coverage +t/pod-coverage..........ok +t/pod...................ok + 3/3 skipped: various reasons +t/rt_38977..............ok +t/rt_39841..............ok 1/28# [Microsoft][SQL Server Native Client 10.0]Inval +id character value for cast specification (SQL-22018) +# 22018 +# +# NOTE: Your SQL Server ODBC driver has a bug which can describe parameters +# in SQL using sub selects incorrectly. In this case a VARCHAR(8) parameter +# is described as an INTEGER +# +# Checking you can work around bug in SQL Server ODBC Driver +# Yes you can +t/rt_39841..............ok + 5/28 skipped: various reasons +t/rt_39897..............ok +t/rt_43384..............ok + 7/9 skipped: various reasons +All tests successful, 18 subtests skipped. +Files=19, Tests=427, 11 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU) +====================================================================== ++++++ perl-DBD-ODBC-1.20-Makefile.diff -> perl-DBD-ODBC-1.21-Makefile.diff ++++++ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Remember to have fun... -- To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org For additional commands, e-mail: opensuse-commit+help@opensuse.org