Painel de líderes

Gostaria de deixar registrado meus agradecimentos a todos que colaboram com esse projeto, principalmente por solucionar situacoes criticas (Software-houve - Cliente ) do qual me sinto segunro em sempre usar esse pacote maravilhoso (acbrmonitorplus) integrador show de bola. Obrigado a todos mais uma vez

Bom dia a todos, Os documentos fiscais eletrônicos: BP-e, CT-e, MDF-e, NF-e e NFC-e estão com Portais novos. Abaixo o link do Portal do BP-e: https://dfe-portal.sefazvirtual.rs.gov.br/Bpe Através desse Portal do lado direito temos os links para os demais. Nos Portais da NF-e e NFC-e temos uma nova versão do Manual (versão 7). Observação importante a versão da nota ainda é 4.00 o Manual que esta na versão 7. Nessa nova versão, o ENCAT resolveu quebrar o Manual em vários, temos agora um manual tratando só do DANFE e um outro só do layout do XML. Quem desejar ter acesso a toda documentação que utilizamos para o desenvolvimento dos componentes, pode baixar da seguinte forma: Crie uma pasta chamada Manuais (por exemplo) e configure o tortoise com a seguinte URL: svn://svn.code.sf.net/p/acbr/code/tools Tenham todos uma boa leitura.

Acabei de enviar uma alteração no componente que vai fazer esse arredondamento assim que você enviar um valor para Titulo.ValorDocumento. Queira por favor, atualizar e testar com essa versão que eu enviei: Revisão 16398 -- ACBrBoleto -- [*] Ao setar o valor do documento em um título, o ACBrBoleto agora arredonda o valor para 2 casas decimais. Isso corrige o problema de valor de documento estar diferente da LinhaDigitada.

Muito obrigado... Ficaremos contentes se puder deixar um Depoimento em nossa área de Testemunhos.. https://www.projetoacbr.com.br/forum/testimonials/

Segue URL Web, para acesso aos manuais de DFe, na pasta TOOLs de nosso SVN https://svn.code.sf.net/p/acbr/code/tools/DFe/

A solução parece estar do lado da aplicação... Basta não enviar valores com mais de 2 decimais para o componente... Você pode fazer isso, usando o método RoundTo (do Delphi) ou RoundABNT da ACBrUtil.pas

A mensagem SOAP está sendo gerado com a tag mdfeDadosMsg duplicada, causando a rejeição: Usar somente o namespace padrão do MDF-e <soap12:Envelope xmlns:soap12="http://www.w3.org/2003/05/soap-envelope" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> <soap12:Header> <mdfeCabecMsg xmlns="http://www.portalfiscal.inf.br/mdfe/wsdl/MDFeDistribuicaoDFe"> <cUF>41</cUF> <versaoDados>1.00</versaoDados> </mdfeCabecMsg> </soap12:Header> <soap12:Body> <mdfeDadosMsg xmlns="http://www.portalfiscal.inf.br/mdfe/wsdl/MDFeDistribuicaoDFe"> <mdfeDadosMsg> <distDFeInt xmlns="http://www.portalfiscal.inf.br/mdfe" versao="1.00"> ... </distDFeInt> </mdfeDadosMsg> </mdfeDadosMsg> </soap12:Body> </soap12:Envelope> Para gerar o SOAP corretamente, removi o parâmetro "mdfeDadosMsg" da criação do DistDFeInt em TDistribuicaoDFe.DefinirDadosMsg. DistDFeInt := TDistDFeInt.Create(FPVersaoServico, NAME_SPACE_MDFE, '', 'consChMDFe', 'chMDFe', False);

Boa tarde! Segue alteração para preencher corretamente a propriedade ArquivoPDF nas gerações de PDF de CT-e e MDF-e com FastReport. Obrigado. ACBrCTeDACTEFR.pas ACBrMDFeDAMDFEFR.pas

Bom dia pessoal! Estou desenvolvendo uma aplicação para acesso remoto no qual eu tenho 3 pontos, a conexão do cliente, a conexão do servidor onde todas as conexões são centralizadas, e a conexão de suporte que vai ser o ponto de acesso aos clientes. Até ai tudo bem, as conexões estão definidas e estão ok, mas a captura de imagem não está funcionando como deveria, a forma como a conexão do suporte recebe a imagem da conexão é a seguinte. O suporte envia uma requisição para o servidor -> o servidor identifica para qual cliente é a requisição e envia para o cliente -> o cliente recebe a mensagem e retorna para o servidor com a imagem capturada da tela. Até no servidor a imagem chega completa, com seu tamanho total. Porém quando eu tento enviar de volta para a conexão do suporte, a imagem simplesmente não vai com seu tamanho total, assim não consigo remontar ela na conexão do suporte. Estou utilizando dos componentes ClientSocket e ServerSocket para fazer a transmissão de mensagens e a transmissão da imagem é feita através da conversão da imagem para TMemoryStream e em seguida para String, que como eu disse até o servidor chega 100%. Se alguém já passou por alguma situação parecida, gostaria de um auxílio ou alguma luz kkk. Agradeço desde já! Obrigado pela atenção.

Você precisa identificar, em que local do seu código, o programa fica em Loop Infinito ou travado..

Boa tarde Verifiquei que o Italo atualizou os fontes hoje as 15:30, atualizei e funcionou! Foi adicionado mais uma Tag Condicao. Abraço!

Tenho o mesmo problema aqui com o teclado no Delphi Rio. Apliquei as atualizações dele mas mesmo assim não resolveu essa questão do teclado numérico no mobile. Acredito que muito em breve de sair uma atualização para ele.

Joceandro, Mais uma vez muito obrigado pela colaboração.

Bom dia Allan, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Bom dia pessoal. O componente está fazendo uma validação errada na DT_SAIDA do registro K260. No Guia Prático EFD-ICMS/IPI – Versão 3.0.1 a validação deste campo está descrita da seguinte forma: Campo 04 (DT_SAÍDA) - Validação: a data informada deve ser menor ou igual a DT_FIN do registro K100. O componente gera a exceção informando que "A data deve estar compreendida no período informado nos campos DT_INI e DT_FIN do Registro K100", caso este campo for menor que DT_INI. Fiz a alteração, vejam se estou certo na minha afirmação. Obrigado. ACBrEFDBloco_K_Class.pas

No svn a colaboração Obrigado

Bom dia Léo, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Segue em anexo alteração para balança Ramuza com Tara e Etiqueta. ACBrCargaBal.pas

Obrigado pela Informação!

Conheci esse projeto a alguns dia e é incrível ta de parabéns

Olá a todos do Fórum! Estou colocando aqui um link muito interessante para os demais usuários que precisam adentrar no Delphi e Lazarus. Segue link para o Udemy: https://www.udemy.com/aprenda-delphi-e-lazarus-do-zero/ Custo do curso: ZERO! Vale muito também conferir o curso pago do instrutor, pois, o mesmo já indica o Delphi 10.3 - Rio! Um abraço a todos!

No svn suas sugestões. obrigado

Beleza Vou Atualizar aqui e informo. Muito Obrigado Abraços

Boa tarde, eu fiz aqui o S-1250 colocando o infoProcJ que estava faltando, @Italo Jurisato Junior de uma olhada ve se esta tudo OK pcesS1250.pas

anexa o arquivo aqui no post, logo abaixo ele tem a opção

Bom dia Kartter, No primeiro caso, basta você registrar as DLLs. Na pasta Capicom onde tem as DLLs do Capicom existe um BAT para realizar o registro das mesmas.

Bom dia Carlos, Esse pessoal não tem o que inventar. Estão bebendo muita gasolina. Agora me explica como é feito essa assinatura do serviço e como incluir um segundo SignatureValue na assinatura?

Bom dia Darlana, A URL montada pelo componente: https://porteirinhamg.webiss.com.br/ws/nfse.asmx é valida. Favor entrar em contato com o provedor, pode ser que se faça necessário um cadastro para que o contribuinte possa emitir a nota via webservice.

Bom dia Arruda, E ao informar a alíquota como sendo 4,30 a nota é rejeitada? Se sim, já tentou informar 0,0430 ?

Bom dia Ariel, Não existe uma pasta desse provedor dentro da pasta Schemas, pelo simples fato de que até hoje esse provedor não disponibilizou os schemas. Agora se a cidade mudou de provedor, você precisa alterar o arquivos Cidades.ini e o se necessário <provedor>.ini com base nas demais cidades que utilizam esse <provedor>.

Bom dia Anderson, Após atualizar todos os fontes de todas as pastas, reinstalou através do ACBrInstall_Trunk2 marcando a opção para apagar arquivos antigos?

Bom dia Com a alteração sugerida pelo @drdenilson com relação ao "toRetornoBaixadoViaArquivo" faz-se necessário alterar também na linha 1486 onde existia: toRetornoBaixado : Result := '09'; substituir por: toRetornoBaixadoViaArquivo : Result := '09'; Pois senão fizer isso está acontecendo problemas ao processar retornos onde vem a instrução de baixa Código "09". Não está localizando corretamente essa instrução e colocando ela com código de instrução "02" o que é incorreto. O Arquivo corrigido está em anexo abaixo. ACBrBancoSicredi.pas

@Italo Jurisato Junior mais um ajuste.. Inclusão e validação do campo objDet Segue units.. pcesCommon.pas pcesGerador.pas pcesS2200.pas

Bom dia Joceandro, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Boa tarde Italo !, Criado novos códigos para Natureza de Operação para o Município de Chapecó-SC Os Códigos foram os seguintes: 108, 112, 113, 115 pnfsConversao.pas

Bom dia, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Não temos esse modelo para testes... Verifique como está a configuração da impressora... deixe ela no modo nativo da Diebold..

Olá! Gostaria apenas de acrescentar uma situação pela qual passamos com a ConsultaCadastro. Em máquinas com Win7 com ou sem SP1 estava ocorrendo o erro: "Um ou mais erros foram encontrados no certificado Secure Sockets Layer (SSL) enviado pelo servidor". Descobrimos que era problema com o TLS 1.2 que não estava funcionando corretamente. Então foi necessário instalar as atualizações abaixo. - Instalar o SP1(Nas máquinas que ainda não a possuem) (https://www.microsoft.com/pt-BR/download/details.aspx?id=5842) - MicrosoftEasyFix51044 (http://download.microsoft.com/download/0/6/5/0658B1A7-6D2E-474F-BC2C-D69E5B9E9A68/MicrosoftEasyFix51044.msi) - KB2992611 (https://www.microsoft.com/pt-br/download/details.aspx?id=44633) Após instalar todas as atualizações o erro não aconteceu mais e a consulta funcionou perfeitamente.

Só existe WebService de consulta por Lote... Veja o Demo do ACBrSATWS

dreamsoft_PR, Você não disse qual banco está utilizando. Mas no geral, você poderia utilizar uma tabela derivada. Algo assim: select * from ( select i.codvend ,sum(i.vlrtotal) soma_item ,(select sum(c.vlrtotal) from tab_vend c where c.codvend = i.codvend group by c.codvend) soma_venda from tab_item i left join tab_vend w on (w.codvend = i.codvend) where w.datvend >= :dae group by i.codvend ) where soma_venda < soma_item Outra alternativa semelhante é utilizar a cláusula WITH Faça uns testes e compartilhe o resultado. Abraço.

Pessoal bom dia, parece que esse problema do retorno foi resolvido, recebi a resposta da Sefaz MG hoje. Não tive tempo de testar ainda, mas pelo menos eles reconheceram o erro:

Pessoal, bom dia. Entendo que a restituição será feita ao varejista. Tendo em vista que, mesmo que o ICMS ST seja recolhido no início da cadeia, o valor do mesmo é adicionado ao total da Nota Fiscal e repassado à próxima cadeia. Desta forma, entende-se que quem paga o ICMS ST na realidade é o varejista (sabemos que é o consumidor final, mas como ele não tem como ser ressarcido, é repassado para a cadeia anterior). Creio que seja esta a lógica.

Como você fez a instalação? com o instalador ele não tem o path onde tem esse arquivo

@rodrigoogioni Tenho clientes em outros estados que são MEI e emitem NFe. Mas pelo o que vi em SC não pode emitir, mas parece que existe umas exceções. Lembrando que para o microempreendedor individual " MEI " com inscrição estadual é vedada a emissão de NF-eletrônica, cfe RICMS/SC Anexo 4, art.5º, § 2º. exceto nos casos expressos acima. http://www.sebrae-sc.com.br/leis/default.asp?vcdtexto=6157&amp;^^ Dercide.

anexe o XML, referente a essa venda...

Tópico alterado para área pertinente ao assunto SPED.

Vou fazer a alteração necessária e posto aqui meu código fonte para análise. Obrigado pelo retorno.

Porem o cliente consegue emitir NFSe pelo site tranquilamente. https://porteirinhamg.webiss.com.br/autenticacao/entrar https://porteirinhamg.webiss.com.br/issqn/nfse/visualizar/888 (somente o contribuintes inscritos) Cidades.ini WebISSv2.ini

Boa tarde Ítalo, Mesmo erro, utilizei a tua ACBrDFeXsLibXml2 + ACBrNFSeWebServices atualizada do repositório + libWinCrypt + xsLibXml2, xml inválido em anexo: "Arquivo enviado com erro na assinatura. Erro no elemento: Pedido Acerte a assinatura do arquivo. Pedido de Cancelamento nao esta assinado. O pedido de cancelamento deve conter assinatura digital." Com libWinCrypt + xsMsXml + ACBrNFSeWebServices que eu anexei no topo dá certo, xml válido em anexo. 201900000000170-ped-can-INVALIDO.xml 201900000000170-ped-can-VALIDO.xml

Bom dia a todos, Vocês chegaram a notar que existe um arquivo chamado DistribuicaoDFe.txt dentro da pasta: ...\Exemplos\ACBrDFe\ACBrNFe ? Vocês leram a NT que mencionei em postagens anteriores? Você entenderam que ao executar pela primeira vez o DistribuicaoDFe o que se obtêm são os resumos das notas (semelhante ao ConsultarNFeDest)? E que ao executar o DistribuicaoDFe pela segunda (ou terceira) vez o que se obtêm são os XML completos das notas manifestadas (semelhante ao Download)? Exemplo pratico: Suponha que foram emitidas 70 notas contra o seu CNPJ. UltNSU = 0 DistribuicaoDFe( cUF, CNPJ, UltNSU, '' ); // onde cUF e CNPJ são do destinatário da mercadoria Teremos como resposta 50 resumos de notas UltSU = ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; DistribuicaoDFe( cUF, CNPJ, UltNSU, '' ); Teremos como resposta os 20 resumos de notas restantes, uma vez que foram emitidas 70 notas contra o seu CNPJ, lembra? UltSU = ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; Note que toda vez que executamos o DitribuicaoDFe devemos ler o valor de UltNSU pois sempre vamos usar essa informação na próxima vez que ele for executado. Como eu sei que não tem mais resumos de notas, simples: if ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 137 then sTemMais := 'N' else sTemMais := 'S'; Se o Status for 137 significa que não tem mais documentos a serem lidos, logo devemos esperar por 1 hora para executar novamente o DistribuicaoDFe. Bom, agora você deve realizar a manifestação das 70 notas cujos resumos foram retornados pelo DistribuicaoDFe. Manifestado todas eles devemos executar: DistribuicaoDFe( cUF, CNPJ, UltNSU, '' ); // lembre-se o valor de UltNSU se refere a última execução do DistribuicaoDFe, pois este sempre retorna o um novo valor para UltNSU, veja a linha abaixo. UltSU = ACBrNFe.WebServices.DistribuicaoDFe.retDistDFeInt.ultNSU; As duas linhas acima deve-se serem executadas até que o Status seja 137. Depois de manifestar as 70 notas (segundo o nosso exemplo) nessas ultimas execuções do DistribuicaoDFe podemos obter os XMLs completos dessas notas, bem como novos resumos de mais notas, resumos de eventos e até o XML completo de Eventos dessas notas manifestadas. Os XML completos das notas, serão salvos em disco desde que a propriedade: Configuracoes.Arquivos.Salvar tenha o valor True e esses XML serão salvos na pasta pré definida em PathDownload. Bom agora é com vocês, arregace as mangas e bom trabalho.