Ir para conteúdo
  • Cadastre-se

paulo.bietkoski

Membros
  • Total de ítens

    28
  • Registro em

  • Última visita

Tudo que paulo.bietkoski postou

  1. Bom dia Italo, A principio o problema esta na base de homologação pois funcionou na base de produção.
  2. Boa noite preciso consultar uma nota da tecnos que eu tenho certeza que esta cancelada, mas o retorno dela é normal consulto assim: Acbr.ConsultarNFSeporRps(vlsRPS, 'UNICA', '1'); mas o retorno vem como Normal e não como srCancelado acbr.NotasFiscais.Items[0].NFSe.Status
  3. quando envio a nota ocorre o erro abaixo... como devo proceder para resolver? Falha na validação dos dados da nota: 2907 O elemento '{http://www.portalfiscal.inf.br/nfe}vFCPUFDest' é inesperado, de acordo com o modelo de conteúdo do elemento pai '{http://www.portalfiscal.inf.br/nfe}ICMSTot'. Esperado: {http://www.portalfiscal.inf.br/nfe}vBCST. quando desabilito a validação para testar... function TACBrNFe.Enviar(ALote: String; Imprimir: Boolean; Sincrono: Boolean): Boolean; ... // NotasFiscais.Validar; ocorre o seguinte erro: 'Codigo Identificador do CSC no QR-Code nao cadastrado na SEFAZ' mas o token esta como '&cIdToken=000002&' <![CDATA[http://www.dfeportal.fazenda.pr.gov.br/dfe-portal/rest/servico/consultaNFCe?chNFe=41160376029024000135651000000029091000029090&nVersao=100&tpAmb=2&dhEmi=323031362d30332d32395431353a32393a33322d30333a3030&vNF=10.00&vICMS=0.00&digVal=326f324d72796773493257776e69766461474e386a4d7443586e493d&cIdToken=000002&cHashQRCode=C558033B4D2D86A69BDB3F9D88086F491F7AB916]]> como devo proceder para resolver esta questão?
  4. Bom Dia, Presciso saber como faco para consultar e popular as classes do ACBr com um xml ja enviado para o provedor tecnos que sincrono
  5. Bom Dia, Presciso saber como faco para consultar e popular as classes do ACBr com um xml ja enviado para o provedor tecnos que sincrono
  6. se eu setar : UseCertificado=0 ocorre erro em : function TDFeCapicom.Assinar(const ConteudoXML, docElement, infElement: String; SignatureNode: String; SelectionNamespaces: String; IdSignature: String ): String; var ... begin ... OleCheck(IDispatch(FCertificado.PrivateKey).QueryInterface(IPrivateKey, PrivateKey)); e desabilitar: // if not UseCertificate then // raise EACBrDFeException.Create('Impossível assinar. Componente configurado para não usar Certificado');
  7. se eu desabilitar if (FUseCertificate) then FUseSSL := True; ocorre exceção em : if (FUseCertificate) then begin if not InternetSetOption(pRequest, INTERNET_OPTION_CLIENT_CERT_CONTEXT, Pointer(HCertContext), SizeOf(CERT_CONTEXT)) then raise EACBrHTTPReqResp.Create('Erro: Problema ao inserir o certificado') e não envia!!! segue o arquivo soap 419-env-lotS-soap.xml 419-env-lotS.xml
  8. Bom dia Italo, Procuramos o erro, e quando setamos o TECNOS.INI para: UseCertificado=0 UseSSL=0 O componente gerava um erro de exceção em: function TDFeSSL.Assinar(const ConteudoXML, docElement, infElement: String; SignatureNode: String; SelectionNamespaces: String; IdSignature: String ): String; Var XmlAss, xmlHeaderAntes, xmlHeaderDepois: String; I: integer; begin if not UseCertificate then raise EACBrDFeException.Create('Impossível assinar. Componente configurado para não usar Certificado'); entao setei para: UseCertificado=1 UseSSL=0 mas então quando envio, a rotina abaixo altera a propriedade UseSSL para True mesmo colocando no .ini para false: procedure TACBrHTTPReqResp.Execute(Resp: TStream); ... begin if (FUseCertificate) then FUseSSL := True; ----------------------------------------------------------------------------------------------------------------------------------------------------- A SOLUÇÃO PALIATIVA QUE TIVEMOS PARA COMEÇAR A ENVIAR NOVAMENTE FOI: 1) SETAR O TECNOS.INI PARA UseCertificado=1 UseSSL=0 2) SETAR O (FUseCertificate := false;) E (flags := INTERNET_SERVICE_HTTP;) procedure TACBrHTTPReqResp.Execute(Resp: TStream); ... begin if (FUseCertificate) then FUseSSL := True; AProt := ''; APort := ''; APath := ''; HCertContext := 0; ParseURL(FUrl, AProt, ANone, ANone, AHost, APort, APath, ANone); FUseCertificate := false; // forcar para false pois não esta respeitando o ini if (FUseCertificate) then begin if ((ShowCertStore) or ((FCertSerialNumber = '') and (FCertificate = nil))) then begin FCertSerialNumber := OpenCertStore; if FCertSerialNumber <> '' then FCertificate := nil; end; ... try { if (FUseSSL) then begin flags := INTERNET_FLAG_KEEP_CONNECTION or INTERNET_FLAG_NO_CACHE_WRITE; flags := flags or INTERNET_FLAG_SECURE; if (FUseCertificate) then flags := flags or (INTERNET_FLAG_IGNORE_CERT_CN_INVALID or INTERNET_FLAG_IGNORE_CERT_DATE_INVALID); end else } flags := INTERNET_SERVICE_HTTP; // forcar para que o envio seja efetuado ----------------------------------------------------------------------------------------------------------- Apos as alterações o componente voltou a enviar para o provedor a nfs! OBS: Mas o erro que iniciou este tópico persiste e se encontra na validação abaixo retornando (FDataRecebimento := 0;), criando uma exceção em branco; function TNFSeWebService.ExtrairNotasRetorno: Boolean; ... begin ... if FRetornoNFSe.ListaNFSe.CompNFSe.Count > 0 then begin FDataRecebimento := FRetornoNFSe.ListaNFSe.CompNFSe[0].NFSe.dhRecebimento; if FDataRecebimento = 0 then FDataRecebimento := FRetornoNFSe.ListaNFSe.CompNFSe[0].NFSe.DataEmissao; if FProvedor in [proInfisc, proGovDigital] then FProtocolo := FRetornoNFSe.ListaNFSe.CompNFSe[0].NFSe.Protocolo; end else begin FDataRecebimento := 0; // aqui esta populando como zero e retornando erro em branco end; ... Result := (FDataRecebimento <> 0); end; -------------------------------------------------------------------------------------------------------------------------- (favor avisar quando todos o itens que relatei forem consertado no componente, obrigado)
  9. aproveitando a post... poderia me informar qual a melhor cidade que eu posso utilizar para testar no programa teste? (poderia ser Curitiba?)
  10. isso eu já está configurado desta forma! Segue o arquivo Tecnos.ini Tecnos.ini antes da atualização do dia 10/03 eu estava conseguindo enviar para a homologação e retornava o erro em branco conforme o tópico em que estamos... mas agora apos atualizar para a versão de hoje nem chega a sair dando o erro: Erro Interno: 12029Erro HTTP: 0Erro: Requisição não enviada.12029 - Uma conexão com o servidor não pôde ser estabelecida conforme post anterior
  11. Sim, Esta cadastrado e esta funcionando na versão antiga(trunk1). marcando o SSL3 começa a ocorrer erro de canais seguros e se marcar ssl1 ocorre este erro de conexão...o endereço no browser acessa normalmente. alguma dica ?
  12. Ajustado problema anterior, mas agora está apresentando o erro abaixo. Erro de envio [ Erro Interno: 12029 Erro HTTP: 0 Erro: Requisição não enviada. 12029 - Uma conexão com o servidor não pôde ser estabelecida]!
  13. agora ocorreu Erro Interno: 12157 Erro HTTP: 0 Erro: Requisição não enviada. 12157 - Erro no suporte a canais seguro
  14. Bom dia, Atualizamos tudo mas agora esta aparecendo o erro: Erro ao ajustar INTERNET_OPTION_CLIENT_CERT_CONTEXT: 12046
  15. Bom dia, Efetuamos a instalação do componente do FastReport e todos os componentes do ACBR e sua compilação. 1) Estamos tentando utilizar o exemplo Demo ACBrNFSe e não está aparecendo a cidade de Veranópolis/RS e Nova Prata/RS. [4322806] Nome=Veranopolis UF=RS Provedor=Tecnos NomeURL_H=ver NomeURL_P=veranopolis [4313300] Nome=Nova Prata UF=RS Provedor=Tecnos NomeURL_H=prata NomeURL_P=novaprata 2) Tentamos fazer uma consulta de notas já enviadas em homologação e apresentou de requisição
  16. Verifiquei aqui, e realmente teremos que adquirir este componente. Se adquirirmos esta licença do FastReport irá resolver o problema? Obs: você tem algum conhecimento do FortesReport. qual é o mais indicado?
  17. Bom dia, Depois que eu atualizei para ultima versão os componentes, apos enviar para Veranópolis com o provedor Tecnos, esta chegando a nota e aparece no Site, mas ocorre um erro no retorno mas a mensagem do erro esta em branco, não esta funcionando porque a variável FDataRecebimento esta com zero e retornando erro mesmo com a mensagem de sucesso na transmissão. verifiquei que a lista FRetornoNFSe.ListaNFSe.CompNFSe.Count não esta vindo preenchida e caindo no else if FRetornoNFSe.ListaNFSe.CompNFSe.Count > 0 then begin FDataRecebimento := FRetornoNFSe.ListaNFSe.CompNFSe[0].NFSe.dhRecebimento; if FDataRecebimento = 0 then FDataRecebimento := FRetornoNFSe.ListaNFSe.CompNFSe[0].NFSe.DataEmissao; if (FProvedor = proInfisc) then FProtocolo := FRetornoNFSe.ListaNFSe.CompNFSe[0].NFSe.Protocolo; end else begin FDataRecebimento := 0; end; ocasionando o erro. poderia me ajudar?
  18. Boa tarde, Sim, do provedor... mas eu não estou tentando cancelar, mas sim enviar... eu consigo enviar o XML com o comando (Result := acbr.WebServices.EnviaSincrono(sLoteSefaz);), e aparece no site de homologação, mas apos o envio consulto a mensagem no comando (acbr.WebServices.EnviarSincrono.Msg) e aparece o erro "O RPS informado já está cancelado." estou achando que é o numero cadastrado no provedor que esta incorreto
  19. Bom dia Italo... Obrigado, me ajudou muito... sim estava sem o Emitente pois antes estava enviando os dados através da função do ACBr, com a atualização do ACBr tive que enviar através das property. Agora esta ocorrendo o erro: "O RPS informado já está cancelado." saberia me informar do que seria?
  20. Bom dia Italo, Estou enviando no mÉtodo EnviarSincrono e esta retornando: <mEnvioLoteRPSSincronoResponse xmlns="http://tempuri.org/"> <mEnvioLoteRPSSincronoResult> <?xml version="1.0" encoding="utf-8"?> <EnviarLoteRpsSincronoResposta xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.abrasf.org.br/nfse.xsd"> <DataRecebimento>0001-01-01T00:00:00</DataRecebimento> <ListaMensagemRetorno> <MensagemRetorno> <Codigo>E0800</Codigo> <Mensagem>Seqüência de entrada não estava em um formato incorreto. - </Mensagem> <Correcao>Erro no processamento do envio</Correcao> </MensagemRetorno> </ListaMensagemRetorno> </EnviarLoteRpsSincronoResposta> </mEnvioLoteRPSSincronoResult> </mEnvioLoteRPSSincronoResponse>
  21. Boa tarde Rogerio, Poderia me informar como você resolveu este problema... pois estou com uma mensagem parecida!!! Seqüência de entrada não estava em um formato incorreto. - Obrigado
  22. consegui avançar um pouco, mas agora parei na mensagem "Seqüência de entrada não estava em um formato incorreto. -" alguem tem alguma informação sobre esta mensagem para me auxiliar?
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.