[Salvador-pm] Erro ODBC DB2 Perl

[breno]

Esse "▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒" é legível pra vc de alguma forma?

On Fri, Aug 21, 2015 at 12:18 AM Allisson Andrade Lima <
allissonlima1 em gmail.com> wrote:

> Breno, Boa Noite!
>
> Segue código abaixo:
>
> --------8<--------
>
> #!/usr/bin/perl
> use strict;
> use warnings;
> use 5.010;
> use DBI;
> use DBD::ODBC;
>
> my $databaseTcf = 'Coop_tcf';
> my $usr = 'usr111';
> my $pwd = '123';
>
> my $dbi = "dbi:ODBC:DSN=$databaseTcf";
>
> my $sqlTcf = "call COOPCONS.SPU_CLI_TIPOEMPRESA";
>
> my $dbConDb2 = DBI->connect("$dbi","$usr","$pwd") or die "Erro na
> Conexao:" . $DBI::errstr . "\n";
>
> my $dbResultDb2 = $dbConDb2->prepare($sqlTcf) or warn "Erro Prepare:
> $DBI::errstr\n";
> $dbResultDb2->execute;
> my $tCampos = $dbResultDb2->{NUM_OF_FIELDS};
>
> print $tCampos;
>
> --------->8-------------
>
> O erro apresentado é exatamente o que segue:
>
> DBI connect('DSN=Coop_tcf','usr111',...) failed: ▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒ (SQL-)
> at ./teste2.pl line 16.
> Erro na Conexao:▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒▒ (SQL-)
>
> Em 20 de agosto de 2015 19:52, breno <breno em rio.pm.org> escreveu:
>
>> Oi Allisson,
>>
>> pode compartilhar o código que está usando para testar? Imagino que seja
>> algo como:
>>
>> --------8<--------
>> use strict;
>> use warnings;
>> use DBI;
>> use DBD::DB2::Constants;
>> use DBD::DB2;
>>
>> $dbh = DBI->connect("dbi:DB2:db_name", $username, $password)
>>     or die $DBI::errstr;
>>
>> if ($dbh->{Active}) {
>>     print "conectado!\n";
>> } else {
>>     print "desconectado\n";
>> }
>> --------->8-------------
>>
>> Qual a mensagem de erro?
>>
>> []s
>>
>> -b
>>
>> On Thu, Aug 20, 2015 at 5:07 PM Allisson Andrade Lima <
>> allissonlima1 em gmail.com> wrote:
>>
>>> Caros Colegas,
>>>
>>> Estou enfrentando um problema ao conectar a um banco DB2 via ODBC, onde
>>> me retorna o erro abaixo:
>>>
>>> [image: image.png]
>>>
>>> Já tentei diversas coisas como codificação, módulos do Perl, versão...
>>> Pelo comando isql funciona normalmente.
>>>
>>> Peço  a ajuda de vocês neste caso.
>>>
>>> Atenciosamente,
>>>
>>> Allisson Lima
>>> _______________________________________________
>>> Salvador-pm mailing list
>>> Salvador-pm em pm.org
>>> http://mail.pm.org/mailman/listinfo/salvador-pm
>>>
>>
>> _______________________________________________
>> Salvador-pm mailing list
>> Salvador-pm em pm.org
>> http://mail.pm.org/mailman/listinfo/salvador-pm
>>
>>
> _______________________________________________
> Salvador-pm mailing list
> Salvador-pm em pm.org
> http://mail.pm.org/mailman/listinfo/salvador-pm
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/salvador-pm/attachments/20150821/4094e19d/attachment.html>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: image.png
Tipo: image/png
Tamanho: 3274 bytes
Descrição: não disponível
URL: <http://mail.pm.org/pipermail/salvador-pm/attachments/20150821/4094e19d/attachment.png>