Ir para conteúdo
  • Cadastre-se

Anadilson

Membros
  • Total de ítens

    119
  • Registro em

  • Última visita

Posts postados por Anadilson

  1. Boa tarde Ítalo,

    Referente a sua sugestão, teria que colocar dois componentes ACBrNFSeX, ACBrMail e teria que passar as configurações de um para o outro tipo:

       ACBrNFSeXPdf.Configuracoes := ACBrNFSeX.Configuracoes;

    antes de limpar e carregar para gerar o pdf, pois visto que estou enviando em lote várias notas de vários clientes e não posso limpar o componente do: 

      "for i := 0 to ACBrNFSeX.NotasFiscais.Count -1 do"  para gerar o pdf de nota única para o envio do e-mail:

    ACBrNFSeX.NotasFiscais.Items[i].EnviarEmail(ACBrNFSeX.NotasFiscais[i].NFSe.Tomador.Contato.Email, 'Nota Fiscal Eletronica de Serviço',  mensagem, True,  nil,  nil );

    Dessa forma de envio não pode ser usada então.

    Ahhh, notei que somente: ACBrNFSeXPdf.Configuracoes := ACBrNFSeX.Configuracoes; não é suficiente e tenho que preparar todas as configurações também para o componente espelhado somente para carregar a NFSe gerada e gerar o pdf exclusivo da nota para o envio do e-mail.

     

     

  2. Boa tarde,

    À Juliana Tamizou e ao  Juliomar Marchetti.

    Primeiramente e acima de tudo desculpas pela forma que me referi ao Consultor, ao qual peço desculpas. 

    Infelizmente ao ocorrer fato como o citado acima, outro que poderia me conduzir a uma solução do problema, acaba por não participar e fica sem uma solução. 

    Esclareço ainda que busco a ajuda pelos consultores, mas que a empresa tem adesão ao plano citado.

    Mais uma vez peço desculpas.

  3. Em 26/09/2022 at 10:12, Anadilson disse:

    Não entendi bem a resposta. Bem... as linhas referente impressão, estão comentadas, foram testes

    Usando somente:

    ACBrNFSeX.NotasFiscais.Items[i].EnviarEmail(ACBrNFSeX.NotasFiscais[i].NFSe.Tomador.Contato.Email,
                                                   'Nota Fiscal Eletronica de Serviço',  // Assunto
                                                    mensagem,                                       // Mensagem
                                                    True,                                                  // Enviar PDF junto
                                                    nil,                                                      // Lista com emails que serão enviado com cópias - TStrings
                                                    nil                                                       // Lista de anexos - TStrings
                                                   );

    Imprime tudo e de forma errada, oque pode ser visto ao para em um break point, verá que na primeira vez são gerados dois PDFs sendo um errado.

     

    Bom dia,

    Teria como essa solicitação passar pela avaliação do ÍTALO?

    No caso gostaria que se possível ELE apontasse alguém. Pois já é a segunda solicitação ficando sem solução quando passa pelas mãos desse JULIOMAR MARCHETTI

     

  4. Não entendi bem a resposta. Bem... as linhas referente impressão, estão comentadas, foram testes

    Usando somente:

    ACBrNFSeX.NotasFiscais.Items[i].EnviarEmail(ACBrNFSeX.NotasFiscais[i].NFSe.Tomador.Contato.Email,
                                                   'Nota Fiscal Eletronica de Serviço',  // Assunto
                                                    mensagem,                                       // Mensagem
                                                    True,                                                  // Enviar PDF junto
                                                    nil,                                                      // Lista com emails que serão enviado com cópias - TStrings
                                                    nil                                                       // Lista de anexos - TStrings
                                                   );

    Imprime tudo e de forma errada, oque pode ser visto ao para em um break point, verá que na primeira vez são gerados dois PDFs sendo um errado.

     

  5. Bom dia Ítalo,

    Poderia me ajudar com uma situação?

    Eu faço e envio em LOTE, porém ao pedir para gerar o PDF de uma única NFSe, É gerado de TODAS, e  acontece da última ficar com nome de arquivo errado, não batendo com o conteúdo do arquivo.

    Usei formas diferentes de gear o PDF e o resultado foi o mesmo.

      for i := 0 to ACBrNFSeX.NotasFiscais.Count -1 do  
      begin
        //ACBrNFSeX.NotasFiscais.ImprimirPDF;  

        //ACBrNFSeX.DANFSE.ImprimirDANFSEPDF(ACBrNFSeX.NotasFiscais.Items[i].NFSe);

        //ACBrNFSeX.NotasFiscais.Items[i].ImprimirPDF;

        ACBrNFSeX.NotasFiscais.Items[i].EnviarEmail(ACBrNFSeX.NotasFiscais[i].NFSe.Tomador.Contato.Email,
                                                   'Nota Fiscal Eletronica de Serviço',  // Assunto
                                                    mensagem,                                       // Mensagem
                                                    True,                                                  // Enviar PDF junto
                                                    nil,                                                      // Lista com emails que serão enviado com cópias - TStrings
                                                    nil                                                       // Lista de anexos - TStrings
                                                   );
      end;
      

    Grato,

     


      

     

  6. Boa tarde Ítalo,

    Houve mudança em Ribeirão das Neves - MG -> NFSe Ribeirão das Neves [3154606]

    Segue alteração, testada e funcionando perfeitamente. Favor atualizar o arquivo "ACBrNFSeXServicos.ini"

    Grato,

     

    [3154606]
    ; Atualizado em 23/06/2021
    Nome=Ribeirao das Neves
    UF=MG
    Provedor=ISSDigital
    Versao=2.00
    ; Atualizado em 19/09/2022 ProRecepcionar=http://ribeirao.supernova.com.br:8093/nfe/snissdigitalsvc
    ProRecepcionar=https://issqn.ribeiraodasneves.quasar.srv.br/nfe/snissdigitalsvc
    HomRecepcionar=
     

  7. Bom dia, estudando aqui vejo que talvez o erro possa estar nessa linha do arquivo : 74C048725877018D2C4E79BFC79CF972-lista-nfse-con-lot.xml

                                <InformacoesComplementares>["- Serviço Tributado no Município: NOVA LIMA<br>- Esta NFSE foi emitida com respaldo da Lei nº 1.911/2005 e do Decreto nº 10.259/2020. ","- Data do vencimento do ISS desta NFSE: 12/09/22","- Esta NFS-e substitui o RPS Nº 2347, série: U, emitido em 29/08/2022"]</InformacoesComplementares>

    Mais precisamente em:  NOVA LIMA<br> que talvez não deixa o retorno ser lido adequadamente.

     

     

     

     

  8. Boa tarde Ítalo,

    Estou com problema ao enviar e ao consultar um RPS:

    Provedor Abaco [3144805] Nova Lima - MG

    Gera o arquivo e envia corretamente, porém ao checar a resposta não retorna nada, tanto no envio como ao monitorar.

    Peguei na prefeitura o número do protocolo pois o rps foi aceito e a nota foi gerada.

        // Consultar Lote - ConsultarLoteClick()
        if (nProtocolo <> '') and (vNumLote <> '') then
        begin
          ACBrNFSeX.ConsultarLoteRps(nProtocolo, vNumLote);  
          ChecarResposta(tmConsultarLote);
        end;

    O problema ocorre ao ChecarREsposta(), segue em anexo arquivos com as informações que constam tudo certinho, inclusive número da nota na tag <Outputxml xmlns="http://www.e-nfs.com.br">

    Obs.: Regime de produção

     

    3122083027421300017256000000000002347-rps.xml 74C048725877018D2C4E79BFC79CF972-con-lot.xml 74C048725877018D2C4E79BFC79CF972-con-lot-soap.xml 74C048725877018D2C4E79BFC79CF972-lista-nfse-con-lot.xml 74C048725877018D2C4E79BFC79CF972-lista-nfse-con-lot-soap.xml

    Mai uma coisa, atualização dos fontes na data de hoje 31/08/2022 sem erros e os schemas atualizados

     

  9. Bom dia Ítalo,

    Baixei os fontes e reinstalei o ACBr hoje 26/05/2022. Fiz os teste que nesse processo resolveu perfeitamente a questão do envio, agora me retornando protocolo etc.

    Porém a questão anterior que você já havia solucionado passou a dar erro por causa dessa data "estranha".

    Erro(s):
    Código  : X999
    Mensagem: Erro de Conexão: '5/26/2022 11:50:03 AM' is not a valid date and time
    Correção: 

    Resumindo, agora ao consultar uma nota cancelada na prefeitura dá esse erro de data e não retorna o xml no componente e a nota acaba retornando como snNoral. Agora como não tenho o xml, nem posso fazer aquela consulta que fazia no xml para procurar pela palavra "Cancelamento" que consta no xml do arquivo gerado.

    Segue arquivos em anexo.

     

     

    0005002U-comp-nfse.xml 0005002U-comp-nfse-soap.xml 0005002U-con-nfse-rps.xml 0005002U-con-nfse-rps-soap.xml MontirarCancelada.txt

  10. Boa tarde Ítalo,

    Estou com problema ao enviar NFSe para Ipatinga - MG [3131307] Provedor SigCorp.

    Se defino:

    ACBrNFSeX.Configuracoes.WebServices.TimeOut := 40000; 

    Retorna:

    Erro(s):
    Código  : X999
    Mensagem: Erro de Conexão: Erro Interno: 12002
    Erro HTTP: 0
    URL: https://abrasfipatinga.sigbancos.com.br/servico.asmx
    Erro: 12002 - TimeOut de Requisição
    Falha ao Receber Resposta. Erro: 12002 - TimeOut de Requisição

    Porém o RSP é enviado e na consulta não me retorna o protocolo;

    Se defino:

    ACBrNFSeX.Configuracoes.WebServices.TimeOut := 60000; 

    Retorna:

    Erro(s):
    Código  : X999
    Mensagem: Erro de Conexão: '5/23/2022 1:26:50 PM' is not a valid date and time

    Porém o RSP é enviado e na consulta não me retorna o protocolo;

    Nesse caso ao fazer o envio: ACBrNFSeX.Emitir(vNumLote, meAutomatico, False);  

    E checar a resposta: ChecarResposta(tmRecepcionar);

    Estou sendo obrigado a fazer uma consulta:  ACBrNFSeX.ConsultarNFSeporRps() e ChecarResposta(tmConsultarNFSePorRps);

    Funciona, mas acabo ficando sem o protocolo de envio do rps e consequentemente tendo que fazer uma consulta extra.

    Creio que por causa do erro não me mostra o protocolo de envio do rps.

    Segue arquivos em anexo,

    Grato

     

     

     

     

     

     

     

    1-env-lot-sinc.xml 1-env-lot-sinc-soap.xml 1-lista-nfse-sinc.xml 1-lista-nfse-sinc-soap.xml 3122050453319300060156000000000005001-rps.xml Envio.txt temp1.xml temp2.xml

  11. Boa tarde Ítalo,

    Acabei de atualizar e o erro continua, na consulta por ConsultarLoteRps():

        if (nProtocolo <> '') and (vNumLote <> '') then
        begin
          ACBrNFSeX.ConsultarLoteRps(nProtocolo, vNumLote);     
          ChecarResposta(tmConsultarLote);
        end;
     

         ACBrNFSeX.NotasFiscais.Items[i].NFSe.SituacaoNfse = snNormal

     

    Mas a nota já está cancelada

     

    30742-con-lot.xml 30742-con-lot-soap.xml 30742-lista-nfse-con-lot.xml 30742-lista-nfse-con-lot-soap.xml

    Provedor = proSigGorp 

     

    Digo: Provedor = proSigCorp 

  12. Bom dia Ítalo,

    Vale lembrar que já fez essa alteração antes, não sei se para Ipatinga, mas certamente não foi para o novo provedor SigCorp.

    Segue anexo arquivos

    Veja que a informação do cancelamento está vem na descrição do item de serviço

     

     

    30742-con-lot.xml 30742-con-lot-soap.xml 30742-lista-nfse-con-lot.xml 30742-lista-nfse-con-lot-soap.xml

    3122030453319300060156202200000000299-nfse.xml

  13. Boa tarde Ítalo,

    Agora tenho outro problema referente ao cancelamento.

    Quanto faço a consulta de uma NFSe já cancelada usando:

          ACBrNFSeX.ConsultarLoteRps(nProtocolo, vNumLote);   
          ChecarResposta(tmConsultarLote);

    Está me retornando: ACBrNFSeX.NotasFiscais.Items[i].NFSe.SituacaoNfse = snNormal pois a informação do cancelamento está vindo dessa forma, conforme imagem anexa.

     


     

    xml.png

    Já a Consulta assim:

            ACBrNFSeX.ConsultarNFSeporRps(StrZero(NumeroRps,7), SerieRps, TipoRps, CodVerificacao); 
            ChecarResposta(tmConsultarNFSePorRps);

    Ficou ok pois me retorna como snCancelado mas vem conforme imagem abaixo em anexo:


     

    xml.png

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