luciano_f

Olá boa tarde como esse topico " foi trancando estou criando outro topico pois atualizei meu ACBR semana passada e começou a dar esse problema de erro de "Schema Inválido" o problema só acontece na rede quando o ACBR tem que acessar um caminho do tipo "\\Server\Sistema" isso usando "XMLSignLib = xsLibXML2" Colocar os "Schemas" nas estações não é uma opção pois em vários clientes não tenho acesso a essas maquinas, assim os Schemas ficam apenas no servidor. Esse problema não é o meu sistema pois no Servidor funciona perfeitamente e nas estações não, o ACBrDemo dá o mesmo problema se trabalhar com os Schemas de outra maquina no formato "\\Server\Sistema"

Interessante com o caminho do Certificado não estava funcionando agora com o certificado salvo no Banco de dados consegui fazer uma combinação funcionar.

Pessoal Atualizei o ACBr hoje. Windows 10 64 Bits atualizado e Windows 7 Eu já fiz varias configurações para usar OpenSSL pois não quero atualizar o windows do Cliente. Porém todas as configurações dá erro de Accessviolation na linha descrita no código abaixo. As configurações que fiz são :: SSLLib = LibOpenSSL Cryptlib = CryOpenSSL HttpLib = HttpOpneSSL fiz todas as conbinações possiveis XMLSignLib = xsXMLSec fiz todas as conbinações possiveis SSLType = LT_TLSv1_2 fiz todas as conbinações possiveis as DLLs usadas com data de 14/09/2018 iconv.dll libeay32.dll libexslt.dll libiconv.dll libxml2.dll libxmlsec.dll libxmlsec-openssl.dll libxslt.dll msvcr120.dll ssleay32.dll zlib1.dll procedure TDFeSSLXmlSignXmlSec.DestroyCtx; begin if (FdsigCtx <> nil) then begin InitXmlSec; xmlSecDSigCtxDestroy(FdsigCtx); // o Erro acontece Nessa Linha FdsigCtx := nil; end; end;

Parabéns..

Pessoal o ACBrValidador está validando como correto esse numero :: 5626532688988 Porém na NFE dá erro o comando "ValidarGTIN" também valida como correto

Segue a unit com os endereços atualizados e testados em Delphi XE5. ACBrConsultaCPF.pas será que o administradores já subiram essa nova unit ?

Eles colocaram um reCaptcha para essa consulta, com isso afetou o retorno pelo componente. Veja o site: https://www.receita.fazenda.gov.br/Aplicacoes/SSL/ATCTA/CPF/ConsultaSituacao/ConsultaPublica.asp Isso será alterado no componente ? Obs : eu já tentei alterar o componente mais não consegui. Grato.

No final a questão erá simples o detalhe era apenas o "Enviar" Mestre Italo fico muitíssimo agradecido e me desculpe qualquer inconveniente.

Está anexado acima vou anexar novamente Deixei faltando o Tomador do Servi;o de proposito para gerar a Rejeição 757 1-env-lot.xml

Baixei a versão do ACBr hoje novamente e instalei novamente, eu deletei toda a pasta do ACBr que tinha aqui antes de colocar a nova versão chequei se tinha alguma pasta do acbr no meu computador e problema continua muito estranho pois no evento do ACBr procedure TLancamentoVeiculos.ACBrCTe1GerarLog(const ALogLine: string; var Tratado: Boolean); Begin memoLog.Lines.Add(ALogLine); End; Consegue Capturar o cStat 757 Vejam Abaixo ::: Inicio TCTeStatusServico Versão Layout: 3.00 Ambiente: 2 Versão Aplicativo: PR-v3_0_38 Status Código: 107 Status Descrição: Servico em Operacao UF: PR Recebimento: 10/10/2017 10:45:33 Tempo Médio: 0 Retorno: Observação: Inicio TCTeRecepcao Versão Layout: 3.00 Ambiente: 2 Versão Aplicativo: PR-v3_0_38 Status Código: 757 Status Descrição: O tomador do servico deve estar informado para Transporte de Pessoas e Valores UF: PR dhRecbto: chCTe: Obs : é só no CTeOS esse problema o mesmo codigo funciona em tudo como CTe de Cargas, NFCe, NFe, MDFe Deve ser alguma configuração para CTeOS que devo estar usando errado o que poderia ser ? O código que estou usando é esse :: Try Try Result := ACBrCTe1.WebServices.EnviaOS(1); Finally cStatCTe := ACBrCTe1.Conhecimentos.Items[0].CTe.procCTe.cStat); // Retorna Vazio cStatCTe := ACBrCTe1.WebServices.Retorno.cStat; // Retorna Vazio End; Except on E: Exception do // Vai entrar no Exception porque faltou por exemplo o Tomador do Serviço porém preciso capturar o cStat da Rejeição 757 End;

Sim Italo tudo atualizado porém vou refazer o processo e instalar tudo novamente a ultima versão do ACBR foi do dia 04/10/2017 que baixei e instalei. Amanha e digo o resultado.

Gerei uma CTeOS sem o Tomador de serviço para gerar a rejeição 757 o interessante que nos arquivos de Soap tem o cStat mais no componente volta vazio. 1-env-lot.xml 1-env-lot-soap.xml 1-pro-lot.xml 1-pro-lot-soap.xml 20171009150740-ped-sta.xml 20171009150740-ped-sta-soap.xml 20171009150741-sta.xml 20171009150741-sta-soap.xml

Estou executando o Seguinte Código e quando existe algum erro da receita como por exemplo rejeição pela falta de algum campo :: Try Try Result := ACBrCTe1.WebServices.EnviaOS(1); Finally cStatCTe := ACBrCTe1.Conhecimentos.Items[0].CTe.procCTe.cStat); // Retorna Vazio cStatCTe := ACBrCTe1.WebServices.Retorno.cStat; // Retorna Vazio End; Except on E: Exception do // Vai entrar no Exception porque faltou por exemplo o Tomador do Serviço porém preciso capturar o cStat da Rejeição 757 End;

Italo acabei de testar de acordo com o topico https://www.projetoacbr.com.br/forum/topic/38912-cte-os-como-obter-os-dados-do-retorno-após-aprovação/?tab=comments#comment-256055 Tentei da seguinte forma Protocolo := ACBrCTe.Conhecimentos.Items[ x ].CTe.procCTe.nProt;Status := ACBrCTe.Conhecimentos.Items[ x ].CTe.procCTe.cStat; Motivo := ACBrCTe.Conhecimentos.Items[ x ].CTe.procCTe.xMotivo; Porém volta tudo vazio

Desconsiderem essa questão. Para ficar documentado para CTeOS tem que ser preenchida a tag "Toma" no lugar da tag "Toma4"

Estou tentando gerar um CTe com o Modelo 67 porém está me retornando o erro :: Status Código: 757 Status Descrição: O tomador do serviço deve estar informado para Transporte de Pessoas e Valores. Eu estou preenchendo essa Tag porém percebo que o componente não o Faz. na unit pcteCTeW.pas na linha 470 if (CTe.ide.modelo = 67) then GerarInfPercurso; Onde deveria ser assim if (CTe.ide.modelo = 67) then Begin GerarInfPercurso; GerarToma03; GerarToma4; End; Porem de alterar esse código ai dá o erro :: "is unexpected according to content model of parent element Toma4" O que preciso fazer para resolver isso ? Grato a todos.

Colega consegiu resolver ? eu também estou com o mesmo Problema acredito ser um Bug do Acbr já tentei depurar mais não consegui.

Pessoal tenho um código que uso perfeitamente no AcbrNFe onde consigo capturar o cStat caso volte alguma rejeição da Sefaz o problema que no CTe o mesmo código não funciona. Try Try Result := ACBrCTe1.WebServices.Envia(1); Finally cStatCTe := ACBrCTe1.WebServices.Retorno.cStat; // Aqui nessa linha no AcbrNFe volta certinho o codigo do cSat mesmo se voltar rejeição da Sefaz e entrar no Bloco Exception xMotivo := ACBrCTe1.WebServices.Retorno.xMotivo; End; Except on E: Exception do Begin // codigo para Tratamento da exceção End; É alguma configuração no ACBrCte que tenho que fazer ?? Grato.

Deu certo amigo fico muito grato.

Pessoal boa tarde acabei de atualizar o ACBR e está dando esse erro quando tento gerar a CT-e com o Modelo 67 para transporte de passageiros. Eu também atualizei a pastas dos Schemas o erro ocorre quando "ACBrCTe1.Conhecimentos.Assinar;" O que pode ser ? Obs : todas as pastas do ACBR estão atualizadas com a versão de hoje 06/10/2017

Achei meu erro :: No Lugar de ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.Versao Trocar por :: ACBrNFe.NotasFiscais.Items[0].NFe.infNFe.Versao

Pessoal estou carregando um XML já emitido para o componente AcbrNfe e quando tento ver a versão do XML com o código abaixo sempre me retorna vazio. ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.Versao // vazio Se eu tentar VersaoDFToStr(TpcnVersaoDF(ACBrNFe.IdentificaSchema(ACBrNFe.NotasFiscais.Items[0].XML)) me retorna 3.00 sendo que se trata de um XML 3.10 Eu preciso de uma forma de saber a versão do XML existe outra maneira ? Grato.

Ok agora deu certo baixas BradescoSiccob realizadas com sucesso. Muito Grato.

Conseguir ver o arquivo retorno ? Acredito que minha solução de alterar o código para if ( IntToStrZero(Banco.Numero, 3) <> BancoRetorno ) then if LeCedenteRetorno then Banco.TipoCobranca := GetTipoCobranca( StrToInt(BancoRetorno)); Resolve o problema

Bom dia Poderia por favor anexar o arquivo de retorno deste banco, para simularmos essa situação... Arquivo Retorno do BradescoSicredi em Anexo. Grato C4340_0015059_180717_35092 - Copia.ret