Anadilson

Olá, Alguém conseguiu gerar um boleto Dinâmico para o Banco Inter? Ou no exemplo de Homologação do Banco do Brasil?

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.

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.

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

Obrigado Ítalo.

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 Í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,

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=

Boa tarde Ítalo, Envio, Consulta e Cancelamento tudo funcionando perfeitamente para o provedor Abaco em regime de produção.

Bom dia Ítalo, Muito obrigado, Fiz a atualização agora: 01/09/2022 e refiz teste de Monitoramento, Envio e Cancela em regime de produção. Tudo funcionando perfeitamente agora. Grato,

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.

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

Fast Report

Boa tarde, Não entendi sua explicação. Preciso saber somente se tem como: Imprimir na DANFE a imagem da logomarca gravada no banco Ou seja: não quer informar um caminho, quero um LoadFromStream()

Bom dia, Seria possível imprimir na DANFE a imagem da logomarca gravada no banco? Não quero usar o caminho como é hoje: ACBrNFe1.DANFE.Logo := 'Caminho do arquivo'; Quero carregar a imagem do banco, (sem ter que carregar e gravar antes em disco). Ou seja, passar direto a imagem para o componente de imagem. Tipo: LoadFromStream() Grato,

Boa tarde Ítalo, Acabei de fazer a atualização e fiz testes de envio, monitoramento, cancelamento e monitoramento de cancelada. Todos os testes perfeitos. Testes realizados em regime de produção. Município de IPATINGA - MG [3131307] Provedor SigCorp Muito obrigado, Tópico pode ser finalizado. Grato,

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

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

Bom dia Ítalo, Fiz a atualização novamente hoje 20/05/2022 e o problema foi solucionado. Funcionando corretamente. Tópico pode ser finalizado. Obrigado.

Delete a pasta, reinstaleis os componentes do ACBr, dei um Build All Project e problema continua. Obs.: Você já fez uma alteração idêntica antes. Não me lembro se para Ipatinga, mas certamente não para esse provedor que é novo para Ipatinga.

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

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

Não posso usar o recurso como: if Pos('Cancelamento', ACBrNFSeX.NotasFiscais.Items[i].XmlNfse) > 0 then No lugar de: ACBrNFSeX.NotasFiscais.Items[i].NFSe.SituacaoNfse Não seria jeito correto.

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. 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:

Boa tarde Ítalo, Referente ao cancelamento, segue anexo arquivos. Lembrando que quando não me retorna nada, faço a consulta por RPS. Seria uma consulta em seguida. 000000000000000000000000000000000001-con-nfse-fai.xml 000000000000000000000000000000000001-con-nfse-fai-soap.xml 000000000000000000000000000000000001-lista-nfse-fai.xml 000000000000000000000000000000000001-lista-nfse-fai-soap.xml 0002311U-comp-nfse.xml 0002311U-comp-nfse-soap.xml 0002311U-con-nfse-rps.xml 0002311U-con-nfse-rps-soap.xml 202200000000500-can.xml 202200000000500-can-soap.xml 202200000000500-ped-can.xml 202200000000500-ped-can-soap.xml 3122110453319300060156202200000000500-nfse.xml RetornoCancelamento.txt SegundaConsultaPorRps.txt Questões de envio com erro de TimeOut vejo depois sobre isso: ACBrNFSeX.Configuracoes.WebServices.TimeOut := 80000; // 40000; //5000;