[Salvador-pm] Erro ODBC DB2 Perl

Domingo Agosto 23 08:25:48 PDT 2015

Joenio, Boa Tarde!

Fora do Perl ele funciona normalmente. Fiz o teste com o comando *isql *e
consegui realizar a conexão e uma consulta.

Em 22 de agosto de 2015 15:02, Joenio Costa <joenio em gmail.com> escreveu:

> Allisson,
>
> Você consegue conectar sem ODBC?
>
> 2015-08-21 19:17 GMT-03:00 breno <breno em rio.pm.org>:
>
>> Ixe... temos que descobrir que mensagem está escondida aí. Já leu o help
>> da IBM? http://www-01.ibm.com/support/docview.wss?rs=71&uid=swg21297335
>>
>> Eles falam sobre versões  9 fp2 ou superior do IBM DB2 client, e de DBI
>> 1.53 ou superior. O sistema tem isso? Eles falam também sobre a variável de
>> ambiente DB2LIB. O código de exemplo deles (
>> http://www-01.ibm.com/support/knowledgecenter/SSEPGG_9.5.0/com.ibm.db2.luw.apdv.perl.doc/doc/c0006696.html)
>> é bem parecido com o seu.
>>
>> Desculpe, fora isso não sei muito o que fazer pra te ajudar :(
>> Se tiver alguma pista, avise!
>>
>> On Fri, Aug 21, 2015 at 7:08 PM Allisson Andrade Lima <
>> allissonlima1 em gmail.com> wrote:
>>
>>> Independente do encoding do terminal... eu teste com utf8 e latin1,
>>> entretanto quando coloco no Perl "use utf8" ele retorna o seguinte:
>>>
>>> [image: Imagem inline 1]
>>>
>>> Em 21 de agosto de 2015 19:03, breno <breno em rio.pm.org> escreveu:
>>>
>>>> Qual o encoding do seu terminal? Aparece assim em utf-8? E em latin1?
>>>>
>>>> On Fri, Aug 21, 2015 at 7:01 PM Allisson Andrade Lima <
>>>> allissonlima1 em gmail.com> wrote:
>>>>
>>>>> Ele aparece exatamente assim.
>>>>>
>>>>> Em 21 de agosto de 2015 18:57, breno <breno em rio.pm.org> escreveu:
>>>>>
>>>>>> 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
>>>>>>>
>>>>>>
>>>>>> _______________________________________________
>>>>>> 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
>>>>
>>>>
>>> _______________________________________________
>>> 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
>>
>>
>
>
> --
> Joenio Costa
> http://joenio.me
>
> _______________________________________________
> 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/20150823/07669162/attachment-0001.html>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: image.png
Tipo: image/png
Tamanho: 2732 bytes
Descrição: não disponível
URL: <http://mail.pm.org/pipermail/salvador-pm/attachments/20150823/07669162/attachment-0002.png>
-------------- 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/20150823/07669162/attachment-0003.png>