Ir para conteúdo
  • Cadastre-se

K2 SOFTWARE

Membros Pro
  • Total de ítens

    95
  • Registro em

  • Última visita

  • Days Won

    1

Posts postados por K2 SOFTWARE

  1. Bom dia.

    Preciso testar o envio de Notas de Serviço da cidade de Lorena - SP. (ISSNet).

    O ambiente de homologação precisa ser: https://issonline.embras.net/pmlorena/websis/siapnet/arrecadacao/issonline/ws/?wsdl

    Onde mudo o endereço de homologação?  É somente na seção do arquivo ISSNet.ini conforme abaixo?

    De:

    [NameSpace]
    Producao=http://www.issnetonline.com.br/webservice/nfd
    Homologacao=http://www.issnetonline.com.br/webservice/nfd

     

    Para:

    [NameSpace]
    Producao=http://www.issnetonline.com.br/webservice/nfd
    Homologacao=https://issonline.embras.net/pmlorena/websis/siapnet/arrecadacao/issonline/ws/?wsdl

     

    Obrigado

    Helio Almeida.

  2. Boa tarde Italo.

    Consegui fazer os testes hoje porque o cliente ainda usava o exe do trunk1. Alterei conforme você disse de acordo com o programa exemplo.

    Deu certo.

    Obrigado pela ajuda.

    Atenciosamente

    Hélio Almeida.

     

    • Curtir 1
  3. Bom dia.

    Acabei de atualizar o ACBR e ao tentar compilar meu programa dá o erro: incompatible types na linha: property XML: String read FXML write SetXMLString

    Segue imagem em anexo.

    Já coloquei o caminho no library do Delphi.

    Alguém tem ideia do que pode ser?

     

    Obrigado

    Hélio Almeida.

     

     

    erro compilar.jpg

  4. Bom dia a todos.

    Ainda utilizo a ginfes pelo trunk1 e ao tentar enviar pelo trunk2 dá a mensagem:

    violates length constraint of 14    

    The element {http://www.ginfes.com.br/tipos_v03.xsd}Cnpj with value failed to parse

    Seguem anexo os 2 XMLs. Pelo trunk1 funciona. Pelo trunk2 não.

    Alguém tem alguma ideia do que pode ser?

    Obrigado.

    Hélio Almeida.

    trunk1 164A-Rps.xml

    trunk2 164A-rps.xml

  5. Obrigado Daniel Simoes por responder.

    Você fala no library? Se for está sim conforme imagem anexa. O estranho é que fechei e abri o delphi Seattle umas 3 vezes e agora voltou a funcionar. Vou deixando a máquina ligada sem fechar o Delphi por enquanto.

    Obrigado.

     

     

    bpl acbr.jpg

  6. Bom dia a todos.

    Fiz a instalação do ACBR no Delphi Seatlle. Quando abro o delphi a primeira vez após a instalação do ACBR fica tudo ok. Meus projetos compilam normalmente. Porém ao fechar e abrir o Delphi novamente, perde alguns pacotes do ACBR. Lá em Packages alguns ficam desmarcados. Se eu tico as packages, dá erro. Segue anexo algumas imagens:

    obs: Tenho instalado na máquina o Delphi 7 e o Delphi Xe8, porém já informei as path de cada um separadamente. Já reinstalei o ACBR removendo antes com o apagaAcbr.bat como administrador e estou instalando o ACBR somente no Seatlle. Mesmo assim o erro persiste.

    Alguém tem uma ideia de como resolver?

    Obrigado.

    Hélio Almeida.

     

    erro acbr seatle1.jpg

    erro acbr seatle2.jpg

    erro acbr seatle3.jpg

    erro acbr seatle4.jpg

  7. Bom dia.

    Estou reabrindo o fórum porque meu cliente adquiriu 2 SATs Sweda e está acontecendo o mesmo problema.

    No que foi dito que resolveu o problema, minha dúvida são nos itens 1 e 2:

    1º Removi o certificado antigo da SEFAZ

    2º Subi o novo certificado

     

    Em qual Site faço essa remoção/inclusão do certificado?

     

    Obrigado

     

    Hélio Almeida.

  8. douglasarlima, eu rodei o ACBrInstall_Trunk2 novamente conforme o Daniel Simoes falou e funcionou.

     

    Daniel, também não funciona com a versão antiga. Coloquei um executável de 09/2016 e dá o mesmo erro.

    Quando o cliente renovou o cartão A3, ficaram os 2 certificados no cartão ainda dentro da validade. O Antigo (venceria daqui 30 dias) funciona, o problema está no novo. Só que ontem o atendente do suporte da certificadora excluiu o certificado antigo no teste e agora só ficou o novo, ou seja, não tem como mais emitir as notas.

    Acho que por enquanto vou orientar o cliente a exportar as notas em TXT e importar no emissor gratuito.

     

  9. Daniel, agora compilou.

    Porém ao tentar enviar a nota dá a msg:

    Falha ao obter a chave privada do certificado para assinatura.

    A única coisa que mudei no meu programa foi:

            SSLCryptLib := cryWinCrypt;
            SSLHttpLib := httpWinHttp;
            SSLXmlSignLib := xsMsXml;

    Precisa mudar mais alguma coisa?

     

     

    Tentei enviar agora pelo ACBrNFeDemo, e deu a mensagem na aba XML Resposta:

    O sistema não oferece suporte à codificação especificada. Erro ao processar o recurso

     

  10. Obrigado Daniel por responder.

    Atualizei, agora porém ao compilar dá o erro no Delphi Xe8: [dcc32 Error] ACBrDFeXsMsXml.pas(154): E2197 Constant object cannot be passed as var parameter

     

    Na procedure:

    function TDFeSSLXmlSignMsXml.Assinar(const ConteudoXML, docElement,
      infElement: String; SignatureNode: String; SelectionNamespaces: String;
      IdSignature: String): String;

     

    Na linha:

    xmldsig.createKeyFromCertContext( FpDFeSSL.CertContextWinApi, dsigKey);

     

    Na Unit:

    unit ACBrDFeXsMsXml;

  11. Boa tarde.

    Meu cliente tem um certificado A3 boa vista flex e renovou o mesmo regravando no mesmo cartão.

    Agora ao tentar enviar a NF-e dá o erro: Chave inválida.

    Não chega nem a gerar o XML.

    O problema é que pelo emissor gratuito ele consegue enviar.

    Alguém tem alguma ideia do que pode ser?

    Obrigado

    Hélio Almeida.

     

     

  12. Jéter, os erros que o marcosdiasvendramini acabou de passar, para corrigir precisa mudar essas linhas:

    function TACBrConvenio115Mestre.RegistroEAssinatura(AVersaoAnterior: Boolean): TConvenio115AssinaturaMD5;

    de: {26} PadLeft(NumeroTelefonePrincipal, 12, '0') +  para: {26} PadRight(NumeroTelefonePrincipal, 12) + 

     

    procedure TACBrConvenio115.DoGerarDestinatario;

    De: {11} PadLeft(OnlyNumber(FMestre.Destinatario.Telefone), 12, '0') +  para {11} PadRight(OnlyNumber(FMestre.Destinatario.Telefone), 12) + 

     

    Obrigado.

     

    Hélio Almeida

  13. Obrigado Jéter por responder.

    Por isso que achei estranho, eu não estou passando nenhum valor para as propriedades   TipoAssinanteATE201612 . Na verdade estou usando apenas o que já usava antes que é a propriedade Omestre.TipoAssinante conforme abaixo, porém a procedure verifica o TipoAssinanteATE201612:

          if TNFSAIDA2TIPO_ASSINANTE.AsString = '1' then //Comercial
           OMestre.TipoAssinante := tac11182Comercial
          else if TNFSAIDA2TIPO_ASSINANTE.AsString = '6' then //Residencial
           OMestre.TipoAssinante := tac11182PessoaFisicaResidencial;
     

    Preciso informar alguma coisa para que não verifique isso?

     

    Obrigado

    Hélio Almeida.

     

  14. Bom dia a todos.

    Quando vou gerar o período de 01/2017 dá a mensagem: tipo de assinante inválido para a nota fiscal.

    Entra na exceção abaixo. O que preciso preencher para não dar mais essa mensagem?

    procedure TACBrConvenio115.Gerar;
        if FMestre.TipoAssinanteAte201612 = tac111None then
          raise Exception.Create(Tipo de assinante inválido para a Nota Fiscal:
     

    Obrigado.

    Atenciosamente

    Hélio Almeida.

  15. Bom dia a todos.

    Estou testando o CT-e em homologação.

    Quando o Responsável pelo seguro é o remetente funciona, porém quando testo com Expedidor ou Recebedor dá a mensagem:

    O responsável pelo seguro da carga indicado não foi relacionado no CT-e.

    Onde relaciono isso?

    Segue anexo o XML do CT-e e da rejeição.

    Obrigado

     

    Hélio Almeida

    K2 SOFTWARE

    35161215547405000111570010000241871000022687-cte.xml

    351000010153942-pro-rec.xml

×
×
  • 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.

The popup will be closed in 10 segundos...