Dercide Alvarez

Boa tarde, É mais um comentário do que um problema. Estou gerando cobrança do Banco do Brasil, e na hora de gerar o nosso numero o ACBrBoleto, gera assim : AcbrBoleto.Banco.MontarCampoNossoNumero 24175120000002689 onde 2417512 é o convenio, e o resto o sequencial nosso numero, formando assim o nosso numero. Mas na hora de leitura, eu pego o nosso numero assim : AcbrBoleto.ListadeBoletos.Objects.NossoNumero, e ele me retorno 0000002689. Nesse caso, no meu banco de dados esta gravado o nossonumero completo, ai eu monto o nosso numero com o convenio para poder fazer a busca no banco de dados. No segmento T do retorno, o nosso numero começa na posição 38 até 54, porém é lido a partir da 45. Como disse, é mais um comentário para ficarem atentos. Dercide.

Esse problema tinha acontecido comigo, mas depois de umas atualizações não ocorreu mais. Acredito que teus fontes estavam desatualizados. Dercide.

Italo, Eu ia fazer isso, mas não sabia se ia causar algum problema, estava sem tempo e precisava resolver. Beleza então. Abraços.

Boa tarde Italo, Passei pela mesma situação do Everson, preciso pegar o retorno da NfseSubstituidora, mas pra o BHISS. Mas como esta na pnfsNFSeR.pas esta pegando apenas o retorna quando o provedor for Betha. Fiz uma alteração incluindo o BHISS no retorno. Acredito que tenha vários outros provedores que necessitem dessa informação, mas inclui apenas o BHISS. Alterei apenas a linha 970. De if (FProvedor = proBetha) then Para if (FProvedor = proBetha) or (FProvedor = proBHISS) then Segue o arquivo em anexo. Dercide. pnfsNFSeR.pas

Boa tarde Italo, Mais uma vez, obrigado pelo retorno. Funcionou pefeitamente. Abraços. Dercide.

Boa noite Italo, Estou enviando e gerando NFSe sem problema com o BHISS. Estou com problema no ConsultarNFSe. Antes quando eu executava a consulta funcionava perfeitamente, e conseguia pegar o resultado da consulta. Esta me retornando ERRO 78, Nfse não existente na base de dados. Passo os seguintes paramentros ( Data Inicio, DataFinal, Numero da NFse, 1(pagina), Cnpj, IM) Antes não tinha parametro pagina, o que seria ele ? Já fiz vários testes e não consigo pegar o retorno. Preciso fazer essa consulta, pois quando é feita uma substituição, sou obrigado a consultar a NFSe substituida para atualizar a situação e toda a base de dados, pois o BHISS não possui a opção de substituição via WebService para cidade de Porto Alegre. Dercide.

Boa tarde, Com a versão compilada com a Trunk2, esta ocorrendo um erro ao abrir nossa aplicação. o aplicativo não pode ser inicializado corretamente 0xc000022 Mas isso esta ocorrendo apenas em um cliente, e em duas máquinas (windows 7 64 bits). Com a versão compilada com a Trunk, o erro não ocorre. Já tentamos de tudo, porém o erro persiste. Já tentei trocar os arquivos msvcr100.dll e msvcp100.dll, pois vi que poderiam isso o problema, mas sem sucesso. De alguém já passou por isso, e puder dar uma luz, agradeço. Dercide.

Boa tarde Jairo, Via Webservice do municipio de Porto Alegre não esta disponivel essa opção, pode verificar no manual. Constantemente temos feito consulta com o BHISS, mas por enquanto não esta disponivel. Dercide.

Italo, Atualizei os fontes 15/01 e recompilei, agora enviou o RPS e gerou a NFSe. Era algum problema na atualização. Dercide.

Boa tarde, Alguém chegou a analisar essa questão que passei ? Dercide.

Bom dia Italo, Tenho atualizado constantemente os fontes. Executo o apagaacbr.bat e depois o instala. Vou ver se tem novas atualizações, e testarei novamente. Mas quando eu já tinha enviado várias notas para o BHISS para efeito de testes, e tenho os RPS. Depois de uma atualização, que ocorreu esse problema. Vou atualizar e testar novamente, e postarei um retorno. Dercide.

Hoje apos atualizar os fontes, fui tentar enviar para o BHISS, já deu erro. Element '{http://www.abrasf.org.br/nfse.xsd}CpfCnpj' is unexpected according to content model of parent element '{http://www.abrasf.org.br/nfse.xsd}Prestador'. Expecting: {http://www.abrasf.org.br/nfse.xsd}Cnpj. No RPS que validei ontem não tinha essa tag. Ontem (Validou) -<Prestador> <Cnpj>99999999999</Cnpj> Hoje ( ERRO ) -<Prestador> -<CpfCnpj> <Cnpj>99999999999</Cnpj> Dercide.

Boa Tarde, Na versão anterior do componente eram geradas as pastas mensais, exemplo 201601, e dentro as pastas : Ger, NFSe, Rps. Na versão da Trunk2, agora dentro da pasta mensal, são gerados apenas duas pastas : Notas e Recibos. Estou usando a seguinte configuração : ACBrNFSe1.Configuracoes.Arquivos.PathGer := FPastaArquivosXML + Trim(CodSEmpresa); ACBrNFSe1.Configuracoes.Arquivos.PathRPS := FPastaArquivosXML + Trim(CodSEmpresa); ACBrNFSe1.Configuracoes.Arquivos.PathNFSe := FPastaArquivosXML + Trim(CodSEmpresa); ACBrNFSe1.Configuracoes.Arquivos.Salvar := True; O sistema gera as pasta mensal 201601 e dentro as pastas Notas e Recibos. Nas pasta Recibos, ficam salvo somente os RPS. Na pasta Notas ficam salvos as NFSe e todos os outros arquivos gerados. Tem alguma configuração que eu possa definir, para os arquivos serem gerados separados em outra pasta ? Se alguém já passou por isso, ou sabe como configurar, agradeço a ajuda. Dercide.

Consegui fazer um ajuste na ACBrNFSeDANFSeRLClass.Pas Mudei a linha 229 NomeArq := PathWithDelim(Self.PathPDF)+NomeArq+'.pdf'; Para NomeArq := PathWithDelim(Self.PathPDF)+NomeArq+Trim(NFSe.IdentificacaoRps.Serie)+'-nfse.pdf'; Foi mais fácil alterar aqui na geração do PDF em Fortes, pois a função function NotaFiscal.GetNumID é usada também na geração do nome do RPS, ai poderia dar alguma confusão. Estou postando o fonte, vejam se podem ou não atualizar o SVN. Dercide. ACBrNFSeDANFSeRLClass.pas

Tem mais um coisa. Gera o PDF ==> 201600000000003.PDF E tenta anexar 2016000000000031-nfse.PDF Vou ver agora onde esta o problema. Dercide.

Estou testando o email com o provedor HBISS, Porto Alegre. O que esta acontecendo é o seguinte : A função que envia o email, gera o PDF ==> 201600000000003.PDF Mas a função que gera o nome do anexo => function NotaFiscal.GetNumID Result := NumDoc + NFSe.IdentificacaoRps.Serie; Ela adiciona a serie ao nome do anexo, com isso o componente não acha o PDF gerado => 2016000000000031.PDF Dercide.

Olá, Hoje 13/01 atualizei os fontes e os .INI dos provedores, e realizei os testes. 1) BHISS => Consegui enviar o RPS e gerou a NFS-e 2) WebISS => Consegui enviar o RPS e gerou a NFS-e Porém tive que ajustar ACBrNFSe1.Configuracoes.WebServices.IntervaloTentativas := 5000; Pois antes estava em 1000 e recebi uma advertencia do Webservice de sobrecarga. 3) Betha => Não consegui enviar, da erro 9999 Desconhecido. OBS : Isso já acontecia na Trunk e modo de homologação, porém em produção ia normalmente. Vou tentar em produção depois posto o resultado. Dercide.

Juliomar, Os arquivos ficaram corretos, conforme o lay-out. Nos ultimos meses, eu gerava e alterava manualmente os TXT, e agora foram gerados sem necessidades de ajustes manual. Não cheguei a verificar outros tipos de registros que utilizam a mesma função, apenas ajustei os que necessito. D600, D601 e D605. Pode ser que algum outro registro que utilize a função LFILL para campos numéricos ocorra o mesmo problema. Dercide.

Olá a todos, No caso da NF-e e NFSe, a configuração da lib permite escolher entre : libCapicom, libCapicomDelphiSoap, libOpenSSL A NF-e esta funcionando 100% sem problemas usando a libCapicom. A NFS-e não consegui enviar nenhuma até o momento, testando Betha, BHISS e WebISS. Tenho visto comentarios, de mudar de libCapicom para libCapicomDelphiSoap. Alguem saberia explicar a diferença entre uma e outra, e em que situação cada uma se aplica ? Dercide.

Isaque, Analisei o fonte que você me passou ACBrTXTClass.PAS, e testei. Eu já tinha feito essa tentativa de mudar a função de int64 para integer, porém não deu certo. Dercide.

Boa tarde Isaque, Somente hoje vi o teu post com o anexo. Mas hoje 12/01 atualizei os fontes da trunck2 e o erro persiste. Eu fiz um ajustes na ACBrEPCBloco_D_Class.Pas o qual resolveu o problema. Estou anexando para você analisar se é viavel ou não. Como disse, o problema é na chamada da função LFILL, onde na D600 os campos COD_MUN e QTD_CONS chamam a função que trata data. E nas D601 e D605 nos campos COD_CLASS. A unica coisa que fiz, foi neste campos incluir o parametro do tamanho do campo. No QTD_CONS, coloquei 10, pois é numerico e não possui tamanho fixo, os outros estão de acordo com o lay-out. As minhas alterações foram nas seguintes linhas : 1259 ==> LFill( COD_MUN, 7 ) 1263 ==> LFill( QTD_CONS, 10 ) 1302 ==> LFill( COD_CLASS, 4 ) 1330 ==> LFill( COD_CLASS, 4 ) Aguardo um retorno. Dercide. ACBrEPCBloco_D_Class.pas

Tem um erro no ACBrNFSeWebServices.pas na linha 1093. Falta o ";" no final. xPrefixo := 'ds1:'; Dercide.

Everson, Nesse caso da Betha, estou usando a base de dados que o meu cliente já usa em produção, enviando NFSe (versão trunk). E que esta funcionando perfeitamente. Mas o ambiente de homologação é que esta causando problema. Dercide. Atualizei os fontes agora, e deu erro ao compilar. C:\ACBr\Fontes\ACBrDFe\ACBrNFSe\ACBrNFSe.pas(49) Fatal: Could not compile used unit '..\..\..\..\Fontes\ACBrDFe\ACBrNFSe\ACBrNFSeWebServices.pas' Compilation failure Erro ao compilar o pacote "ACBr_NFSe.dpk". Dercide.

Everson, Quanto ao Betha, acho que a versão Trunk ja não conseguiamos enviar em homologação. Quanto ao CNPJ, estão somente os numeros. Estou vendo junto a prefeitura quanto ao cadastramento do CNPJ para webservice em homologação, para poder sanar essa duvida, se é erro de cadastramento ou do software. Dercide.

Everson/Ala Estou fazendo testes com os provedores : Betha, BHISS e WebIss 1) Betha E45 CNPJ não encontrado na base de dados 2) BHISS "A string literal was expected, but no opening quote character was found" 3) WebIss Em todos os casos, tenho certificados validos instalados. Dercide.