Ir para conteúdo
  • Cadastre-se

Sandro Andre Reghelin

Membros
  • Total de ítens

    273
  • Registro em

  • Última visita

Posts postados por Sandro Andre Reghelin

  1. 1 hora atrás, junior_gpuava disse:

    Sandro André, faz o seguinte..... faz uma copia da pasta de seu acbr atual, renomeia para acbr1 por exemplo e cria um novo e faz o svn checkout.... faz a reinstalação e como disse o Sandro Felipe, acerta no arquivo INI o novo endereço do webservice e executa o compilares e tenta novamente... nos retorne o que dá.....

    Recebi essa informação do outro programador:

    O ANode.Childrens tem só dois itens...
    a tag mensagem e a tag nfse.
    por isso ele não encontra a tag numero_nfse...
    essa tag está dentro da tag nfse....
    Isso porque ele não entra nos filhos dos filhos..

    O ANode já deveria ser a tag nfse e não a tag raiz, que a tag mensagem e a tag nfse,

    A função não consegue achar as tag filhas....resumindo....Alguem saberia a solução?

    isso ocorre na função que passei acima do ACBR...

  2. 15 minutos atrás, Juliomar Marchetti disse:

    uow pra que copiar

    se o svn tem revert e tem update to revision XX

    ja fiz todas essas opções  tanto para pegar a ultima versão...quanto para pegar uma versão de sexta passada para testes.....

    pedi para outro programador aqui da empresa, que tem mais experiência que eu com XML´s e ACBR, para dar uma olhada ver se acha algo...

    porque o mais estanho e que ela não acha as tag dentro da função do ACBR, nem no meu fonte é....

  3. 24 minutos atrás, Sandro Felipe Adad disse:

    Complicado, copiei os arquivos que mandou para as pastas deles e mesmo assim persiste o erro...

    Você fez alguma configuração no componente ACBRNfsex pelo object inspector do Delphi?

  4. 4 minutos atrás, Sandro Felipe Adad disse:

    Pra mim esta normal, tanto em homologação quanto em produção, me mande uma mensagem com seu email vou te encaminhar um video, mas o video ficou maior que  2mb...

    E estranho estou com a ultima versão do ACBRNFSex, na hora que ele vai procurar a tag no retonro ele acha tag <nfse> e dentro dela estariam as que ele precisa (numero_rps, etc..) e não localiza...

    Estou pensando em mandar em produção para ver...

    e nessa função o problema

    function TACBrXMLNodeList.FindAnyNs(const Name: string):TACBrXmlNode;
    Var
      i, ACount: integer;
      Node: TACBrXmlNode;
    begin
      Result := nil;
      ACount := Count - 1;
      for i := 0 to ACount do
      begin
        Node := Items[i];
        if Node.LocalName <> Name then continue;

        Result := Node;
        Exit;
      end;
    end;

  5. 13 minutos atrás, Sandro Andre Reghelin disse:

    Seguem os arquivos salvos..

    5937-rec-soap.xml 2 kB · 0 downloads 5937-rec.xml 2 kB · 0 downloads 5937-env-lot.xml 1 kB · 0 downloads 5937-env-lot-soap.xml 1 kB · 0 downloads

    corrigindo a resposta anterior...

    Ali e passado o campo numero_nfse para o "for", ele passa pela tag mensagem, em seguida pela nfse e pula fora...

     

    retorno5937.txt

  6. 1 hora atrás, junior_gpuava disse:

    coloque a opção para salvar response soap e vc já ve como o arquivo esta vindo....

    Seguem os arquivos salvos..

    5937-rec-soap.xml 5937-rec.xml 5937-env-lot.xml 5937-env-lot-soap.xml

    4 minutos atrás, Sandro Andre Reghelin disse:

    corrigindo a resposta anterior...

    Ali e passado o campo numero_nfse para o "for", ele passa pela tag mensagem, em seguida pela nfse e pula fora...

  7. 1 hora atrás, junior_gpuava disse:

    coloque a opção para salvar response soap e vc já ve como o arquivo esta vindo....

    Debuguei e acho que o problema está na hora que ele procura as tag no retorno, vejam imagem em anexo...

    Ali e passado o campo numero_nfse para o "for", ele passa pela tag nfse, em seguida pela mensagem e pula fora...

    pelo que vi....

    nessa parte da procedure TACBrNFSeProviderIPM.TratarRetornoEmitir(Response: TNFSeEmiteResponse);

    with Response do
          begin
            NumeroNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('numero_nfse'), tcInt);
    //        SerieNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('serie_nfse'), tcInt);
            Data := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('data_nfse'), tcDatVcto);
            Link := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('link_nfse'), tcStr);
            Protocolo := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr);
            Situacao := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr);

            //Código da situação da NFS-e (1-Emitida, 2-Cancelada)
            if (Situacao = '1') or (Situacao = '2') then
              Situacao := '4'
            else
              Situacao := '3';
          end;

    telaACBR.png

  8. 2 minutos atrás, junior_gpuava disse:

    eu vou atualizar aqui para dar uma olhada....

     

    vou jogar os fontes que mandou no acbr e testar...em homologação...

    5 minutos atrás, junior_gpuava disse:

    eu vou atualizar aqui para dar uma olhada....

     

    mesmo com seu fontes, ele continua retornando como sucesso, mas não carrega os dados de protocolo, data, etc...

    o unico dado que retornou foi Retorno.Situacao = 3 e response.sucesso True

  9. 8 minutos atrás, junior_gpuava disse:

    Sandro.... não sei se percebeu mas o XML de retorno do ambiente de produção vem completo e não apenas o cabeçalho como no ambiente de homologação

    que como estava ok até na sexta o retorno do ambiente de homologação, na terça quando fui testar o erro do "eletron" no arquivo ini, então atualizei hoje cedo os fontes do ACBR, com a correção do arquivo ini, e aí parou de vir o retorno do response em homologação....então antes de mandar para produção, preciso ver o que fazer, medo de mandar para produção e começar a ficar nota pendente lá...

  10. 15 horas atrás, Italo Giurizzato Junior disse:

    Sandro,

    Isso não esta certo, pois o campo ValorIR se refere ao valor do Imposto de Renda e não o valor do ISS retido na fonte.

    Outra coisa,

    A tag <Valor_issrf> que é opcional fica dentro de uma lista chamada <lista> e o seu valor deve ser atribuído ao campo:

    NFSe.Servico.ItemServico[I].ValorISS

    Já a tag <valor_ir> que é obrigatória fica dentro do grupo <nf> e seu valor deve ser atribuído ao campo:

    NFSe.Servico.Valores.ValorIr

    Reveja a sua rotina que alimenta o componente.

    Senhores bom dia, houve alguma alteração no modo como o response de retorno e tratado?

    acabei de enviar uma NFSe, veio com o codigo de retorno 00001, o response veio como sucesso, mas não trouxe os dados como numero_nfse, data, protocolo...

    segue em anexo arquivo com response de retormo

     

    reponseRetorno.xml

  11. Houve alguma alteração no retorno do envio da NFSe?

    ate´ontem estava funcionando hoje baixei a nova versão do ACBRNFSex e ao enviar uma nota o xml de retorno veio assim:

    <?xml version="1.0" encoding="UTF-8"?><a><ListaMensagemRetorno><MensagemRetorno><Codigo></Codigo><Mensagem>CONFIG inválido</Mensagem><Correcao></Correcao></MensagemRetorno></ListaMensagemRetorno></a>

  12. 9 minutos atrás, Sandro Felipe Adad disse:

    Pra fim funcionou o cancelamento no programa de exemplo, so nao esta carregando o response.

    Eu informei o numero, serie, motivo.

    21-ped-can.xml 251 B · 0 downloads 21-ped-can-soap.xml 485 B · 0 downloads 21-can.xml 653 B · 0 downloads 21-can-soap.xml 666 B · 0 downloads

    agora fiquei vendido me parecem iguais os arquivos: veja

     

    12-can.xml 12-can-soap.xml 12-ped-can.xml 12-ped-can-soap.xml

  13. Não alterei nada no ACBR, segundo o pessoal da IPM, a tag valor_issrf so deve ser preenchida se houver retenção...então

    ajustei isso no meu fonte....

    Aproveitando o cancelamento  está funcionando para vocês? testei aqui e retornou o err:

    '<?xml version="1.0" encoding="UTF-8"?><a><ListaMensagemRetorno><MensagemRetorno><Codigo></Codigo><Mensagem>{"retorno":{"msg":"Par\u00e2metros inv\u00e1lidos para a requisi\u00e7\u00e3o.","sis":"EST","code":406}}</Mensagem><Correcao></Correcao></MensagemRetorno></ListaMensagemRetorno></a>'

    Conferi e os dados enviados no XML me parecem corretos com o layout:

    '------=_Part_1_42A341FC'#$D#$A'Content-Type: text/xml; charset=Cp1252; name=12-ped-can.xml'#$D#$A'Content-Transfer-Encoding: binary'#$D#$A'Content-Disposition: form-data; name="12-ped-can.xml"; filename="12-ped-can.xml"'#$D#$A#$D#$A'<nfse><nf><numero>12</numero><serie_nfse>1 </serie_nfse><situacao>C</situacao><observacao>Nota fiscal de servico eletronica emitida indevidamente.</observacao></nf><prestador><cpfcnpj>07493402000114</cpfcnpj><cidade>7583</cidade></prestador></nfse>'#$D#$A'------=_Part_1_42A341FC--'#$D#$A

    mesmo retornando com erro o response marca como sucesso....

     

  14. 16 horas atrás, Sandro Felipe Adad disse:

    Deu certo,

    outra dúvida, no NFSE antigo eu informava o valor retido do ISS em Servico.Valores.ValorIssRetido, mas aqui na geração da IPM (IPM.GravarXML) pega para preencher a tag 'valor_issrf' o valor de NFSe.Servico.ItemServico[I].ValorIr, creio que não esteja ok? mas não encontrei o campo correto na classe...

        Result[i].AppendChild(AddNode(tcDe2, '#', 'valor_issrf', 1, 15, 0,

                                    NFSe.Servico.ItemServico[I].ValorIr, DSC_VISS))

    ja resolvi...

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