Painel de líderes
Conteúdo popular
Showing content with the highest reputation on 30-05-2023 em todas as áreas
-
Pessoal bom dia! Só dando um feedback. Depois de várias conversas e testes com o pessoal da PEPS (Roberto) eles afirmaram que a impressão em 48 colunas ocorre somente no formato CONDENSADO... isso eu já sabia! kkkkk Agradeço a todos pela ajuda.3 pontos
-
olhando pdf que vc anexou inicialmente seria o caso de verificar as fontes instaladas no computador, porém você disse que com a geração do boleto pelo Demo fica com apresentação normal? então quer dizer que as fontes estão ok. se com o demo fica ok e na sua aplicação existe essa diferença teria que verificar alguma diferença nas configurações dos componentes. outra caracteristica comum para esses casos de "desalinhamento" das fontes é o uso de escala de zoom no windows, como 125%. Talvez seja outro ponto a ser verificado.3 pontos
-
Os fontes do ACBr não estão no git, e sim SVN. Veja: https://www.projetoacbr.com.br/fontes Se você preferir usar o git tem alguns mirrors não oficiais no github, mas de preferência use o oficial do SVN.2 pontos
-
Boa tarde, não existe CNAB444 pela Febraban. O que existe, alguns bancos pegam o CNAB400 e implementam em cima dele, assim, para o componente é c400, mesmo o arquivo tendo 710bytes como é o caso de alguns bancos.2 pontos
-
Boa tarde! Muito obrigado por reportar. Fiz alguns testes e consegui reproduzir o problema. Foi criada a #TK-4007 para análise do problema e parecer do consultor responsável.2 pontos
-
Não por isso ... Lembrando que fiz alterações em relação ao tópico e enviei em anexo.2 pontos
-
Boa tarde ! Qdo ele fica lento, vc observou se não tem nenhuma rotina agendada como de backup por exemplo? Verifique os index que ajudam muito no desempenho, pegou uma copia do banco não existe registros corrompidos? As vezes vc esta abrindo tabelas desnecessárias ou trazendo registros que não serão usados... exemplo: vc tem uma tabela com 10.000 produtos, qdo fizer a pesquisa, nao precisa fazer um select * from produto (trazendo todos registros) verifique a infra, hoje a maioria dos equipamentos são gigalan.2 pontos
-
Certificado A1 é muito, muito mais simples de usar... Você pode, mas não precisaria nem instalar o Certificado A1 no Windows, bastando apontar o arquivo PFX para Monitor nesse vídeo falamos bastante sobre certificados A1 e A32 pontos
-
ola amigos bom dia, Alexandre deve ser isso mesmo, na verdade eu utilizo uma rotina para gerar o arquivo TXT e é praticamente igual a rotina abaixo onde abre o comando com " aspas duplas e fecha com " as duplas: NFE.CriarEnviarNFe("[IDENTIFICACAO] ... ... ... ,1,0,0") vou mudar a rotina e testar grato Amparo2 pontos
-
aparentemente falta fechar as aspas duplas no CNPJ. segue modelo da documentação abaixo: (https://acbr.sourceforge.io/ACBrMonitor/NFEInutilizarNFe.html)2 pontos
-
Mais um tópico importante, que pode ajudar quem esta começando com ACBrLibNFSe.2 pontos
-
Olá pessoal, Nos últimos dias recebemos relatos de que apesar da mudança na legislação de SP, havia dificuldade em se realizar o credenciamento da NFCe quando o contribuinte não tem SAT ativo. Recebemos retorno de consulta feita pela AFRAC a SEFAZ-SP a qual sinalizou que a parametrização do sistema da SEFAZ-SP foi atualizada, inclusive com relatos de credenciamento realizado com sucesso.2 pontos
-
Olá pessoal, O Governo de Santa Catarina publicou o Ato Diat numero 044/2023 que pode ser lido na integra clicando aqui. Em resumo esse Ato Diat estabelece que Nota Fiscal Fatura de Serviços de Comunicação Eletrônica (NFCom) modelo 62 vai substituir a Nota Fiscal de Serviço de Comunicação, modelo 21, e à Nota Fiscal de Serviço de Telecomunicação, modelo 22. A NFCom será obrigatória a partir de 01/07/2024. Os prestadores de serviços emissores dos documentos fiscais citados acima poderão de forma voluntária solicitar o seu credenciamento durante o período de 01/12/2023 a 31/05/2024. A SEFAZ promoverá a partir de 01/06/2024 o credenciamento por oficio. O Projeto ACBr esta sempre atento as novidades trazidas pelo Fisco e já temos os Manuais: Visão Geral e Layout do XML que foram obtidos do Portal da SEFAZ Virtual do RS, neste link. Já se encontra na nossa lista de tarefas o desenvolvimento do componente ACBrNFCom. Assim que a SEFAZ divulgar as URLs de homologação bem como a data de liberação do ambiente de homologação, vamos iniciar o desenvolvimento do componente. E voltaremos a este tópico para deixar todos informados sobre esse novo componente.1 ponto
-
bom dia pessoal, pesquisei no forum e nas pastas do ACBr e nao achei nada sobre a NFCom modelo 62 - Nota Eletronica de Comunicacao. vi q no acbr tem os schemas. alguem ja iniciou o desenvolvimento dessa nota eletronica? ja tem alguma coisa pra iniciar os testes ou pra gente ajudar no desenvolvimento?1 ponto
-
Esta com problema na consulta do boleto pelo Sicoob API. Quando o valor do pagamento, da liquidação do titulo no caso, for maior que mil reais, no Json que o Banco retorna o valor vem com separação de milhar. Isso da erro na conversão para Currency na linha 272 em StrToCurrDef onde pega o Valor Pago retornando o valor DEFAULT zero, em ACBrBoletoRet_Bancoob. Modifiquei para StringToFloatDef (função do ACBrUtil.Base) e aparentemente resolveu o problema. Em anexo arquivo modificado. ACBrBoletoRet_Bancoob.rar1 ponto
-
Ao enviar uma nota de serviço para a prefeitura de Nova Lima/MG, a tag xmlRetorno está vindo vazia. Em anexo o soap de retorno. 1100-env-lot-soap.xml1 ponto
-
Boa tarde. Fiz contato com o atendimento da IPM para a migração da cidade de Concórdia/SC ([email protected]) solicitando mais informações sobre a migração. Eles passaram os links de Produção e Homologação. Configurei dessa forma no ACBrNFSeXServicos.ini: [4204301] Nome=Concordia UF=SC Provedor=IPM Versao=1.01 ProRecepcionar=https://concordia.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao HomRecepcionar=https://migracao.atende.net/?pg=rest&service=WNERestServiceNFSe&cidade=treina_concordia Foi necessário também solicitar um novo Usuário e Senha para o ambiente de homologação. Realizei a Emissão e Cancelamento. Funcionou corretamente no ambiente de Homologação.1 ponto
-
ShellExecute(Application.Handle, ´open´, PChar(´arquivo.pdf´), nil, nil, SW_SHOWMAXIMIZED); algum comando assim já deve abrir o arquivo na tela... seria equivalente a um preview. o que acontece de diferente apenas é que o arquivo já vai estar criado.1 ponto
-
E o tls? Está utilizando tls1.2? Está testando no seu ambiente que funcionou para os demais provedores ou o erro ocorre no cenário do cliente? Para utilizar o winCrypt, o Windows deve estar com todas as atualizações em dia. Se for certificado A1, teste com OpenSSL e copie as dlls para a pasta da aplicação.1 ponto
-
1 ponto
-
O print é do programa exemplo disponível na pasta ACBr\Exemplos\ACBrDFe\ACBrNFe\Delphi DANFe FR\. Se os teus fontes e o teu .fr3 estão atualizados, devia funcionar igual.1 ponto
-
Ola Alexandre. A certo, farei a chamada diretamente, pois nesse caso o cliente gosta de visualizar o boleto gerado. Obrigado1 ponto
-
@Mario Inacio um dos objetivos do FPDF é poder ser utilizado em ambientes de servidor e por isso ele não utiliza recursos "gráficos" e não vai ter um preview implementado. Diferente de um gerador de relatórios ele cria diretamente o arquivo PDF. O que você pode fazer depois de criar o arquivo é abrir o arquivo normalmente como vc abre um PDF, ou via chamada do SO ou em um navegador por exemplo.1 ponto
-
me diz uma coisa. tu tem constume de atualizar o ACBr de quanto em quanto tempo? pois o que fala acima já faz tempo que está ok no SVN1 ponto
-
Boa tarde, Veja se tem algum relatório pesado que alguém esteja tirando e consumindo o FB. Uma cópia de arquivos na rede também pode degradar a comunicação geral da rede, não necessariamente relacionado ao banco ou ao sistema, como por exemplo uma cópia de um volume grande de um computador para o servidor.1 ponto
-
Obrigado @Neski Soluções. Já estamos avaliando com o time como poderá ser implementada a impressão. Agradecemos mais uma vez o retorno e assim que tivermos um posicionamento iremos retornar aqui.1 ponto
-
Boa tarde Alexandre, Abaixo retirei da internet uma informação que descreve bem a necessidade em que nossos clientes imprimem o RPS: " O que é Recibo Provisório de serviço? O Recibo Provisório de Serviços (RPS) é um documento fiscal temporário, que pode ser emitido quando houver instabilidade de sistema para emissão da NFS-e ou utilizado como intermediário para garantir agilidade às empresas que emitem grande número de comprovações fiscais na contratação de serviços em curto espaço de ...10 de nov. de 2022 " Como é possível a impressão do RPS, vejo que é preciso ser impresso com os dados corretos para averiguação. É algo de empresa pra empresa a forma que vai utilizar a informação, se em tela ou impressa pra análise.1 ponto
-
1 ponto
-
1 ponto
-
Bom dia Diego, não gerou. Fiz um teste agora e gerou apenas estes dois: Segue meu .ini pra vc ver se tem algo faltando: conf_ini.txt1 ponto
-
Olá pessoal, depois um longo tempo de espera, estou aqui para dar uma ótima noticia sobre a ACBrLibNFSe !! Após um trabalho intenso de melhorias, testes e validações, um bom período de maturação do componente ACBrNFSeX, chegou o momento de anunciar que finalmente os trabalhos para a ACBrLibNFSe sair do forno tiveram inicio nesta semana. Fiquem ligados para os próximos posts no fórum, vamos mantendo todos vocês informados sobre o andamento desta nova biblioteca do pacote ACBrLib.1 ponto
-
Mais um detalhe que esquecemos de informar: Se não validar o schema e obter o XML gerado pelo INI que foi anexado, o XML não contém a tag <infCteComp></infCteComp> com a chave informada no INI.1 ponto
-
Criada TK-4005 para avaliação da ocorrência.1 ponto
-
Rodrigo SBarcelos Boa noite...vou demostrar como faço com boleto hibrido PIX Banco do Brasil 1 - ACBrBoleto.Cedente.CedenteWS.IndicadorPix :=True; 2 - BoletoPIX.fr3 para Fast Report ou Fortes Report LayOut = lPadraoPIX 3 - qrcode.emv :=QR_CODE_PIX; //------Isso é minha variavél que recebe o qrcode do pix Vou deixar minha procedure que uso pra pegar o retorno procedure TF_boleto.LerRetornoAPI; var Node : IXMLNode; NodeSec : IXMLNode; var JSonObjectAsString, MEMO_1, MEMO_2, MEMO_3, MEMO_4, MEMO_5 : string; JSObj : TJSONObject; JSArray : TJSONArray; JSValue : TJSONValue; var ParRows : TJSONPair; var ObjetoMeio : TJSONObject; SLRemessa: TStringList; i, j: Integer; Boleto : TACBrBoleto; var LINHA_DIGITAVEL, QR_CODE_PIX : String; begin txt_memojson.Lines.Text :=''; Boleto := ACBrBoleto; if Boleto.TotalListaRetornoWeb > 0 then begin SLRemessa := TStringList.Create; try for i:= 0 to Pred(Boleto.TotalListaRetornoWeb) do begin if (Boleto.ListaRetornoWeb[i].HTTPResultCode in [200, 201, 202]) then begin SLRemessa.Add(Boleto.ListaRetornoWeb[i].JSON); txt_memojson.Lines.Add(Boleto.ListaRetornoWeb[i].JSON); end; end; //----SLRemessa.SaveToFile( PathWithDelim(ExtractFilePath(Application.ExeName))+'\Boletos\LogsWebservice\'+ NR_DOCUMENTO + Trim(sNOSSO_NUMERO)+'-retorno_registro.json' ); finally FreeAndNil(SLRemessa) end; end; JSonObjectAsString := txt_memojson.Text; JSObj := TJSONObject.ParseJSONValue(JSonObjectAsString) as TJSONObject; try LINHA_DIGITAVEL :=''; QR_CODE_PIX :=''; LINHA_DIGITAVEL :=JSObj.GetValue('linhaDigitavel').Value; ParRows :=JSObj.Get('qrCode'); ObjetoMeio :=JSObj.GetValue('qrCode')as TJSONObject; QR_CODE_PIX :=ObjetoMeio.GetValue('emv').Value; if Length(LINHA_DIGITAVEL) = 47 then begin //-----Retorno com sucesso------------------------------------------------ end else begin //----Retorno com erro ai faço o tratamento pra pegar o erro-------------- end; finally JSObj.DisposeOf; end; end;1 ponto
-
Boa tarde! Para verificar se deu certo no processo, você pode usar o Sucesso do Response, pois a mesma recebe: Response.Sucesso := (Response.Erros.Count = 0); Como você mesmo disse que ficam com múltiplas notas, você pode usar o último índice. Algo como: var NotasCount: Integer; begin NotasCount := ACBrNFSeX.NotasFiscais.Count -1; ACBrNFSeX.NotasFiscais[NotasCount].NFSe.XXXXXXX end;1 ponto
-
Segue os anexos ACBrLibNFSe-20230529.log ACBrLib.ini1 ponto
-
Italo, boa Tarde! Descobri o motivo de não funcionar na minha aplicação. A Configuração de proxy. É preenchido com dados persistido do banco de dados. E meu cliente tinha preenchido essa informação no banco dele. Tirando isso passou a funcionar igualmente no programa de exemplo1 ponto
-
Boa tarde, Fiz mais uns testes e foi necessário fazer mais uma alteração na Unit IPM.Provider foi necessário alterar a procedure "procedure TACBrNFSeProviderIPM.TratarRetornoCancelaNFSe" Como estava: NotaCompleta := (Pos('<nfse>', Response.ArquivoRetorno) > 0) Como ficou: NotaCompleta := (Pos('<nfse>', Response.ArquivoRetorno) > 0) and (ANota.NFSe.NfseSubstituida = ''); A alteração foi necessária pois caso fique como NotaCompleta ele tenta verificar se o ANodeArray está assigned causando erro. no seguinte trecho de código: if NotaCompleta then begin if not Assigned(ANodeArray) and (Response.Sucesso) then begin AErro := Response.Erros.New; AErro.Codigo := Cod203; AErro.Descricao := ACBrStr(Desc203); Exit; end; ...1 ponto
-
Foi publicado no DOE-SP em 06/06/2023 a portaria SRE 34 de 05/05/2023 a qual trouxe algumas mudanças relativas a emissão de NFCe no estado de SP. Não é mais exigido a posse de SAT para poder emitir NFCe Mas vamos com calma, apesar desta mudança as regras para a contingência da NFCe em SP permanecem conforme a legislação de 2015, ou seja, emissão no equipamento SAT ou EPEC conforme regulamentado também na Portaria CAT 12/2015. Detalhes das Alternativas de Contingência Apesar da possibilidade de Contingência EPEC estar gerando expectativas de uma possível liberação da NFCe OffLine, o time da AFRAC fez uma consulta junto a SEFAZ-SP e foi confirmado o entendimento de que somente quando a indisponibilidade é por parte da SEFAZ é que é permitido o EPEC desde que nas regras definidas pela Portaria CAT 12/2015, ou seja, continua NÃO sendo possível a contingência OFFLine no formato que ocorre em outras UFs. Retorno obtido pela AFRAC em 12/05/2023 Regras da Emissão EPEC (Previstas na legislação de 2015) § 2º - Recebida a transmissão do arquivo da EPEC, a Secretaria da Fazenda analisará: § 3º - Do resultado da análise, a Secretaria da Fazenda cientificará o emitente: 3 - Revogado pela Portaria CAT-58/15, de 11-06-2015, DOE 12-06-2015. 3 - da denegação do arquivo da EPEC, devido à irregularidade cadastral do emitente. § 4º - A cientificação de que trata o § 3º será efetuada via Internet, contendo o motivo da rejeição na hipótese do item 2 do § 3º ou o arquivo da EPEC, número do recibo, data, hora e minuto da recepção na hipótese do item 1 do § 3º. Links para a legislação Portaria SRE 34/2023 aqui Portaria CAT 12/2015 aqui1 ponto
-
Logo teremos novos Demos para o ACBrBoleto, usando a FPDF... mas em testes preliminares, a geração de PDF com a biblioteca FPDF-Pascal, se mostrou incrivelmente rápida, e gerando um PDF bem mais enxuto... O tamanho do Boleto em PDF gerado pela FPDF, fica bem menor, em relação ao Boleto em PDF gerado pelo Fortes Report Boleto FPDF Compactado - 5K Boleto FPDF Sem comactação - 14k Boleto PDF em Fortes Report - 29K Tempo de Geração de 11 Boletos, com FPDF Tempo de Geração de 11 Boletos, com Fortes Report Nota: A geração do Boleto com a FPDF pode ficar ainda mais rápida, se a compactação for desligada... mas no momento não há uma propriedade no componente, que permita esse ajuste... procedure TACBrBoletoFPDF.GeraBoleto(const AACBrTitulo: TACBrTitulo); begin GeraDados(AACBrTitulo); FPDF.SetUTF8({$IfDef USE_UTF8}True{$Else}False{$EndIf}); FPDF.SetCompression(True); // Para não compactar o PDF, Mude para False FPDF.AddPage(); FPDF.SetFont('arial', '', 8); GeraFichaPagamento(AACBrTitulo); end;1 ponto
-
Como essas orientações são sobre o componente ACBrNFSeX, as mesmas também se aplicam para a LibNFSe e posteriormente o ACBrMonitor já que ambos fazem uso do mesmo. Nome da cidade não está associado a nenhum provedor. O por quê da mensagem. Atualmente o ACBrNFSeX atende mais de 1260 cidades com mais de 140 provedores implementados, apesar disso, o Brasil é vasto, contando com 5565 municípios, por causa disso é inevitável que alguma cidade acabe escapando do nosso radar, por isso, se o componente não tiver a informação de integração de uma cidade, será devolvida a mensagem "<NomeCidade> não está associado a nenhum provedor. O que você deve fazer. Veja este tópico em nossa Base de Conhecimento para saber como descobrir se a cidade é aceita pelo componente. Caso precise usar uma cidade que não esteja implementada, o primeiro passo é buscar as informações para poder integrar com o serviço de emissão de NFSe via WebService daquela cidade. Um bom lugar para começar a buscar esta informação é no site da prefeitura e no setor de ISS da mesma. De posse destas informações, você pode criar um tópico no fórum para que a integração possa posteriormente ser adicionada ao componente. Nenhum provedor selecionado. O por quê da mensagem. O ACBrNFSeX foi concebido de forma inteligente, fazendo uso de interfaces. Desta forma, cada provedor pode ter sua própria implementação sem interferir umas com as outras, seguindo a implementação dos métodos da Interface. Isso também quer dizer que a implementação dos métodos em si é feita nas classes do provedor e quando o mesmo não for selecionado será devolvida a mensagem "Nenhum provedor selecionado". O que você deve fazer. O componente define qual é o provedor internamente de acordo com a cidade selecionada, por isso, antes de realizar qualquer operação com o ACBrNFSeX, você deve configurar a cidade do emitente. Não informado a URL de Homologação. O por quê da mensagem. A informação da cidade, provedor que a atende, versão e URL do WebService para todos os municípios que são usados pelo ACBrNFSeX se encontram no arquivo ACBrNFSeXServicos.ini(Para mais informações sobre o arquivo ACBrNFSeXServicos.ini e o que significa cada parâmetro nele, por favor leia nosso Manual de Migração para o ACBrNFSeX). Esta mensagem é exibida quando não tem a informação da URL de homologação para a cidade que está usando. O que você deve fazer. O fato de não ter está informação no arquivo INI é um indício de duas possíveis situações. Quanto foi feita a contribuição com a informação da cidade, não foi passada a informação, por isso não dispomos da mesma. Não tem ambiente de homologação para esta cidade e o teste precisa ser feito em produção. Para ambos os casos, é recomendado entrar em contato com a prefeitura ou o provedor para pedir uma confirmação. Serviço não implementado para este provedor. O por quê da mensagem. Infelizmente, não existe uma padrão estabelecido para NFSe, o mais próximo disso seria o Padrão ABRASF, que apesar de ser chamado de "padrão" é na verdade uma recomendação de como implementar o WebService que pode ou não ser seguida pelos provedores. Dessa forma temos provedores que implementam leiaute próprio e até mesmo aqueles que seguem o padrão ABRASF, podem implementar customizações ou deixar de implementar métodos. Por isso, se você recebeu a mensagem Serviço não implementado para este provedor, significa que está tentando usar um método que não foi implementado por ele. O que você deve fazer. De maneira geral, podemos agrupar o uso da NFSe em três categorias, Emissão, Consulta e Cancelamento/Substituição. Se você tentou usar uma das formas de emissão(síncrona ou assíncrona) e recebeu está mensagem, isso indica que o provedor não implementa a forma como está usando e por isso deve utilizar a outra. Uma dica é deixar o modo de envio automático para que o componente escolha. Caso tenha tentado uma consulta e recebido está mensagem, indica que a mesma não foi implementada pelo provedor e deve optar por alguma outra das consultas disponíveis. Se o cancelamento/substiuição lhe devolver esta mensagem, entre em contato com a prefeitura para confirmar se a mesma permite realizar tal processo via WebService já que em alguns municípios, parte do processo de cancelamento/substituição requer análise de um fiscal. Lista de NFSe não encontrada! (ListaNfse) O por quê da mensagem. Nos casos em que transmite um RPS, mas recebe rejeições no retorno esta é uma das mensagens que vai visualizar. Ela ocorre porque o ACBrNFSeX espera receber dentro da estrutura do retorno uma tag ListaNfse que contém o conteúdo da NFSe em si. Quando o WebService devolve rejeições, ele não devolve esta tag. O que você deve fazer. Quando a transmissão do RPS ocorre sem rejeições e a NFSe é devolvida está mensagem não aparece, portanto, basta resolver as outras rejeições que foram devolvidas pelo WebService. WebService retornou um XML vazio. O por quê da mensagem. Está mensagem é mostrada quando a resposta do WebService a requisição vem vazia. O que você deve fazer. Existe a possibilidade de que o WebService esteja devolvendo uma resposta que não esteja no padrão esperado para ele e por isso o componente não consiga interpretar. Marque a opção para Salvar os Envelopes Soap. Se você usa componente a propriedade é: ACBrNFSeX.Configuracoes.WebServices.Salvar := True; Se você usa Lib é a configuração SalvarWS na seção NFSe das configurações. Ao fazer isso, será salvo para você um arquivo com a resposta devolvida pelo WebService antes de o ACBrNFSeX tentar fazer sua leitura. Verifique o conteúdo deste arquivo e caso o mesmo esteja vazio ou nem ao menos seja gerado, é necessário entrar em contato com o provedor para verificar. Caso haja informação, crie um tópico no fórum anexando os arquivos de envelope para que a equipe ACBr possa analisar se a rotina de leitura do componente deve ser alterada para que leia o conteúdo do retorno.1 ponto
-
Novidade saindo do forno pessoal!! A SEFAZ-RS publicou em 15/05/2023 a Instrução Normativa 37/23, qual estabelece um novo cronograma para a exigência das mudanças trazidas pela legislação, desta forma a obrigatoriedade esta escalonada por faturamento tendo seu ultimo grupo entrando em 01/01/2024. Link para a Instrução Normativa: https://www.diariooficial.rs.gov.br/materia?id=8570041 ponto
-
Olá pessoal, após um período sem atualizar este tópico, temos uma noticia para vocês sobre o ACBrLibNFSe. Depois de alguns meses trabalhando no Desenvolvimento, podemos dizer que sim, finalizamos o ACBrLibNFSe, como todos ou quase todos já conhecem, e também citei no post acima, no Projeto ACBr temos o componente ACBrNFSeX, onde o mesmo é utilizado por desenvolvedores Delphi e Lazarus.. Agora utilizando o ACBrLibNFSe, você consegue fazer uma integração nativa utilizando as linguagens C#, Java, VB6, Harbour... ou qualquer linguagem de programação possível de se consumir uma dll (Windows) ou .so (Linux). Com o ACBrLibNFSe é possível Emitir, Consultar, Cancelar e Substituir uma NFSe (Nota Fiscal de Serviço Eletrônica), veja um exemplo para Consultar a Situação de uma NFSe. //-------------------------------- Exemplo ACBrLib C# --------------------------------------// Parâmetros: aProtocolo - Protocolo NFSe. aNumLote - Numero do Lote NFSe. sResposta - Usado pelo retorno, contem as informações retornadas pela consulta. esTamanho - Usado pelo retorno, contem o tamanho da string (sResposta). ACBrNFSe.ConsultarSituacao("E6694C98-4AF8-4D0C-A4B2-C98BAA704CFE", "50"); Obs: Esperamos ansiosos pelo feedback de todos, e sabemos que podem surgir necessidades de ajustes, por este motivo fique atento aos commits e atualização dos Manuais e Programas de Exemplo. Agradecer primeiramente o @Daniel Simoes e a @Juliana Tamizou por confiarem e acreditar no Desenvolvimento desta ACBrLib, também tenho que agradecer @EMBarbosa, @Italo Giurizzato Junior e @Diego Foliene pelo apoio e suporte neste projeto. Até o próximo lançamento1 ponto
-
Olá. Quando tento enviar um lote para o provedor IPM com o Demo ACBrNFSe recebo a rejeição descrita abaixo: Código erro: 00285. Mensagem: 00285 - NFS-e valida para emissao. Oque essa rejeição poderia ser? Segue anexo com os arquivos XML. 100-rec.xml 100-env-lot.xml1 ponto
-
Obrigado pela dica, tentei fazer, mas está dando erro... Creio que estou "pecando" em algo. Basicamente criei uma procedure onde programo a ação que acontecerá no OnSend: procedure Trlr_rel_vendasnfce.EnviarEmail; var para:String; begin para := InputBox('Enviar relatório por e-mail','Preencha o(s) e-mail(s) abaixo:', ''); if para <> '' then begin try RLReport1.SaveToFile(ExtractFilePath(Application.ExeName) + 'relatorio.pdf'); frm_aviso := Tfrm_aviso.Create(Application); frm_aviso.lbl_aviso.Caption := ' Enviando e-mail'; frm_aviso.Show; frm_aviso.BringToFront; Application.ProcessMessages; dtm_banco.ACBrMail1.Clear; dtm_banco.ACBrMail1.IsHTML := False; dtm_banco.ACBrMail1.Subject := 'Relatório Vendas NFCe '; AjustaParametrosDeEnvio(para); dtm_banco.ACBrMail1.AltBody.Text := 'Empresa: ' + dtm_banco.Emitente_Nome + #13 + #13 + 'CNPJ: ' + dtm_banco.Emitente_CNPJCPF + #13 + #13 + 'Telefone: ' + dtm_banco.Emitente_Fone + #13 + #13 + #13 + #13 + #13 + #13 + '* Este e-mail foi enviado automaticamente pelo aplicativo da B&D Sistemas.Favor não responder. '; dtm_banco.ACBrMail1.AddAttachment(ExtractFilePath(Application.ExeName) + 'relatorio.pdf'); dtm_banco.ACBrMail1.Send(False); frm_aviso.Free; ShowMessage('Relatório enviado com sucesso'); except on E : Exception do begin frm_aviso.Free; ShowMessage('ERRO' + #13 + #13 + e.message); end; end; end; end; Aí no evento BeforePrint do RLReport1 eu coloquei o seguinte comando: RLPreviewSetup1.OnSend := EnviarEmail; E no evento AfterPrint do RLReport1 eu coloquei o seguinte comando: RLPreviewSetup1.OnSend :=nil; Mas na linha do BeforePrint (RLPreviewSetup1.OnSend := EnviarEmail;) está retornando o seguinte erro: [DCC Error] u_report_rel_vendasnfce.pas(252): E2009 Incompatible types: 'Parameter lists differ'1 ponto