Luiz Carlos de Lima

Fiz a correção, caso queiram atualizar está anexado. teste 2.pdf DACTE_OS.fr3

Bom dia, O tamanho do NroRegEstadual no manual é 25, se colocar menor dá erro ao enviar, e 25 está truncando no DACTE.

AGora autorizou, deve ser sido problema com a Sefaz aqui

tentei processar no meu computador e tambem deu erro, consegui fazer uma homologacao, mas nao em producao.

Sempre funcionou sem elas na pasta executavel, de qq forma coloquei e nao resolveu.

boa tarde, um cliente de MT esta tentando emitir CTeOS e esta retornando: ERRO: Erro Interno: 0 Erro HTTP: 500 URL: https://cte.sefaz.mt.gov.br/ctews/services/CteRecepcaoOSV4

OK, vou dar uma olhada nele. Gratos.

Oi Victor, Alguma sugestão de melhor WebService

Estou testando o exemplo, com a wsCorreios e retorna erro. No site do correio cadastrei um usuario, mas não vi nenhuma chave de acesso, será que o erro é falta dela?

boa tarde, problema resolvido. Grato.

Boa tarde, Estou tendo problema no BuscaPorCep, verifiquei que agora precisa de alguns parâmetros, estou testando o exemplo mas não consigo saber onde consegui estes parametros. Fiz cadastro nos correios e criei usuario e senha, acredito que seja isto ACBrCEP1.ProxyUser := edProxyUser.Text ; ACBrCEP1.ProxyPass := edProxyPass.Text ; Mas as informaçoes abaixo não sei onde consegui, podem dar uma ajuda? ACBrCEP1.ProxyHost := edProxyHost.Text ; ACBrCEP1.ProxyPort := edProxyPort.Text ; ACBrCEP1.ChaveAcesso := edChaveBuscarCEP.Text;

Resolvido, Grato pessoal.

Todos CNPJ que testo recorda o erro, já verifiquei e eles tem IE ACBrNFe.Configuracoes.WebServices.TimeOut := 20000; ACBrNFe.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFe.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFe.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrNFe.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; ACBrNFe.SSL.SSLType := LT_TLSv1_2; ACBrNFe.SSL.CarregarCertificado; Documento := EditCNPJ_Fornecedor_Pagar.Text; ACBrNFe.Configuracoes.WebServices.UF := 'MT'; ACBrNFe.Configuracoes.WebServices.Salvar := true; ACBrNFe.WebServices.ConsultaCadastro.UF := 'MT'; ACBrNFe.WebServices.ConsultaCadastro.CNPJ := '03658968000602'; ACBrNFe.WebServices.ConsultaCadastro.Executar; vMotivo := ACBrNFe.WebServices.ConsultaCadastro.xMotivo; vCstat := ACBrNFe.WebServices.ConsultaCadastro.cStat; wInscEstado := ACBrNFe.WebServices.ConsultaCadastro.RetConsCad.InfCad[0].IE;

Victor, desculpe mas não consegui fazer o teste no index, pode me ajudar.

Boa tarde, Estava com problema no ACBrCEP1.BuscarPorCEP, atualizei o ACBr e comecei a ter alguns problemas que foram corrigidos, mas este ainda não consegui solucionar: Utilizo o ConsultaCadastro.Executar para buscar a IE, agora começou a dar Argument of ranger. Tentei outros campos para testar mas todos estão com este erro. wInscEstado := ACBrNFe.WebServices.ConsultaCadastro.RetConsCad.InfCad[0].IE; wNome := ACBrNFe.WebServices.ConsultaCadastro.RetConsCad.InfCad[0].xNome; wLogr := ACBrNFe.WebServices.ConsultaCadastro.RetConsCad.InfCad[0].xLgr;

Bom dia, Grato pela ajuda, fechando chamado.

ACBrBPe.Configuracoes.WebServices.Ambiente := ACBrBPe.Bilhetes.Items[0].BPe.Ide.tpAmb; Incompatible types: 'TpcnTipoAmbiente' and 'TACBrTipoAmbiente'

Boa tarde, Após atualizar o ACBr estou tendo problemas com o BPe Por Exemplo pcnConversaoBPe ficou ACBrBPeConversao. Mas as chamadas abaixo não consegui descobrir como ficou, podem ajudar? ACBrBPe.Bilhetes.Items[0].BPe.Ide.tpAmb ACBrBPe.WebServices.Enviar.BPeRetorno.ProtBPe.Items[0].chBPe ACBrBPe.WebServices.Consulta.protBPe.chBPe ACBrBPe.WebServices.EnvEvento.EventoRetorno.retEvento[0].RetInfEvento.XML

Grato Italo, resolvido.

Boa tarde, Atualizei o ACBr e esta dando o erro "... unit pcnConversaoCIOT not found". Já baixei tudo novamente e reinstalei até apagando os antigos mas não resolveu.

Testando outro certificado não retornou erro, então deve ter algum problema, com este. Vou ter que verificar o que pode ser.

Desculpe, na verdade não funcionou, agora retorna: message 'PFXDataToCertContextWinApi: DadosPFX informado não são válidos'. Process Material.exe (53632).

Resolvido, Grato pela ajuda.

Olá Rubinho, Sim, uso A1. As configuraçoes abaixo utilizo hoje na emissão de CTe, MDFe, BPe, NFe, sem problema, e agora estou implementando a NFSe. SSLLib := libWinCrypt; SSLCryptLib := cryWinCrypt; SSLHttpLib := httpWinHttp; SSLXmlSignLib := xsLibXml2; SSL.SSLType := LT_SSLv2 Configuracoes.WebServices.TimeOut := 20000; certificadoStream := TStringStream.Create; TBlobField(FieldByName('Certificado_Certificado_Nucleo')).SaveToStream(certificadoStream); ACBrNFSeX1.Configuracoes.Certificados.ArquivoPFX := certificadoStream.DataString; ACBrNFSeX1.Configuracoes.Certificados.Senha := FieldByName('Senha_Certificado_Nucleo').AsString; ACBrNFSeX1.Configuracoes.Certificados.NumeroSerie := FieldByName('Serie_Certificado_Nucleo').AsString; Tentei com libOpenSSL mas também não deu certo, nos dois casos se não informar a serie retorna sujeira: First chance exception at $77069542. Exception class EACBrDFeException with message 'Arquivo: 0€0€*†H†÷ €$€‚è0€0€*†H†÷ €$€‚è0‚l0‚h *†H†÷ ‚û0‚÷0)*†H†÷ 0“ÛOsĶu×Äú¾TÞ „¿RL‡ não encontrado'.

Boa tarde, Ao executar ACBrNFSeX1.Emitir(vNumLote, meUnitario) retorna a mensagem: EACBrDFeException with message 'Certificado Série: "11DE2401234845BE", não encontrado! Este certificado está sendo usado pelo meu contador, mas ao usar na NFSe diz que não encontra, alguém pode dar uma ajuda. Obs. Usando o processo "Alimentar_Componente_layout_ABRASF" Grato.